博客
关于我
强烈建议你试试无所不能的chatGPT,快点击我
贝多芬音乐
阅读量:4982 次
发布时间:2019-06-12

本文共 741 字,大约阅读时间需要 2 分钟。

#include<stdio.h>

#include<conio.h>
#include<Windows.h>
const unsigned PER =225;
enum{Do=262,Re=294,Mi=330,Fa=392,So=392,La=440,Xi=494};
void Play(int f,int a,int t)
{
int i=0;
Beep((unsigned)(f*a),t*PER);
}
void Stop(int t)
{
Sleep(t*PER);
}
int main()
{
Play(Mi,2,2);Play(Mi,2,2); Play(Fa,2,2); Play(So,2,2);
Play(So,2,2);Play(Fa,2,2); Play(Mi,2,2); Play(Re,2,2);
Play(Do,2,2);Play(Do,2,2); Play(Re,2,2); Play(Mi,2,2);
Play(Mi,2,2);Play(Re,2,2); Play(Re,2,4);
Play(Mi,2,2);Play(Mi,2,2); Play(Fa,2,2); Play(So,2,2);
Play(So,2,2);Play(Fa,2,2); Play(Mi,2,2); Play(Re,2,2);
Play(Do,2,2);Play(Do,2,2); Play(Re,2,2); Play(Mi,2,2);
Play(Re,2,2);Play(Do,2,2); Play(Do,2,4);
Stop( 0 );
return 0;

转载于:https://www.cnblogs.com/xikai520/p/10105276.html

你可能感兴趣的文章
::作用域运算符
查看>>
memcpy memmove区别和实现
查看>>
linux 下创建并动态加载.so 文件
查看>>
python--redis
查看>>
禁用input帐号密码的自动填充
查看>>
python的小技巧
查看>>
json数组转数组对象
查看>>
KMP算法详解 转帖
查看>>
Struts2+Hibernate+Spring+Webservice 项目从Tomcat到WebLogic遇到问题的解决方法
查看>>
C# 代理/委托 Delegate
查看>>
笨方法学python--参数,解包,变量
查看>>
android 加载本地图片与网络图片
查看>>
易经读书笔记17 泽雷随
查看>>
oracle正则表达式函数 匹配
查看>>
jmeter --自动化badboy脚本开发技术
查看>>
Linux驱动:LCD驱动测试
查看>>
Mark Down 尝试
查看>>
第三节:使用Log4net和过滤器记录异常信息,返回异常给前端
查看>>
fedora的选择
查看>>
AlphaPose论文笔记《RMPE: Regional Multi-person Pose Estimation》
查看>>