Page 211 -
P. 211
MOV P1,#B0H ;3
MOV P2,#07H
;-----------------------------
MOV R1,#32H ;50 步
FOR2: RL A
MOV P3,A
MOV R5,#01H
ACALL DELAY2
DJNZ R1,FOR2
MOV P1,#A4H ;2
MOV P2,#03H
;--------------------------
MOV R1,#32H ;50 步
FOR3: RL A
MOV P3,A
MOV R5,#01H
ACALL DELAY2
DJNZ R1,FOR3
MOV P1,#F9H ;1
MOV P2,#01H
;--------------------------
MOV R1,#32H ;50 步
FOR4: RL A
MOV P3,A
MOV R5,#01H
ACALL DELAY2
DJNZ R1,FOR4
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
JNB P0.3,STOP
RET
;-----------------------
