标题: 利用单片机定时器产生乐曲+源程序+仿真图 [打印本页]
作者: 草棚    时间: 2018-5-26 09:09
标题: 利用单片机定时器产生乐曲+源程序+仿真图
利用定时器产生乐曲仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源码：

  2. #include<reg52.h>                 //库文件
  3. #define uchar unsigned char//宏定义无符号字符型
  4. #define uint unsigned int  //宏定义无符号整型
  5. /********************************************************************
  6.                             初始定义
  7. *********************************************************************/
  8. uchar Count;
  9. sbit _Speak =P3^7 ; //讯响器控制脚
  10. /********************************************************************
  11.                             歌曲字根码
  12. *********************************************************************/
  13. unsigned char code SONG[] ={ //祝你平安
  14. 0x26,0x20,0x20,0x20,0x20,0x20,0x26,0x10,0x20,0x10,0x20,0x80,0x26,0x20,0x30,0x20,
  15. 0x30,0x20,0x39,0x10,0x30,0x10,0x30,0x80,0x26,0x20,0x20,0x20,0x20,0x20,0x1c,0x20,
  16. 0x20,0x80,0x2b,0x20,0x26,0x20,0x20,0x20,0x2b,0x10,0x26,0x10,0x2b,0x80,0x26,0x20,
  17. 0x30,0x20,0x30,0x20,0x39,0x10,0x26,0x10,0x26,0x60,0x40,0x10,0x39,0x10,0x26,0x20,
  18. 0x30,0x20,0x30,0x20,0x39,0x10,0x26,0x10,0x26,0x80,0x26,0x20,0x2b,0x10,0x2b,0x10,
  19. 0x2b,0x20,0x30,0x10,0x39,0x10,0x26,0x10,0x2b,0x10,0x2b,0x20,0x2b,0x40,0x40,0x20,
  20. 0x20,0x10,0x20,0x10,0x2b,0x10,0x26,0x30,0x30,0x80,0x18,0x20,0x18,0x20,0x26,0x20,
  21. 0x20,0x20,0x20,0x40,0x26,0x20,0x2b,0x20,0x30,0x20,0x30,0x20,0x1c,0x20,0x20,0x20,
  22. 0x20,0x80,0x1c,0x20,0x1c,0x20,0x1c,0x20,0x30,0x20,0x30,0x60,0x39,0x10,0x30,0x10,
  23. 0x20,0x20,0x2b,0x10,0x26,0x10,0x2b,0x10,0x26,0x10,0x26,0x10,0x2b,0x10,0x2b,0x80,
  24. 0x18,0x20,0x18,0x20,0x26,0x20,0x20,0x20,0x20,0x60,0x26,0x10,0x2b,0x20,0x30,0x20,
  25. 0x30,0x20,0x1c,0x20,0x20,0x20,0x20,0x80,0x26,0x20,0x30,0x10,0x30,0x10,0x30,0x20,
  26. 0x39,0x20,0x26,0x10,0x2b,0x10,0x2b,0x20,0x2b,0x40,0x40,0x10,0x40,0x10,0x20,0x10,
  27. 0x20,0x10,0x2b,0x10,0x26,0x30,0x30,0x80,0x00,
  28. //路边的野华不要采
  29. 0x30,0x1C,0x10,0x20,0x40,0x1C,0x10,0x18,0x10,0x20,0x10,0x1C,0x10,0x18,0x40,0x1C,
  30. 0x20,0x20,0x20,0x1C,0x20,0x18,0x20,0x20,0x80,0xFF,0x20,0x30,0x1C,0x10,0x18,0x20,
  31. 0x15,0x20,0x1C,0x20,0x20,0x20,0x26,0x40,0x20,0x20,0x2B,0x20,0x26,0x20,0x20,0x20,
  32. 0x30,0x80,0xFF,0x20,0x20,0x1C,0x10,0x18,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,
  33. 0x20,0x2B,0x40,0x20,0x20,0x1C,0x10,0x18,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,
  34. 0x20,0x2B,0x40,0x20,0x30,0x1C,0x10,0x18,0x20,0x15,0x20,0x1C,0x20,0x20,0x20,0x26,
  35. 0x40,0x20,0x20,0x2B,0x20,0x26,0x20,0x20,0x20,0x30,0x80,0x20,0x30,0x1C,0x10,0x20,
  36. 0x10,0x1C,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,0x20,0x2B,0x40,0x20,0x15,0x1F,
  37. 0x05,0x20,0x10,0x1C,0x10,0x20,0x20,0x26,0x20,0x2B,0x20,0x30,0x20,0x2B,0x40,0x20,
  38. 0x30,0x1C,0x10,0x18,0x20,0x15,0x20,0x1C,0x20,0x20,0x20,0x26,0x40,0x20,0x20,0x2B,
  39. 0x20,0x26,0x20,0x20,0x20,0x30,0x30,0x20,0x30,0x1C,0x10,0x18,0x40,0x1C,0x20,0x20,
  40. 0x20,0x26,0x40,0x13,0x60,0x18,0x20,0x15,0x40,0x13,0x40,0x18,0x80,0x00,};
  41. /********************************************************************
  42.                             定时中断服务函数
  43. *********************************************************************/
  44. void Time0_Init()
  45. {
  46.         TMOD = 0x01;
  47.         IE = 0x82;
  48.         TH0 = 0xD8;
  49.         TL0 = 0xEF; //12MZ晶振，10ms
  50. }
  51. /*********************************************************************/
  52. void Time0_Int() interrupt 1
  53. {
  54.         TH0 = 0xD8;
  55.         TL0 = 0xEF;                     
  56.         Count++; //长度加1
  57. }
  58. /*********************************************************************/
  59. void Delay_xMs(unsigned int x) //1MS 延时子程序
  60. {
  61.         unsigned int i,j;
  62.         for( i =0;i < x;i++ )
  63.         {
  64.                 for( j =0;j<3;j++ );
  65.         }
  66. }
  67. /*********************************************************************/
  68. void Play_Song(unsigned char i) //:歌曲播放子程序i 为播放哪一段曲目
  69. {
  70.         unsigned char Temp1,Temp2;
  71.         unsigned int Addr;
  72.         Count = 0; //中断计数器清0
  73.         Addr = i * 217;
  74. while(1)
  75.         {
  76.                 Temp1 = SONG[Addr++];
  77.                 if ( Temp1 == 0xFF ) //休止符
  78.                         {
  79.                                 TR0 = 0; Delay_xMs(100);
  80.                         }
  81.         else if ( Temp1 == 0x00 ) //歌曲结束符
  82.                 {
  83.                         return;
  84.                 }
  85. else
  86. {
  87.         Temp2 = SONG[Addr++];
  88.         TR0 = 1;
  89.         while(1)
  90.         {
  91.         _Speak = ~_Speak;
  92.         Delay_xMs(Temp1);
  93.         if ( Temp2 == Count )
  94.                 {
  95.                         Count = 0;
  96.                         break;
  97.                 }
  98.         }
  99. }
  100. }
  101. }
  102. /********************************************************************
  103.                             主函数
  104. *********************************************************************/
  105. void main() //主程序
  106. {
  107.         Time0_Init(); //定时器0 中断初始化
  108.         while(1)
  109.         {
  110.                 Play_Song(0);
  111.         } //播放
  112. }

  114. /********************************************************************
  115.                               结束
  116. *********************************************************************/
复制代码

全部资料51hei下载地址：
利用定时器产生乐曲.zip (61.3 KB, 下载次数: 10)



作者: ziba108    时间: 2022-3-6 20:17
怎么把歌改成电子谱



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1