標(biāo)題: 51單片機(jī)音樂(lè)花樣燈數(shù)組方法實(shí)現(xiàn) 帶仿真與源碼 [打印本頁(yè)]
作者: AllureLove    時(shí)間: 2018-5-20 22:01
標(biāo)題: 51單片機(jī)音樂(lè)花樣燈數(shù)組方法實(shí)現(xiàn) 帶仿真與源碼
51單片機(jī)課程設(shè)計(jì)分享，制作音樂(lè)花樣燈數(shù)組法法的仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機(jī)花樣燈源程序如下:
  1.                                            /*12Mhz晶振*/
  2. #include <reg52.h>
  3. #define uint unsigned int
  4. #define uchar unsigned char
  5. sbit key2=P3^3;//key2外部中斷1 控制花樣燈的切換速度
  6. sbit key1=P3^2;//key1外部中斷0 控制播放哪首曲子
  7. sbit voice=P3^7;//蜂鳴器定義
  8. uchar code sound[]={0xff,                 //每個(gè)音階  不同拍子的數(shù)據(jù)
  9. 0x60,0x10,0x55,0x10,0x4c,0x10,0x48,0x10,0x40,0x10,0x39,0x10,0x33,0x10,
  10. 0x30,0x10,0x2b,0x10,0x26,0x10,0x24,0x10,0x20,0x10,0x1c,0x10,0x19,0x10,
  11. 0x18,0x10,0x15,0x10,0x13,0x10,0x12,0x10,0x10,0x10,0x0e,0x10,0x0d,0x10,//1/4拍子低音1到高音7
  12. 0x60,0x20,0x55,0x20,0x4c,0x20,0x48,0x20,0x40,0x20,0x39,0x20,0x33,0x20,
  13. 0x30,0x20,0x2b,0x20,0x26,0x20,0x24,0x20,0x20,0x20,0x1c,0x20,0x19,0x20,
  14. 0x18,0x20,0x15,0x20,0x13,0x20,0x12,0x20,0x10,0x20,0x0e,0x20,0x0d,0x20,//2/4拍子低音1到高音7
  15. 0x60,0x30,0x55,0x30,0x4c,0x30,0x48,0x30,0x40,0x30,0x39,0x30,0x33,0x30,
  16. 0x30,0x30,0x2b,0x30,0x26,0x30,0x24,0x30,0x20,0x30,0x1c,0x30,0x19,0x30,
  17. 0x18,0x30,0x15,0x30,0x13,0x30,0x12,0x30,0x10,0x30,0x0e,0x30,0x0d,0x30,//3/4拍子低音1到高音7
  18. 0x60,0x40,0x55,0x40,0x4c,0x40,0x48,0x40,0x40,0x40,0x39,0x40,0x33,0x40,
  19. 0x30,0x40,0x2b,0x40,0x26,0x40,0x24,0x40,0x20,0x40,0x1c,0x40,0x19,0x40,
  20. 0x18,0x40,0x15,0x40,0x13,0x40,0x12,0x40,0x10,0x40,0x0e,0x40,0x0d,0x40,//4/4拍子低音1到高音7
  21. 0x60,0x60,0x55,0x60,0x4c,0x60,0x48,0x60,0x40,0x60,0x39,0x60,0x33,0x60,
  22. 0x30,0x60,0x2b,0x60,0x26,0x60,0x24,0x60,0x20,0x60,0x1c,0x60,0x19,0x60,
  23. 0x18,0x60,0x15,0x60,0x13,0x60,0x12,0x60,0x10,0x60,0x0e,0x60,0x0d,0x60,//5/4拍子低音1到高音7
  24. 0x60,0x80,0x55,0x80,0x4c,0x80,0x48,0x80,0x40,0x80,0x39,0x80,0x33,0x80,
  25. 0x30,0x80,0x2b,0x80,0x26,0x80,0x24,0x80,0x20,0x80,0x1c,0x80,0x19,0x80,
  26. 0x18,0x80,0x15,0x80,0x13,0x80,0x12,0x80,0x10,0x80,0x0e,0x80,0x0d,0x80,//6/4拍子低音1到高音7
  27. 0x60,0xc0,0x55,0xc0,0x4c,0xc0,0x48,0xc0,0x40,0xc0,0x39,0xc0,0x33,0xc0,
  28. 0x30,0xc0,0x2b,0xc0,0x26,0xc0,0x24,0xc0,0x20,0xc0,0x1c,0xc0,0x19,0xc0,
  29. 0x18,0xc0,0x15,0xc0,0x13,0xc0,0x12,0xc0,0x10,0xc0,0x0e,0xc0,0x0d,0xc0,//7/4拍子低音1到高音7
  30. 0xff,0x10,0xff,0x20,0xff,0x30,0xff,0x40,0xff,0x60,0xff,0x80,0xff,0xc0,//休止符，延時(shí)不同
  31. 0x00};
  32. uchar code kanong[]={0xff,                //卡農(nóng)  
  33. 0x13,0x20,0x15,0x20,0x18,0x20,0x19,0x20,0x1c,0x20,0x20,0x20,0x1c,0x20,0x19,0x20,//第一行
  34. 0x18,0x20,0x19,0x20,0x1c,0x20,0x20,0x20,0x24,0x20,0x26,0x20,0x24,0x20,0x2b,0x20,//第二行
  35. 0x18,0x08,0x19,0x08,0x18,0x08,0x30,0x08,0x33,0x08,0x20,0x08,0x2b,0x08,0x26,0x08,//第三行
  36. 0x30,0x08,0x18,0x08,0x19,0x08,0x1c,0x08,0x19,0x08,0x13,0x08,0x10,0x08,0x0e,0x08,
  37. 0x12,0x08,0x13,0x08,0x15,0x08,0x12,0x08,0x12,0x08,0x13,0x08,0x18,0x08,0x19,0x08,
  38. 0x1c,0x08,0x20,0x08,0x24,0x08,0x26,0x08,0x2b,0x08,0x24,0x08,0x26,0x08,0x2b,0x08,
  39. 0x30,0x08,0x2b,0x08,0x26,0x08,0x24,0x08,0x20,0x08,0x2b,0x08,0x20,0x08,0x24,0x08,//第四行
  40. 0x26,0x08,0x1c,0x08,0x20,0x08,0x24,0x08,0x20,0x08,0x24,0x08,0x26,0x08,0x2b,0x08,
  41. 0x30,0x08,0x39,0x08,0x1c,0x08,0x19,0x08,0x18,0x08,0x19,0x08,0x1c,0x08,0x20,0x08,
  42. 0x24,0x08,0x26,0x08,0x2b,0x08,0x1c,0x08,0x20,0x08,0x1c,0x08,0x20,0x08,0x24,0x08,
  43. 0x26,0x10,0x13,0x10,0x15,0x20,0x18,0x20,0x15,0x20,0x18,0x10,0x13,0x10,0x15,0x10,0x12,0x10,//第五行
  44. 0x10,0x08,0x13,0x04,0x12,0x04,  0x10,0x08,0x13,0x04,0x12,0x04,  0x10,0x04,0x20,0x04,0x1c,0x04,0x19,0x04,  0x18,0x04,0x15,0x04,0x13,0x04,0x12,0x04,//第六行
  45. 0x13,0x08,0x18,0x04,0x15,0x04,  0x13,0x08,0x26,0x04,0x24,0x04,  0x20,0x04,0x1c,0x04,0x20,0x04,0x24,0x04,  0x20,0x04,0x26,0x04,0x24,0x04,0x20,0x04,
  46. 0x24,0x08,0x1c,0x04,0x20,0x04,  0x24,0x08,0x26,0x04,0x2b,0x04,  0x26,0x04,0x2b,0x04,0x30,0x04,0x2b,0x04,  0x26,0x04,0x24,0x04,0x20,0x04,0x1c,0x04,
  47. 0x24,0x08,0x1c,0x04,0x20,0x04,  0x1c,0x08,0x19,0x04,0x18,0x04,  0x20,0x04,0x1c,0x04,0x19,0x04,0x18,0x04,  0x15,0x04,0x13,0x04,0x12,0x04,0x10,0x04,//第七行
  48. 0x13,0x08,0x18,0x04,0x15,0x04,  0x13,0x08,0x15,0x04,0x18,0x04,  0x15,0x04,0x19,0x04,0x18,0x04,0x15,0x04,  0x13,0x04,0x15,0x04,0x18,0x04,0x19,0x04,
  49. 0x18,0x08,0x1c,0x04,0x19,0x04,  0x18,0x08,0x30,0x04,0x2b,0x04,  0x26,0x04,0x24,0x04,0x26,0x04,0x2b,0x04,  0x26,0x04,0x18,0x04,0x19,0x04,0x18,0x04,
  50. 0x1c,0x08,0x18,0x04,0x19,0x04,  0x1c,0x08,0x20,0x04,0x24,0x04,  0x20,0x04,0x24,0x04,0x26,0x04,0x24,0x04,  0x20,0x04,0x1c,0x04,0x19,0x04,0x30,0x04,//第八行
  51. 0x1c,0x08,0x18,0x04,0x19,0x04,  0x18,0x08,0x19,0x04,0x1c,0x04,  0x19,0x04,0x18,0x04,0x15,0x04,0x18,0x04,  0x19,0x04,0x18,0x04,0x1c,0x04,0x19,0x04,
  52. 0x13,0x08,0x26,0x08,0x24,0x08,0x26,0x08,  0x2b,0x08,0x15,0x08,0x13,0x08,0x15,0x08,  0x18,0x08,0x26,0x08,0x30,0x08,0x1c,0x08,  0x20,0x08,0x40,0x08,0x48,0x08,0x40,0x08,//第九行
  53. 0x39,0x08,0x1c,0x08,0x19,0x08,0x1c,0x08,  0x19,0x08,0x40,0x08,0x48,0x08,0x40,0x08,  0x39,0x08,0x1c,0x08,0x20,0x08,0x1c,0x08,  0x19,0x08,0x19,0x08,0x1c,0x08,0x19,0x08,
  54. 0x30,0x08,0x18,0x08,0x15,0x08,0x18,0x08,  0x19,0x08,0x33,0x08,0x30,0x08,0x33,0x08,  0x39,0x08,0x1c,0x08,0x20,0x08,0x1c,0x08,  0x19,0x08,0x33,0x08,0x26,0x08,0x2b,0x08,//第十行
  55. 0x30,0x08,0x18,0x08,0x15,0x08,0x12,0x08,  0x13,0x08,0x26,0x08,0x20,0x08,0x13,0x08,  0x18,0x08,0x12,0x08,0x13,0x08,0x12,0x08,  0x15,0x08,0x20,0x08,0x24,0x08,0x20,0x08,
  56. 0x26,0x08,0x18,0x04,0x19,0x04,  0x18,0x08,0x26,0x08,  0x20,0x08,0x20,0x04,0x1c,0x04,  0x19,0x08,0x20,0x08,//第十一行
  57. 0x26,0x08,0x18,0x04,0x15,0x04,  0x13,0x08,0x18,0x08,  0x13,0x08,0x13,0x04,0x15,0x04,  0x18,0x08,0x19,0x08,  
  58. 0x1c,0x08,0x1c,0x04,0x20,0x04,  0x1c,0x08,0x19,0x08,  0x18,0x08,0x13,0x04,0x15,0x04,  0x18,0x08,0x13,0x08,
  59. 0x00};
  60. code unsigned long Pattern[]={         //24顆LED燈花樣數(shù)據(jù)
  61. 0x00fffffc,0x00fffff9,0x00fffff3,0x00ffffe7,//兩個(gè)燈順時(shí)針流水
  62. 0x00ffffcf,0x00ffff9f,0x00ffff3f,0x00fffe7f,
  63. 0x00fffcff,0x00fff9ff,0x00fff3ff,0x00ffe7ff,
  64. 0x00ffcfff,0x00ff9fff,0x00ff3fff,0x00fe7fff,
  65. 0x00fcffff,0x00f9ffff,0x00f3ffff,0x00e7ffff,
  66. 0x00cfffff,0x009fffff,0x003fffff,0x007fffff,0x00ffffff,
  67. 0x00e7e7e7,0x00dbdbdb,0x00bdbdbd,0x007e7e7e,0x00bdbdbd,0x00dbdbdb,0x00e7e7e7,0x00ffffff,//
  68. 0x00e7e7e7,0x00c3c3c3,0x00818181,0x00000000,0x00818181,0x00c3c3c3,0x00e7e7e7,0x00ffffff,//
  69. 0x00aaaaaa,0x00ffffff,0x00555555,0x00ffffff,0x00aaaaaa,0x00ffffff,0x00555555,//錯(cuò)位點(diǎn)亮
  70. 0x00181818,0x00818181,0x00181818,0x00818181,//三個(gè)相連的燈移位
  71. 0x00181818,0x00818181,0x00181818,0x00818181,0x00ffffff,
  72. 0x00f0f0f0,0x000f0f0f,0x00000000,0x00ffffff,
  73. 0x00f8f8f8,0x00f1f1f1,0x00e3e3e3,0x00c7c7c7,0x008f8f8f,0x001f1f1f,0x003f3f3f,0x007f7f7f,0x007f7f7f,//三個(gè)相連的燈流水
  74. 0x003f3f3f,0x001f1f1f,0x008f8f8f,0x00c7c7c7,0x00e3e3e3,0x00f1f1f1,0x00f8f8f8,0x00ffffff,
  75. 0x00000000,0x00000000,0x00ffffff,0x00ffffff,//全亮全滅
  76. 0x000f0f0f,0x00f0f0f0,0x000f0f0f,0x00f0f0f0,//相連的四個(gè)燈全亮全滅
  77. 0x00fffffe,0x00fffffd,0xfffffffb,0x00fffff7,//一個(gè)燈順時(shí)針流
  78. 0x00ffffef,0x00ffffdf,0x00ffffbf,0x00ffff7f,
  79. 0x00fffeff,0x00fffdff,0x00fffbff,0x00fff7ff,
  80. 0x00ffefff,0x00ffdfff,0x00ffbfff,0x00ff7fff,
  81. 0x00feffff,0x00fdffff,0x00fbffff,0x00f7ffff,
  82. 0x00efffff,0x00dfffff,0x00bfffff,0x007fffff,0x00ffffff,       
  83. 0x00fffffe,0x00fffffc,0x00fffff8,0x00fffff0,//順時(shí)針從一個(gè)亮到全部亮
  84. 0x00ffffe0,0x00ffffc0,0x00ffff80,0x00ffff00,
  85. 0x00fffe00,0x00fffc00,0x00fff800,0x00fff000,
  86. 0x00ffe000,0x00ffc000,0x00ff8000,0x00ff0000,
  87. 0x00fe0000,0x00fc0000,0x00f80000,0x00f00000,
  88. 0x00e00000,0x00c00000,0x00800000,0x00000000};
  89. uchar zdjs=0,jp,i=0;
  90. uchar num=0,numtop=5,count=0;
  91. void del(yj);
  92. void delay(uint z);
  93. void play(void)
  94. {
  95.         uint dpjs=0;
  96.         uchar yj;
  97.         while(1)
  98.         {  
  99.                 zdjs=0;  
  100.                 if(count==0)
  101.                 {       
  102.                         TR0=0;
  103.                         break;
  104.                 }
  105.                 if(count==1)        //選曲
  106.                 {
  107.                         dpjs++; yj=sound[dpjs];    //取出音階的頻率
  108.                         dpjs++; jp=sound[dpjs];           //取出延時(shí)時(shí)長(zhǎng)
  109.                 }
  110.                 if(count==2)
  111.                 {
  112.                         dpjs++; yj=kanong[dpjs];
  113.                         dpjs++; jp=kanong[dpjs];
  114.                         jp=jp*4;   //這句是調(diào)音的
  115.                 }                  

  117.                          while(zdjs!=(jp))
  118.                          {
  119.                                  if(yj!=0xff)
  120.                                  {
  121.                                          if(yj!=0)  //判斷音樂(lè)是否播放完畢
  122.                                          {
  123.                                                  voice=!voice;
  124.                                                  del(yj);
  125.                                          }
  126.                                          else
  127.                                          {
  128.                                                  dpjs=0;
  129.                                                  break;
  130.                                          }
  131.                                  }
  132.                                  else
  133.                                  {
  134.                                          voice=0;
  135.                                          del(jp);
  136.                                  }
  137.                         }
  138.                  }
  139. }
  140. void Time0() interrupt 1  using 1           //產(chǎn)生音樂(lè)基準(zhǔn)
  141. {
  142.         TH0=0xd8, TL0=0xf0;
  143.         zdjs++;
  144. }
  145. void Time1() interrupt 3                             //控制花樣燈的切換
  146. {
  147.        
  148.         TH1=0x3C, TL1=0xB0;
  149.         num++;
  150.         if(num==numtop)
  151.         {
  152.                 num=0;
  153.                 P0=Pattern[i];
  154.                 P1=Pattern[i]>>8;
  155.                 P2=Pattern[i]>>16;
  156.                 i++;
  157.                 if(i==135) i=0;
  158.         }
  159. }                         
  160. void int0() interrupt 0                 //key1外部中斷0 控制播放哪首曲子
  161. {
  162.         del(5);         
  163.         EA=0;
  164.         if(key1==0)
  165.         {
  166.                 count++;                  //count決定播放哪一首曲子
  167.                 while(!key1);
  168.                 if(count==4) count=0;       
  169.         }
  170.         EA=1;
  171. }
  172. void int1() interrupt 2                   //key2外部中斷1 控制花樣燈的切換速度
  173. {
  174.         del(5);  //去抖
  175.         EA=0;    //關(guān)總中斷
  176.         numtop++;
  177. //        while(!key2);         //去抖動(dòng)
  178.         if(numtop==10) numtop=0;                //numtop 代表最長(zhǎng)延時(shí)時(shí)間
  179.         EA=1;  //開(kāi)總中斷
  180. }                                  
  181. void del(yj)                 //簡(jiǎn)單延時(shí)函數(shù)
  182. {
  183.         uchar yj2=2;
  184.     while(yj!=0)
  185.     {      
  186.             while(yj2!=0)
  187.         {
  188.                 yj2--;
  189.         }
  190.         yj2=2;
  191.         yj--;  
  192.     }
  193.    
  194. }
  195. void main()
  196. {
  197.                 TMOD=0x11,IE=0x8a;
  198.                 TH0=0xd8, TL0=0xf0;  //10ms音樂(lè)基準(zhǔn)
  199.                 TH1=0x3C, TL1=0xB0;  //50MS
  200.                 EX0=1;//開(kāi)外部中斷0
  201.                 IT0=0;//外部中斷0下降沿觸發(fā)方式
  202.                 EX1=1;//開(kāi)外部中斷1
  203.                 IT1=0;//外部中斷1下降沿觸發(fā)方式          
  204.                 TR0=1; TR1=1;
  205.             play();
  206. }


復(fù)制代碼

所有資料51hei提供下載:
51單片機(jī)課程制作數(shù)組法.rar (745.65 KB, 下載次數(shù): 26)






歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1