1、#include#include #define GPIO_DIG P0sbit IRIN = P32;sbit Beep=P15;/*unsigned char code DIG_CODE17=0 x3f,0 x06,0 x5b,0 x4f,0 x66,0 x6d,0 x7d,0 x07,/這是共陰極數(shù)碼管0 x7f,0 x6f,0 x77,0 x7c,0 x39,0 x5e,0 x79,0 x71; /0、1、2、3、4、5、6、7、8、9、A、b、C、d、E、F 的顯示碼/unsigned char DisplayData8; /用來存放要顯示的 8 位數(shù)的值*/unsigned cha

2、r code DIG_CODE17=0 xc0,0 xf9,0 xa4,0 xb0,0 x99,0 x92,0 x82,0 xf8,/這是共陽極數(shù)碼管0 x80,0 x90,0 x88,0 x83,0 xc6,0 xa1,0 x86,0 x8e;unsigned char IrValue6;/用來存放到的紅外值unsigned char Time;unsignedn=0;unsignedyl=3;unsignedzjz=0;voidDigDisplay(); /數(shù)碼管顯示函數(shù)voidIrInit();/初始化紅外線接收voidDelayMs(unsigned); / 延時(shí)函數(shù) 0.14ms 誤

3、差 0usvoiddelay(unsigned char m);voiddelaym(unsigned char a);voidyi();voider();voidsan();voidsi();voidwu();voidliu();voidqi();voidba();voidjiu();void main()IrInit();while(1)DigDisplay();void DelayMs(unsignedx)/延時(shí)函數(shù) 0.14ms 誤差 0usunsigned char i;while(x-)for (i = 0; i0)/等待前面 9ms 的低電平過去DelayMs(1);err-;i

4、f(IRIN=1)/如果正確等到 9ms 低電平err=500;while(IRIN=1)&(err0)/等待 4.5ms 的起始過去DelayMs(1);err-;for(k=0;k4;k+)/共有 4 組數(shù)據(jù)for(j=0;j0)/等待信號(hào)前面的 560us 低電平過去DelayMs(1);err-;err=500;while(IRIN=1)&(err0)/計(jì)算的時(shí)間長度。DelayMs(1);/0.14msTime+;err-;if(Time30)EX0=1;return;IrValuek=1;/k 表示第幾組數(shù)據(jù)if(Time=8)/如果出現(xiàn)大于 565us，那么是 1IrValuek

5、|=0 x80;Time=0;/用完時(shí)間要重新賦值if(IrValue2!=IrValue3)return;void DigDisplay()/使用數(shù)碼管顯示switch(IrValue2)case(0 x0C):GPIO_DIG=DIG_CODE1;zjz=1;yi();break;/顯示 1case(0 x18):GPIO_DIG=DIG_CODE2;zjz=2;er();break;/顯示 2case(0 x5E):GPIO_DIG=DIG_CODE3;zjz=3;san();break;/顯示 3case(0 x08):GPIO_DIG=DIG_CODE4;zjz=4;si();bre

6、ak;/顯示 4case(0 x1c):GPIO_DIG=DIG_CODE5;zjz=5;wu();break;/顯示 5case(0 x5a):GPIO_DIG=DIG_CODE6;zjz=6;liu();break;/顯示 6case(0 x42):GPIO_DIG=DIG_CODE7;zjz=7;qi();break;/顯示 7case(0 x52):GPIO_DIG=DIG_CODE8;zjz=8;ba();break;/顯示 8case(0 x4a):GPIO_DIG=DIG_CODE9;zjz=9;jiu();break;/顯示 9case(0 x45):GPIO_DIG=0 xr

7、eak;/關(guān)閉case(0 x43):/下一首zjz+;if(zjz=10)zjz=1;GPIO_DIG=DIG_CODEzjz;switch(zjz)case 1 :yi();IrValue2=0 x0c;break;case 2 :er();IrValue2=0 x18;break;case 3:san();IrValue2=0 x5e;break;case 4 :si();IrValue2=0 x08;break;case 5 :wu();IrValue2=0 x1c;break;case 6 :liu();IrValue2=0 x5a;break;case 7 :qi();IrValu

