久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 26103|回復: 34
打印 上一主題 下一主題
收起左側

基于AT89C51制作的數字音樂盒(仿真和c程序)

  [復制鏈接]
跳轉到指定樓層
樓主
ID:192257 發表于 2017-4-22 10:42 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
單片機數字音樂盒制作proteus仿真原理圖:


單片機源程序:
  1. #include<reg51.h>
  2. #define uchar unsigned char
  3. #define uchar unsigned char
  4. #define uint unsigned int
  5. #define  LCDPORT P0
  6. uchar code tab[]="Press key";
  7. uchar code tab1[]="Select song";
  8. uchar code tab2[]="First Song" ;
  9. uchar code tab3[]="butterfly";
  10. uchar code tab4[]="Second Song"        ;
  11. uchar code tab5[]="Jingle bell ";
  12. uchar code tab6[]="Third Song" ;
  13. uchar code tab7[]="Yesterday";
  14. uchar code tab8[]="Forth Song" ;
  15. uchar code tab9[]="Youth League";
  16. sbit LCDE=P2^2;
  17. sbit LCDRW=P2^1;
  18. sbit LCDRS=P2^0;
  19. #define SYSTEM_OSC                 12000000        //定義晶振頻率12000000HZ
  20. #define SOUND_SPACE         4/5                 //定義普通音符演奏的長度分率,//每4分音符間隔
  21. sbit    BeepIO    =           P3^7;                //定義輸出管腳
  22. sbit        K1=P1^7;
  23. unsigned int  code FreTab[12]  = { 262,277,294,311,330,349,369,392,415,440,466,494 }; //原始頻率表
  24. unsigned char code SignTab[7]  = { 0,2,4,5,7,9,11 };                                                                   //1~7在頻率表中的位置
  25. unsigned char code LengthTab[7]= { 1,2,4,8,16,32,64 };                                                
  26. unsigned char Sound_Temp_TH0,Sound_Temp_TL0;        //音符定時器初值暫存
  27. unsigned char Sound_Temp_TH1,Sound_Temp_TL1;        
  28. unsigned char code Music_Girl[]=
  29. { 0x1B,0x02, 0x1A,0x02, 0x1B,0x02, 0x19,0x66, 0x1A,0x03,
  30.   0x18,0x02, 0x17,0x02, 0x16,0x0D, 0x17,0x03, 0x18,0x0D,
  31.   0x17,0x03, 0x19,0x66, 0x17,0x03, 0x16,0x0D, 0x17,0x03,
  32.   0x19,0x0D, 0x16,0x03, 0x17,0x0D, 0x18,0x03, 0x17,0x0D,
  33. 0x16,0x03, 0x15,0x00, 0x19,0x02, 0x11,0x02, 0x16,0x02,
  34. 0x10,0x02, 0x15,0x02, 0x0F,0x00, 0x10,0x03, 0x15,0x03,
  35. 0x0F,0x00, 0x0D,0x01, 0x0F,0x66, 0x10,0x03, 0x15,0x66,
  36. 0x16,0x03, 0x10,0x0D, 0x15,0x03, 0x0F,0x03, 0x19,0x66,
  37. 0x1F,0x03, 0x1A,0x0D, 0x19,0x03, 0x17,0x03, 0x19,0x03,
  38. 0x16,0x00, 0x16,0x66, 0x17,0x03, 0x11,0x0C, 0x10,0x02,
  39. 0x19,0x66, 0x10,0x03, 0x15,0x02, 0x16,0x02, 0x0D,0x02,
  40.   0x15,0x02, 0x10,0x0D, 0x0F,0x03, 0x10,0x0D, 0x15,0x03,
  41.   0x0F,0x00, 0x17,0x66, 0x19,0x03, 0x11,0x02, 0x16,0x02,
  42. 0x10,0x0D, 0x15,0x03, 0x0F,0x15, 0x0D,0x03, 0x0F,0x02,
  43. 0x0D,0x03, 0x0F,0x0D, 0x10,0x03, 0x11,0x0D, 0x16,0x03,
  44.   0x10,0x00, 0x0F,0x0D, 0x10,0x03, 0x15,0x66, 0x16,0x03,
  45.   0x19,0x02, 0x17,0x02, 0x16,0x02, 0x17,0x0D, 0x16,0x03,
  46.   0x15,0x02, 0x10,0x0D, 0x0F,0x03, 0x0D,0x01, 0x15,0x01,
  47. 0x10,0x03, 0x15,0x04, 0x10,0x0D, 0x0F,0x03, 0x0D,0x0D,
  48. 0x0F,0x03, 0x10,0x0D, 0x15,0x03, 0x0F,0x00, 0x17,0x0D,
  49. 0x19,0x03, 0x16,0x0D, 0x17,0x03, 0x16,0x0D, 0x15,0x03,
  50.   0x11,0x02, 0x10,0x02, 0x0F,0x00, 0x00,0x00 };
  51. unsigned char code Music_Jingle[]={
  52. 0x0F,0x03, 0x0F,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x03,
  53. 0x0F,0x66, 0x19,0x04, 0x19,0x04, 0x0F,0x03, 0x17,0x03,
  54. 0x16,0x03, 0x15,0x03, 0x10,0x02, 0x10,0x03, 0x10,0x03,
  55. 0x18,0x03, 0x17,0x03, 0x16,0x03, 0x10,0x66, 0x10,0x03,
  56. 0x19,0x03, 0x19,0x03, 0x18,0x03, 0x16,0x03, 0x17,0x02,
  57. 0x15,0x03, 0x0F,0x03, 0x0F,0x03, 0x17,0x03, 0x16,0x03,
  58. 0x15,0x03, 0x0F,0x66, 0x0F,0x03, 0x0F,0x03, 0x17,0x03,
  59. 0x16,0x03, 0x15,0x03, 0x10,0x66, 0x10,0x03, 0x10,0x03,
  60. 0x18,0x03, 0x17,0x03, 0x16,0x03, 0x19,0x03, 0x19,0x03,
  61. 0x19,0x03, 0x19,0x03, 0x1A,0x03, 0x19,0x03, 0x18,0x03,
  62. 0x16,0x03, 0x15,0x66, 0x17,0x03, 0x17,0x03, 0x17,0x02,
  63. 0x17,0x03, 0x17,0x03, 0x17,0x02, 0x17,0x03, 0x19,0x03,
  64. 0x15,0x03, 0x16,0x03, 0x17,0x01, 0x18,0x03, 0x18,0x03,
  65. 0x18,0x67, 0x18,0x04, 0x18,0x03, 0x17,0x03, 0x17,0x03,
  66. 0x17,0x04, 0x17,0x04, 0x17,0x03, 0x16,0x03, 0x16,0x03,
  67. 0x15,0x03, 0x16,0x03, 0x19,0x66, 0x19,0x03, 0x19,0x03,
  68. 0x18,0x03, 0x16,0x03, 0x15,0x02, 0x00,0x00  };
  69. unsigned char code Music_Two[] ={
  70. 0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03,
  71. 0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02,
  72. 0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03,
  73. 0x10,0x0E, 0x15,0x04, 0x0F,0x01, 0x17,0x03, 0x16,0x03,
  74. 0x17,0x01, 0x16,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x01,
  75. 0x10,0x03, 0x15,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03,
  76. 0x16,0x03, 0x15,0x03, 0x10,0x03, 0x15,0x03, 0x16,0x01,
  77. 0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03,
  78. 0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02,
  79. 0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03,
  80. 0x10,0x0E, 0x15,0x04, 0x0F,0x01, 0x17,0x03, 0x19,0x03,
  81. 0x19,0x01, 0x19,0x03, 0x1A,0x03, 0x19,0x03, 0x17,0x01,
  82. 0x16,0x03, 0x16,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03,
  83. 0x16,0x03, 0x15,0x03, 0x10,0x03, 0x10,0x0D, 0x15,0x00,
  84. 0x19,0x03, 0x19,0x03, 0x1A,0x03, 0x1F,0x03, 0x1B,0x03,
  85. 0x1B,0x03, 0x1A,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x03,
  86. 0x16,0x0D, 0x17,0x01, 0x17,0x03, 0x17,0x03, 0x19,0x03,
  87. 0x1A,0x02, 0x1A,0x02, 0x10,0x03, 0x17,0x0D, 0x16,0x03,
  88. 0x16,0x01, 0x17,0x03, 0x19,0x03, 0x19,0x03, 0x17,0x03,
  89. 0x19,0x02, 0x1F,0x02, 0x1B,0x03, 0x1A,0x03, 0x1A,0x0E,
  90. 0x1B,0x04, 0x17,0x02, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E,
  91. 0x1B,0x04, 0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x16,0x03,
  92. 0x17,0x0D, 0x16,0x03, 0x17,0x03, 0x19,0x01, 0x19,0x03,
  93. 0x19,0x03, 0x1A,0x03, 0x1F,0x03, 0x1B,0x03, 0x1B,0x03,
  94. 0x1A,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x03, 0x16,0x03,
  95. 0x17,0x01, 0x17,0x03, 0x17,0x03, 0x19,0x03, 0x1A,0x02,
  96. 0x1A,0x02, 0x10,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x01,
  97. 0x17,0x03, 0x19,0x03, 0x19,0x03, 0x17,0x03, 0x19,0x03,
  98. 0x1F,0x02, 0x1B,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04,
  99. 0x17,0x02, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04,
  100. 0x17,0x16, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04,
  101. 0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x16,0x03, 0x0F,0x02,
  102. 0x10,0x03, 0x15,0x00, 0x00,0x00 };
  103. unsigned char code Music_Yesterday[]={
  104. 0x15,0x03, 0x15,0x03, 0x16,0x03, 0x17,0x02, 0x19,0x02,
  105. 0x19,0x03, 0x17,0x03, 0x19,0x03, 0x17,0x03, 0x1A,0x02,
  106. 0x19,0x66, 0x17,0x02, 0x17,0x03, 0x19,0x03, 0x1A,0x02,
  107. 0x16,0x02, 0x17,0x03, 0x19,0x02, 0x1A,0x15, 0x17,0x03,
  108. 0x19,0x03, 0x1A,0x02, 0x21,0x02, 0x20,0x03, 0x1F,0x02,
  109. 0x1B,0x03, 0x1B,0x66, 0x19,0x03, 0x17,0x03, 0x19,0x02,
  110. 0x17,0x02, 0x16,0x14, 0x15,0x03, 0x15,0x03, 0x16,0x03,
  111. 0x17,0x03, 0x19,0x02, 0x19,0x03, 0x19,0x03, 0x17,0x03,
  112. 0x19,0x03, 0x17,0x03, 0x1A,0x03, 0x19,0x02, 0x17,0x03,
  113. 0x17,0x02, 0x17,0x03, 0x19,0x03, 0x1A,0x02, 0x1B,0x02,
  114. 0x17,0x03, 0x19,0x02, 0x1A,0x03, 0x1A,0x01, 0x1B,0x02,
  115. 0x20,0x02, 0x1F,0x03, 0x1B,0x03, 0x1A,0x66, 0x1B,0x03,
  116. 0x1F,0x03, 0x1B,0x03, 0x1F,0x03, 0x1B,0x02, 0x1A,0x66,
  117. 0x1A,0x03, 0x1B,0x03, 0x1F,0x02, 0x1F,0x02, 0x1A,0x03,
  118. 0x1F,0x02, 0x20,0x03, 0x20,0x16, 0x1F,0x02, 0x20,0x02,
  119. 0x21,0x03, 0x21,0x03, 0x21,0x03, 0x21,0x02, 0x20,0x03,
  120. 0x1F,0x03, 0x1B,0x03, 0x1F,0x03, 0x1B,0x03, 0x1A,0x66,
  121. 0x17,0x03, 0x19,0x03, 0x19,0x14, 0x1F,0x03, 0x20,0x03,
  122. 0x21,0x03, 0x21,0x03, 0x21,0x03, 0x21,0x03, 0x21,0x02,
  123. 0x20,0x03, 0x1F,0x03, 0x1F,0x03, 0x1B,0x03, 0x1A,0x66,
  124. 0x17,0x03, 0x19,0x03, 0x19,0x14, 0x1A,0x03, 0x1B,0x03,
  125. 0x1F,0x03, 0x1B,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x03,
  126. 0x20,0x66, 0x1F,0x03, 0x1B,0x03, 0x1F,0x03, 0x1B,0x02,
  127. 0x1F,0x03, 0x20,0x66, 0x1F,0x03, 0x20,0x03, 0x21,0x02,
  128. 0x21,0x02, 0x20,0x03, 0x1F,0x02, 0x1A,0x03, 0x1A,0x02,
  129. 0x17,0x02, 0x17,0x03, 0x1A,0x03, 0x17,0x03, 0x19,0x03,
  130. 0x19,0x14, 0x17,0x03, 0x17,0x03, 0x16,0x04, 0x15,0x04,
  131. 0x15,0x03, 0x16,0x03, 0x17,0x01, 0x17,0x03, 0x18,0x02,
  132. 0x16,0x03, 0x16,0x14, 0x17,0x03, 0x17,0x03, 0x17,0x03,
  133. 0x18,0x02, 0x16,0x03, 0x16,0x16, 0x15,0x03, 0x16,0x03,
  134. 0x17,0x03, 0x16,0x01, 0x1F,0x02, 0x20,0x02, 0x21,0x03,
  135. 0x21,0x03, 0x21,0x03, 0x21,0x02, 0x20,0x03, 0x1F,0x03,
  136. 0x1B,0x03, 0x1F,0x03, 0x1B,0x03, 0x1A,0x03, 0x1A,0x02,
  137. 0x17,0x03, 0x19,0x03, 0x19,0x14, 0x1F,0x02, 0x20,0x02,
  138. 0x21,0x03, 0x21,0x03, 0x21,0x03, 0x21,0x66, 0x20,0x03,
  139. 0x1F,0x03, 0x1B,0x03, 0x1F,0x03, 0x1B,0x03, 0x1A,0x66,
  140. 0x17,0x03, 0x19,0x03, 0x19,0x00, 0x00,0x00 };


  141. uchar k;
  142. void delay1(void) //延時程序
  143. {
  144.         uchar i,j;
  145.         for(i=20;i>0;i--)
  146.         for(j=248;j>0;j--);
  147. }

  148. void Getch (  )
  149. {   uchar X,Y,Z;
  150.         P1=0xff;
  151.         P1=0xf3;       //先對P0置數  行掃描
  152.         if(P1!=0xf3)     //判斷是否有鍵按下
  153.                 {        delay1();    //延時,軟件去干擾
  154.                          if(P1!=0xf3)   //確認按鍵按下X = P3;
  155.                           {        
  156.                                 X=P1;          //保存行掃描時有鍵按下時狀態
  157.                                 P1=0xfc;       //列掃描
  158.                                 Y=P1;          //保存列掃描時有鍵按下時狀態
  159.                                  Z=X|Y;
  160.         //取出鍵值
  161.                                 switch ( Z )   //判斷鍵值(那一個鍵按下)
  162.                                 {
  163.                                         case 0xf9: k=0; break; //對鍵值賦值
  164.                                         case 0xf5: k=1; break;
  165.                                         case 0xfa: k=2; break;
  166.                                         case 0xf6: k=3; break;
  167.                                        
  168.                                 }
  169.                           }
  170.                 }        
  171. }                  
  172. void Delay()
  173. {         uint uiCount;
  174.          for(uiCount=0;uiCount<250;uiCount++);
  175. }

  176. void WriteCMD(uchar Commond)//LCD寫指令函數      
  177. {
  178. Delay();    //先延時。
  179. LCDE=1;     //然后把LCD改為寫入命令狀態。
  180. LCDRS=0;
  181. LCDRW=0;
  182. LCDPORT=Commond;  //再輸出命令。
  183. LCDE=0;     //最后執行命令。
  184. }

  185. void WriteData(uchar dat)//LCD寫數據函數      
  186. { Delay();      //先延時。
  187. LCDE=1;       //然后把LCD改為寫入數據狀態。
  188. LCDRS=1;
  189. LCDRW=0;
  190. LCDPORT=dat;     //再輸出數據。
  191. LCDE=0;       //最后顯示數據。
  192. }

  193. void init()
  194. {
  195.          LCDRW=0;
  196.     LCDE=0;
  197.           WriteCMD(0x38);
  198.          WriteCMD(0x0c);
  199.          WriteCMD(0x06);
  200.          WriteCMD(0x01);
  201.          WriteCMD(0x80);
  202. }

  203. void mydelay(int x)
  204. { int i,j;
  205. for(i=x;i>0;i--)
  206. for(j=255;j>0;j--);
  207. }
  208. void InitialSound(void)
  209. {
  210.         BeepIO = 0;
  211.         Sound_Temp_TH1 = (65535-(1/1200)*SYSTEM_OSC)/256;        // 計算TL1應裝入的初值         (10ms的初裝值)
  212.         Sound_Temp_TL1 = (65535-(1/1200)*SYSTEM_OSC)%256;        // 計算TH1應裝入的初值
  213.         TH1 = Sound_Temp_TH1;
  214.         TL1 = Sound_Temp_TL1;
  215.         TMOD  |= 0x11;
  216.         ET0    = 1;
  217.         ET1           = 0;
  218.         TR0           = 0;
  219.         TR1    = 0;
  220.         EA     = 1;
  221. }

  222. void BeepTimer0(void) interrupt 1        //音符發生中斷
  223. {
  224.         BeepIO = !BeepIO;
  225.         TH0    = Sound_Temp_TH0;
  226.          TL0    = Sound_Temp_TL0;
  227. }

  228.    void Play(unsigned char *Sound,unsigned char Signature,unsigned Octachord,unsigned int Speed)
  229. {
  230.         unsigned int NewFreTab[12];                //新的頻率表
  231.         unsigned char i,j;
  232.         unsigned int Point,LDiv,LDiv0,LDiv1,LDiv2,LDiv4,CurrentFre,Temp_T,SoundLength;
  233.         unsigned char Tone,Length,SL,SH,SM,SLen,XG,FD;
  234.         for(i=0;i<12;i++)                                 // 根據調號及升降八度來生成新的頻率表
  235.         {
  236.                 j = i + Signature;
  237.                 if(j > 11)
  238.                 {
  239.                         j = j-12;
  240.                         NewFreTab[i] = FreTab[j]*2;
  241.                 }

  242.                 else
  243.                         NewFreTab[i] = FreTab[j];

  244.                 if(Octachord == 1)
  245.                         NewFreTab[i]>>=2;
  246.                 else if(Octachord == 3)
  247.                         NewFreTab[i]<<=2;
  248.         }                                                                        
  249.         
  250.         SoundLength = 0;

  251.         while(Sound[SoundLength] != 0x00)        //計算歌曲長度
  252.         {
  253.                 SoundLength+=2;
  254.         }

  255.         Point = 0;
  256.         Tone   = Sound[Point];        
  257.         Length = Sound[Point+1];                         // 讀出第一個音符和它時時值
  258.         
  259.         LDiv0 = 12000/Speed;                                // 算出1分音符的長度(幾個10ms)         
  260.         LDiv4 = LDiv0/4;                                                 // 算出4分音符的長度
  261.         LDiv4 = LDiv4-LDiv4*SOUND_SPACE;         // 普通音最長間隔標準
  262.         TR0          = 0;
  263.         TR1   = 1;

  264.         while(Point < SoundLength&&K1==1)                //歌曲代碼未放完且暫停鍵未被按下
  265.         {
  266.                 SL=Tone%10;                                                                 //計算出音符
  267.                 SM=Tone/10%10;                                                                 //計算出高低音
  268.                 SH=Tone/100;                                                                 //計算出是否升半
  269.                 CurrentFre = NewFreTab[SignTab[SL-1]+SH];                 //查出對應音符的頻率         
  270.                 if(SL!=0)
  271.                 {
  272.                         if (SM==1) CurrentFre >>= 2;                                 //低音
  273.                         if (SM==3) CurrentFre <<= 2;                                 //高音
  274.                         Temp_T = 65536-(50000/CurrentFre)*10/(12000000/SYSTEM_OSC);//計算計數器初值
  275.                         Sound_Temp_TH0 = Temp_T/256;
  276.                         Sound_Temp_TL0 = Temp_T%256;
  277.                         TH0 = Sound_Temp_TH0;  
  278.                         TL0 = Sound_Temp_TL0 + 12; //加12是對中斷延時的補償
  279.                 }

  280.                 SLen=LengthTab[Length%10];                 //算出是幾分音符
  281.                 XG=Length/10%10;                                 //算出音符類型(0普通1連音2頓音)
  282.                 FD=Length/100;
  283.                 LDiv=LDiv0/SLen;                                 //算出連音音符演奏的長度(多少個10ms)
  284.                 if (FD==1)
  285.                         LDiv=LDiv+LDiv/2;
  286.                 if(XG!=1)        
  287.                         if(XG==0)                                         //算出普通音符的演奏長度
  288.                                 if (SLen<=4)        
  289.                                         LDiv1=LDiv-LDiv4;
  290.                                 else
  291.                                         LDiv1=LDiv*SOUND_SPACE;
  292.                         else
  293.                                 LDiv1=LDiv/2;                         //算出頓音的演奏長度
  294.                 else
  295.                         LDiv1=LDiv;

  296.                 if(SL==0) LDiv1=0;
  297.                         LDiv2=LDiv-LDiv1;                         //算出不發音的長度

  298.                   if (SL!=0)
  299.                 {
  300.                         TR0=1;
  301.                         for(i=LDiv1;i>0;i--)                         //發規定長度的音
  302.                         {
  303.                                 while(TF1==0);
  304.                                 TH1 = Sound_Temp_TH1;
  305.                                 TL1 = Sound_Temp_TL1;
  306.                                 TF1=0;
  307.                         }
  308.                 }

  309.                 if(LDiv2!=0)
  310.                 {
  311.                         TR0=0; BeepIO=0;
  312.                         for(i=LDiv2;i>0;i--)                         //音符間的間隔
  313.                         {
  314.                                 while(TF1==0);
  315.                                 TH1 = Sound_Temp_TH1;
  316.                                 TL1 = Sound_Temp_TL1;
  317.                                 TF1=0;
  318.                         }
  319.                 }

  320.                 Point+=2;
  321.                 Tone=Sound[Point];
  322.                 Length=Sound[Point+1];
  323.         }
  324.         BeepIO = 0;
  325. }

  326. main()
  327. {        uint i;
  328.         k=8;
  329.         init();
  330.           for(i=0;i<15;i++)
  331.             {
  332.                            WriteData(tab[i]);                                                        //LCD寫數據函數寫第一行
  333.                       mydelay(50);
  334.                 }
  335.                            mydelay(1000);
  336.                            WriteCMD(0x80+0x40+2);                                        //將指針設到第二行空兩字符
  337.                            for(i=0;i<6;i++)
  338.                                    {
  339.                                        WriteData(tab1[i]);
  340.                                       mydelay(50);
  341.                                    }

  342.                         InitialSound();                                                                        //發音初始化程序
  343.                         while(1)
  344.                                 {         Getch();                                                                //掃描鍵盤,獲得鍵值
  345.                                          if(k==0)                                                                //若鍵值為0
  346.                                                   {        uint i;
  347.                                                           init();
  348.                                                         for(i=0;i<10;i++)
  349.                                               {
  350.                                                            WriteData(tab2[i]);                                //寫第一首歌序號
  351.                                                       mydelay(50);
  352.                                                      }
  353.                                                    mydelay(1000);
  354.                                                    WriteCMD(0x80+0x40);                        //轉到第二行
  355.                                                    for(i=0;i<9;i++)
  356.                                                    {        WriteData(tab3[i]);                                //寫歌名
  357.                                                       mydelay(50);
  358.                                                    }

  359.                                                  Play(Music_Girl,0,3,360);                        //播放第一首歌
  360.                                                  mydelay(500);
  361.                                                 break;
  362.                                                  }
  363.                                          else if (k==1)                                                         //若鍵值為1
  364.                                                 {        uint i;
  365.                                                           init();
  366.                                                       for(i=0;i<11;i++)
  367.                                                       {        WriteData(tab4[i]);                 //寫第二首歌序號
  368.                                                               mydelay(50);
  369.                                                              }
  370.                                                                    mydelay(1000);
  371.                                                                    WriteCMD(0x80+0x40);         //轉到第二行
  372.                                                                    for(i=0;i<11;i++)
  373.                                                            {
  374.                                                                WriteData(tab5[i]);                 //寫歌名
  375.                                                               mydelay(50);
  376.                                                            }

  377.                                                                 Play(Music_Jingle,0,3,360); //播放第二首歌
  378.                                                                 mydelay(500);
  379.                                                                 break;
  380.                                                 }
  381.                                          else if (k==2) //若鍵值為2
  382.                                                 {        uint i;
  383.                                                           init();
  384.                                                           for(i=0;i<10;i++)
  385.                                                       {        WriteData(tab6[i]);                 //寫第三首歌序號
  386.                                                               mydelay(50);
  387.                                                              }
  388.                                                            mydelay(1000);
  389.                                                            //WriteCMD(0x01);
  390.                                                            WriteCMD(0x80+0x40);                 //轉到第二行
  391.                                                            for(i=0;i<6;i++)
  392.                                                            {
  393.                                                                WriteData(tab7[i]);                 //寫歌名
  394.                                                               mydelay(50);
  395.                                                            }

  396.                                                         Play(Music_Two,0,3,360);                 //播放第三首歌
  397.                                                         mydelay(500);
  398.                                                         

  399. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼



1 概述

傳統的音樂盒多是機械音樂盒,其工作原理是通過齒輪帶動一個帶有鐵釘的鐵桶轉動,鐵桶上的鐵釘撞擊鐵片制成的琴鍵,從而發出聲音。但是,機械式的音樂盒體積比較大,比較笨重,且發音單調。水、灰塵等外在因素,容易使內部金屬發音條變形,從而造成發音跑調。另外,機械音樂盒放音時為了讓音色穩定,必須放平不能動搖,而且價格昂貴,不能實現大批量生產。基于單片機設計制作的電子式音樂盒。與傳統的機械式音樂盒相比更小巧,音質更優美且能演奏和弦音樂。電子式音樂盒動力來源是電池,制作工藝簡單,可進行批量生產,所以價格便宜。基于單片機制作的電子式音樂盒,控制功能強大,可根據需要選歌,使用方便。所放歌曲的節奏可以根據需要進行設置,根據存儲容量的大小,可以盡可能多的存儲歌曲。另外,可以設計彩燈外觀效果,增設放歌時間、序號顯示燈功能,使音樂盒的功能更加豐富。

1.1單片機數字音樂盒有關介紹
電子音樂已廣泛地應用于社會生活的各個領域。其類型從音樂卡片到CD、MP3 等多種多樣,制作原理也各不相同。聲音是通過振動產生的。單片機對某一I/O引腳以一定的頻率循環置1和清0,這一引腳便產生一定頻率的方波,該方波通過放大后作用于揚聲器便產生一定頻率的聲音。若改變輸出方波的頻率,產生的聲音也就改變了。通過控制輸出方波的時間長短,聲音的長短也就得到控制。因此,根據樂譜,單片機就可產生電子音樂。音樂中最關鍵的兩個要素是音符和節拍。單片機控制的音樂發生器系統由硬件電路和軟件兩部分構成。利用單片機控制的電子音樂發生器軟硬件上具有獨特的優點,系統的開發周期短,成本低,電路制作容易。更換歌曲時,硬件電路無需作任何修改,只需修改軟件即可實現。軟件編程時,可用51系列單片機的匯編語言或C51語言實現。同時還可根據個人的習好通過軟件改變節拍的延時時間,增加電子音樂的趣味性。

1.1.1發音原理介紹

發音原理:播放一段音樂需要的是兩個元素,一個是音調,另一個是音符。首先要了解對應的音調,音調主要由聲音的頻率決定,同時也與聲音強度有關。對一定強度的純音,音調隨頻率的升降而升降;對一定頻率的純音、低頻純音的音調隨聲強增加而下降,高頻純音的音調卻隨強度增加而上升。另外,音符的頻率有所不同。基于上面的內容,這樣就對發音的原理有了一些初步的了解。

音符的發音主要靠不同的音頻脈沖。利用單片機的內部定時器/計數器0,使其工作在模式1,定時中斷,然后控制P3.7引腳的輸出音樂。只要算出某一音頻的周期(1/頻率),然后將此周期除以2,即為半周期的時間,利用定時器計時這個半周期時間,每當計時到后就將輸出脈沖的I/O反相,然后重復計時此半周期時間再對I/O反相,就可在I/O腳上得到此頻率的脈沖。

1.1.2   音符頻率的產生

音符及定時器初始值:

例如:中音1(do)的音頻=523HZ,周期T=1/523s=1912

定時器/計數器0的定時時間為:T/2=1912/2

定時器956的計數值=定時時間/機器周期=956/1=956(時鐘頻率=12MHZ)

裝入T0計數器初值為65536-956=64580
將64580裝入T0寄存器中,啟動T0工作后,每計數956次時將產生溢出中斷,進入中斷服務時,每次對P3.0引腳的輸出值進行取反,就可得到中音DO(523HZ)的音符音頻。將51單片機內部定時器工作在計數器模式1下,改變計數初值TH0,TL0以產生不同的頻率。

若該設計使用數字電路完成,所設計的電路相當復雜,大概需要十幾片數字集成塊,其功能也主要依賴于數字電路的各功能模塊的組合來實現,焊接的過程比較復雜,成本也非常高。若用單片機來設計制作完成,由于其功能的實現主要通過軟件編程來完成,那么就降低了硬件電路的復雜性,而且其成本也有所降低,所以在該設計中采用單片機利用AT89C51,它是低功耗、高性能的CMOS8位單片機。片內帶有4KBFlash存儲器,且允許在系統內改寫或用編程器編程。另外, AT89C51的指令系統和引腳與8051完全兼容,片內有128B RAM32I/O口線、216位定時計數器、5個中斷源、一個全雙工串行口等.

完整的音樂盒制作資料下載:
音樂盒(1).zip (53.96 KB, 下載次數: 827)


評分

參與人數 2黑幣 +9 收起 理由
8889999 + 5 共享資料的黑幣獎勵!
Choi. + 4 贊一個!

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏23 分享淘帖 頂18 踩1
回復

使用道具 舉報

沙發
ID:198681 發表于 2017-5-15 16:09 | 只看該作者
你的仿真文件用PROTUES8打不開
回復

使用道具 舉報

板凳
ID:198681 發表于 2017-5-15 16:09 | 只看該作者
你的仿真文件用protues8好像打不開,只能用Proteus7.5
回復

使用道具 舉報

地板
ID:217665 發表于 2017-7-6 16:15 | 只看該作者
適合課程設計用嗎
回復

使用道具 舉報

5#
ID:258732 發表于 2017-12-7 19:06 | 只看該作者
需要按那4個按鈕  終于有聲音了
回復

使用道具 舉報

6#
ID:258626 發表于 2017-12-9 00:26 | 只看該作者
大大,我下載了你的文件,但是我這里用不了。我用的是ISIS 7 Professional仿真,Uv4(keil-4),請大大解惑
回復

使用道具 舉報

7#
ID:261516 發表于 2017-12-14 15:29 來自手機 | 只看該作者
我先收下了,謝謝大神
回復

使用道具 舉報

8#
ID:285778 發表于 2018-2-26 21:13 | 只看該作者
感謝大神分享!
回復

使用道具 舉報

9#
ID:315619 發表于 2018-4-24 19:22 | 只看該作者
不錯不錯
回復

使用道具 舉報

10#
ID:315619 發表于 2018-4-24 19:23 | 只看該作者
感謝大神分享
回復

使用道具 舉報

11#
ID:315679 發表于 2018-4-24 20:33 | 只看該作者
謝謝大佬分享
回復

使用道具 舉報

12#
ID:326331 發表于 2018-5-29 21:12 | 只看該作者
大神,想問一下,如果在你的程序上加一個暫停按鍵,應該怎么改呢?
回復

使用道具 舉報

13#
ID:344099 發表于 2018-6-3 17:22 | 只看該作者
加油!!!!!!!
回復

使用道具 舉報

14#
ID:357603 發表于 2018-6-24 10:16 | 只看該作者
感謝師傅分享
回復

使用道具 舉報

15#
ID:361241 發表于 2018-6-28 18:14 | 只看該作者
很好,很不錯的文檔
回復

使用道具 舉報

16#
ID:361406 發表于 2018-6-28 22:24 | 只看該作者
很棒,不過較為基礎
回復

使用道具 舉報

17#
ID:449081 發表于 2018-12-18 17:09 | 只看該作者
這個資料非常多,有助于新手
回復

使用道具 舉報

18#
ID:449081 發表于 2018-12-18 17:10 | 只看該作者
非常多,新手適用
回復

使用道具 舉報

19#
ID:462696 發表于 2019-1-6 00:15 | 只看該作者
感謝分享,很不錯的資源
回復

使用道具 舉報

20#
ID:491123 發表于 2019-3-14 22:34 | 只看該作者
感謝分享,很不錯的資源
回復

使用道具 舉報

21#
ID:568954 發表于 2019-6-21 18:30 | 只看該作者
可以,太謝謝了
回復

使用道具 舉報

22#
ID:525478 發表于 2019-6-23 12:59 | 只看該作者
下載收藏 感謝分享
回復

使用道具 舉報

23#
ID:609611 發表于 2019-9-10 16:09 | 只看該作者
下載收藏 感謝分享
回復

使用道具 舉報

24#
ID:65956 發表于 2019-9-12 08:44 | 只看該作者
正需要給孩子作一個,謝謝分享
回復

使用道具 舉報

25#
ID:69408 發表于 2019-9-12 10:17 | 只看該作者
謝謝分享,下載學習學習!
回復

使用道具 舉報

26#
ID:649321 發表于 2019-12-7 13:12 | 只看該作者
特別好
回復

使用道具 舉報

27#
ID:659677 發表于 2019-12-9 15:32 | 只看該作者
很好,想下載
回復

使用道具 舉報

28#
ID:661022 發表于 2019-12-10 21:43 | 只看該作者
好想截個圖上來,程序打不開。。。。怎么回事啊樓主
回復

使用道具 舉報

29#
ID:661022 發表于 2019-12-10 22:06 | 只看該作者
hdl123 發表于 2018-12-18 17:09
這個資料非常多,有助于新手

我只看到了程序和原理圖,還有別的資料嗎?
回復

使用道具 舉報

30#
ID:661428 發表于 2019-12-11 12:24 來自手機 | 只看該作者
這個怎么用啊。大神
回復

使用道具 舉報

31#
ID:767487 發表于 2020-6-13 14:51 來自手機 | 只看該作者
程序能運行出來嗎?
回復

使用道具 舉報

32#
ID:779585 發表于 2020-6-15 10:38 | 只看該作者
這個完整代碼是必須下載附件嗎
回復

使用道具 舉報

33#
ID:789459 發表于 2020-7-15 23:38 來自手機 | 只看該作者
無名氏8016 發表于 2017-12-9 00:26
大大,我下載了你的文件,但是我這里用不了。我用的是ISIS 7 Professional仿真,Uv4(keil-4),請大大解惑

你好,你還有這個文件嗎?
回復

使用道具 舉報

34#
ID:845175 發表于 2020-11-17 23:49 | 只看該作者
代碼很詳細,備注很有用
回復

使用道具 舉報

35#
ID:810206 發表于 2021-6-26 13:35 來自手機 | 只看該作者
感謝博主的程序
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 国产精品精品 | 国产精品久久久久久52avav | 国产欧美在线播放 | 99国产精品久久久 | 中文字幕视频在线观看 | 精品国产伦一区二区三区观看说明 | 亚洲成人av | 成人深夜福利在线观看 | 国产在线一 | 久久久国产精品 | 日本一区二区电影 | 久久国| 亚洲国产一区二区三区在线观看 | 国产日韩欧美一区二区 | 国产精品国产三级国产aⅴ中文 | 一区二区在线 | 成人日韩 | 日韩一区二区在线视频 | 日韩中文一区二区三区 | 国产区在线免费观看 | 欧美亚洲视频在线观看 | 久久精品 | 成人夜晚看av | 国产成人99av超碰超爽 | 久久综合一区 | 午夜在线| 亚洲国产偷 | 91伦理片| 一区二区三区亚洲 | 天天夜夜人人 | 中文二区 | 国产精品久久久久久久免费大片 | 99精品国产在热久久 | 中文日本在线 | 日本福利在线观看 | 国产精品久久久久久久久污网站 | 91精品国产综合久久久久久 | 亚洲精品av在线 | av看片网站 | 免费一区二区在线观看 | 国产内谢|