【正文】 INC R0 MOV DPL,@R0 INC R0 MOV A,R4 INC R4 MOVC A,@A+DPTR 。放在A中。**************************************************** JZ END0 。若為0，則表示為休止符，不唱，本次音符不唱， MOV R1,A 。不為0，取出節(jié)拍數 ANL A,0FH MOV R2,A MOV A,R1 SWAP A ANL A,0FH JNZ SING 。音符不為0，唱 CLR TR0 。為0，不唱,關頻率發(fā)生器 SJMP SING1SING: DEC A 。開始唱,進行相應的數據處理 MOV R3,A RL A MOV DPH,@R0 INC R0 MOV DPL,@R0 INC R0 MOVC A,@A+DPTR MOV 21H,A MOV TH0,A MOV A,R3 RL A INC A MOVC A,@A+DPTR MOV 20H,A MOV TL0,A SETB TR0 。開唱SING1:LCALL DELAY 。每個音符唱多久 JB F0,FOR 。是否暫停， AJMP NEXT 。沒有暫停，繼續(xù)FOR: CLR TR0 。暫停，不唱 JB F0,$ 。等待播放 AJMP NEXT 。開始播放END0: CLR TR0 。不唱 MOV A,22H 。唱完處理 CJNE A,N,WW 。是不是全部歌曲都唱完 MOV 22H,01H 。全部唱完，則從第一首開始再唱 MOV R7,00H MOV OUT_NUM,11111001B 。數碼管顯視第一首歌曲編號 AJMP WWWWW: MOV A,R7 。沒有全部唱完，唱下一首,歌曲的入口信息調整 ADD A,4 MOV R7,A INC 22H CLR EA PUSH DPH PUSH DPL MOV A,22H MOV DPTR,OUT_TAB MOVC A,@A+DPTR MOV OUT_NUM,A 。數碼管顯視相應的歌曲編號 POP DPL POP DPHWWW: SETB EA AJMP START0 。開始下一首的演唱F_T0: MOV TH0,21H 。定時器0置初值 MOV TL0,20H CPL OUT 。頻率產生 RETINEXT_SONG: PUSH ACC 。下一曲中斷程序處理，保護現(xiàn)場 PUSH DPH PUSH DPL CLR EA 。關中斷 MOV A,22H CJNE A,N,Q 。是最后一首嗎？ MOV R7,00H 。是最后一首，則R7指向第一首，演唱第一首 MOV 22H,01H AJMP BACKQ: INC 22H 。不是最后一首，唱下一首,R7內容加4，歌曲數加1 MOV A,R7 ADD A,4 MOV R7,ABACK: MOV R4,00H 。數碼管顯視相應的歌曲編號 MOV A,22H MOV DPTR,OUT_TAB MOVC A,@A+DPTR MOV OUT_NUM,A。******************************************** MOV B,R0 。對下首要演唱的歌曲的幾分拍進行調整,同時對R0中的內容進行保護 MOV R4,00H MOV R0,30H MOV A,R7 ADD A,R0 MOV R0,A MOV DPH,@R0 INC R0 MOV DPL,@R0 INC R0 MOV A,R4 INC R4 MOVC A,@A+DPTR MOV 26H,A 。結果存入26H單元中 DEC R4 MOV R0,B 。恢復R0中的內容。******************************************** POP DPL ?；謴同F(xiàn)場 POP DPH POP ACC SETB EA RETI 。中斷返回LAST_SONG: PUSH ACC 。上一曲中斷程序處理開始，保護現(xiàn)場 PUSH DPH PUSH DPL CLR EA 。關中斷 MOV A,22H 。曲目數送A CJNE A,1, 。是否是第一首 MOV 22H,N 。是第一首歌曲 MOV B,4 。將R7指向最后一首歌曲 MOV A,N1 MUL AB MOV R7,A AJMP BACK2 。處理結束: DEC 22H MOV A,R7 。R7減4 SUBB A,4 MOV R7,ABACK2: MOV R4,00H MOV A,22H MOV DPTR,OUT_TAB MOVC A,@A+DPTR MOV OUT_NUM,A 。數碼管顯視相應歌曲的編號。******************************************** MOV B,R0 。對下首要演唱的歌曲的幾分拍進行調整,同時對R0中的內容進行保護 MOV R4,00H MOV R0,30H MOV A,R7 ADD A,R0 MOV R0,A MOV DPH,@R0 INC R0 MOV DPL,@R0 INC R0 MOV A,R4 INC R4 MOVC A,@A+DPTR MOV 26H,A 。結果存入26H單元中 DEC R4 MOV R0,B 。R0中的內容恢復。******************************************** POP DPL ?；謴同F(xiàn)場 POP DPH POP ACC SETB EA RETI 。中斷返回START_PAUSE:CPL F0 。開始/暫停中斷處理程序，將標置位取反 JB F0,RETURN 。為1返回 SETB TR0 。為0則播放RETURN: RETI 。中斷返回DELAY: MOV 27H,26H 。音符演奏時間控制D2: MOV 28H,125D3: MOV 29H,248 DJNZ 29H,$ DJNZ 28H,D3 DJNZ 27H,D2 DJNZ R2,DELAY RET。OUT_TAB: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,77H,7CH,39H,5EH,79H,71H,73H 。共陰數碼管顯視用OUT_TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,88H,83H,0C6H,0A1H,86H,8EH,0FFH 。共陽 END參考文獻[1] [2] [3] [4] [5] [6] [7] 24