⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 music.lst

📁 音乐盒程序:基于AT89S52的数字音乐盒程序
💻 LST
📖 第 1 页 / 共 2 页
字号:
C51 COMPILER V8.02   MUSIC                                                                 04/26/2009 20:56:25 PAGE 1   


C51 COMPILER V8.02, COMPILATION OF MODULE MUSIC
OBJECT MODULE PLACED IN music.OBJ
COMPILER INVOKED BY: D:\keilc51\C51\BIN\C51.EXE music.c BROWSE DEBUG OBJECTEXTEND

line level    source

   1          #include<reg52.h>
   2          #include<ctype.h>
   3          //#include"LCD1602.h"
   4          
   5          #define uchar unsigned char
   6          #define uint  unsigned int
   7          #define  N  800 //每首歌的音符的长度
   8          #pragma  ot (0) //代码优化,是编译器选项,代码速度优先! 
   9          
  10          
  11          sbit key1=P3^0 ;// 按键选择     P3.0、P3.1、P3.2、P3.3
  12          sbit key2=P3^1 ;//
  13          sbit key3=P3^2 ;//
  14          
  15          
  16          sbit Buzz=P2^0; //产生方波
  17          
  18          
  19                  /*所使用的晶振频率*/
  20          #define OSFREQ 12000000l    
  21          
  22                          /*   0   吻别  很爱很爱你  认真的雪*/
  23          //uchar code string1[]={"g=a=1=a=|11=2=3=2=3g=a=1=a=|1=1_1=2_3=2=2g=a=1=a=|11=2=3=2=3g=a=1=a=|1=1_1=2_6=5=
             -53_5_|5_5_5_6=C=C=6._0_5=3=|2=2=2=3=2_1=3=3=5._0_3=5=|5_5_5_6=C=C=6._0._3=|3_2_2_6=5=55=6=C=6=|CC=6_5=6_C=3=3_0=3=|3=2=2
             -=2=2_1=3=3=2._5=6=C=6=|CC=6_5=6_C=3=3_0=3=|3_2_03_3_2_3_|2._1=1--|  5=6=C=D=|E._E=E=E=E_D.D=D=G=D_|C._C=C=D=E=C=6_D=7=7=
             -7=C_|C5=6=C=D=|E._E=E=G=E_D._D=D=G=D_|C0_6=6=7_C_C|C---|  5=6=C=D=|E._E=E=G=E_D._D=D=G=D_|C._C=C=D=E=C=6_D=7=7=7=C_|C5=6
             -=C=D=|E._E=E=G=E_D._D=D=G=D_|C0_6=6=7_C_C|C---|  0_5=5=5=6=C=E=E_5=5=5=6=C=D=D0=D=E=D|=D=C=C=C=C=G=D=E=E._E=E=D=D=E=D=C=
             -C=D=D_C_A=A=G=E=C=0=6=6=E=E=D=C=C=C=6=C=D=0_5=5=5=6=C=D=D_5=5=6=C=D=D0=D=D=E=D=C=C=D=D=5=A=6=G=D=C=0=6=6=E|=3=D=C=6=6=5=
             -6=D=D_C."};//吻别  很爱很爱你  认真的雪
  24          
  25                          /*   1   中国人*/ 
  26          //uchar code string2[]={"3_5.6._C=6_5_6_5_6.C=6_56_5_3_2_3-2._3_2_1_2._3=2_1|3_5_C_7_6-a._1=a_g_a._1=a_g_a
             -_1-2_1_a-2._3=2_1_2._3=2_1_2_1_1_2_3-6_6_5_3_2_3_5_6_5_3_2_3-2_2_1_a_g_a_1|_2_1a_g_a-|a1ag|a1_2_3-|6_6_6_5=6=6.6=6=6_5_2
             -_3_3-a1aga1_2_3-2_2_2_1=2=2.3=5=C_7_6__6-6._C=6_5=6._C=6_5_|6_5_6_5_3-6_6_5_3_2_3_5_C_7_6_5_6-6._C=6_5_6-6_5_6_5_3-2._3=
             -2_1_2-3_5_3_2_33_5_6._C=6_5_|_6_5_6_53-|2_2_3_2_a_g_a---a1236._C=6_5_6._C_5_6_5_6_5_3-66_5_3_2_3_5_C_7_6_5_6-C7656---6--
             --"};//中国人 
  27          
  28                          /*   2   老鼠爱大米  浏阳河*/
  29          //uchar code string3[]={"C3_2=1=132=113_2_3_1_3_6=5=5.3=5=6_6=5=5_6=5=53=2_1_2_2=3=2_123_3_213_2=1=13_2_3_
             -1_1=6_6_5=5.3=5=6_6_C_6=5=53=2=2_1_22=1=3=2=23_3_211.  5_6=C=6=5=3=5=3_2.1_1=25_3_2=3=1.5_3=5=6._5=3_5_32._1=a_g_1---1_1
             -2=35_53_2._1=a_g_1_a5_C_6._5=3_5_a1_1=25_3_2._3=1=2=1=a=g---"}; //老鼠爱大米  浏阳河
  30          
  31                          /*   3  无聊的游戏 很爱很爱你*/
  32          //uchar code string4[]={"3_3=5=3_2_3_2_1_2_2=3=e_g_a-3_3=5=3_2_3_6_5_3=5=2-203_6_5_3=5=6.a._a._3_2_1_=2=3-
             -a_3_=3=2_1_3_5_5_2_3-303_3=5=3_2_32_1_2_2=3=e_g_a-3_3=5=3_2_3_6_5_3=5=2-203_6_5_3=5=6.a_a_3_2_1=2=3-a_3=3=2_1_3_5_g_a-3_
             -6=6=63_6=6=63_6_5_3=5=6-a_2=2=2a_5_3_2_3-3_6_5_3=2_1_2=3=23_5_5_1_2-3_6_5_3=2=1_2=3=22_5=5=5_g_a-3_5=5=5_3=5=6-6-    |5_
             -5=5=5=C._5._C=C=D=E=D=|7._6=7=6=5_(C=7=5=2=2_0=)5=|D_D=D=D=D_D=D_6_6=5=3=5=|5=5_4=404_5_|6._6=6=6=C_70_6_|5_5_5=D_C=C0=6
             -7=|C._C=C=D=E_D._D=C_7_|C---|C._C=C=D=E_D._D=D=C_7=|D._C=C-5=6=C=D=|E._E=E=G=E_D._D=D=G=D_|C._C=C=D=E=C=6_D=7=7=7=C_|C5=
             -6=C=D=|E._E=E=G=E_D._D=D=G=D_|C0_6=6=7_C_C|C---|"};   //无聊的游戏 很爱很爱你
  33          
  34                          /*   4   青花瓷  一万个理由*/
  35          //uchar code string5[]={"0=G=G=E=D=E=6_D=E=G=E=D0=G=G=E=D=E=5_D=E=G=D=C0=C=D=E=G=A=G=E=G=E=E=D=D0=C=D=C=D_
             -C=D=D=E_G=E=E._0=G=G=E=D=E=A_D=E=G=E=D0=G=G=E=D=E=G_D=E=G=D=C0=C=D=E=G=A=G=E=G=E=E=D=D._G=E_D=D=D_C_C-  0=5=6=C=E=E=E=E=
             -E._D=D_C_0_6=C=DD=E_5=50=5=5=6=C=C=C=C=C=6._D.=E=D=C=G=A=C_C=C=C=6=6=C=D0=5=6=C=E=E=E=E=E._D=D_C_0_A=C=DD=E_5=50=5=5=6=C
             -=C=C=C=C=C-6._D._E=D=C=5=6=C_C=C=C=6=6=C=D.C_C--   "}; /* /青花瓷  一万个理由  */
