1、#include "ht66f018.h"/同一首歌unsigned char const Music_Same= 0x0F,0x01, 0x15,0x02, 0x16,0x02, 0x17,0x66, 0x18,0x03, 0x17,0x02, 0x15,0x02, 0x16,0x01, 0x15,0x02, 0x10,0x02, 0x15,0x00, 0x0F,0x01, 0x15,0x02, 0x16,0x02, 0x17,0x02, 0x17,0x03, 0x18,0x03, 0x19,0x02, 0x15,0x02, 0x18,0x66, 0x17,0x03, 0

2、x19,0x02, 0x16,0x03, 0x17,0x03, 0x16,0x00, 0x17,0x01, 0x19,0x02, 0x1B,0x02, 0x1B,0x70, 0x1A,0x03, 0x1A,0x01, 0x19,0x02, 0x19,0x03, 0x1A,0x03, 0x1B,0x02, 0x1A,0x0D, 0x19,0x03, 0x17,0x00, 0x18,0x66, 0x18,0x03, 0x19,0x02, 0x1A,0x02, 0x19,0x0C, 0x18,0x0D, 0x17,0x03, 0x16,0x01, 0x11,0x02, 0x11,0x03, 0x10

3、,0x03, 0x0F,0x0C, 0x10,0x02, 0x15,0x00, 0x1F,0x01, 0x1A,0x01, 0x18,0x66, 0x19,0x03, 0x1A,0x01, 0x1B,0x02, 0x1B,0x03, 0x1B,0x03, 0x1B,0x0C, 0x1A,0x0D, 0x19,0x03, 0x17,0x00, 0x1F,0x01, 0x1A,0x01, 0x18,0x66, 0x19,0x03, 0x1A,0x01, 0x10,0x02, 0x10,0x03, 0x10,0x03, 0x1A,0x0C, 0x18,0x0D, 0x17,0x03, 0x16,0x

4、00, 0x0F,0x01, 0x15,0x02, 0x16,0x02, 0x17,0x70, 0x18,0x03, 0x17,0x02, 0x15,0x03, 0x15,0x03, 0x16,0x66, 0x16,0x03, 0x16,0x02, 0x16,0x03, 0x15,0x03, 0x10,0x02, 0x10,0x01, 0x11,0x01, 0x11,0x66, 0x10,0x03, 0x0F,0x0C, 0x1A,0x02, 0x19,0x02, 0x16,0x03, 0x16,0x03, 0x18,0x66, 0x18,0x03, 0x18,0x02, 0x17,0x03,

5、 0x16,0x03, 0x19,0x00, 0x00,0x00 ;/兩只蝴蝶 unsigned char const Music_Two = 0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03, 0x10,0x0E, 0x15,0x04, 0x0F,0x01, 0x17,0x03, 0x16,0x03, 0x17,0x0

6、1, 0x16,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03, 0x15,0x03, 0x16,0x01, 0x17,0x03, 0x16,0x03, 0x17,0x01, 0x16,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x01, 0x10,0x03, 0x15,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03, 0x16,0x03,

7、0x15,0x03, 0x10,0x03, 0x10,0x0E, 0x15,0x04, 0x0F,0x01, 0x17,0x03, 0x19,0x03, 0x19,0x01, 0x19,0x03, 0x1A,0x03, 0x19,0x03, 0x17,0x01, 0x16,0x03, 0x16,0x03, 0x16,0x02, 0x16,0x0D, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x03, 0x10,0x0D, 0x15,0x00, 0x19,0x03, 0x19,0x03, 0x1A,0x03, 0x1F,0x03, 0x1B,0x03, 0x1

8、B,0x03, 0x1A,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x03, 0x16,0x0D, 0x17,0x01, 0x17,0x03, 0x17,0x03, 0x19,0x03, 0x1A,0x02, 0x1A,0x02, 0x10,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x01, 0x17,0x03, 0x19,0x03, 0x19,0x03, 0x17,0x03, 0x19,0x02, 0x1F,0x02, 0x1B,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x17,0x02, 0x1A,0

9、x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x16,0x03, 0x17,0x0D, 0x16,0x03, 0x17,0x03, 0x19,0x01, 0x19,0x03, 0x19,0x03, 0x1A,0x03, 0x1F,0x03, 0x1B,0x03, 0x1B,0x03, 0x1A,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x03, 0x16,0x03, 0x17,0x01, 0x17,0x03, 0x17,0x03, 0x19,0x03, 0x1A,0x02

10、, 0x1A,0x02, 0x10,0x03, 0x17,0x0D, 0x16,0x03, 0x16,0x01, 0x17,0x03, 0x19,0x03, 0x19,0x03, 0x17,0x03, 0x19,0x03, 0x1F,0x02, 0x1B,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x17,0x02, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x17,0x16, 0x1A,0x03, 0x1A,0x03, 0x1A,0x0E, 0x1B,0x04, 0x1A,0x03, 0x19,0x03, 0

