標(biāo)題: 單片機(jī)lcd1602音樂(lè)播放器 仿真 源碼 [打印本頁(yè)]
作者: 51ren    時(shí)間: 2017-1-10 23:30
標(biāo)題: 單片機(jī)lcd1602音樂(lè)播放器 仿真 源碼
51單片機(jī)做的lcd1602音樂(lè)播放器原理圖：

單片機(jī)源程序：

  1. #include<reg51.h>

  3. #define        uint unsigned int
  4. #define uchar unsigned char      
  5. /*------------------------------------------------
  6.                  硬件端口定義
  7. ------------------------------------------------*/
  8. sbit SPK=P2^0;  //定義音樂(lè)輸出端口
  9. sbit key1=P3^2; //定義按鍵 用于 暫停
  10. sbit key2=P3^3; //定義按鍵 用于 切換

  12. sbit rs=P2^1;            
  13. sbit rw=P2^2;            
  14. sbit ep=P2^3;

  16. void delay1(uint z)
  17. {
  18.   uint x,y;
  19.   for(x=z;x>0;x--)
  20.   for(y=110;y>0;y--);
  21. }


  24. void write_com(uchar com)
  25. {
  26. rs=0;
  27. rw=0;
  28. ep=0;
  29. P0=com;
  30. delay1(2);
  31. ep=1;
  32. delay1(2);
  33. ep=0;
  34. delay1(2);
  35. }

  37. void write_dat(uchar dat)
  38. {
  39. rs=1;
  40. rw=0;
  41. ep=0;
  42. P0=dat;
  43. delay1(2);
  44. ep=1;
  45. delay1(2);
  46. ep=0;
  47. delay1(2);
  48. }

  50. void write_zfc(uchar *p)
  51. {
  52.   while(*p!=0)
  53.   write_dat(*p++);
  54. }

  56. void init_1602()
  57. {
  58. write_com(0x38);
  59. write_com(0x01);
  60. write_com(0x06);
  61. write_com(0x0c);
  62. }










  73. unsigned char W=0,T;        //用于選擇音樂(lè)

  75. unsigned char Timer0_H,Timer0_L,Time;


  78. void delay5ms(void)   //誤差 0us
  79. {
  80.     unsigned char a,b;
  81.     for(b=185;b>0;b--)
  82.         for(a=12;a>0;a--);
  83. }


  86. void delay500ms(void)   //誤差 0us
  87. {
  88.     unsigned char a,b,c;
  89.     for(c=205;c>0;c--)
  90.         for(b=116;b>0;b--)
  91.             for(a=9;a>0;a--);
  92. }


  95.                          //世上只有媽媽好 數(shù)據(jù)表        音譜,高中低音,音長(zhǎng)
  96. code unsigned char MUSIC[102]={       6,2,3,      5,2,1,      3,2,2,    5,2,2,    1,3,2,    6,2,1,    5,2,1,
  97.                                       6,2,4,      3,2,2,      5,2,1,    6,2,1,           5,2,2,         3,2,2,           1,2,1,
  98.                                       6,1,1,      5,2,1,      3,2,1,         2,2,4,           2,2,3,         3,2,1,    5,2,2,
  99.                                       5,2,1,      6,2,1,      3,2,2,         2,2,2,    1,2,4,         5,2,3,           3,2,1,
  100.                                       2,2,1,      1,2,1,      6,1,1,         1,2,1,           5,1,6,         0,0,0
  101.                                       };


  104.                                                 //送別 數(shù)據(jù)表        音譜,高中低音,音長(zhǎng)
  105. code unsigned char MUSIC1[174]={        5,2,2,                3,2,1,                5,2,1,                1,3,4,       
  106.                                                                         6,2,2,                1,3,2,                5,2,4,
  107.                                                                         5,2,2,                1,2,1,                2,2,1,                3,2,2,                2,2,1,                1,2,1,
  108.                                                                         2,2,8,
  109.                                                                         5,2,2,                3,2,1,                5,2,1,                1,3,3,                7,2,1,
  110.                                                                         6,2,2,                1,3,2,                5,2,4,
  111.                                                                         5,2,2,                2,2,1,                3,2,1,                4,2,3,                7,1,1,
  112.                                                                         1,2,8,
  113.                                                                         6,2,2,                1,3,2,                1,3,4,
  114.                                                                         7,2,2,                6,2,1,                7,2,1,                1,3,4,
  115.                                                                         6,2,1,                7,2,1,                1,3,1,                6,2,1,                6,2,1,                5,2,1,                3,2,1,                1,2,1,
  116.                                                                         2,2,8,
  117.                                                                         5,2,2,                3,2,1,                5,2,1,                1,3,3,                7,2,1,
  118.                                                                         6,2,2,                1,3,2,                5,2,4,
  119.                                                                         5,2,2,                2,2,1,                3,2,1,                4,2,3,                7,1,1,
  120.                                                                         1,2,8
  121.                                                                 };


  124.                                                 //新年好 數(shù)據(jù)表        音譜,高中低音,音長(zhǎng)
  125. code unsigned char MUSIC2[90]={                1,2,1,                1,2,1,                1,2,2,                5,1,2,
  126.                                                                         3,2,1,                3,2,1,                3,2,2,                1,2,2,
  127.                                                                         1,2,1,                3,2,1,                5,2,2,                5,2,2,
  128.                                                                         4,2,1,                3,2,1,                2,2,4,
  129.                                                                         2,2,1,                3,2,1,                4,2,2,                4,2,2,
  130.                                                                         3,2,1,                2,2,1,                3,2,2,                1,2,2,
  131.                                                                         1,2,1,                3,2,1,                2,2,2,                5,1,2,
  132.                                                                         7,1,1,                2,2,1,                1,2,4
  133.                                                                 };


  136.                                                 //童年 數(shù)據(jù)表        音譜,高中低音,音長(zhǎng)
  137. code unsigned char MUSIC3[423]={        5,1,1,                5,1,1,                3,1,1,                5,1,2,                3,1,1,                5,1,2,
  138.                                                                         6,1,1,                6,1,1,                1,2,1,                6,1,2,                6,1,1,                1,2,2,
  139.                                                                         2,2,1,                2,2,1,                3,2,1,                2,2,2,                5,1,1,                6,1,1,                5,1,1,
  140.                                                                         1,2,1,                1,2,1,                5,1,1,                1,2,1,                1,2,1,                1,2,2,                1,2,1,
  141.                                                                         1,2,1,                5,1,2,                1,2,1,                6,1,1,                5,1,1,                3,1,1,                2,1,1,
  142.                                                                         1,1,2,                3,1,1,                5,1,1,                5,1,2,                5,1,1,                3,1,1,
  143.                                                                         6,1,1,                6,1,1,                1,2,1,                6,1,1,                6,1,1,                6,1,1,                6,1,1,                5,1,1,
  144.                                                                         1,2,2,                1,2,1,                1,2,1,                1,2,1,                6,1,1,                1,2,1,                6,1,1,
  145.                                                                         5,1,2,                0,2,1,                3,1,1,                6,1,1,                1,2,1,                6,1,1,                5,1,1,
  146.                                                                         3,1,1,                2,1,1,                3,1,1,                5,1,1,                5,1,2,                5,1,1,                3,1,1,
  147.                                                                         6,1,1,                6,1,1,                1,2,1,                6,1,1,                6,1,1,                6,1,1,                6,1,1,                5,1,1,
  148.                                                                         1,2,2,                1,2,1,                1,2,1,                1,2,1,                6,1,1,                6,1,1,                1,2,1,
  149.                                                                         2,2,2,                0,2,1,                5,1,1,                2,2,1,                5,2,1,                2,2,2,
  150.                                                                         5,2,1,                5,2,2,                5,2,1,                5,2,1,                5,2,1,                3,2,1,                2,2,1,
  151.                                                                         1,2,1,                1,2,2,                6,1,1,                6,1,1,                1,2,1,                6,1,1,                1,2,1,
  152.                                                                         2,2,1,                2,2,1,                2,2,1,                2,2,1,                2,2,1,                1,2,1,                3,2,1,                2,2,1,
  153.                                                                         2,2,8,
  154.                                                                         3,2,1,                3,2,2,                3,2,1,                3,2,2,                2,2,2,
  155.                                                                         1,2,1,                1,2,2,                1,2,1,                2,2,1,                1,2,1,                6,1,1,                5,1,1,
  156.                                                                         5,1,1,                5,1,2,                5,1,1,                6,1,1,                5,1,1,                2,2,1,                3,2,1,
  157.                                                                         1,2,8,
  158.                                                                         1,2,1,                5,1,2,                1,2,1,                6,1,1,                5,1,1,                3,1,1,                2,1,1,
  159.                                                                         1,2,6,                0,2,2
  160.                                                           };


  163.                          // 音階頻率表 高八位
  164. code unsigned char FREQH[]={
  165.                                 0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,
  166.                                 0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i
  167.                                 0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,
  168.                                 0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,
  169.                                } ;
  170.                          // 音階頻率表 低八位
  171. code unsigned char FREQL[]={
  172.                                  0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,
  173.                                  0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i
  174.                                  0xEE,0x44, 0x6B,0xB4,0xF4,0x2D,
  175.                                  0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,
  176.                                 };
  177. /*------------------------------------------------
  178. uS延時(shí)函數(shù)，含有輸入?yún)?shù) unsigned char t，無(wú)返回值
  179. unsigned char 是定義無(wú)符號(hào)字符變量，其值的范圍是
  180. 0~255 這里使用晶振12M，精確延時(shí)請(qǐng)使用匯編,大致延時(shí)
  181. 長(zhǎng)度如下 T=tx2+5 uS
  182. ------------------------------------------------*/
  183. void DelayUs2x(unsigned char t)
  184. {   
  185.         while(--t);
  186. }
  187. /*------------------------------------------------
  188. mS延時(shí)函數(shù)，含有輸入?yún)?shù) unsigned char t，無(wú)返回值
  189. unsigned char 是定義無(wú)符號(hào)字符變量，其值的范圍是
  190. 0~255 這里使用晶振12M，精確延時(shí)請(qǐng)使用匯編
  191. ------------------------------------------------*/
  192. void DelayMs(unsigned char t)
  193. {   
  194.         while(t--)
  195.     {
  196.              //大致延時(shí)1mS
  197.                 DelayUs2x(245);
  198.                 DelayUs2x(245);
  199.     }
  200. }
  201. /*------------------------------------------------
  202.                 節(jié)拍延時(shí)函數(shù)
  203. 各調(diào)1/4節(jié)拍時(shí)間：
  204. 調(diào)4/4  125ms
  205. 調(diào)2/4  250ms
  206. 調(diào)3/4  187ms
  207. ------------------------------------------------*/
  208. void delay(uchar t)
  209. {
  210.     uchar i;
  211.         for(i=0;i<t;i++)
  212.             DelayMs(250);
  213.     TR0=0;
  214. }
  215. /*------------------------------------------------
  216.                定時(shí)器0中斷
  217. ------------------------------------------------*/
  218. void TIM0_ISR() interrupt 1
  219. {
  220.         TR0=0;      
  221.         SPK=!SPK;
  222.         TH0=Timer0_H;
  223.         TL0=Timer0_L;
  224.         TR0=1;
  225. }
  226. /*------------------------------------------------
  227.                 歌曲處理函數(shù)
  228. ------------------------------------------------*/
  229. void Song()
  230. {
  231.         TH0=Timer0_H;//賦值定時(shí)器時(shí)間，決定頻率
  232.         TL0=Timer0_L;
  233.         TR0=1;       //打開(kāi)定時(shí)器
  234.         delay(Time); //延時(shí)所需要的節(jié)拍                     
  235. }
  236. /*------------------------------------------------
  237.                 主函數(shù)
  238. ------------------------------------------------*/
  239. void led(unsigned char a);

  241. void main(void)
  242. {
  243.         unsigned int i;
  244.         unsigned char k;
  245.         TMOD|=0x01; //置定時(shí)器0工作方式1
  246.         EA=1;       //打開(kāi)全局中斷
  247.         ET0=1;      //打開(kāi) 定時(shí)器0 中斷

  249.         EX0=1;                //打開(kāi) 外部中斷0 中斷
  250.         IT0=1;                //設(shè)置為下降沿中斷

  252.         EX1=1;                //打開(kāi) 外部中斷1 中斷
  253.         IT1=1;                //設(shè)置為下降沿中斷
  254.         PX1=1;                //設(shè)置 外部中斷1 為高優(yōu)先級(jí)
  255.         init_1602();
  256.        
  257.         while(1)
  258.     {  
  259.                 //i=0;
  260.                
  261.                 if(W==0)
  262.                 {  
  263.                         T=W;
  264.                         write_com(0x81);
  265.                         write_zfc("shishangziyou");
  266.                         write_com(0xc4);
  267.                         write_zfc("mamahao");
  268.                 for(i=0;i<100;i=i+3)
  269.                     {         //音樂(lè)數(shù)組長(zhǎng)度 ，唱完從頭再來(lái)
  270.                                 led(MUSIC[i]);
  271.                 
  272.                     k=MUSIC[i]+7*MUSIC[i+1]-1;//去音符振蕩頻率所需數(shù)據(jù)
  273.                     Timer0_H=FREQH[k];
  274.                     Timer0_L=FREQL[k];
  275.                     Time=MUSIC[i+2];          //節(jié)拍時(shí)長(zhǎng)
  276.                    // i=i+3;
  277.                     Song();
  278.                                 if(T!=W)
  279.                                         break;
  280.                 }
  281.                 }
  282.                

  284.                 if(W==1)
  285.                 {  
  286.                         T=W;
  287.                         write_com(0x01);
  288.                         write_com(0x80);
  289.                         write_zfc("   songbie   ");
  290.                 for(i=0;i<174;i=i+3)
  291.                     {         //音樂(lè)數(shù)組長(zhǎng)度 ，唱完從頭再來(lái)
  292.                                 led(MUSIC1[i]);
  293.                 
  294.                     k=MUSIC1[i]+7*MUSIC1[i+1]-1;//去音符振蕩頻率所需數(shù)據(jù)
  295.                     Timer0_H=FREQH[k];
  296.                     Timer0_L=FREQL[k];
  297.                     Time=MUSIC1[i+2];          //節(jié)拍時(shí)長(zhǎng)
  298.                    // i=i+3;
  299.                     Song();
  300.                                 if(T!=W)
  301.                                         break;
  302.                 }
  303.                 }


  306.                 if(W==2)
  307.                 {  
  308.                         T=W;
  309.                         write_com(0x80);
  310.                         write_zfc("   xinnianhao ");
  311.                 for(i=0;i<90;i=i+3)
  312.                     {         //音樂(lè)數(shù)組長(zhǎng)度 ，唱完從頭再來(lái)
  313.                                 led(MUSIC2[i]);
  314.                 
  315.                     k=MUSIC2[i]+7*MUSIC2[i+1]-1;//去音符振蕩頻率所需數(shù)據(jù)
  316.                     Timer0_H=FREQH[k];
  317.                     Timer0_L=FREQL[k];
  318.                     Time=MUSIC2[i+2];          //節(jié)拍時(shí)長(zhǎng)
  319.                    // i=i+3;
  320.                     Song();
  321.                                 if(T!=W)
  322.                                         break;
  323.                 }
  324.                 }

  326.                
  327.                 if(W==3)
  328.                 {  
  329.                         T=W;
  330.                         write_com(0x80);
  331.                         write_zfc("   tongnian  ");
  332.                 for(i=0;i<423;i=i+3)
  333.                     {         //音樂(lè)數(shù)組長(zhǎng)度 ，唱完從頭再來(lái)
  334.                                 led(MUSIC3[i]);
  335.                 
  336.                     k=MUSIC3[i]+7*MUSIC3[i+1]-1;//去音符振蕩頻率所需數(shù)據(jù)
  337.                     Timer0_H=FREQH[k];
  338.                     Timer0_L=FREQL[k];
  339.                     Time=MUSIC3[i+2];          //節(jié)拍時(shí)長(zhǎng)
  340.                    // i=i+3;
  341.                     Song();
  342.                                 if(T!=W)
  343.                                         break;
  344.                 }
  345.                 }

  347.      }
  348. }


  351. // 頻譜函數(shù)
  352. void led(unsigned char a)       
  353. {
  354.         switch(a)
  355.         {
  356.                 case 0:P1=0xff;break;
  357.                 case 1:P1=0x7f;break;
  358.                 case 2:P1=0x7e;break;
  359.                 case 3:P1=0x7c;break;
  360.                 case 4:P1=0x78;break;
  361.                 case 5:P1=0x70;break;
  362.                 case 6:P1=0x60;break;
  363.                 case 7:P1=0x40;break;
  364.                 case 8:P1=0x00;break;
  365.         }

  367. }


  370. //        外部中斷0 中斷服務(wù)程序        用于暫停
  371. void zhongduan0() interrupt 0
  372. {   
  373.     delay5ms();        //按鍵去抖
  374.         if(!key1)
  375.         {
  376.                 while(!key1);        //松手檢測(cè)
  377.                 while(key1&&T==W);        //檢測(cè)按鍵是否按下
  378.                 delay5ms();        //按鍵去抖
  379.                 while(key1&&T==W);        //檢測(cè)按鍵是否按下
  380.                 while(!key1&&T==W);        //松手檢測(cè)
  381.         }
  382. }


  385. //        外部中斷1 中斷服務(wù)程序
  386. void zhongduan1() interrupt 2
  387. {   
  388.     delay5ms();        //按鍵去抖
  389.         if(!key2)
  390.         {
  391.                 if(W==3)
  392.                         W=0;
  393.                 else
  394.                         W++;
  395.                 while(!key2);        //松手檢測(cè)
  396.                 delay500ms();
  397.                
  398.         }
  399. }
復(fù)制代碼





所有資料下載：
1602音樂(lè)播放器.rar (62.63 KB, 下載次數(shù): 59)

作者: 碩005    時(shí)間: 2017-1-11 10:24
哈哈哈，很有意思，多來(lái)幾首吧！
作者: 越快樂(lè)越墮落    時(shí)間: 2017-1-26 21:02
我還以為是插卡的，，，
作者: 天123    時(shí)間: 2017-11-24 17:12
這個(gè)程序的話怎么連lcd1602到開(kāi)發(fā)板上呢
作者: changle11    時(shí)間: 2017-11-24 18:03
多來(lái)幾首！
作者: 瑟瑟的萌新    時(shí)間: 2017-12-5 16:36
樓主有PCB的原理圖嗎
作者: huangld    時(shí)間: 2017-12-7 19:41
在哪修改音樂(lè)呢



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