ORG 0000H
AJMP MAIN
ORG 0100H
MAIN: MOV R1,#30H
MOV DPTR,#7FF8H
MOV R7,#08H
LOOP:MOVX @DPTR,A
HER: JNB P3.0,HER
MOVX A,@DPTR
MOV @R1,A
INC DPTR
INC R1
DJNZ R7,LOOP
DISP: MOV A,#50
MOV B,#10
DIV AB
MOV 20H,A
MOV 21H,B
MOV DPTR,#TABLE
SETB P2.5
CLR P2.4
MOV A,20H
MOVC A,@A+DPTR
MOV P1,A
LCALL DELAY
SETB P2.4
CLR P2.5
MOV DPTR,#TABLE
MOV A,21H
MOVC A,@A+DPTR
MOV P1,A
LCALL DELAY
RET
DELAY: MOV R6,#5
D1: MOV R5,#249
DL0: NOP
NOP
DJNZ R5,DL0
DJNZ R6,D1
RET
TABLE: DB 3FH,06H,5BH,4FH,66H ;
DB 6DH,7FH,07H,7FH,6FH
END
|