- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
音乐门铃;门铃效果描述:;原理电路图:;按下按键效果:;程序代码:;// 延时函数
//-----------------------------------------------------------------
void delay_ms(INT16U x)
{
INT8U t; while(x--) for(t = 0; t 120; t++);
}
//------------------------------------------------------------------
// T0中断
void Timer0_ISR() interrupt 1
{
Doorbell=~Doorbell;
p++;
; if(p400)//高音 //时间拖长的话:调节400和800
{
TH0=(8192-700)/32;
TL0=(8192-700)%32;
}
else
if(p800)//低音
{
TH0=(8192-1000)/32;
TL0=(8192-1000)%32;
}
else //关闭
{
TR0=0;
p=0;
}
};// 主程序
void main()
{
IE=0x82; //使能T0中断
TMOD=0x00; //T0工作于方式0
TH0=(8192-700)/32; //初始值定时700us
TL0=(8192-700)%32;
while(1)
{ if(Key==0) //按下K1键时启动定时器
{
delay_ms(10); //延时消抖
if(Key==0) //按键按下,按键释放后启动T1
{ while(!Key); TR0=1;}
}
}
};其它的效果:按下按键后播放音乐,按下次数不同,播放不同的音乐;代码如下:;//14个音符在TIMER0模式0下的定时/计数寄存器值初值表
INT8U code HI_LIST[] =
{ 0,226,229,232,234,236,238,240,241,243,244,245,246,247,248 };
INT8U code LO_LIST[] =
{ 0, 4, 12, 9, 20, 2, 8, 6, 2, 22, 5, 26, 1, 4, 2 };
//三段曲目音符(可以自行修改)
INT8U code Song[][50] =
{
{1,2,3,1,1,2,3,1,3,4,5,3,4,5,5,6,5,3,5,6,5,3,5,3,2,1,2,1,-1},
{3,3,3,4,5,5,5,5,6,5,3,5,3,2,1,5,6,5,3,3,2,1,1,-1},
{3,2,1,3,2,1,1,2,3,1,1,2,3,1,3,4,5,3,4,5,5,6,5,3,5,3,2,1,3,2,1,1,-1}
};
//三段曲目节拍
INT8U code Len[][50] =
{
{1,1,1,1,1,1,1,1,1,1,2,1,1,2,1,1,1,1,1,1,1,1,1,1,1,2,1,2,-1},
{1,1,1,1,1,1,2,1,1,1,1,1,1,1,2,1,1,1,1,1,1,2,2,-1},
{1,1,2,1,1,2,1,1,1,1,1,1,1,1,1,1,2,1,1,2,1,1,1,1,1,1,1,2,1,1,2,2,-1}
};;// 延时子程序
void delay_ms(INT16U ms)
{
INT8U i; while(ms--) for(i = 0; i 120; i++);
}
void main() // 主程序
{
IE=0x01; //允许TIMER0与INT0中断;
TMOD=0x00;
IT0=1; //外部中断触发方式:下降沿触发
IP=0x01; //将INT0设为最高优先级
while(1)
{
while(K1==1); //等待按下播放键
while(K1==0); //等待释放播放键
Tone_idx=0; //从第0个音符开始
TR0=1; //开始播放
;while(Song[Song_idx][Tone_idx]!=-1K1==1TR0==1)
{
delay_ms(300*Song[Song_idx][Tone_idx]);//音符的播放延时形成节拍
Tone_idx++; //下一个音符
}
TR0=0;
您可能关注的文档
- 给学生的奖状模板.ppt
- 股东资格相关45245.ppt
- 光与热教学课件.ppt
- 桂枝香王安石 课件.ppt
- 过滤分离器西仵门站.ppt
- 函数知识 多媒体课堂.ppt
- 汉字输入技术.ppt
- 焊缝相关计算题.ppt
- 行风建设的主要内容及加强行风建设的重要意义.ppt
- 行政职业能力测试之数量关系.ppt
- 养老评估师中级行为面试题库及案例分析.docx
- 面试培训督导时考察其课程理解能力的题目.docx
- 税务专员面试中关于增值税政策的常见问题解答.docx
- 2025宁波市医疗保障局局属事业单位宁波市医疗保障基金管理中心招聘事业编制工作人员1人备考试题附答案.docx
- 2025咸宁市汉口银行咸宁嘉鱼支行招聘笔试历年题库附答案解析.docx
- 2025北京人才发展战略研究院招录笔试备考题库附答案.docx
- 2025四川成都市龙泉驿区青台山中学校秋季教师招聘22人笔试试题附答案解析.docx
- 2025台州市银龄讲学计划教师招募13人笔试参考试题附答案解析.docx
- 2025中国铁建公开招聘42人笔试题库附答案.docx
- 2025中智咨询研究院社会招聘笔试参考题库附答案.docx
最近下载
- 最新历年医院临床医生招聘考试测试题及答案.docx VIP
- T∕CASEI T102-2015 曳引驱动电梯制动能力快捷检测方法 .pdf
- DeepSeek+DeepResearch:让科研像聊天一样简单(完整版).pdf VIP
- 审计学推荐案例10个.docx VIP
- 刑法案例分析.docx VIP
- 中国儿童睡眠指南.docx
- 青春健康初级师资笔试试题及答案.doc VIP
- 战略品牌管理全球版·原书第4版凯勒习题及答案.docx VIP
- 一种新型振动润麦着水机.pdf VIP
- Unit 6 Useful numbers A Talk&learn 课件-三年级上册英语(2024).pptx VIP
原创力文档


文档评论(0)