|
功能:通過鍵K1按鍵的次數(shù)來控制播放不同的6首音樂,依次播放的音樂《世上只有媽媽好》,
《我是一只菠蘿》,《小星星》,《老鼠愛大米》,《仙劍》,
仿真原理圖如下(proteus仿真工程文件可到本帖附件中下載)
0.png (13.74 KB, 下載次數(shù): 36)
下載附件
2019-6-7 06:02 上傳
單片機(jī)源程序如下:
- #define uchar unsigned char //定義一下方便使用
- #define uint unsigned int
- #define ulong unsigned long
- #include <reg52.h> //包括一個(gè) 52 標(biāo)準(zhǔn)內(nèi)核的頭文件
-
-
- sbit BEEP=P1^7; //喇叭輸出腳
- sbit P10=P1^0;
- sbit K1= P3^2;
- sbit K2= P3^5;
-
- uchar th0_f; //在中斷中裝載的 T0 的值高 8 位
- uchar tl0_f; //在中斷中裝載的 T0 的值低 8 位
-
- //T0 的值,及輸出頻率對(duì)照表
- uchar code freq[36*2]={
- 0xA9,0xEF,//00220HZ ,1 //0
- 0x93,0xF0,//00233HZ ,1#
- 0x73,0xF1,//00247HZ ,2
- 0x49,0xF2,//00262HZ ,2#
- 0x07,0xF3,//00277HZ ,3
- 0xC8,0xF3,//00294HZ ,4
- 0x73,0xF4,//00311HZ ,4#
- 0x1E,0xF5,//00330HZ ,5
- 0xB6,0xF5,//00349HZ ,5#
- 0x4C,0xF6,//00370HZ ,6
- 0xD7,0xF6,//00392HZ ,6#
- 0x5A,0xF7,//00415HZ ,7
- 0xD8,0xF7,//00440HZ 1 //12
- 0x4D,0xF8,//00466HZ 1# //13
- 0xBD,0xF8,//00494HZ 2 //14
- 0x24,0xF9,//00523HZ 2# //15
- 0x87,0xF9,//00554HZ 3 //16
- 0xE4,0xF9,//00587HZ 4 //17
- 0x3D,0xFA,//00622HZ 4# //18 0x90,0xFA,//00659HZ 5 //19
- 0xDE,0xFA,//00698HZ 5# //20
- 0x29,0xFB,//00740HZ 6 //21
- 0x6F,0xFB,//00784HZ 6# //22
- 0xB1,0xFB,//00831HZ 7 //23
- 0xEF,0xFB,//00880HZ `1
- 0x2A,0xFC,//00932HZ `1#
- 0x62,0xFC,//00988HZ `2
- 0x95,0xFC,//01046HZ `2#
- 0xC7,0xFC,//01109HZ `3
- 0xF6,0xFC,//01175HZ `4
- 0x22,0xFD,//01244HZ `4#
- 0x4B,0xFD,//01318HZ `5
- 0x73,0xFD,//01397HZ `5#
- 0x98,0xFD,//01480HZ `6
- 0xBB,0xFD,//01568HZ `6#
- 0xDC,0xFD,//01661HZ `7 //35
- };
-
- //定時(shí)中斷 0,用于產(chǎn)生唱歌頻率
- timer0() interrupt 1
- {
- TL0=tl0_f;TH0=th0_f; //調(diào)入預(yù)定時(shí)值
- BEEP=~BEEP; //取反音樂輸出 IO
- }
-
- //******************************
- //音樂符號(hào)串解釋函數(shù)
- //入口:要解釋的音樂符號(hào)串,輸出的音調(diào)串,輸出的時(shí)長(zhǎng)串
- changedata(uchar *song,uchar *diao,uchar *jie)
- {
- uchar i,i1,j;
- char gaodi; //高低+/-12 音階
- uchar banyin;//有沒有半個(gè)升音階
- uchar yinchang;//音長(zhǎng)
- uchar code jie7[8]={0,12,14,16,17,19,21,23}; //C 調(diào)的 7 個(gè)值
-
- *diao=*song;
- for(i=0,i1=0;;)
- {
- gaodi=0; //高低=0
- banyin=0;//半音=0
- yinchang=4;//音長(zhǎng) 1 拍
- if((*(song+i)=='|') || (*(song+i)==' ')) i++; //拍子間隔和一個(gè)空格過濾
-
- switch(*(song+i))
- {
- case ',': gaodi=-12;i++;//低音
- break;
-
- case '`': gaodi=12;i++; //高音
- break;
- }
-
- if(*(song+i)==0) //遇到 0 結(jié)束
- {
- *(diao+i1)=0; //加入結(jié)束標(biāo)志 0
- *(jie+i1)=0;
- return;
- }
-
- j=*(song+i)-0x30; i++; //取出基準(zhǔn)音
- j=jie7[j]+gaodi; //加上高低音
-
-
- yinc: switch(*(song+i))
- {
- case '#': //有半音 j 加一個(gè)音階
- i++;j++;
- goto yinc;
-
-
- case '-': //有一個(gè)音節(jié)加長(zhǎng)
- yinchang+=4;
- i++;
- goto yinc;
-
- case '_': //有一個(gè)音節(jié)縮短
- yinchang/=2;
- i++;
- goto yinc;
-
-
- case '.': //有一個(gè)加半拍
- yinchang=yinchang+yinchang/2;
- i++;
- goto yinc;
- }
-
- *(diao+i1)=j; //記錄音符
- *(jie+i1)=yinchang; //記錄音長(zhǎng)
- i1++;
- }
- }
- //******************************************
- //奏樂函數(shù)
- //入口:要演奏的音樂符號(hào)串
- void play(uchar *songdata)
- {
- uchar i,c,j=0;
- uint n;
- uchar xdata diaodata[112]; //音調(diào)緩沖
- uchar xdata jiedata[112]; //音長(zhǎng)緩沖
-
- changedata(songdata,diaodata,jiedata); //解釋音樂符號(hào)串
- TR0=1;
- for(i=0;diaodata[i]!=0;i++) //逐個(gè)符號(hào)演奏
- {
- tl0_f=freq[diaodata[i]*2]; //取出對(duì)應(yīng)的定時(shí)值送給 T0
- th0_f=freq[diaodata[i]*2+1];
- for(c=0;c<jiedata[i];c++) //按照音長(zhǎng)延時(shí)
- {
- for(n=0;n<32000;n++);
- if((!K1)||(!K2))//發(fā)現(xiàn)按鍵,立即退出播放
- {
- TR0=0;
- return;
- }
- }
- TR0=0;
- for(n=0;n<500;n++); //音符間延時(shí)
-
- TR0=1;
- }
- TR0=0;
- }
-
- //仙劍
- uchar code xianjian[]={
- "|3_3_3_2_3-|2_3_2_2_,6,6_,7_|12_1_,7,6_,5_|,6---|" "3_3_3_2_3.6_|5_6_5_5_22_3_|45_4_32_1_|3.--3_|"
- "67_6_55_3_|5--3_5_|26_5_32_3_|3---|"
- "26_6_6-|16_6_66_7_|`17_6_76_7_|3.--3_|"
- "67_6_55_3_|5--3_5_|67_6_76_7_|3---|"
- "26_6_6-|16_6_66_7_|`17_6_7.5_|6---|"
- };
- uchar code song3[]={
- "5-5_3_2_1_|3---|6-6_4_2_1_"
- ",7--,5_|1.3_5.1_|,7.3_5 5_|"
- "6.7_`1.6_|6_5_5-3_2_|1.1_13_2_|"
- "1.1_12_3_|2.1_,62_3_|2-- ,5_|"
- "1.3_5.1_|,7.3_55_|6.7_`1.6_|"
- "6_5_5-3_2_|1.1_13_2_|1.1_12_3_"
- "2.,6_,71_2_|1--"
- };
- //世上只有媽媽好
- uchar code mamahao[]={
- "6.5_35|`16_5_6-|35_6_53_2_|1_,6_5_3_2-|"
- "2.3_55_6_|321-|5.3_2_1_,6_1_|,5--"
- };
- //我是一只菠蘿
- uchar code boluo[]={
- "1-|2_4_3_2_55|5_6_3_4_22|2_4_3_2_1_`1_7_6_|5_4_2_3_11|"
- "2_4_3_2_55|5_6_3_4_22|2_4_3_2_1_5_2_3_|1---|"
- };
- //小星星
- uchar code xingxing[]={
- "1155|665-|4433|221-|"
- "5544|332-|5544|332-|"
- "1155|665-|4433|221-|"
- };
-
- //老鼠愛大米
- uchar code dami[]={
- "321-|3.2_1-|3231|3_6.5-|3_5_665|65-3_2_|122_3_2|12--|"
- };
- //一個(gè)按鍵選擇播放六首音樂
- void main(void) // 主程序
- {
- uchar i=2;
-
- TMOD = 0x01; //使用定時(shí)器 0 的 16 位工作模式
- TR0 = 0;
- ET0 = 1; //定時(shí)器 0 中斷
- EA = 1; //打開總中斷
-
- while(1)
- {
- if(!K1)
- {
- while(!K1);
-
- switch(i)
- {
- case 0:
- play(xianjian); //播放音樂
- break;
- case 1:
- play(song3); //播放音樂
- break;
- case 2:
- play(mamahao); //播放音樂
- break;
- case 3:
- play(boluo); //播放音樂
- break;
- case 4:
- play(xingxing); //播放音樂
- break;
- case 5:
- play(dami); //播放音樂
- break;
- }
- i++;if(i==6)i=0;
- }
- }
- }
復(fù)制代碼
0.png (11.53 KB, 下載次數(shù): 42)
下載附件
2019-6-7 06:02 上傳
所有資料51hei提供下載:
例16 音樂播放系統(tǒng)的proteus仿真電路及C語言程序設(shè)計(jì).rar
(67.78 KB, 下載次數(shù): 30)
2019-6-3 15:32 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
|
|