流水灯试验

 ORG 0000H
 AJMP HAIS
 ORG 0030H
HAIS: MOV A,#01H
 MOV P1,A
 CALL DELAY
 
 MOV A,#02H
 MOV P1,A
 CALL DELAY

 MOV A,#04H
 MOV P1,A
 CALL DELAY

 MOV A,#08H
 MOV P1,A
 CALL DELAY

 MOV A,#10H
 MOV P1,A
 CALL DELAY

 MOV A,#20H
 MOV P1,A
 CALL DELAY

 MOV A,#40H
 MOV P1,A
 CALL DELAY

 MOV A,#80H
 MOV P1,A
 CALL DELAY

 AJMP HAIS

DELAY: PUSH 02H
DELAY1:
 DJNZ R2,DELAY1
 POP 02H
 DJNZ R2,DELAY
 RET
 END