8、e2=0 x42;break;case 8 :ba();IrValue2=0 x52;break;case 9 :jiu();IrValue2=0 x4a;break;break;case(0 x40):/上一首zjz-;if(zjz=0)zjz=9;GPIO_DIG=DIG_CODEzjz;switch(zjz)case 1 :yi();IrValue2=0 x0c;break;case 2 :er();IrValue2=0 x18;break;case 3:san();IrValue2=0 x5e;break;case 4 :si();IrValue2=0 x08;break;case 5

9、 :wu();IrValue2=0 x1c;break;case 6 :liu();IrValue2=0 x5a;break;case 7 :qi();IrValue2=0 x42;break;case 8 :ba();IrValue2=0 x52;break;case 9 :jiu();IrValue2=0 x4a;break;break;void0()errupt 1/采用中斷 0 控制節(jié)拍 TH0=0 xd8;TL0=0 xef;n-;void delay (unsigned char m)/控制頻率延時(shí)unsigned i=yl*m;while(-i);void delaym(unsi

10、gned char a) /豪秒延時(shí)子程序while(-a);void yi()unsigned char code music_tab =/格式為: 頻率常數(shù), 節(jié)拍常數(shù), 頻率常數(shù), 節(jié)拍常數(shù),0 xff,0 x39,0 x80,0 x26,0 x30,0 x2b,0 x40,0 x2b,0 x10,0 x30,0 x20,0 x30,0 x80,0 x33,0 x80,0 x2b,0 x30,0 x4c,0 x40,0 x30,0 x10,0 x39,0 x20,0 x39,0 x80,0 x26,0 x80,0 x1c,0 x30,/路在何方0 x26,0 x40,0 x1c,0 x1

11、0,0 x20,0 x20,0 x24,0 x20,0 x26,0 x80,0 x30,0 x10,0 x2b,0 x20,0 x26,0 x80,0 x2b,0 xc0,0 x2b,0 x40,0 x39,0 x10,0 x26,0 x20,0 x2b,0 x80,0 x00;unsigned char p,m;/m 為頻率常數(shù)變量unsigned char i=0;play1:while(1)a1: p=music_tabi;if(IrValue2!=0 x0c)if(IrValue2!=0 x15)&(IrValue2!=0 x09)&(IrValue2!=0 x44)return;if

12、(IrValue2=0 x15)yl+;IrValue2=0 x0c;if(IrValue2=0 x09)yl-;if(yl=0)yl=1;IrValue2=0 x0c;if(IrValue2=0 x44)IrValue2=0 x0c;while(1)if(IrValue2=0 x44)IrValue2=0 x0c;goto play1;if(p=0 x00)再來一遍 i=0, delaym(1000); goto play1;/如果碰到結(jié)束符,延時(shí) 1 秒,回到開始else if(p=0 xff) i=i+1;delaym(100),TR0=0; goto a1;/若碰到休止符,延時(shí) 100

13、ms,繼續(xù)取下一音符elsem=music_tabi+, n=music_tabi+;/取頻率常數(shù) 和 節(jié)拍常數(shù)TR0=1;/開定時(shí)器 1while(n!=0) Beep=Beep,delay(m);音頻(可多聲道哦!)/等待節(jié)拍完成, 通過P1 口輸出TR0=0;/關(guān)定時(shí)器 1void er()unsigned char code music_tab =0 xff,0 x15,0 x10,0 x13,0 x20,0 x10,0 x20,0 x10,0 x30,0 x26,0 x40,0 x2b,0 x40,0 x26,0 x80,0 x2b,0 x30,0 x26,0 x40,0 x2b,0

14、 x40,0 x30,0 xc0,0 x39,0 x40,0 x30,0 x40,0 x2b,0 x10,0 x26,0 x20,0 x2b,0 x30,0 x30,0 x30,0 x39,0 x40,0 x30,0 x40,0 x40,0 xc0,0 x26,0 x40,/兩只蝴蝶0 x2b,0 x40,0 x26,0 x80,0 x2b,0 x30,0 x26,0 x40,0 x2b,0 x40,0 x30,0 xc0,0 x39,0 x40,0 x30,0 x40,0 x2b,0 x10,0 x26,0 x20,0 x2b,0 x30,0 x30,0 x30,0 x39,0 x40,0

