【導讀】設計一款基于AT89C51單片機的數(shù)字音樂盒。同的音調(diào)，從而演奏樂曲。停鍵、上一曲及下一曲控制鍵；釘?shù)蔫F桶轉動,鐵桶上的鐵釘撞擊鐵片制成的琴鍵，從而發(fā)出聲音。容易使內(nèi)部金屬發(fā)音條變形，從而造成發(fā)音跑調(diào)。為了讓音色穩(wěn)定,必須放平不能動搖，而且價格昂貴，不能實現(xiàn)大批量生產(chǎn)。與傳統(tǒng)的機械式音樂盒相比更小巧，單，可進行批量生產(chǎn)，所以價格便宜。彩燈外觀效果，增設放歌時間、序號顯示燈功能，使音樂盒的功能更加豐富。電子音樂已廣泛地應用于社會生活的各個領域。的方波，該方波通過放大后作用于揚聲器便產(chǎn)生一定頻率的聲音。通過控制輸出方波的時間長短,聲。因此，根據(jù)樂譜，單片機就可產(chǎn)生電子音樂。中最關鍵的兩個要素是音符和節(jié)拍。路和軟件兩部分構成。的優(yōu)點，系統(tǒng)的開發(fā)周期短，成本低，電路制作容易。更換歌曲時，硬件電。路無需作任何修改，只需修改軟件即可實現(xiàn)。片機的匯編語言或C51語言實現(xiàn)。同時還可根據(jù)個人的習好通過軟件改變節(jié)

　　

