单片机演奏音乐(F调3个8度7音阶)程序+Proteus仿真

单片机演奏音乐仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:

1. /********本程序中，FOSC=11.0592M*********/
   
2. #include<reg51.h>
   
3. 
   
4. #include<intrins.h>
   
5. 
   
6. #define uchar unsigned char
   
7. #define uint  unsigned int
   
8. 
   
9. struct music_type{
   
10.         uchar tone;
    
11.         uchar delay;
    
12. };
    
13. 
    
14. 
    
15. 
    
16. /**********F调3个8度7音阶的音高参数**********/
    
17. uint code tonetab[]={  
    
18.     64216,64360,64489,64603,64654,64752,64837, //低音1~7
    
19.     64876,64948,65012,65042,65095,65144,65186, //中音1~7
    
20.     65206,65242,65274,65289,65315,65340,65361  //高音1~7
    
21. };
    
22. //曲谱，每个音符含两项数据，第1项为音高，第2项为节拍（以1/4拍为单位）
    
23. /**************康定情歌乐谱***************/
    
24. struct music_type code  songtab[]={  
    
25.         3+7,0x02,5+7,0x02,6+7,0x02,6+7,0x01,5+7,0x01,6+7,0x03,3+7,0x01,2+7,0x04,
    
26.         3+7,0x02,5+7,0x02,6+7,0x02,6+7,0x01,5+7,0x01,6+7,0x03,3+7,0x06,
    
27.         3+7,0x02,5+7,0x02,6+7,0x02,6+7,0x01,5+7,0x01,6+7,0x03,3+7,0x01,2+7,0x04,
    
28.         5+7,0x02,3+7,0x02,2+7,0x01,3+7,0x01,2+7,0x01,1+7,0x01,2+7,0x02,6+0,0x06,
    
29.         6+0,0x02,2+7,0x06,5+7,0x02,3+7,0x06,2+7,0x01,1+7,0x01,6+0,0x06,
    
30.         5+7,0x02,3+7,0x02,2+7,0x01,3+7,0x01,2+7,0x01,1+7,0x01,2+7,0x02,6+0,0x06,
    
31.         //
    
32.         3+7,0x01,2+7,0x01,3+7,0x01,5+7,0x01,6+7,0x01,5+7,0x01,1+14,0x01,6+7,0x01,
    
33.         5+7,0x01,3+7,0x01,5+7,0x04,6+7,0x02,
    
34.         1+14,0x02,2+14,0x01,3+14,0x01,2+14,0x01,1+14,0x01,6+7,0x01,1+14,0x01,
    
35.         5+7,0x08,
    
36.         5+7,0x01,3+7,0x01,5+7,0x04,6+7,0x02,
    
37.         1+14,0x02,2+14,0x01,3+14,0x01,1+14,0x01,6+7,0x01,5+7,0x02,
    
38.         5+7,0x02,2+7,0x02,3+7,0x01,5+7,0x01,3+7,0x01,2+7,0x01,
    
39.         1+7,0x01,6,0x01,1+7,0x06,
    
40.         3+7,0x01,2+7,0x01,1+7,0x02,2+7,0x03,3+7,0x01,
    
41.         5+7,0x02,6+7,0x01,1+14,0x01,6+7,0x02,5+7,0x02,
    
42.         5+7,0x01,3+7,0x01,2+7,0x02,3+7,0x01,5+7,0x01,3+7,0x01,2+7,0x01,
    
43.         1+7,0x01,2+7,0x01,6,0x04,1+7,0x02,
    
44.         2+7,0x03,3+7,0x01,1+7,0x01,2+7,0x01,1+7,0x02,6,0x01,
    
45.         1+7,0x01,6,0x01,5,0x05,
    
46.         //
    
47.         3+7,0x01,2+7,0x01,3+7,0x01,5+7,0x01,6+7,0x01,5+7,0x01,1+14,0x01,6+7,0x01,
    
48.         5+7,0x01,3+7,0x01,5+7,0x04,6+7,0x02,
    
49.         1+14,0x02,2+14,0x01,3+14,0x01,2+14,0x01,1+14,0x01,6+7,0x01,1+14,0x01,
    
50.         5+7,0x08,
    
51.         5+7,0x01,3+7,0x01,5+7,0x04,6+7,0x02,
    
52.         1+14,0x02,2+14,0x01,3+14,0x01,1+14,0x01,6+7,0x01,5+7,0x02,
    
53.         5+7,0x02,2+7,0x02,3+7,0x01,5+7,0x01,3+7,0x01,2+7,0x01,
    
54.         1+7,0x01,6,0x01,1+7,0x06,
    
55.         3+7,0x01,2+7,0x01,1+7,0x02,2+7,0x03,3+7,0x01,
    
56.         5+7,0x02,6+7,0x01,1+14,0x01,6+7,0x02,5+7,0x02,
    
57.         5+7,0x01,3+7,0x01,2+7,0x02,3+7,0x01,5+7,0x01,3+7,0x01,2+7,0x01,
    
58.         1+7,0x01,2+7,0x01,6,0x04,1+7,0x02,
    
59.         2+7,0x03,3+7,0x01,1+7,0x01,2+7,0x01,1+7,0x02,6,0x01,
    
60.         1+7,0x01,6,0x01,5,0x05,
    
61. 
    
62.         0,0x00
    
63. };
    
64. /*********端口及变量定义**********/
    
65. sbit SPEAKER = P3^7;
    
66. 
    
67. uchar tlow1,thig1;
    
68. 
    
69. /*******软件延时,约n*10us******/
    
70. void delay10us(unsigned char n){
    
71.         do{
    
72.         _nop_();
    
73.         _nop_();
    
74.         _nop_();
    
75.         _nop_();
    
76.         _nop_();
    
77.         }while(--n);
    
78. }
    
79. /*******软件延时,约n ms******/
    
80. void delayms(unsigned int n){
    
81.         do {
    
82.                 delay10us(131);
    
83.         }while(--n);
    
84. }
    
85. 
    
86. 
    
87. main () {
    
88.         uchar i,j;
    
89.         EA=1;ET0=1;
    
90.         TMOD=0X01;
    
91.         while(1){
    
92.                 i=0;
    
93.                 while(songtab[i].delay!=0){
    
94.                         if(songtab[i].tone==0)TR0=0;  //音高数据为0
    
95.                         else{     //音高数据不为0
    
96.                                 //用定时器参数控制T1的振荡频率，即音高
    
97.                                 thig1=TH0=tonetab[songtab[i].tone-1]/256;
    
98.                                 tlow1=TL0=tonetab[songtab[i].tone-1]%256;
    
99.                                 TR0=1;
    
100.                         }
     
101.                         //控制音符的持续时间，即节拍
     
102.                         for(j=0;j<songtab[i].delay;j++){
     
103. 
     
104.                                 delayms(200);
     
105.                         }
     
106.                         i++; //下一个音符
     
107.                 }
     
108.                 TR0=0;  //停止演奏
     
109.                 delayms(1000);  //一遍完成后等待
     
110.         }
     
111. }
     
112. 
     
113. /*******定时器1中断，控制蜂鸣器发声频率*******/
     
114. void  t0 () interrupt 1{
     
115.         TH0=thig1;TL0=tlow1;
     
116.         SPEAKER = !SPEAKER;  //蜂鸣器发声
     
117. }
     

复制代码

所有资料51hei提供下载:
单片机演奏音乐.rar (54.52 KB, 下载次数: 43)

2019-3-1 21:45 上传

点击文件名下载附件
下载积分: 黑币 -5