11、x17,0x03, 0x16,0x03, 0x0F,0x02, 0x10,0x03, 0x15,0x00, 0x00,0x00 ;/揮著翅膀的女孩unsigned char const Music_Girl= 0x17,0x02, 0x17,0x03, 0x18,0x03, 0x19,0x02, 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x17,0x03, 0x17,0x03, 0x18,0x03, 0x19,0x02, 0x16,0x03, 0x17,0x03, 0x18,0x02, 0x18,0x03, 0x17,0x03, 0x15,0x02, 0x18,0x0

12、3, 0x17,0x03, 0x18,0x02, 0x10,0x03, 0x15,0x03, 0x16,0x02, 0x15,0x03, 0x16,0x03, 0x17,0x02, 0x17,0x03, 0x18,0x03, 0x19,0x02, 0x1A,0x03, 0x1B,0x03, 0x1F,0x03, 0x1F,0x03, 0x17,0x03, 0x18,0x03, 0x19,0x02, 0x16,0x03, 0x17,0x03, 0x18,0x03, 0x17,0x03, 0x18,0x03, 0x1F,0x03, 0x1F,0x02, 0x16,0x03, 0x17,0x03,

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

14、8,0x04, 0x18,0x03, 0x19,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x20,0x03, 0x21,0x03, 0x20,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x1F,0x03, 0x1B,0x03, 0x19,0x03, 0x19,0x03, 0x15,0x03, 0x1A,0x66, 0x1A,0x03, 0x19,0x03, 0x19,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x00, 0x1A,0x03, 0x1A,0x03, 0x1A,0x03, 0x1B,0

15、x03, 0x1B,0x03, 0x1A,0x03, 0x19,0x03, 0x19,0x02, 0x17,0x03, 0x15,0x17, 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x18,0x03, 0x17,0x04, 0x18,0x0E, 0x18,0x03, 0x17,0x04, 0x18,0x0E, 0x18,0x66, 0x17,0x03, 0x18,0x03, 0x17,0x03, 0x18,0x03, 0x20,0x03, 0x20,0x02, 0x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x20,0x03, 0x21,0x03

16、, 0x20,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x1F,0x04, 0x1B,0x0E, 0x1B,0x03, 0x19,0x03, 0x19,0x03, 0x15,0x03, 0x1A,0x66, 0x1A,0x03, 0x19,0x03, 0x15,0x03, 0x15,0x03, 0x17,0x03, 0x16,0x66, 0x17,0x04, 0x18,0x04, 0x18,0x03, 0x19,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x20,0x03, 0x21,0x03, 0x20,0x03, 0

17、x1F,0x03, 0x1B,0x03, 0x1F,0x66, 0x1F,0x03, 0x1B,0x03, 0x19,0x03, 0x19,0x03, 0x15,0x03, 0x1A,0x66, 0x1A,0x03, 0x19,0x03, 0x19,0x03, 0x1F,0x03, 0x1B,0x03, 0x1F,0x00, 0x18,0x02, 0x18,0x03, 0x1A,0x03, 0x19,0x0D, 0x15,0x03, 0x15,0x02, 0x18,0x66, 0x16,0x02, 0x17,0x02, 0x15,0x00, 0x00,0x00;unsigned char co

18、nst Music_sd= 0x0F,0x03, 0x0F,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x0F,0x02, 0x0F,0x03, 0x0F,0x03, 0x0F,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x02, 0x10,0x03, 0x10,0x03, 0x18,0x03, 0x17,0x03, 0x16,0x03, 0x10,0x02, 0x10,0x03, 0x19,0x03, 0x19,0x03, 0x18,0x03, 0x16,0x03, 0x17,0x02, 0x15,0x03,

19、0x0F,0x03, 0x0F,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x0F,0x02, 0x0F,0x03, 0x0F,0x03, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x02, 0x10,0x03, 0x10,0x03, 0x18,0x03, 0x17,0x03, 0x16,0x03, 0x19,0x03, 0x19,0x03, 0x19,0x03, 0x19,0x03, 0x1A,0x03, 0x19,0x03, 0x18,0x03, 0x16,0x03, 0x15,0x16, 0x17,0x03, 0x1

20、7,0x03, 0x17,0x02, 0x17,0x03, 0x17,0x03, 0x17,0x02, 0x17,0x03, 0x19,0x03, 0x15,0x03, 0x16,0x04, 0x17,0x01, 0x18,0x03, 0x18,0x03, 0x18,0x03, 0x18,0x04, 0x18,0x03, 0x17,0x03, 0x17,0x03, 0x17,0x04, 0x17,0x04, 0x17,0x03, 0x16,0x03, 0x16,0x03, 0x15,0x03, 0x16,0x03, 0x19,0x02, 0x19,0x03, 0x19,0x03, 0x18,0

