Page 217 -
P. 217

INC R4

DJNZ R1,AGAIN1

MOV R5,#10H ;2s

ACALL DELAY

;-----------------------

MOV R1,#0FH

AGAIN2: MOV A,R4

MOVC A,@A+DPTR

MOV P1,A

INC R4

MOV A,R4

MOVC A,@A+DPTR

MOV P2,A

MOV R5,#08H ;1s

ACALL DELAY

INC R4

DJNZ R1,AGAIN2

;-----------------------

MOV SP,#07H

AJMP START

;----------------------

DELAY: MOV R6,#FAH

DE1: MOV R7,#FAH

DE2: DJNZ R7,DE2

JNB P0.3,STOP

DJNZ R6,DE1

JNB P0.3,STOP

DJNZ R5,DELAY

JNB P0.3,STOP

RET

;-----------------------

STOP: AJMP BEGIN

;-----------------------

ORG 300H

TABLE: DB                 F9H,00H,A4H,00H

DB B0H,01H,99H,01H

DB 92H,01H,82H,01H

DB F8H,03H,80H,03H

DB 90H,03H,88H,03H
   212   213   214   215   216   217   218   219   220   221   222