C51 COMPILER V8.02   MUSIC                                                                 04/26/2009 20:56:25 PAGE 2   

  36          
  37                          /*   5   super star*/ 
  38          //uchar code string6[]={"22_3_1g_g_2_1_2_3_10_3_4_3_1_2_20_3_4_3_1_1_1b2_2_2_3_1g_g_2_1_2_3_10_3_4_3_1_2_2
             -0_3_4_3_4_5_5g_a_12_3_53_5_6_7_6_5_32_3_5_33_2_3_2_1_g-0g_a_12_3_53_5_6_7_6_5_32_3_5_33__2_3_2_1_g---g---06_5.2_3_300006
             -_5.2_3_3_3_3=2=1_1-06_5.7_7_70_7_C7_6_6-00g--g_a_g--- "};  //super star  
  39          
  40                          /*   6   学习雷锋好榜样 山楂树  团结就是力量     许巍-星空前奏*/
  41          //uchar code string7[]={"5._3=2_1_5-12_3_g-5.3_23_5_1a_3_2-356.5_352._3=2_1_a32_21_a1g05.3_6562_3_50  a-a1
             --a2--a-b1b13-2a--a--a-33-12--a-b1b13-21--1--5-55432--a-b1-12123--3--1-1_1_1235--4-32-b3-2a--a--a-66565--4-34-56543--3--1
             --1_1_1235--4-32-b3-2a--a--   C-53.2_1530C-53.2_1650 5_C6_5_C05_C6_5_6_0_3_C.6_53C.6_C0C53_6_5_3_2.1_30_5_C56_C_6_5_33_1_
             -6-60C._C=5_5_2._3=5_5_6.5_6DC6_5_C6_5_33_5_C-  3- 2_3_4_3 3- 2_3_4_3 3- 4- 3_4_5_4 4- 3-2-  3- 2_3_4_3 3- 2_3_4_3 3-4- 3
             -_4_5_4 4- 3-2"};       /*学习雷锋好榜样 山楂树  团结就是力量   许巍-星空前奏*/
  42          
  43                          /*   7   满天都是小星星 两只老虎 许巍-时光  生日快乐*/
  44          //uchar code string8[]={"c_1_5_5_6_6_54_4_3_3_2_2_15_5_4_4_3_3_25_5_4_4_3_3_21_1_5_5_6_6_54_4_3_3_2_2_1  1
             -_2_3_1_1_2_3_1_3_4_5 3_4_55=6=5=4=3_1_5=6=5=4=3_1_2_g_12_g_1                    543 3_2_1_2_30 g53 3_2_1_2_30 a65 4_3_2_
             -3_4 1 b a g  g_g_ag  1b- g_g_ag  21-  g_g_53  1ba 004_4_  312  1--1  "};/* 满天都是小星星 两只老虎 许巍-时光  生日快乐*/
             - 
  45          
  46                          /*   8    一千个伤心的理由*/    
  47          //uchar code string9[]={"e=a_b=1=1.0=2=|b_a_g=a._3C_7=C=|6._e=a_b=1=1.0=2=|b_a=g=g=2_3=30_1=2=|3_3_2=1_2=2
             -0_b=1=|2_2_b_g=a=a.0=e=|f_1=1=1._2=b_a_g=a_b=|b-0(E_D_)|0=1=1=2=|3_3_2=1_2=20=2=2=3=|4_4_3=2_3=3_0_0_3=4=|5_5=4=4=2_6=6=
             -5=5=4=4_3=1=|1_1=2=3=2=20=1=1=2=|3_3_2=1_2=20=2=2=3=|4_4_3=2_3=30_3=4=|5_5_4_3=6=6=5=5=4=4=3=3_|1--b._a=|a1_b_1.2|b=a=g_
             -g00|ab_1_1.2|b5-|  |D_D_D_C_C0_C_|7_7_7_7_C7_5_|6_6_6_5_66_5_|6_6_6_E_D0_C_|D_D_D_C_C0_C_|7_7_7_7_C._7=7_5_|6._5=1-0_2=3
             -=|4_3_1_4_4_3_0_1_|1---|"};//一千个伤心的理由 
  48          
  49          /**************音符频率表************/
  50           uint code notefreq[]={  523, 587, 659, 698, 784, 880, 988,
  51                                  1047,1175,1319,1396,1568,1760,1976,
  52                                  2093,2349,2637,2793,3136,3520,3961};
  53          /*****************音名***************/
  54          uchar code notename[]={ 'c','d','e','f','g','a','b',
  55                                  '1','2','3','4','5','6','7',
  56                                  'C','D','E','F','G','A','B',0};
  57          /***************半音频率表***********/
  58           uint code halfnotefreq[]={  554, 622, 740, 831, 933,
  59                                      1109,1245,1480,1161,1865,
  60                                      2218,2489,2960,3322,3729};
  61          /*****************半音名*************/
  62          uchar code halfnotename[]={ 'c','d','f','g','a',
  63                                      '1','2','4','5','6',
  64                                      'C','D','F','G','A',0};
  65          
  66          uchar code title[8][N]={
  67                                                            {"g=a=1=a=|11=2=3=2=3g=a=1=a=|1=1_1=2_3=2=2g=a=1=a=|11=2=3=2=3g=a=1=a=|1=1_1=2_6=5=53_5_|5_5_5_6=C
             -=C=6._0_5=3=|2=2=2=3=2_1=3=3=5._0_3=5=|5_5_5_6=C=C=6._0._3=|3_2_2_6=5=55=6=C=6=|CC=6_5=6_C=3=3_0=3=|3=2=2=2=2_1=3=3=2._5
             -=6=C=6=|CC=6_5=6_C=3=3_0=3=|3_2_03_3_2_3_|2._1=1--|  5=6=C=D=|E._E=E=E=E_D.D=D=G=D_|C._C=C=D=E=C=6_D=7=7=7=C_|C5=6=C=D=|
             -E._E=E=G=E_D._D=D=G=D_|C0_6=6=7_C_C|C---|  5=6=C=D=|E._E=E=G=E_D._D=D=G=D_|C._C=C=D=E=C=6_D=7=7=7=C_|C5=6=C=D=|E._E=E=G=
             -E_D._D=D=G=D_|C0_6=6=7_C_C|C---|  0_5=5=5=6=C=E=E_5=5=5=6=C=D=D0=D=E=D|=D=C=C=C=C=G=D=E=E._E=E=D=D=E=D=C=C=D=D_C_A=A=G=E
             -=C=0=6=6=E=E=D=C=C=C=6=C=D=0_5=5=5=6=C=D=D_5=5=6=C=D=D0=D=D=E=D=C=C=D=D=5=A=6=G=D=C=0=6=6=E|=3=D=C=6=6=5=6=D=D_C."},
  68                                                            {"3_5.6._C=6_5_6_5_6.C=6_56_5_3_2_3-2._3_2_1_2._3=2_1|3_5_C_7_6-a._1=a_g_a._1=a_g_a_1-2_1_a-2._3=2
             -_1_2._3=2_1_2_1_1_2_3-6_6_5_3_2_3_5_6_5_3_2_3-2_2_1_a_g_a_1|_2_1a_g_a-|a1ag|a1_2_3-|6_6_6_5=6=6.6=6=6_5_2_3_3-a1aga1_2_3
             --2_2_2_1=2=2.3=5=C_7_6__6-6._C=6_5=6._C=6_5_|6_5_6_5_3-6_6_5_3_2_3_5_C_7_6_5_6-6._C=6_5_6-6_5_6_5_3-2._3=2_1_2-3_5_3_2_3
             -3_5_6._C=6_5_|_6_5_6_53-|2_2_3_2_a_g_a---a1236._C=6_5_6._C_5_6_5_6_5_3-66_5_3_2_3_5_C_7_6_5_6-C7656---6---"},
  69                                                            {"C3_2=1=132=113_2_3_1_3_6=5=5.3=5=6_6=5=5_6=5=53=2_1_2_2=3=2_123_3_213_2=1=13_2_3_1_1=6_6_5=5.3=5
             -=6_6_C_6=5=53=2=2_1_22=1=3=2=23_3_211.  5_6=C=6=5=3=5=3_2.1_1=25_3_2=3=1.5_3=5=6._5=3_5_32._1=a_g_1---1_12=35_53_2._1=a_
             -g_1_a5_C_6._5=3_5_a1_1=25_3_2._3=1=2=1=a=g---"},
  70                                                            {"3_3=5=3_2_3_2_1_2_2=3=e_g_a-3_3=5=3_2_3_6_5_3=5=2-203_6_5_3=5=6.a._a._3_2_1_=2=3-a_3_=3=2_1_3_5_
             -5_2_3-303_3=5=3_2_32_1_2_2=3=e_g_a-3_3=5=3_2_3_6_5_3=5=2-203_6_5_3=5=6.a_a_3_2_1=2=3-a_3=3=2_1_3_5_g_a-3_6=6=63_6=6=63_6
             -_5_3=5=6-a_2=2=2a_5_3_2_3-3_6_5_3=2_1_2=3=23_5_5_1_2-3_6_5_3=2=1_2=3=22_5=5=5_g_a-3_5=5=5_3=5=6-6-    |5_5=5=5=C._5._C=C
             -=D=E=D=|7._6=7=6=5_(C=7=5=2=2_0=)5=|D_D=D=D=D_D=D_6_6=5=3=5=|5=5_4=404_5_|6._6=6=6=C_70_6_|5_5_5=D_C=C0=67=|C._C=C=D=E_D
             -._D=C_7_|C---|C._C=C=D=E_D._D=D=C_7=|D._C=C-5=6=C=D=|E._E=E=G=E_D._D=D=G=D_|C._C=C=D=E=C=6_D=7=7=7=C_|C5=6=C=D=|E._E=E=G
C51 COMPILER V8.02   MUSIC                                                                 04/26/2009 20:56:25 PAGE 3   

             -=E_D._D=D=G=D_|C0_6=6=7_C_C|C---|"},
  71                                                            {"0=G=G=E=D=E=6_D=E=G=E=D0=G=G=E=D=E=5_D=E=G=D=C0=C=D=E=G=A=G=E=G=E=E=D=D0=C=D=C=D_C=D=D=E_G=E=E._
             -0=G=G=E=D=E=A_D=E=G=E=D0=G=G=E=D=E=G_D=E=G=D=C0=C=D=E=G=A=G=E=G=E=E=D=D._G=E_D=D=D_C_C-  0=5=6=C=E=E=E=E=E._D=D_C_0_6=C=
             -DD=E_5=50=5=5=6=C=C=C=C=C=6._D.=E=D=C=G=A=C_C=C=C=6=6=C=D0=5=6=C=E=E=E=E=E._D=D_C_0_A=C=DD=E_5=50=5=5=6=C=C=C=C=C=C-6._D
             -._E=D=C=5=6=C_C=C=C=6=6=C=D.C_C--   "},
  72                                                            {"22_3_1g_g_2_1_2_3_10_3_4_3_1_2_20_3_4_3_1_1_1b2_2_2_3_1g_g_2_1_2_3_10_3_4_3_1_2_20_3_4_3_4_5_5g_
             -a_12_3_53_5_6_7_6_5_32_3_5_33_2_3_2_1_g-0g_a_12_3_53_5_6_7_6_5_32_3_5_33__2_3_2_1_g---g---06_5.2_3_300006_5.2_3_3_3_3=2=
             -1_1-06_5.7_7_70_7_C7_6_6-00g--g_a_g--- "},
  73                  /*9*/                             {"e=a_b=1=1.0=2=|b_a_g=a._3C_7=C=|6._e=a_b=1=1.0=2=|b_a=g=g=2_3=30_1=2=|3_3_2=1_2=20_b=1=|2_2_
             -b_g=a=a.0=e=|f_1=1=1._2=b_a_g=a_b=|b-0(E_D_)|0=1=1=2=|3_3_2=1_2=20=2=2=3=|4_4_3=2_3=3_0_0_3=4=|5_5=4=4=2_6=6=5=5=4=4_3=1
             -=|1_1=2=3=2=20=1=1=2=|3_3_2=1_2=20=2=2=3=|4_4_3=2_3=30_3=4=|5_5_4_3=6=6=5=5=4=4=3=3_|1--b._a=|a1_b_1.2|b=a=g_g00|ab_1_1.
             -2|b5-|  |D_D_D_C_C0_C_|7_7_7_7_C7_5_|6_6_6_5_66_5_|6_6_6_E_D0_C_|D_D_D_C_C0_C_|7_7_7_7_C._7=7_5_|6._5=1-0_2=3=|4_3_1_4_4
             -_3_0_1_|1---|"},      
  74                  /*7*/   //                        {"5._3=2_1_5-12_3_g-5.3_23_5_1a_3_2-356.5_352._3=2_1_a32_21_a1g05.3_6562_3_50  a-a1-a2--a-b1
             -b13-2a--a--a-33-12--a-b1b13-21--1--5-55432--a-b1-12123--3--1-1_1_1235--4-32-b3-2a--a--a-66565--4-34-56543--3--1-1_1_1235
             ---4-32-b3-2a--a--   C-53.2_1530C-53.2_1650 5_C6_5_C05_C6_5_6_0_3_C.6_53C.6_C0C53_6_5_3_2.1_30_5_C56_C_6_5_33_1_6-60C._C=
             -5_5_2._3=5_5_6.5_6DC6_5_C6_5_33_5_C-  3- 2_3_4_3 3- 2_3_4_3 3- 4- 3_4_5_4 4- 3-2-  3- 2_3_4_3 3- 2_3_4_3 3-4- 3_4_5_4 4-
             - 3-2"},
  75                  /*8*/                             {"c_1_5_5_6_6_54_4_3_3_2_2_15_5_4_4_3_3_25_5_4_4_3_3_21_1_5_5_6_6_54_4_3_3_2_2_1  1_2_3_1_1_2_
             -3_1_3_4_5 3_4_55=6=5=4=3_1_5=6=5=4=3_1_2_g_12_g_1                    543 3_2_1_2_30 g53 3_2_1_2_30 a65 4_3_2_3_4 1 b a g
             -  g_g_ag  1b- g_g_ag  21-  g_g_53  1ba 004_4_  312  1--1  "}//
  76                                                    };    
  77          //----------------------------------------------------
  78          //    全局变量
  79          //----------------------------------------------------
  80          uchar flag1=0,flag2=0;//flag2:暂存暂停的次数
  81                                                    //flag1:歌曲计时的状态
  82                                                    //flag1=1,计时. flag1=0,计时结束
  83          uint  n1,n2; /*产生方波的定时器的初值*/
  84          
  85          uint  second=0,minute=0;
  86          uchar order=5,temp1,temp2;//order:正在播放的歌曲数
  87          uint  i=0;                                //  i  :正在播放的音符数
  88          uchar count;
  89          
  90          void delay(uint x)
  91          {
  92   1              uint a,b;
  93   1              for(b=140;b>0;b--)
  94   1              for(a=x;a>0;a--);
  95   1      }
  96          void Sound(uint freq)   // 发声
  97          {
  98   1          uint timreg;
  99   1          timreg=655365-(OSFREQ/(24l*freq));
 100   1              delay(1);
 101   1          n2=timreg/256;
 102   1          n1=timreg&0x00ff;//n1=timreg%256;
 103   1              TL0=n1;
 104   1              TH0=n2; 
 105   1              TR0=1;
 106   1          ET0=1;
 107   1      }
 108          void SoundOff(void)    // 停止发声
 109          {
 110   1          TR0=0;        
 111   1          ET0=0;
 112   1          Buzz=0;            
 113   1      }
 114          uint GetFreq(uchar ch) // 依据音名取对应的频率
 115          {
 116   1              uchar * pn,j=0;
C51 COMPILER V8.02   MUSIC                                                                 04/26/2009 20:56:25 PAGE 4   

 117   1          uint * pf;  
 118   1              pn=notename;     
 119   1              pf=notefreq;            
 120   1          while(1)
 121   1          {
 122   2              if(pn[j]==0) return 0;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -