ex5112.asm

来自「启东计算机厂实验程序」· 汇编 代码 · 共 35 行

        ORG 0000H
        LJMP START
	;
	ORG 0030H
START:  MOV A,#00H
        MOV SBUF,A
        MOV SBUF,A
	MOV DPTR,#9000H
	MOVX @DPTR,A
	MOVX A,@DPTR
 DISP:  MOV  R0,A
        ANL A,#0FH
   LP:  MOV DPTR,#TAB
        MOVC A,@A+DPTR
        MOV SBUF,A
        MOV R7,#0FH
 H55S:	DJNZ R7,H55S
        MOV A,R0
        SWAP A
        ANL A,#0FH
        MOVC A,@A+DPTR
        MOV SBUF,A
        MOV R7,#0FH
H55S1:	DJNZ R7,H55S1
        LCALL DELAY
        AJMP  START
TAB:DB 0fch,60h,0dah,0f2h,66h,0b6h,0beh,0e0h
    DB 0feh,0f6h,0eeh,3eh,9ch,7ah,9eh,8eh
 DELAY:MOV R6,#0FFh
 DELY2:MOV R7,#0FFh
 DELY1:DJNZ R7,DELY1
       DJNZ R6,DELY2
       RET
END