【正文】 }。 TL0=Sound_Temp_TL0。//數(shù)碼管顯示關閉 } delay_1ms(2)。//開啟定時器0，音符中斷 } else//當沒有鍵按下時，數(shù)碼管不顯示，也無聲音發(fā)出；如果是播放音樂，則一直顯示 { TR0=0。 //TR1 = 0。 Sound_Temp_TL0=tone_delay_table[key_NO]%256。//調用鍵盤掃描 P1=DSY_CODE[key_NO]。 while(1) { P2=0xF0。 TH1 = (6553550000)/256。 //設置定時器初值 TH0=tone_delay_table[key_NO]/256。 TR1 = 0。 ET1 = 0。 //數(shù)碼管顯示關閉 //設置定時器工作方式1，以及相關開啟寄存器 TMOD |= 0x11。}void main() //主程序{ unsigned char key_NO=0。 default: return 16。 case 8: k+=12。 case 4: k+=8。 case 2: k+=4。 switch(Tmp)//確定掃描的是那一列 { case 1: k+=0。 delay_1ms(2)。 default: return 16。 case 8: k=3。 case 4: k=2。 case 2: k=1。 switch(Tmp)//確定掃描的是哪一行 { case 1: k=0。 delay_1ms(2)。//關閉定時器}//鍵盤矩陣掃描//返回按下的鍵的值unsigned char keys_scan(void){ unsigned char Tmp,k=16。 } beep = 0。 Tone=Sound[Point]。 TF1=0。 TH1 = Sound_Temp_TH1。i0。 beep=1。 TF1=0。 TH1 = Sound_Temp_TH1。i0。 //算出不發(fā)音的長度 if (SL!=0) { TR0=1。 if(SL==0) LDiv1=0。 else LDiv1=LDiv/2。 if(XG!=1) if(XG==0) //算出普通音符的演奏長度 if (SLen=4) LDiv1=LDivLDiv4。 LDiv=LDiv0/SLen。 //算出是幾分音符 XG=Length/10%10。 TL0 = Sound_Temp_TL0 + 12。 Sound_Temp_TL0 = Temp_T%256。 //高音 Temp_T = 65536(50000/CurrentFre)*10。 //查出對應音符的頻率 if(SL!=0) { if (SM==1) CurrentFre = 2。 //計算出高低音 SH=Tone/100。 while(Point SoundLength) { SL=Tone%10。 // 普通音最長間隔標準 TR0 = 0。 // 算出1分音符的長度(幾個10ms) LDiv4 = LDiv0/4。 Length = Sound[Point+1]。 } Point = 0。 } SoundLength = 0。 if(Octachord == 1) NewFreTab[i]=2。 NewFreTab[i] = FreTab[j]*2。i++) // 根據(jù)調號及升降八度來生成新的頻率表 { j = i + Signature。 for(i=0。 //定義一些中間變量 unsigned int Point,LDiv,LDiv0,LDiv1,LDiv2,LDiv4,CurrentFre,Temp_T,SoundLength。} //延時1ms//播放音樂的子函數(shù)void Play(unsigned char *Sound,unsigned char Signature,unsigned Octachord,unsigned int Speed){ unsigned int NewFreTab[12]。i120。 //音長定時器初值暫存void delay_1ms(unsigned int ms) { unsigned char i。 unsigned char Sound_Temp_TH0,Sound_Temp_TL0。 //原始頻率表unsigned char code SignTab[7] = { 0,2,4,5,7,9,11 }。define SOUND_SPACE 4/5 //定義普通音符演奏的長度分率,//每4分音符間隔//同一首歌 的譜子unsigned char code Music[]={ 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, 0x19,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,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