15、x30,0 x40,0 x40,0 xc0,0 x26,0 x40,0 x2b,0 x40,0 x26,0 x80,0 x2b,0 x30,0 x26,0 x40,0 x2b,0 x40,0 x30,0 xc0,0 x39,0 x40,0 x30,0 x40,0 x2b,0 x10,0 x26,0 x20,0 x2b,0 x30,0 x30,0 x30,0 x39,0 x40,0 x30,0 x40,0 x00;unsigned char p,m;/m 為頻率常數(shù)變量unsigned char i=0;play2:while(1)a2: p=music_tabi;if(IrValue2!=0

16、x18)if(IrValue2!=0 x15)&(IrValue2!=0 x09)&(IrValue2!=0 x44)return;if(IrValue2=0 x15)yl+;IrValue2=0 x18;if(IrValue2=0 x09)yl-;if(yl=0)yl=1;IrValue2=0 x18;if(IrValue2=0 x44)IrValue2=0 x18;while(1)if(IrValue2=0 x44)IrValue2=0 x18;goto play2;if(p=0 x00)再來一遍 i=0, delaym(1000); goto play2;/如果碰到結(jié)束符,延時(shí) 1 秒,

17、回到開始else if(p=0 xff) i=i+1;delaym(100),TR0=0; goto a2;/若碰到休止符,延時(shí) 100ms,繼續(xù)取下一音符elsem=music_tabi+, n=music_tabi+;/取頻率常數(shù) 和 節(jié)拍常數(shù)TR0=1;/開定時(shí)器 1while(n!=0) Beep=Beep,delay(m);音頻(可多聲道哦!)/等待節(jié)拍完成, 通過P1 口輸出TR0=0;/關(guān)定時(shí)器 0void san()unsigned char code music_tab =0 xff,0 x26,0 x10,0 x30,0 x20,0 x2b,0 x30,0 x39,0 x4

18、0,0 x26,0 x10,0 x2b,0 x10,0 x30,0 x20,0 x2b,0 x20,0 x39,0 x80,0 x26,0 x10,0 x30,0 x20,0 x2b,0 x30,0 x2b,0 x40,0 x20,0 x10,0 x26,0 x10,0 x33,0 x20,0 x30,0 x30,0 x30,0 x40,0 x33,0 x40,0 x39,0 x10,0 x33,0 x20,0 x30,0 x20,0 x2b,0 x30,0 x40,0 x40,0 x39,0 x10,0 x40,0 x10,0 x4c,0 x20,0 x26,0 x30,/小蘋果0 x2b,

19、0 x40,0 x30,0 x10,0 x2b,0 x20,0 x26,0 x20,0 x2b,0 x30,0 x26,0 x30,0 x2b,0 x40,0 x26,0 x40,0 x20,0 x40,0 x20,0 x10,0 x20,0 x20,0 x20,0 x20,0 x20,0 x30,0 x20,0 x30,0 x20,0 x40,0 x00;unsigned char p,m;/m 為頻率常數(shù)變量unsigned char i=0;play3:while(1)a3: p=music_tabi;if(IrValue2!=0 x5e)if(IrValue2!=0 x15)&(IrV

20、alue2!=0 x09)&(IrValue2!=0 x44)return;if(IrValue2=0 x15)yl+;IrValue2=0 x5e;if(IrValue2=0 x09)yl-;if(yl=0)yl=1;IrValue2=0 x5e;if(IrValue2=0 x44)IrValue2=0 x5e;while(1)if(IrValue2=0 x44)IrValue2=0 x5e;goto play3;if(p=0 x00)再來一遍 i=0, delaym(1000); goto play3;/如果碰到結(jié)束符,延時(shí) 1 秒,回到開始else if(p=0 xff) i=i+1;d

21、elaym(100),TR0=0; goto a3;/若碰到休止符,延時(shí) 100ms,繼續(xù)取下一音符elsem=music_tabi+, n=music_tabi+;/取頻率常數(shù) 和 節(jié)拍常數(shù)TR0=1;/開定時(shí)器 1while(n!=0) Beep=Beep,delay(m);音頻(可多聲道哦!)/等待節(jié)拍完成, 通過P1 口輸出TR0=0;/關(guān)定時(shí)器 0void si()unsigned char code music_tab =0 xff,0 x40,0 x80,0 x30,0 x30,0 x26,0 x30,0 x30,0 x30,0 x2b,0 x30,0 x30,0 xc0,0 x

