国产免费AV|泡泡玛特欧洲总部将设在伦敦|中文天堂网www新版资源在线|一本久道综合在线中文|国精产品一二三产区的使用方法|香蕉鱼在线观看|www.27eee

ELEOK

標題: 51單片機音樂播放系統的proteus仿真電路及C語言程序設計 [打印本頁]
作者: coolfire    時間: 2021-4-21 23:10
標題: 51單片機音樂播放系統的proteus仿真電路及C語言程序設計
仿真原理圖如下（proteus仿真工程文件和完整單片機C語言源碼可到本帖附件中下載）

部分51單片機源碼：
  1. #define uchar unsigned char //定義一下方便使用
  2. #define uint  unsigned int
  3. #define ulong unsigned long
  4. #include <reg52.h>     //包括一個 52 標準內核的頭文件



  8. sbit    BEEP=P1^7; //喇叭輸出腳
  9. sbit  P10=P1^0;
  10. sbit K1= P3^2;      
  11. sbit K2= P3^5;  


  14. uchar th0_f; //在中斷中裝載的 T0 的值高 8 位
  15. uchar tl0_f; //在中斷中裝載的 T0 的值低 8 位

  17. //T0 的值,及輸出頻率對照表
  18. uchar code freq[36*2]={
  19. 0xA9,0xEF,//00220HZ ,1  //0
  20. 0x93,0xF0,//00233HZ ,1#
  21. 0x73,0xF1,//00247HZ ,2  
  22. 0x49,0xF2,//00262HZ ,2#
  23. 0x07,0xF3,//00277HZ ,3
  24. 0xC8,0xF3,//00294HZ ,4
  25. 0x73,0xF4,//00311HZ ,4#
  26. 0x1E,0xF5,//00330HZ ,5  
  27. 0xB6,0xF5,//00349HZ ,5#
  28. 0x4C,0xF6,//00370HZ ,6
  29. 0xD7,0xF6,//00392HZ ,6#
  30.   0x5A,0xF7,//00415HZ ,7     
  31.   0xD8,0xF7,//00440HZ 1     //12
  32.   0x4D,0xF8,//00466HZ 1#    //13
  33.   0xBD,0xF8,//00494HZ 2     //14
  34.   0x24,0xF9,//00523HZ 2#    //15
  35.   0x87,0xF9,//00554HZ 3     //16
  36.   0xE4,0xF9,//00587HZ 4     //17
  37.   0x3D,0xFA,//00622HZ 4#    //18   0x90,0xFA,//00659HZ 5     //19
  38.   0xDE,0xFA,//00698HZ 5#    //20
  39.   0x29,0xFB,//00740HZ 6     //21
  40.   0x6F,0xFB,//00784HZ 6#    //22
  41.   0xB1,0xFB,//00831HZ 7     //23
  42. 0xEF,0xFB,//00880HZ `1
  43. 0x2A,0xFC,//00932HZ `1#
  44. 0x62,0xFC,//00988HZ `2
  45. 0x95,0xFC,//01046HZ `2#
  46. 0xC7,0xFC,//01109HZ `3
  47. 0xF6,0xFC,//01175HZ `4
  48.   0x22,0xFD,//01244HZ  `4#
  49. 0x4B,0xFD,//01318HZ `5
  50. 0x73,0xFD,//01397HZ `5#
  51. 0x98,0xFD,//01480HZ `6
  52. 0xBB,0xFD,//01568HZ `6#
  53.   0xDC,0xFD,//01661HZ `7     //35
  54. };

  56. //定時中斷 0,用于產生唱歌頻率
  57. timer0() interrupt 1   
  58. {
  59.     TL0=tl0_f;TH0=th0_f;  //調入預定時值
  60.     BEEP=~BEEP;           //取反音樂輸出 IO
  61. }

  63. //******************************
  64. //音樂符號串解釋函數
  65. //入口:要解釋的音樂符號串,輸出的音調串,輸出的時長串
  66. changedata(uchar *song,uchar *diao,uchar *jie)
  67. {
  68.     uchar i,i1,j;
  69.     char gaodi; //高低+/-12 音階
  70.     uchar banyin;//有沒有半個升音階
  71.     uchar yinchang;//音長
  72.     uchar code jie7[8]={0,12,14,16,17,19,21,23}; //C 調的 7 個值

  74.     *diao=*song;
  75.     for(i=0,i1=0;;)
  76.     {
  77.         gaodi=0; //高低=0
  78.         banyin=0;//半音=0
  79.         yinchang=4;//音長 1 拍
  80.         if((*(song+i)=='|') || (*(song+i)==' ')) i++;    //拍子間隔和一個空格過濾

  82.         switch(*(song+i))  
  83.         {     
  84.             case ',': gaodi=-12;i++;//低音
  85.             break;

  87.             case '`': gaodi=12;i++; //高音
  88.             break;
  89.         }

  91.         if(*(song+i)==0)  //遇到 0 結束
  92.         {
  93.             *(diao+i1)=0; //加入結束標志 0
  94.             *(jie+i1)=0;
  95.             return;
  96.         }

  98.         j=*(song+i)-0x30; i++; //取出基準音
  99.         j=jie7[j]+gaodi; //加上高低音


  102. yinc:   switch(*(song+i))  
  103.         {     
  104.             case '#': //有半音 j 加一個音階  
  105.                 i++;j++;
  106.     goto yinc;  


  109.             case '-': //有一個音節加長
  110.                 yinchang+=4;
  111.                 i++;  
  112.                 goto yinc;

  114.             case '_': //有一個音節縮短
  115.                 yinchang/=2;
  116.                 i++;  
  117.     goto yinc;


  120.             case '.': //有一個加半拍
  121.                 yinchang=yinchang+yinchang/2;
  122.     i++;
  123.     goto yinc;              
  124.         }

  126.         *(diao+i1)=j; //記錄音符
  127.         *(jie+i1)=yinchang; //記錄音長
  128.         i1++;     
  129.     }
  130. }
  131. （完整程序源碼請下載附件查看）
復制代碼

音樂播放系統的proteus仿真電路及C語言代碼.rar (67.1 KB, 售價: 10 E幣)




歡迎光臨 ELEOK (http://www.afoofa.cn/) Powered by Discuz! X5.0