基于at89c51單片機的音樂盒的設計-閱讀頁
2024-12-02 15:36本頁面
【正文】 LK:ADD A,R4PUSH ACCK4:LCALL DELAY1。MOV R3,07H CLR AMOV R0,30HMOV R1,31HMM1:MOV A,R1MOV R0,AINC R0INC R1DJNZ R3,MM1POP ACCMOV R0,A RET。 。 KS:MOV A,0F0H 。 DELAY1:SETB RS0DL:MOV R5,0AHDL2:MOV R6,63DL3:NOP NOPDJNZ R6,DL3DJNZ R5,DL2 CLR RS0 RET。INITIL: 。 MODD: 。 KAIJI:MOV A,37HCJNE A,0FH,DFFMOV P0,80H設光標地址 LCALL ENABLEMOV DPTR,TABLE1。 。 SOP:MOV A,37HCJNE A,01H,A11LCALL MODDMOV 52H,HIGH TABLE10MOV 53H,LOW TABLE10LCALL INITILE2LCALL MAIN0A11:CJNE A,02H,A22LCALL MODDMOV 52H,HIGH TABLE20MOV 53H,LOW TABLE20 LCALL INITILE2******************************* INITILE2:MOV L50MS,20MOV L1MS,00HMOV L250MS,00HMOV SEC,00HMOV MIN,00HMOV HOU,00HMOV A,HOUMOV B,10DIV ABADD A,30H 。顯示冒號CALL ENABLECALL WRITE2MOV A,MINMOV B,10DIV ABADD A,30HMOV P0,0CBH顯示分十位CALL ENABLECALL WRITE2MOV A,BADD A,30HMOV P0,0CCH顯示分個位CALL ENABLECALL WRITE2MOV A,3AHMOV P0,0CDH顯示冒號CALL ENABLECALL WRITE2MOV A,SECMOV B,10DIV ABADD A,30H MOV P0,0CEH顯示秒十位CALL ENABLECALL WRITE2MOV A,BADD A,30HMOV P0,0CFH顯示秒個位CALL ENABLECALL WRITE2MOV P0,0C0H設光標地址 CALL ENABLEMOV DPTR,TABLE2 。************************** 寫指令ENABLE: CLR RSCLR RWCLR ELCALL DELAYSETB ERET。未到字符串末尾繼續(xù)RETWRITE2:MOV P0,ASETB RSCLR RWCLR ECALL DELAYSETB ERET。 DB 34H,35H,36H,37HDB 38H,39H,41H,42HDB 43H,44H,45H,46H。播放歌曲程序。MOV TH1,3CH。 NEXT20:MOV A,40HMOV DPH,52HMOV DPL,53HMOVC A,A+DPTRMOV R2,AJZ STOPANL A,0FHMOV R1,AMOV A,R2SWAP AANL A,0FHJNZ SINGCLR TR0JMP W1。 TR1W1:LCALL DELAY30INC 40HLCALL KS有鍵跳出JNZ STOPLJMP NEXT20。 TTM12:LCALL K2MOV A,37HCJNE A,0EH,TTM13CLR TR1LCALL DELAY1TTM120:LCALL KSLCALL DELAY1JZ TTM120LCALL K2MOV A,37HCJNE A,0EH,TTM120SETB TR1LJMP NEXT20TTM13:CJNE A,0CH,TTM14MOV A,52HINC AMOV 52H,AMOV A,53HINC AMOV 53H,AMOV A,36HINC AMOV 37H,ALJMP TTM2TTM14:CJNE A,0DH,TTM2MOV A,52HDEC AMOV 52H,AMOV A,53HDEC AMOV 53H,AMOV A,36HDEC AMOV 37H,A TTM2:RET……RET。 。 TABLE20:1
高考資料相關推薦
鄂ICP備17016276號-1