myyy.asm

来自「单片机程序 我也不想传 你非让我传 穿什么传 真麻烦」· 汇编 代码 · 共 171 行

        ORG     0000H
        AJMP    MAIN
        ORG     0003H
        AJMP    LP1
        ORG     0030H
MAIN:   MOV     SP,#70H
        MOV     TMOD,#90H
        MOV     TH1,#00H
        MOV     TL1,#00H
        SETB    IT0
        MOV     IE,#81H
        CLR     A
        MOV     R1,A
        MOV     R2,A
        MOV     R3,A
        MOV     R4,A
        MOV     R5,A
        MOV     R6,A
LP0:    LCALL   XS
LP:     AJMP    LP0
XS:     MOV     DPTR,#08002H
        MOV     A,#01H
        MOVX    @DPTR,A
        MOV     DPTR,#08004H
        MOV     A,R5
        MOVX    @DPTR,A
        LCALL   YC
        MOV     DPTR,#08002H
        MOV     A,#02H
        MOVX    @DPTR,A
        MOV     DPTR,#08004H
        MOV     A,R4
        MOVX    @DPTR,A
        LCALL   YC
        MOV     DPTR,#08002H
        MOV     A,#04H
        MOVX    @DPTR,A
        MOV     DPTR,#08004H
        MOV     A,R3
        MOVX    @DPTR,A
        LCALL   YC
        MOV     DPTR,#08002H
        MOV     A,#08H
        MOVX    @DPTR,A
        MOV     DPTR,#08004H
        MOV     A,R2
        MOVX    @DPTR,A
        LCALL   YC
        MOV     DPTR,#08002H
        MOV     A,#10H
        MOVX    @DPTR,A
        MOV     DPTR,#08004H
        MOV     A,R1
        MOVX    @DPTR,A
        LCALL   YC
        RET
LP1:    MOV     R0,#0
        JB      P3.3,LP1
        MOV     TH1,#00H
        MOV     TL1,#00H
        SETB    TR1
LP2:    JNB     P3.3,LP2
LP3:    JNB     TF1,LP4 
        INC     R0
        CLR     TF1
LP4:    JB      P3.3,LP3        
LP5:    JB      P3.3,LP5
        CLR     TR1
        MOV     A,TL1
        MOV     R2,A
        MOV     A,TH1
        MOV     R1,A

MV:     CLR     C
        MOV     A,R2
        RLC     A
        MOV     R2,A
        MOV     A,R1
        RLC     A
        MOV     R1,A
        MOV     A,R0
        RLC     A
        MOV     R0,A
        CLR     C
TURN:   CLR     A
        MOV     R7,A
        MOV     R3,A
        MOV     R4,A
        MOV     R5,A
        MOV     R6,#18H
HBCD:   MOV     A,R2
        RLC     A
        MOV     R2,A
        MOV     A,R1
        RLC     A
        MOV     R1,A
        MOV     A,R0
        RLC     A
        MOV     R0,A
        MOV     A,R5
        ADDC    A,R5
        DA      A
        MOV     R5,A
        MOV     A,R4
        ADDC    A,R4
        DA      A
        MOV     R4,A
        MOV     A,R3
        ADDC    A,R3
        DA      A
        MOV     R3,A
        MOV     A,R7
        ADDC    A,R7
        DA      A
        MOV     R7,A
        DJNZ    R6,HBCD
        MOV     A,R4
        MOV     R2,A
        MOV     A,R3
        MOV     R1,A
        MOV     A,R5
        MOV     R3,A

SPT:    MOV     A,R3
        ANL     A,#0F0H
        SWAP    A
        MOV     R5,A
        MOV     A,R2
        ANL     A,#0FH
        MOV     R4,A
        MOV     A,R2
        ANL     A,#0F0H
        SWAP    A
        MOV     R3,A
        MOV     A,R1
        ANL     A,#0FH
        MOV     R2,A
        MOV     A,R1
        ANL     A,#0F0H
        SWAP    A
        MOV     R1,A

LOOK:   MOV     DPTR,#TAB
        MOV     A,R5
        MOVC    A,@A+DPTR
        MOV     R5,A
        MOV     A,R4
        MOVC    A,@A+DPTR
        MOV     R4,A
        MOV     A,R3
        ADD     A,#10
        MOVC    A,@A+DPTR
        MOV     R3,A
        MOV     A,R2
        MOVC    A,@A+DPTR
        MOV     R2,A
        MOV     A,R1
        MOVC    A,@A+DPTR
        MOV     R1,A
        RETI



YC:     MOV     R7,#250
        DJNZ    R7,$
        RET

TAB:    DB       3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH
        DB       0BFH,86H,0DBH,0CFH,0E6H,0EDH,0FDH,87H,0FFH,0EFH
        END