【正文】 CLR A MOV R0,30H MOV R1,31H MM1: MOV A,@R1 MOV @R0,A INC R0 INC R1 DJNZ R3,MM1 POP ACC MOV @R0,A RET NEXT1: INC R4 。列掃描 MOV A,R2 JNB ,N2 LJMP N1 N2: LJMP KEY N1: RL A MOV R2,A LJMP K3 KS: MOV A,0F0H 。判斷 P1 口 MOV P1,A NOP NOP MOV A,P1 CPL A ANL A,0F0H RET DELAY1:SETB RS0 DL: MOV R5,0AH DL2: MOV R6,63 DL3: NOP NOP DJNZ R6,DL3 DJNZ R5,DL2 CLR RS0 RET INITIL: 。30H37H 初值為零 MOV R3,08H MOV R0,30H M1: MOV @R0,00H INC R0 DJNZ R3,M1 RET MODD: 。顯示 MOV P0,8EH CALL DISPLAY MOV A,37H MOV DPTR,TABLE3 MOVC A,@A+DPTR CALL WRITE2 RET KAIJI: MOV A,37H 。開機提示字 CJNE A,0FH,DFF MOV P0,80H 。設光標地址 CALL DISPLAY MOV DPTR,TABLE1。寫數(shù) 據(jù) CALL WRITE1 DFF: RET 。按鍵值播放歌曲 SOP: MOV A,37H CJNE A,01H,A11 LCALL MODD MOV 52H,HIGH TABLE10 MOV 53H,LOW TABLE10 LCALL INITILE2 LCALL MAIN0 A11: CJNE A,02H,A22 LCALL MODD 湖南鐵路科技職業(yè)技術學院單片機課程設計說明書 36 MOV 52H,HIGH TABLE20 MOV 53H,LOW TABLE20 LCALL INITILE2 lcall MAIN0 A22: CJNE A,03H,A33 LCALL MODD MOV 52H,HIGH TABLE30 MOV 53H,LOW TABLE30 LCALL INITILE2 lcall MAIN0 A33: CJNE A,04H,A44 LCALL MODD MOV 52H,HIGH TABLE40 MOV 53H,LOW TABLE40 LCALL INITILE2 lcall MAIN0 A44: CJNE A,05H,A55 LCALL MODD MOV 52H,HIGH TABLE50 MOV 53H,LOW TABLE50 LCALL INITILE2 lcall MAIN0 A55: CJNE A,06H,A66 LCALL MODD MOV 52H,HIGH TABLE60 MOV 53H,LOW TABLE60 LCALL INITILE2 lcall MAIN0 A66: CJNE A,07H,A77 LCALL MODD MOV 52H,HIGH TABLE70 MOV 53H,LOW TABLE70 LCALL INITILE2 lcall MAIN0 A77: CJNE A,08H,A88 LCALL MODD MOV 52H,HIGH TABLE80 MOV 53H,LOW TABLE80 LCALL INITILE2 lcall MAIN0 A88: CJNE A,09H,A99 LCALL MODD MOV 52H,HIGH TABLE90 MOV 53H,LOW TABLE90 LCALL INITILE2 lcall MAIN0 A99: CJNE A,0AH,AAA LCALL MODD MOV 52H,HIGH TABLE100 MOV 53H,LOW TABLE100 LCALL INITILE2 lcall MAIN0 AAA: RET INITILE2: MOV L50MS,20 MOV L1MS,00H MOV L250MS,00H MOV SEC,00H MOV MIN,00H MOV HOU,00H MOV A,HOU MOV B,10 DIV AB ADD A,30H 。將 BCD 嗎轉化為ASIIC 碼 MOV P0,0C8H 。顯示小時十位 CALL DISPLAY CALL WRITE2 MOV A,B ADD A,30H MOV P0,0C9H 。顯示小時個位 CALL DISPLAY 湖南鐵路科技職業(yè)技術學院單片機課程設計說明書 37 CALL WRITE2 MOV A,3AH MOV P0,0DH 。顯示冒號 CALL DISPLAY CALL WRITE2 MOV A,MIN MOV B,10 DIV AB ADD A,30H MOV P0,0CBH 。顯示分十位 CALL DISPLAY CALL WRITE2 MOV A,B ADD A,30H MOV P0,0CCH 。顯示分個位 CALL DISPLAY CALL WRITE2 MOV A,3AH MOV P0,0CDH 。顯示冒號 CALL DISPLAY CALL WRITE2 MOV A,SEC MOV B,10 DIV AB ADD A,30H MOV P0,0CEH 。顯示秒十位 CALL DISPLAY CALL WRITE2 MOV A,B ADD A,30H MOV P0,0CFH 。顯示秒個位 CALL DISPLAY CALL WRITE2 MOV P0,0C0H 。設光標地址 CALL DISPLAY MOV DPTR,TABLE2。寫數(shù)據(jù) CALL WRITE1 RET DISPLAY: CLR RS 。寫指令 CLR RW CLR E LCALL DELAY SETB E RET WRITE1: MOV R1,00H 。寫數(shù)據(jù) A1: MOV A,R1 MOVC A,@A+DPTR CALL WRITE2 INC R1 CJNE A,0FEH,A1 。未到字符串末尾繼續(xù) RET WRITE2: MOV P0,A SETB RS CLR RW CLR E CALL DELAY SETB E RET DELAY: MOV R4,05 D1: MOV R5,0FFH DJNZ R5,$ DJNZ R4,D1 RET TAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H DB 80H,90H,88H,83H,0C6H,0A1H,86H,8EH TAB1: DB 89H,86H,0C7H,0C7H,0C0H TAB2: DB 0C6H,88H,0C0H TABLE1: DB 39。WELCOM HERE39。,0FEH TABLE2: DB 39。DFF WB 39。,0FEH 湖南鐵路科技職業(yè)技術學院單片機課程設計說明書 38 TABLE4: DB 39。CAU39。,0FEH TABLE3: DB 30H,31H,32H,33h DB 34H,35H,36H,37H DB 38h,39H,41H,42H DB 43H,44H,45H,46H MAIN0: MOV TMOD,11H 。播放歌曲程序 MOV IE,8aH MOV TH1, 3cH MOV TL1, 0b0H LCALL KS JNZ TTM12 MOV 40H,00H NEXT20: MOV A,40H MOV DPH,52H MOV DPL,53H MOVC A,@A+DPTR MOV R2,A JZ STOP ANL A,0FH MOV R1,A MOV A,R2 SWAP A ANL A,0FH JNZ SING CLR TR0 JMP W1 SING: DEC A MOV 22H,A RL A MOV DPTR,TABLE00 MOVC A,@A+DPTR MOV TH0,A MOV 21H,A MOV A,22H RL A INC A MOVC A,@A+DPTR MOV TL0,A MOV 20H,A SETB TR0 SETB TR1 W1: LCALL DELAY30 INC 40H