21、x03, 0x16,0x03, 0x15,0x02, 0x00,0x00 ; unsigned char const Music_lzlh= 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x15,0x03, 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x15,0x03, 0x17,0x03, 0x18,0x03, 0x19,0x02, 0x17,0x03, 0x18,0x03, 0x19,0x02, 0x19,0x03, 0x1A,0x03, 0x19,0x03, 0x18,0x03, 0x17,0x02, 0x15,0x02, 0x19,0x03

22、, 0x1A,0x03, 0x19,0x03, 0x18,0x03, 0x17,0x02, 0x15,0x02, 0x16,0x02, 0x0F,0x02, 0x15,0x16, 0x16,0x02, 0x0F,0x02, 0x15,0x16, 0x00,0x00 ; unsigned char const Music_fk= 0x15,0x03, 0x10,0x03, 0x11,0x03, 0x15,0x66, 0x15,0x03, 0x11,0x03, 0x15,0x03, 0x17,0x03, 0x17,0x03, 0x15,0x03, 0x11,0x03, 0x10,0x03, 0x1

23、0,0x03, 0x10,0x66, 0x10,0x7A, 0x15,0x03, 0x10,0x03, 0x11,0x03, 0x15,0x03, 0x10,0x03, 0x11,0x03, 0x15,0x03, 0x11,0x03, 0x15,0x03, 0x17,0x03, 0x17,0x03, 0x11,0x03, 0x11,0x03, 0x10,0x03, 0x15,0x03, 0x10,0x66, 0x10,0x7A, 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x19,0x03, 0x18,0

24、x03, 0x17,0x03, 0x15,0x03, 0x16,0x03, 0x17,0x66, 0x17,0x03, 0x16,0x03, 0x15,0x03, 0x11,0x03, 0x15,0x03, 0x16,0x03, 0x10,0x66, 0x10,0x02, 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x19,0x03, 0x1A,0x03, 0x17,0x03, 0x15,0x03, 0x16,0x03, 0x17,0x03, 0x17,0x03, 0x1A,0x03, 0x16,0x03

25、, 0x16,0x03, 0x15,0x03, 0x16,0x03, 0x16,0x03, 0x15,0x03, 0x10,0x17, 0x17,0x03, 0x17,0x03, 0x16,0x03, 0x17,0x03, 0x1F,0x66, 0x1F,0x66, 0x1B,0x66, 0x17,0x03, 0x16,0x03, 0x17,0x03, 0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x1A,0x03, 0x19,0x03, 0x17,0x03, 0x15,0x03, 0x15,0x03, 0x15,0x03, 0x15,0x03, 0x16,0x03, 0

26、x17,0x03, 0x17,0x03, 0x17,0x03, 0x17,0x03, 0x17,0x03, 0x18,0x03, 0x17,0x03, 0x15,0x66, 0x15,0x03, 0x11,0x03, 0x15,0x03, 0x1A,0x03, 0x1A,0x03, 0x1A,0x03, 0x1A,0x03, 0x19,0x03, 0x1A,0x03, 0x1B,0x7A, 0x00,0x00 ;void KeyScan();void play_while();void Play(unsigned char *Sound,unsigned char Signature,unsi

27、gned Octachord,unsigned int Speed);#define u8 unsigned char#define u16 unsigned int #define u32 unsigned long#define WaitStatus 0 /按鍵過程的狀態#define PressStatus 1#define ReleaseStatus 2#define BeepIO _pb4#defineKEY1 _pb3#defineKEY2 _pa7#defineKEY3 _pa6#defineKEY4 _pa5#defineKEY5 _pa4#defineKEY6 _pb2#de

28、fineKEY7 _pb1 #defineKEY8 _pb0 #defineLED1 _pb5#defineLED2 _pb6#defineLED3 _pa3#defineLED4 _pa1#defineLED5 _pa0#defineLED6 _pc2#defineLED7 _pc1#defineLED8 _pc0typedef struct u16 count ;u8 name;u8 enable;Timer;u8 KeyStatus=0,KeyPress=0,keyval=0;u8 mu_st=0;u8 music_en=0xff;Timer mytimer;#define true 1

29、#define false 0const u16 fout37= 15289,13621,12135,11454,10204,9091,8099, 7645,6811,6068,5727,5102,4545,4050, 3822,3405,3034,2864,2551,2273,2025, ; #define SOUND_SPACE 4/5 /定義普通音符演奏的長度分率,/每4分音符間隔unsigned int const FreTab12 = 262,277,294,311,330,349,369,392,415,440,466,494 ; /原始頻率表unsigned char const

