版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
本文格式为Word版,下载可任意编辑——AVR单片机设计电子琴程序
电子琴的c语言程序
AVR单片机设计电子琴程序
//
//名称:多首电子音乐的选播
//
//说明:本例运行时,每次按下K1将切换播放下一首电子音乐,对应的
//LED指示灯将被点亮.
//
//
#defineF_CPU8000000UL//8M晶振
#includeiom16v.h
#includemacros.h
#defineucharunsignedchar
#defineuintunsignedint
//指示灯控制(任一LED点亮时都会关闭其他指示灯)
#defineLED1_ON()PORTA=0xFE
#defineLED2_ON()PORTA=0xF7
#defineLED3_ON()PORTA=0xBF
#defineLED4_ON()PORTA=0x7F
//===========================================================
//当前按键序号,该矩阵中序号范围为0-15,16表示无按键
ucharKeyNo=16;
//C调音符频率表(部分)
uintTONE_FRQ[]=
{0,262*8,294*8,330*8,349*8,392*8,440*8,494*8,523*8,587*8,659*8,698*8,784*8,880*8,988*8,1046*8};
//共阳数码管段码表(0~F)
ucharSEG_CODE[]=
{
0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,//01234567
0x80,0x90,0x88,0x83,0xC6,0xA1,0x86,0x8E//89ABCDEF
};
//音符延时表,它们分别对应于0~15号音符的输出频率
uintTone_Delay_Table[]=
{
64021,64103,64260,64400,64524,64580,64684,64777,
64820,64898,64968,65030,65058,65110,65157,65178
};
//第一段(Tone为音符,Time为节拍)
ucharMusic1_Tone[]=
{3,5,5,3,2,1,2,3,5,3,2,3,5,5,3,2,1,2,3,2,1,1,0xFF};
电子琴的c语言程序
ucharMusic1_Time[]=
{2,1,1,2,1,1,1,2,1,1,1,2,1,1,2,1,1,1,2,1,1,1,0xFF};
//其次段
ucharMusic2_Tone[]=
{1,3,3,3,3,5,4,2,5,3,7,6,5,5,7,4,4,3,6,7,2,1,0xFF};
ucharMusic2_Time[]=
{2,1,1,2,1,1,1,2,1,1,3,2,1,1,2,4,1,1,2,1,1,1,0xFF};
//第三段
ucharMusic3_Tone[]=
{0,1,2,3,4,5,5,6,7,8,9,10,11,12,13,14,15,15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0xFF};
ucharMusic3_Time[]=
{1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0xFF};
//第四段1/2拍为底
ucharMusic4_Tone[]=
{1,2,3,1,1,2,3,1,3,4,5,3,4,5,5,6,5,4,3,1,5,6,5,4,3,1,1,5,1,1,5,1,0xFF};
ucharMusic4_Time[]=
{2,1,1,1,2,1,1,1,2,1,1,2,1,1,3,0.5,0.25,0.5,0.25,1,1,0.5,0.25,0.5,1,1,1,1,3,1,1,3,0xFF};//======================================
uchar*Music_Tone_Ptr[]={Music1_Tone,Music2_Tone,Music3_Tone,Music4_Tone},*Music_Time_Ptr[]={Music1_Time,Music2_Time,Music3_Time,Music4_Time};//音乐片段索引,音符索引
uintTone_Idx=0;
//从当前数组中取音符的位置
uinti=0,j=1,Music_Idx=0;
//暂停控制
uintFALSE=0,TRUE=1,Pause=1;
//=================================================
voiddelay_1ms(void)
{
uinti;
for(i=1;i(uint)(F_CPU*143-2);i++)
;
}
voiddelay(unsignedintn)
{
unsignedinti;
for(i=0;in;i++)
delay_1ms();
}
//=================================================
电子琴的c语言程序
//
//判断键盘矩阵是否有键按下
//
ucharKeyMatrix_Down()
{
//高4位输出,低4位输入,高4位先置0,放入4行
DDRB=0XF0;
PORTB=0X0F;
delay(1);
returnPINB!=0x0f?1:0;
}
//
//键盘矩阵扫描子程序
//
voidKeys_Scan()
{
//在判断是否有按键按下的函数KeyMatrix_Down中,
//高4位输出,低4位输入,高4位先置0,放入4行
//按键后00001111将变成0000XXXX,X中有1个为0,3个为1
//下面判断按键发生于0~3列中的哪一列
switch(PINB)
{
case0B00001110:KeyNo=0;break;
case0B00001101:KeyNo=1;break;
case0B00001011:KeyNo=2;break;
case0B00000111:KeyNo=3;break;
default:KeyNo=0xFF;
}
//高4位输入,低4位输出,低4位先置0,放入4列
DDRB=0x0F;
PORTB=0xF0;
delay(1);
//按键后11110000将变成XXXX0000,X中有1个为0,3个为1
//下面对0~3行分别附加起始值0、4、8、12
switch(PINB)
{
case0B11100000:KeyNo+=0;break;
case0B11010000:KeyNo+=4;break;
case0B10110000:KeyNo+=8;break;
电子琴的c语言程序
case0B01110000:KeyNo+=12;break;
default:KeyNo=0xFF;
}
}
//
//主程序
//
intmain()
{//矩阵键盘
DDRB=0xFF;
PORTB=0xFF;
//LED灯
DDRA=0xFF;
PORTA=0xFF;//LED初始时全部关闭
//数码管
DDRC=0xFF;
PORTC=0xBF;//数码管初始显示“-〞
DDRD|=BIT(PD7);
PORTD=~BIT(PD7);
//外部中断
DDRD=~(BIT(PD2)|BIT(PD3));//中断引脚设为输入
PORTD=BIT(PD2)|BIT(PD3);//中断输入引脚设为内部上拉
MCUCR=0x82;//INT0,INT1均为下降沿触发
GICR=BIT(INT0)|BIT(INT1);//INT0,INT1中断许可
TCCR1A=0x00;//TC1与OC1A不连接,阻止PWM功能
TCCR1B=0x09;//T1预分频:1,CTC模式(比较匹配时TC1自动清零?
SREG=0x80;//开中断
while(1)
{
if(KeyMatrix_Down()==0)
电子琴的c语言程序
{
//暂停控制
if(Pause)
{
continue;
}
TCCR1B=0x01;//T1预分频:1
Tone_Idx=Music_Tone_Ptr[Music_Idx][i];
if(Tone_Idx==0xFF)
{
//delay(2000);每段音乐播放终止后停顿一段时间
delay(200);
i=0;//回到当前音乐片段的第0个音符
continue;//继续播放
}
//TIMSK|=BIT(TOIE1);
TIMSK=BIT(TOIE1);//启动定时器溢出中断,开始输出当前音符
//音符输出时长(节拍)由各段音乐中的MusicX_Time数组中对应音符的延时值决定delay(Music_Time_Ptr[Music_Idx][Tone_Idx]*200/26);
//TIMSK=~BIT(TOIE1);
TIMSK=0x00;//阻止定时器溢出中断,中止当前音符输出
i++;//取音符位置变量i递增
}else//(KeyMatrix_Down()){if(Pause==0)
{continue;
}
TCCR1B=0x09;//T1预分频:1,CTC模式(比较匹配时TC1自动清零)
if(KeyMatrix_Down())//有键按下则扫描按键
{Keys_Scan();
}
elsecontinue;
if(KeyNo==0||KeyNo16)//按键无效或按下0键则继续
continue;
PORTC=SEG_CODE[KeyNo];//数码管显示键值
OCR1A=F_CPU/2/TONE_FRQ[KeyNo];
TCNT1=0;TIMSK|=BIT(OCIE1A);
while(KeyMatrix_Down());//等待释放
//PORTD=0x7F;TIMSK=~BIT(OCIE1A);
电子琴的c语言程序
}
}
}
////T1定时器溢出中断控制音符输出
//#pragmainterrupt_handlertimer1_ovf_isr:9
voidtimer1_ovf_isr(void)
{
//假使遇到音乐片段终止标志则返回
if(Tone_Idx==0xFF)return;
//根据Tone_Delay_Table[Tone_Idx]设置定时初值//该初值即决定了输出的频率
TCNT1=Tone_Delay_Table[Tone_Idx];
PORTD^=BIT(PD7);
}
////按键触发INT0中断,控制音乐段切换
//#pragmainterrupt_handlerint0_isr:2
voidint0_isr(void)
{
TIMSK=0x00;//阻止定时器溢出中断,音符输出中止//切换到另一段音乐
if(Music_Idx==3)Music_Idx=0;
elseMusic_Idx++;
//切换到新的一段音乐后总是从其第0个音符开始输出i=0;
//开启对应的指示灯
switch(Music_Idx)
{
case0:LED1_ON();PORTC=SEG_CODE[1];break;case1:LED2_ON();PORTC=SEG_CODE[2];break;case2:LED3_ON();PORTC=SEG_CODE[3];break;case3:LED4_ON();PORTC=SEG_CODE[4];break;}
delay(10);//在开始另一段音乐输出前暂停1s
}
////播放启
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2024年硬泡聚醚项目建议书
- 2024年磷酸铁锂电池合作协议书
- 2024年纳豆激酶合作协议书
- 2024年地热热泵空调系统项目发展计划
- 2024年紫外固化材料合作协议书
- 2024年高强空心玻璃纤维项目建议书
- 2023年复相硼化物陶瓷项目调研分析报告
- 幼儿园《如果不吃青菜》课件
- 城市轨道交通概论学习通超星期末考试答案章节答案2024年
- 冬季传染病预防-(课件)-小学主题班会课件
- 家长写数学卷面分析总结与反思
- 新时代大学生劳动教育智慧树知到期末考试答案章节答案2024年江西中医药大学
- 医院食堂餐饮服务方案(2篇)
- 《SketchUp三维辅助设计》课件-05 SketchUp基本编辑工具
- 人教版 年六年级数学上册教案(全册)
- 六年级数学上册知识目标双向细目表
- 《墙绘表现》课件-1-2《墙绘艺术介绍》
- 瓶装液化石油气充装规范
- 项目部交通安全管理实施细则
- 中国浸渍纸行业发展分析及投资前景预测研究报告
- 2024川渝高竹新区管理委员招聘笔试参考题库附带答案详解
评论
0/150
提交评论