



全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
#include#include #define uchar unsigned char#define uint unsigned intsbit BEEP=P15;/生日快乐歌的音符频率表,不同频率由不同的延时来决定uchar code SONG_TONE=212,212,190,212,159,169,212,212,190,212,142,159,212,212,106,126,159,169,190,119,119,126,159,142,159,0;/生日快乐歌节拍表,节拍决定每个音符的演奏长短uchar code SONG_LONG=9,3,12,12,12,24,9,3,12,12,12,24,9,3,12,12,12,12,12,9,3,12,12,12,24,0; void delayms(uint xms)/延时程序uint i,j;for(i=xms;i0;i-)for(j=110;j0;j-); void xg0()/效果0 uint a,b;a=0xee;delayms(1000);/延时1秒for(b=4;b0;b-)/点亮次数P0=a;/灯1和5亮delayms(1000);a=_crol_(a,1);/循环左移1位void xg1()/效果1 uint a,b;a=0x77;delayms(1000);for(b=4;b0;b-)P0=a;/灯4和8亮delayms(1000);a=_cror_(a,1);/循环右移1位void xg2()/效果2P0=0xe7;/灯4与5亮delayms(1000);P0=0xdb;/灯3和6亮delayms(1000);P0=0xbd;/灯2和7亮delayms(1000);P0=0x7e;/灯1和8亮delayms(1000);void xg3()/效果3P0=0x7e;/灯1和8亮delayms(1000);P0=0xbd;/灯2和7亮delayms(1000);P0=0xdb;/灯3和6亮delayms(1000);P0=0xe7;/灯4与5亮delayms(1000);/播放函数void PlayMusic() uint i=0,j,k;while(SONG_LONGi!=0|SONG_TONEi!=0) /播放各个音符,SONG_LONG 为拍子长度for(j=0;jSONG_LONGi*20;j+)BEEP=BEEP;/SONG_TONE 延时表决定了每个音符的频率for(k=0;kSONG_TONEi/3;k+);delayms(10);i+; void main()BEEP=0;while(1)PlayMusic(); /播放生日快乐BEEP=1;xg0();P0=0xff;delayms(1000);xg1();P0=0xff;delayms(1000);
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 养老院应急预案范文(20篇)
- 2025年工业互联网平台量子通信技术在智能家居通信领域的应用预研报告
- 2025年文化娱乐产业政策环境与产业发展趋势研究报告
- 2025年社区团购市场用户留存与社区团购平台用户活跃度提升策略研究报告
- 江西省部分学校2025-2026学年高三上学期8月百万大联考化学试题(含答案)
- 广东省汕尾市陆河县河城中学2024-2025学年上学期九年级10月月考英语试题(含答案无听力原文及音频)
- 班主任工作例会上校长重要讲话:新学期班主任请把这“三件事”和“一条线”放在心上
- 应对焦虑的课件教学
- 巡道工安全培训教案课件
- 岩石圈的物质循环
- 食材配送培训计划
- 2025-2026学年人教版小学数学六年级上册教学计划及进度表
- 2025年公共卫生检验员考试试卷及答案
- 员工培训课件心脑血管
- 2025年专武干部面试题目及答案
- 弱猪护理培训课件
- 下肢血管疾病超声诊断
- 餐中服务细节培训资料
- 低钠血症护理查房
- 学生电动车管理暂行办法
- 轧钢安全培训课件
评论
0/150
提交评论