22、40,0 x80,0 x30,0 x30,0 x26,0 x30,0 x30,0 x30,0 x26,0 x30,0 x2b,0 xc0,0 x00;unsigned char p,m;/m 為頻率常數(shù)變量unsigned char i=0;play4:while(1)a4: p=music_tabi;if(IrValue2!=0 x08)if(IrValue2!=0 x15)&(IrValue2!=0 x09)&(IrValue2!=0 x44)return;if(IrValue2=0 x15)yl+;IrValue2=0 x08;if(IrValue2=0 x09)yl-;if(yl=0)

23、yl=1;IrValue2=0 x08;if(IrValue2=0 x44)IrValue2=0 x08;while(1)if(IrValue2=0 x44)IrValue2=0 x08;goto play4;if(p=0 x00)再來一遍 i=0, delaym(1000); goto play4;/如果碰到結(jié)束符,延時(shí) 1 秒,回到開始else if(p=0 xff) i=i+1;delaym(100),TR0=0; goto a4; /若碰到休止符,延時(shí) 100ms,繼續(xù)取下一音符elsem=music_tabi+, n=music_tabi+;/取頻率常數(shù) 和 節(jié)拍常數(shù)TR0=1;/開

24、定時(shí)器 1while(n!=0) Beep=Beep,delay(m);音頻(可多聲道哦!)/等待節(jié)拍完成, 通過P1 口輸出TR0=0;/關(guān)定時(shí)器 0void wu()unsigned char code music_tab =0 xff,0 x18,0 x30,0 x1C,0 x10,0 x20,0 x40,0 x1C,0 x10,0 x18,0 x10,0 x20,0 x10,0 x1C,0 x10,0 x18,0 x40,0 x1C,0 x20,0 x20,0 x20,0 x1C,0 x20,0 x18,0 x20,0 x20,0 x80,0 xFF,0 x20,0 x30,0 x1C

25、,0 x10,0 x18,0 x20,0 x15,0 x20,0 x1C,0 x20,0 x20,0 x20,0 x26,0 x40,0 x20,0 x20,0 x2B,0 x20,0 x26,0 x20,0 x20,0 x20,0 x30,0 x80,0 xFF,0 x20,0 x20,0 x1C,0 x10,0 x18,0 x10,0 x20,0 x20,0 x26,0 x20,0 x2B,0 x20,0 x30,0 x20,0 x2B,0 x40,0 x20,0 x20,0 x1C,0 x10,0 x18,0 x10,0 x20,0 x20,0 x26,0 x20,0 x2B,0 x20

26、,0 x30,0 x20,0 x2B,0 x40,0 x20,0 x30,0 x1C,0 x10,0 x18,0 x20,0 x15,0 x20,0 x1C,0 x20,0 x20,0 x20,0 x26,0 x40,0 x20,0 x20,/八月桂花0 x2B,0 x20,0 x26,0 x20,0 x20,0 x20,0 x30,0 x80,0 x20,0 x30,0 x1C,0 x10,0 x20,0 x10,0 x1C,0 x10,0 x20,0 x20,0 x26,0 x20,0 x2B,0 x20,0 x30,0 x20,0 x00;unsigned char p,m;/m 為頻率

27、常數(shù)變量unsigned char i=0;play5:while(1)a5: p=music_tabi;if(IrValue2!=0 x1c)if(IrValue2!=0 x15)&(IrValue2!=0 x09)&(IrValue2!=0 x44)return;if(IrValue2=0 x15)yl+;IrValue2=0 x1c;if(IrValue2=0 x09)yl-;if(yl=0)yl=1;IrValue2=0 x1c;if(IrValue2=0 x44)IrValue2=0 x1c;while(1)if(IrValue2=0 x44)IrValue2=0 x1c;goto

