下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、#in clude<reg52.h> typedef un sig ned char uint8; typedef un sig ned int uin t16;uint8 Count,i;sbit Speak =P1A2; /蜂鸣器器控制脚sbit keyl =卩3人2;按键控制引脚sbit key2 =卩3人3;sbit key3 =卩3人4;/*以下数组是音符编码*/uin t8 code SONG = 0xff,0x39,0x30,0x33,0x30,0xff,0x30,0x30,0x00,;定时器T0方式1,定时10msvoid TimeOnit() TMOD = 0x0
2、1;IE = 0x82;THO = OxDC;TLO = 0x00;void Time0n t() in terrupt 1 TH0 = 0xDC;TL0 = 0x00;Coun t+;void delay (ui nt8 k)按键防抖延时ui nt8 j;while(k-)!=0)for(j=0;j<125;j+);void Delay_xMs(ui nt8 x)/发声延时uin t8 i,j;for(i=0; i<x; i+)for(j=0; j<3; j+);void Play_So ng(ui nt8 i)蜂鸣器发声函数uint8 Temp1,Temp2;ui nt8
3、 Addr;Count = 0;Addr = i *3;while(1)Temp1 = SONGAddr+;if (Temp1 = OxFF) /TR0 = 0;Delay_xMs(100);else if (Temp1 = 0x00) /return;elseTemp2 = SONGAddr+; TR0 = 1;while(1)Speak = Speak;Delay_xMs(Temp1); if(Temp2 = Cou nt) Cou nt = 0; break;/中断计数器清0休止符歌曲结束符void keysca n (void)/ i f(key1=0)delay(10);if(ke y仁=0)按键切换声音函数i=0;if(key2=0)delay(10);if(key2=0)i=1;if(key3=0)delay(10);if(key3=0)i=2;void Mai n()T!me
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- SBAR沟通在外科护理中的应用
- 2026年中小学教师信息技术与学科教学融合试题
- 2026年ie工作研究考试试题及答案
- 中国特色社会主义理论体系普及试题
- 大学生职业生涯规划与就业指导培训试题及答案
- 《教材同步拓展课|课内知识延伸讲解+初中七年级语文通假字古今字》
- 从“买布的问题”说起-一元一次方程的讨论课件
- 森林防火主题班会
- 急性心肌梗塞溶栓治疗北京某著名医院心内科文档
- PCT鉴别细菌感染及指导抗生素应用
- 第一单元第3课文人意趣课件桂美版初中美术八年级下册
- 2025年【副高】卫生管理卫生高级医学高级职称考试题库及答案
- 2025-2026学年青岛版小学数学毕业学情自测卷附答案(2套)
- 2026铁路监理工程师网络继续教育考试题及答案
- 2026年春季学期苏教版三年级科学下册期末检测试卷含答案(三套)
- 2025年北京市初二学业水平地理生物会考真题试卷+答案
- 2026年山西晋中市初二学业水平地理生物会考真题试卷+解析及答案
- 《民事诉讼法》期末重点整理马工程版
- 2022-2023学年广州市天河区五下数学期末调研试题含答案
- 年产80万吨高级瓦楞原纸项目环境影响报告书
- 水利工程建设安全生产检查表
评论
0/150
提交评论