Page 214 -
P. 214
DJNZ R1,REV1
;----------------------
MOV P1,#F9H ;1
MOV P2,#01H
MOV R5,#08H
ACALL DELAY1
MOV P1,#A4H ;2
MOV P2,#03H
MOV R5,#10H
ACALL DELAY1
MOV P1,#B0H ;3
MOV P2,#04H
MOV R5,#18H
ACALL DELAY1
MOV P1,#C0H ;2s
MOV P2,#00H
;----------------------
MOV R1,#64H ;100 STEPS
REV2: RR A
MOV P3,A
MOV R5,#01H
ACALL DELAY2
DJNZ R1,REV2
MOV R1,#64H ;100 STEPS
FOR2: RL A
MOV P3,A
MOV R5,#01H
ACALL DELAY2
DJNZ R1,FOR2
;-----------------------
AJMP BEGIN
;----------------------
DELAY1: MOV R6,#FAH
DE1: MOV R7,#FAH
DE2: DJNZ R7,DE2
JNB P0.3,STOP
DJNZ R6,DE1
JNB P0.3,STOP
DJNZ R5,DELAY1
