标题: STC15F104W单片机音乐播放器制作（小苹果+西海情歌+夜之光）源程序 [打印本页]
作者: zsw3721    时间: 2021-1-20 15:37
标题: STC15F104W单片机音乐播放器制作（小苹果+西海情歌+夜之光）源程序
最近准备做一个延时插座，想起STC15F104W这颗MCU，趁延时插座的料还没来拿它焊了个小玩具。朋友们可以看代码注释找个简谱自己谱曲。
接线图：


实物：





单片机源程序：
  1. #include <STC15.h>
  2. #define uchar unsigned char
  3. #define uint unsinged int

  5. sbit speaker = P3^0;
  6. uchar t0h,t0l,time,count1=0,count2=0;
  7. //--------------------------------------
  8. //单片机晶振采用11.0592MHz
  9. // 频率-半周期数据表 高八位     本软件共保存了四个八度的28个频率数据
  10. uchar code FREQH[] = {0x01,        //0的时候没有音符
  11.     0xF2, 0xF3, 0xF5, 0xF5, 0xF6, 0xF7, 0xF8,    //低音1234567
  12.     0xF9, 0xF9, 0xFA, 0xFA, 0xFB, 0xFB, 0xFC, 0xFC,//1,2,3,4,5,6,7,i
  13.     0xFC, 0xFD, 0xFD, 0xFD, 0xFD, 0xFE,            //高音 234567
  14.     0xFE, 0xFE, 0xFE, 0xFE, 0xFE, 0xFE, 0xFF};   //超高音 1234567
  15. //-----------------------------------------
  16. // 频率-半周期数据表 低八位
  17. uchar code FREQL[] = {0x01,        //0的时候没有音符
  18.     0x42, 0xC1, 0x17, 0xB6, 0xD0, 0xD1, 0xB6,    //低音1234567
  19.     0x21, 0xE1, 0x8C, 0xD8, 0x68, 0xE9, 0x5B, 0x8F, //1,2,3,4,5,6,7,i
  20.     0xEE, 0x44, 0x6B, 0xB4, 0xF4, 0x2D,             //高音 234567
  21.     0x47, 0x77, 0xA2, 0xB6, 0xDA, 0xFA, 0x16};   //超高音 1234567
  22. //--------------------------------------
  23. //一个音符有三个数字。前为第几个音、中为第几个八度、后为时长（以1/4拍为单位）。
  24. //6, 2, 6 分别代表：６, 中音, 6个1/4拍;
  25. //5, 2, 2 分别代表：５, 中音, 2个1/4拍;
  26. //3, 2, 4 分别代表：３, 中音, 4个1/4拍;
  27. //5, 2, 4 分别代表：５, 中音, 4个1/4拍;
  28. //1, 3, 4 分别代表：１, 高音, 4个1/4拍;
  29. //低音为1，中音为2，高音为3，超高音为4；


  32. /***************世上只有妈妈好****************/
  33. uchar code sszymmh[] = {
  34. 6,2,6, 5,2,2, 3,2,4, 5,2,4,
  35. 1,3,4, 6,2,2, 5,2,2, 6,2,8,
  36. 3,2,4, 5,2,2, 6,2,2, 5,2,4,
  37. 3,2,4, 1,2,2, 6,1,2, 5,2,2,
  38. 3,2,2, 2,2,8, 2,2,6, 3,2,2,
  39. 5,2,4, 5,2,2, 6,2,2, 3,2,4,
  40. 2,2,4, 1,2,8, 5,2,6, 3,2,2,
  41. 2,2,2, 1,2,2, 6,1,2, 1,2,2,
  42. 5,1,16, 0,0,0};

  44. /*******************小苹果********************/
  45. uchar code LittleApple[]={
  46. 3,2,4, 1,2,4, 2,2,4, 6,1,4,
  47. 3,2,2, 2,2,2, 1,2,2, 2,2,2,
  48. 6,1,4, 3,2,4, 1,2,4, 2,2,4,
  49. 2,2,4, 5,2,2, 3,2,2, 7,1,4,
  50. 1,2,4, 1,2,2, 7,1,2, 6,1,4,
  51. 7,1,2, 1,2,2, 2,2,4, 5,1,4,        
  52. 6,2,2, 5,2,2, 3,2,4, 3,2,4,
  53. 2,2,2, 1,2,4, 2,2,2, 3,2,2,
  54. 2,2,2, 3,2,2, 2,2,2, 3,2,2,
  55. 5,2,2, 5,2,4, 5,2,2, 5,2,2,
  56. 5,2,2, 5,2,2, 5,2,4, 3,2,4,
  57. 1,2,4, 2,2,4, 6,1,4, 3,2,2,
  58. 2,2,2, 1,2,2, 2,2,2, 6,1,4,
  59. 3,2,4, 1,2,4, 2,2,4, 2,2,4,
  60. 2,2,2, 5,2,2, 3,2,2, 7,1,4,
  61. 1,2,4, 1,2,2, 7,1,2, 6,1,4,
  62. 7,1,2, 1,2,2, 2,2,4, 5,1,4,
  63. 6,2,2, 5,2,2, 3,2,4, 3,2,4,
  64. 2,2,2, 1,2,4, 2,2,2, 3,2,2,
  65. 2,2,4, 5,1,4, 6,1,4, 6,1,2,
  66. 1,2,2, 6,1,4, 1,2,4, 0,0,0};

  68. /*******************夜之光*********************/
  69. uchar code NightLight[]={
  70. 3,2,2, 3,2,2, 3,2,2, 5,2,2, 6,2,4, 5,2,2, 3,2,2,
  71. 5,2,2, 3,2,2, 3,2,2, 2,2,2, 3,2,4, 2,2,2, 2,2,2,
  72. 2,2,2, 2,2,2, 3,2,2, 5,2,4, 3,2,2, 2,2,2, 3,2,2,
  73. 3,2,2, 3,2,2, 2,2,1, 3,2,1, 3,2,4, 3,2,2, 3,2,2,
  74. 3,2,2, 5,2,2, 6,2,4, 5,2,2, 3,2,2, 5,2,2, 3,2,2,
  75. 3,2,2, 3,2,2, 2,2,1, 3,2,1, 3,2,4, 2,2,2, 2,2,2,
  76. 2,2,2, 3,2,2, 5,2,2, 3,2,4, 5,2,2, 6,2,4, 3,2,2,
  77. 1,3,2, 7,2,2, 6,2,2, 6,2,2, 6,2,2, 5,2,1, 6,2,1,
  78. 6,2,4, 6,2,2, 5,2,2, 3,2,2, 3,2,2, 3,2,2, 2,2,1,
  79. 3,2,1, 3,2,4, 5,2,2, 3,2,2, 5,2,2, 5,2,2, 5,2,2,
  80. 6,2,2, 7,2,2, 7,2,2, 6,2,2, 5,2,2, 6,2,4, 6,2,2,
  81. 5,2,1, 6,2,1, 6,2,2, 5,2,2, 1,3,2, 7,2,2, 6,2,2,
  82. 6,2,2, 6,2,2, 5,2,1, 6,2,1, 6,2,4, 6,2,2, 5,2,2,
  83. 3,2,2, 3,2,2, 3,2,2, 2,2,1, 3,2,1, 3,2,4, 5,2,2,
  84. 3,2,2, 5,2,4, 5,2,2, 6,2,2, 7,2,2, 7,2,2, 6,2,2,
  85. 5,2,2, 6,2,2, 6,2,2, 6,2,2, 5,2,1, 6,2,1, 6,2,4,
  86. 0,0,0};

  88. /*******************西海情歌*******************/
  89. uchar code WestSea[]={
  90. 3,1,2, 5,1,2, 6,1,2, 1,2,2, 6,1,2, 2,2,4, 1,2,4,
  91. 1,2,2, 2,2,2, 3,2,2, 3,2,2, 2,2,2, 2,2,2, 1,2,2,
  92. 6,1,2, 6,1,2, 3,1,2, 5,1,4, 6,1,2, 1,2,2, 2,2,4,
  93. 2,2,2, 3,2,1, 2,2,1, 2,2,4, 2,2,1, 1,2,2, 2,2,2,
  94. 2,2,2, 3,2,2, 3,2,2, 2,2,2, 2,2,2, 1,2,2, 6,1,2,
  95. 6,1,2, 3,1,2, 5,1,2, 6,2,2, 1,2,2, 6,1,2, 2,2,4,
  96. 1,2,2, 2,2,2, 3,2,2, 3,2,2, 2,2,2, 2,2,2, 1,2,2,
  97. 6,1,2, 6,1,2, 3,1,2, 5,1,4, 6,1,2, 1,2,2, 2,2,4,
  98. 2,2,2, 3,2,1, 2,2,1, 2,2,4, 2,2,1, 1,2,2, 2,2,2,
  99. 2,2,2, 3,2,2, 3,2,2, 2,2,2, 2,2,2, 1,2,2, 6,1,4,
  100. 1,2,2, 1,2,4, 2,2,2, 3,2,2, 5,2,2, 5,2,2, 5,2,2,
  101. 3,2,2, 5,2,2, 6,2,2, 6,2,2, 5,2,2, 6,2,2, 6,2,2,
  102. 6,2,2, 5,2,2, 3,2,4, 5,2,2, 6,2,2, 1,3,2, 1,3,2,
  103. 1,3,2, 1,3,2, 1,3,2, 6,2,2, 5,2,2, 6,2,1, 1,3,1,
  104. 5,2,2, 6,2,2, 6,2,2, 5,2,2, 3,2,4, 5,2,2, 3,2,2,
  105. 2,2,2, 2,2,2, 2,2,2, 1,2,2, 6,1,4, 1,2,2, 2,2,2,
  106. 2,2,4, 2,2,2, 3,2,2, 5,2,2, 6,2,2, 6,2,2, 5,2,2,
  107. 5,2,2, 3,2,2, 3,2,4, 0,0,0};


  110. /*****************生日快乐********************/
  111. uchar code Birthday[]={
  112. 5,1,2, 5,1,2, 6,1,4, 5,1,4, 1,2,4, 7,1,8,
  113. 5,1,2, 5,1,2, 6,1,4, 5,1,4, 2,2,4, 1,2,8,
  114. 5,1,2, 5,1,2, 5,2,4, 3,2,4, 1,2,4, 7,1,4,
  115. 6,1,4, 4,2,2, 4,2,2, 3,2,4, 1,2,4, 2,2,4,
  116. 1,2,4, 0,0,0};


  119. //-----------------------------------------------------
  120. void t0int() interrupt 1  //T0中断程序，控制发音的音调
  121. {
  122.     TR0 = 0;  //先关闭T0
  123.     speaker = ~speaker; //输出方波, 发音
  124.     TH0 = t0h;   //下次的中断时间, 这个时间, 控制音调高低
  125.     TL0 = t0l;
  126.     TR0 = 1;   //启动T0
  127. }
  128. //--------------------------------------
  129. void delay(uchar t)   //延时程序，控制发音的时间长度120ms(1/4拍)
  130. {
  131. uchar a,b,c;
  132.     while(t--)  //四重循环, 共延时t个1/4拍
  133. {         
  134.      for(c=193;c>0;c--)
  135.          for(b=114;b>0;b--)
  136.              for(a=12;a>0;a--);
  137. }
  138.   //延时期间, 可进入T0中断去发音
  139.     TR0 = 0;   //关闭T0, 停止发音
  140. }
  141. //--------------------------------------
  142. void singachar()    //演奏一个音符
  143. {
  144. TR0=0;
  145.     TH0 = t0h; //控制音调
  146.     TL0 = t0l;
  147.     TR0 = 1;  //启动T0, 由T0输出方波去发音
  148.     delay(time); //控制时间长度即 节拍
  149. }
  150. //--------------------------------------
  151. //**************演奏一首歌***********************************//
  152. void song(uchar *str)
  153. {
  154. uchar k,i;
  155. i = 0;
  156.     time = 1;
  157.     while(time)
  158. {
  159.         k = str[i] + 7 * (str[i + 1]);//第i个是音符, 第i+1个是第几个八度                        
  160.         t0h = FREQH[k];  //从数据表中读出频率数值
  161.         t0l = FREQL[k];  //实际上, 是定时的时间长度
  162.         time = str[i + 2]; //读出时间长度数值 节拍时间
  163.         i += 3;
  164.         singachar();
  165. }
  166. }
  167. void main(void)
  168. {
  169.     TMOD = 0x01;  //置T0定时工作方式1
  170.     ET0 = 1;      //开T0中断
  171.     EA = 1;       //开CPU中断
  172.     while(1)
  173. {
  174.   delay(10);
  175.   song(LittleApple);
  176.     delay(20);
  177.   song(NightLight);
  178.     delay(20);
  179.   song(WestSea);
  180.   delay(20);
  181.   song(sszymmh);
  182.   delay(20);
  183.   song(Birthday);
  184.   delay(20);
  185. }
  186. }
复制代码
作者: zsw3721    时间: 2021-1-20 19:36
好像曲子太长了有点问题，void song(uchar *str)函数中定义的变量i的类型要改为uint。



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