【正文】 ************************** define SYSTEM_OSC 12020000 //定義晶振頻率 12020000HZ define SOUND_SPACE 4/5 //定義普通音符演奏的長度分率 ,//每 4分音符間隔 sbit BeepIO = P3^7。 EA = 1。 } SoundLength = 0。 //高音 Temp_T = 65536(50000/CurrentFre)*10/(12020000/SYSTEM_OSC)。 //算出不發(fā)音的長度 if (SL!=0) { TR0=1。 Tone=Sound[Point]。 delay(500)。 } BeepIO = 0。i0。 Sound_Temp_TL0 = Temp_T%256。 } Point = 0。 TH0 = Sound_Temp_TH0。 //原始頻率表 unsigned char code SignTab[7] = { 0,2,4,5,7,9,11 }。 |調(diào)號 (011) : 是指樂曲升多少個半音演奏 。 ET1 = 0。 } else NewFreTab[i] = FreTab[j]。 //計算出是否升半 CurrentFre = NewFreTab[SignTab[SL1]+SH]。 //算出頓音的演奏長度 else LDiv1=LDiv。 TL1 = Sound_Temp_TL1。 while(1) { Play(Music_Same,0,3,360)。 /******************************** 兩 只 蝴 蝶****************************************************/ unsigned char code 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,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, 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, 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