28、play5;if(p=0 x00) i=0, delaym(1000); goto play5;/碰到結(jié)束符,延時(shí) 1 秒,再來一遍else if(p=0 xff) i=i+1;delaym(100),TR0=0; goto a5; /若碰到休止符,延時(shí) 100ms,繼續(xù)取elsem=music_tabi+, n=music_tabi+;/取頻率常數(shù) 和 節(jié)拍常數(shù)TR0=1;/開定時(shí)器 1while(n!=0) Beep=Beep,delay(m);/等待節(jié)拍完成,TR0=0;/關(guān)定時(shí)器 0void liu()unsigned char code music_tab =0 xff,0 x1c,

29、0 x30,0 x19,0 x30,0 x18,0 x40,0 x19,0 x30,0 x18,0 x30,0 x13,0 x30,0 x19,0 x80,0 x26,0 x30,0 x26,0 x30,0 x1c,0 x40,0 x20,0 x30,0 x1c,0 x30,0 x18,0 x30,0 x20,0 x60,0 x26,0 x30,0 x26,0 x30,0 x24,0 x40,0 x26,0 x30,0 x24,0 x30,0 x18,0 x40,0 x26,0 x60,0 x18,0 x20,0 x18,0 x20,0 x18,0 x20,0 x19,0 x40,0 x24,

30、0 x30,0 x24,0 x30,0 x19,0 x30,0 x19,0 x60,0 x1c,0 x30,0 x19,0 x30,0 x18,0 x40,0 x19,0 x30,0 x18,0 x30,0 x13,0 x30,0 x19,0 x60,0 x26,0 x30,0 x26,0 x30,0 x1c,0 x40,0 x20,0 x30,0 x1c,0 x30,0 x18,0 x30,/天空之城0 x20,0 x80,0 x26,0 x30,0 x24,0 x30,0 x24,0 x30,0 x18,0 x30,0 x19,0 x20,0 x19,0 x30,0 x18,0 x30,0

31、 x15,0 x20,0 x15,0 x20,0 x13,0 x20,0 x18,0 x40,0 x18,0 x30,0 x19,0 x30,0 x1c,0 x20,0 x1c,0 x20,0 x19,0 x30,0 x20,0 x30,0 x1c,0 x60,0 x18,0 x30,0 x15,0 x30,0 x13,0 x40,0 x15,0 x30,0 x13,0 x30,0 x10,0 x30,0 x15,0 x60,0 x20,0 x30,0 x20,0 x30,0 x18,0 x30,0 x19,0 x30,0 x18,0 x30,0 x13,0 x30,0 x13,0 x60,0

32、 x1c,0 x20,0 x19,0 x20,0 x18,0 x30,0 x19,0 x30,0 x15,0 x20,0 x15,0 x20,0 x18,0 x40,0 x20,0 x30,0 x20,0 x30,0 x00;unsigned char p,m;/m 為頻率常數(shù)變量unsigned char i=0;play6:while(1)a6: p=music_tabi;if(IrValue2!=0 x5a)if(IrValue2!=0 x15)&(IrValue2!=0 x09)&(IrValue2!=0 x44)return;if(IrValue2=0 x15)yl+;IrValue

33、2=0 x5a;if(IrValue2=0 x09)yl-;if(yl=0)yl=1;IrValue2=0 x5a;if(IrValue2=0 x44)IrValue2=0 x5a;while(1)if(IrValue2=0 x44)IrValue2=0 x5a;goto play6;if(p=0 x00)再來一遍 i=0, delaym(1000); goto play6;/如果碰到結(jié)束符,延時(shí) 1 秒,回到開始else if(p=0 xff) i=i+1;delaym(100),TR0=0; goto a6; /若碰到休止符,延時(shí) 100ms,繼續(xù)取下一音符elsem=music_tabi

34、+, n=music_tabi+;/取頻率常數(shù) 和 節(jié)拍常數(shù)TR0=1;/開定時(shí)器 1while(n!=0) Beep=Beep,delay(m);音頻(可多聲道哦!)/等待節(jié)拍完成, 通過P1 口輸出TR0=0;/關(guān)定時(shí)器 0void qi()unsigned char code music_tab =0 xff,0 x30,0 x1C,0 x10,0 x20,0 x40,0 x1C,0 x10,0 x18,0 x10,0 x20,0 x10,0 x1C,0 x10,0 x18,0 x40,0 x1C,0 x20,0 x20,0 x20,0 x1C,0 x20,0 x18,0 x20,0 x