30、 SignTab7 = 0,2,4,5,7,9,11 ; /17在頻率表中的位置unsigned char const LengthTab7= 1,2,4,8,16,32,64 ;unsigned int NewFreTab12;/新的頻率表unsigned int Point,LDiv,LDiv0,LDiv1,LDiv2,LDiv4,CurrentFre,SoundLength;unsigned char Tone,Length;unsigned char *Sound_bak;unsigned charstart=0; void LED(u8 data)_pc0=data;_pc1=dat

31、a>>1;_pc2=data>>2;_pa0=data>>3;_pa1=data>>4;_pa3=data>>5;_pb6=data>>6;_pb5=data>>7;void LED3_8(u8 data)switch(data)case 0:LED(0x01);break;case 1:LED(0x02);break;case 2:LED(0x04);break;case 3:LED(0x08);break;case 4:LED(0x10);break;case 5:LED(0x20);break;case

32、6:LED(0x40);break;case 7:LED(0x80);break;void delayms(u16 i)u16 j;while(i-)for(j=0;j<220;j+)asm("nop");asm("nop");asm("nop");void fchange(u16 f)_tm2al=f&0xff;_tm2ah=f>>8;void main()u8 worksta=1;_wdtc=0xa8;_acerl=0x00;_pcc=0x00;_pbc5=0;_pbc6=0;_csel=0;_cos=1

33、;_acerl=0x00;_pbc|=0x0f;_pbc4=0;_pac=0xf0;_pac2=1;_papu2=1;_pbc|=0x0f;_pbpu|=0x0f;_pac|=0xf0;_papu|=0xf0;/ctm_tm2c0=0x10;_tm2c1=0xc1;_tm2al=0;_tm2ah=0>>8;_t2on=1;_mf1e=1;_t2ae=1;/stm_tm0c0=0x00;_tm0c1=0xc1;_tm0al=20000;_tm0ah=20000>>8;_mf0e=1;_t0ae=1;_t0on=1;_pawu2=1;_emi=1;while(1)KeySc

34、an();if(KeyPress)KeyPress=0;if(keyval=1)start=1;worksta=2;music_en=0xff;switch(mu_st)case 0:Play(Music_sd,0,3,50);break;case 1:Play(Music_Two,0,3,50);break;case 2:Play(Music_Girl,0,3,50);break;case 3:Play(Music_Same,0,3,50);break;case 4:Play(Music_lzlh,0,3,50);break;case 5:Play(Music_fk,0,3,50);brea

35、k;case 6:Point=SoundLength;worksta=2;break;if(+mu_st=7)mu_st=0;switch(worksta)case 1: if(KEY1)LED1=1;elseLED1=0;fchange(fout01);if(KEY2)LED2=1;elseLED2=0;fchange(fout02);if(KEY3)LED3=1;elseLED3=0;fchange(fout03);if(KEY4)LED4=1;elseLED4=0;fchange(fout04);if(KEY5)LED5=1;elseLED5=0;fchange(fout05);if(K

36、EY6)LED6=1;elseLED6=0;fchange(fout06);if(KEY7)LED7=1;elseLED7=0;fchange(fout07);if(KEY1 && KEY2 && KEY3 && KEY4 && KEY5 && KEY6 && KEY7 )fchange(0);break;case 2: play_while();if(music_en=0)worksta=1;break;DEFINE_ISR(tbase0,0x0c)_t0af=0;if(mytimer.enabl

37、e=true)mytimer.count-;if(mytimer.count=0)mytimer.enable=false;DEFINE_ISR(t2,0x10)_t2af=0;BeepIO=BeepIO;void KeyScan()switch(KeyStatus)case WaitStatus: /等待狀態 if(_pa2=0 )KeyStatus=PressStatus; break; case PressStatus: /按下狀態if(_pa2=0 )if(_pa2=0)keyval=1;KeyPress=1;KeyStatus=ReleaseStatus;elseKeyStatus=

38、WaitStatus;break;case ReleaseStatus: /等待釋放狀態if(_pa2=0 )elseKeyStatus=WaitStatus;break;/*void Play(unsigned char *Sound,unsigned char Signature,unsigned Octachord,unsigned int Speed)unsigned char i,j;Sound_bak=Sound;for(i=0;i<12;i+) / 根據調號及升降八度來生成新的頻率表 j = i + Signature;if(j > 11)j = j-12;NewFreTabi = FreTabj*2;elseNewFreTabi = FreTabj;if(Octachord = 1)NewFreTabi>>=2;else if(Octachord = 3)NewFreTabi<<=2;SoundLength =