35、20,0 x80,0 xFF,0 x20,0 x30,0 x1C,0 x10,0 x18,0 x20,0 x15,0 x20,0 x1C,0 x20,0 x20,0 x20,0 x26,0 x40,0 x20,0 x20,0 x2B,0 x20,0 x26,0 x20,0 x20,0 x20,0 x30,0 x80,0 xFF,0 x20,0 x20,0 x1C,0 x10,0 x18,0 x10,0 x20,0 x20,0 x26,0 x20,0 x2B,0 x20,/路邊的野花不要采0 x30,0 x20,0 x2B,0 x40,0 x20,0 x20,0 x1C,0 x10,0 x18,

36、0 x10,0 x20,0 x20,0 x26,0 x20,0 x2B,0 x20,0 x30,0 x20,0 x2B,0 x40,0 x20,0 x30,0 x1C,0 x10,0 x18,0 x20,0 x15,0 x20,0 x1C,0 x20,0 x20,0 x20,0 x26,0 x40,0 x20,0 x20,0 x2B,0 x20,0 x26,0 x20,0 x20,0 x20,0 x30,0 x80,0 x20,0 x30,0 x1C,0 x10,0 x20,0 x10,0 x1C,0 x10,0 x20,0 x20,0 x26,0 x20,0 x2B,0 x20,0 x30,

37、0 x20,0 x2B,0 x40,0 x20,0 x15,0 x1F,0 x05,0 x20,0 x10,0 x1C,0 x10,0 x20,0 x20,0 x26,0 x20,0 x2B,0 x20,0 x30,0 x20,0 x2B,0 x40,0 x20,0 x30,0 x1C,0 x10,0 x18,0 x20,0 x15,0 x20,0 x1C,0 x20,0 x20,0 x20,0 x26,0 x40,0 x20,0 x20,0 x2B,0 x20,0 x26,0 x20,0 x20,0 x20,0 x30,0 x30,0 x20,0 x30,0 x1C,0 x10,0 x18,

38、0 x40,0 x1C,0 x20,0 x20,0 x20,0 x26,0 x40,0 x13,0 x60,0 x18,0 x20,0 x15,0 x40,0 x13,0 x40,0 x18,0 x80,0 x00;unsigned char p,m;/m 為頻率常數(shù)變量unsigned char i=0;play7:while(1)a7: p=music_tabi;if(IrValue2!=0 x42)if(IrValue2!=0 x15)&(IrValue2!=0 x09)&(IrValue2!=0 x44)return;if(IrValue2=0 x15)yl+;IrValue2=0 x

39、42;if(IrValue2=0 x09)yl-;if(yl=0)yl=1;IrValue2=0 x42;if(IrValue2=0 x44)IrValue2=0 x42;while(1)if(IrValue2=0 x44)IrValue2=0 x42;goto play7;if(p=0 x00) i=0, delaym(1000); goto play7;/碰到結(jié)束符,延時(shí) 1 秒,再來一遍else if(p=0 xff) i=i+1;delaym(100),TR0=0; goto a7; /碰到休止符,延時(shí)繼續(xù)取下一音符elsem=music_tabi+, n=music_tabi+;/取

40、頻率常數(shù) 和 節(jié)拍常數(shù)TR0=1;/開定時(shí)器 1while(n!=0) Beep=Beep,delay(m);/等待節(jié)拍完成, 通過 P1 口輸TR0=0;/關(guān)定時(shí)器 0void ba()unsigned char code music_tab =0 xff,0 x17,0 x02, 0 x17,0 x03, 0 x18,0 x03, 0 x19,0 x02, 0 x15,0 x03,0 x16,0 x03,0 x17,0 x03,0 x17,0 x03,0 x17,0 x03,0 x18,0 x03,0 x19,0 x02,0 x16,0 x03,0 x17,0 x03,0 x18,0 x0

41、2,0 x18,0 x03,0 x17,0 x03,0 x15,0 x02,0 x18,0 x03,0 x17,0 x03,0 x18,0 x02,0 x10,0 x03,0 x15,0 x03,0 x16,0 x02,0 x15,0 x03,0 x16,0 x03,0 x17,0 x02,0 x17,0 x03,0 x18,0 x03,0 x19,0 x02,0 x1A,0 x03,0 x1B,0 x03,0 x1F,0 x03,0 x1F,0 x03,0 x17,0 x03,0 x18,0 x03,0 x19,0 x02,0 x16,0 x03,0 x17,0 x03,0 x18,0 x0

42、3,0 x17,0 x03,/揮著翅膀的0 x18,0 x03,0 x1F,0 x03,0 x1F,0 x02,0 x16,0 x03,0 x17,0 x03,0 x18,0 x03,0 x17,0 x03,0 x18,0 x03,0 x20,0 x03,0 x20,0 x02,0 x1F,0 x03,0 x1B,0 x03,0 x1F,0 x66,0 x20,0 x03,0 x21,0 x03,0 x20,0 x03,0 x1F,0 x03,0 x1B,0 x03,0 x1F,0 x66,0 x1F,0 x03,0 x1B,0 x03,0 x19,0 x03,0 x19,0 x03,0 x1

43、5,0 x03,0 x1A,0 x66,0 x1A,0 x03,0 x19,0 x03,0 x15,0 x03,0 x15,0 x03,0 x17,0 x03,0 x16,0 x66,0 x17,0 x04,0 x18,0 x04,0 x18,0 x03,0 x19,0 x03,0 x1F,0 x03,0 x1B,0 x03,0 x1F,0 x66,0 x20,0 x03,0 x21,0 x03,0 x20,0 x03,0 x1F,0 x03,0 x1B,0 x03,0 x1F,0 x66,0 x1F,0 x03,0 x1B,0 x03,0 x19,0 x03,0 x19,0 x03,0 x1

44、5,0 x03,0 x1A,0 x66,0 x1A,0 x03,0 x19,0 x03,0 x19,0 x03,0 x1F,0 x03,0 x1B,0 x03,0 x1F,0 x00,0 x1A,0 x03,0 x1A,0 x03,0 x1A,0 x03,0 x1B,0 x03,0 x1B,0 x03,0 x1A,0 x03,0 x19,0 x03,0 x19,0 x02,0 x17,0 x03,0 x15,0 x17,0 x15,0 x03,0 x16,0 x03,0 x17,0 x03,0 x18,0 x03,0 x17,0 x04,0 x18,0 x0E,0 x18,0 x03,0 x1

45、7,0 x04,0 x18,0 x0E,0 x18,0 x66,0 x17,0 x03,0 x18,0 x03,0 x17,0 x03,0 x18,0 x03,0 x20,0 x03,0 x20,0 x02,0 x1F,0 x03,0 x1B,0 x03,0 x1F,0 x66,0 x20,0 x03,0 x21,0 x03,0 x20,0 x03,0 x1F,0 x03,0 x1B,0 x03,0 x1F,0 x66,0 x1F,0 x04,0 x1B,0 x0E,0 x1B,0 x03,0 x19,0 x03,0 x00;unsignedchar p,m;/m 為頻率常數(shù)變量unsigne

46、dchar i=0;play8:while(1)a8: p=music_tabi;if(IrValue2!=0 x52)if(IrValue2!=0 x15)&(IrValue2!=0 x09)&(IrValue2!=0 x44)return;if(IrValue2=0 x15)yl+;IrValue2=0 x52;if(IrValue2=0 x09)yl-;if(yl=0)yl=1;IrValue2=0 x52;if(IrValue2=0 x44)IrValue2=0 x52;while(1)if(IrValue2=0 x44)IrValue2=0 x52;goto play8;if(p=0

47、 x00) i=0, delaym(1000); goto play8;/碰到結(jié)束符,延時(shí) 1 秒,再來一遍else if(p=0 xff) i=i+1;delaym(100),TR0=0; goto a8; /休止符,延時(shí) 100ms,繼續(xù)取下一音符elsem=music_tabi+, n=music_tabi+; /取頻率常數(shù) 和 節(jié)拍常數(shù)TR0=1;/開定時(shí)器 1while(n!=0) Beep=Beep,delay(m);TR0=0;/關(guān)定時(shí)器 0void jiu()unsigned char code music_tab =0 xff,0 x01,0 x15,0 x02,0 x16,0 x02,0 x17,0 x66,0 x18,0 x03,