上下循环的流水灯程序

文件:	流水灯.rar
大小:	30KB
下载:	下载

上下循环的流水灯程序

作者：流水落花

 

       ORG 0100H

LOOP0: MOV A, #0FEH

       MOV R2, #8; 用于计数

LOOP1: MOV P1, A

       LCALL DEL200

       RL A

       DJNZ R2, LOOP1

       MOV A, #7FH

       MOV R2, #8

LOOP2: MOV P1, A

       LCALL DEL200

       RR A

       DJNZ R2, LOOP2

       LCALL LOOP0; 返回LOOP0



DEL200: MOV R7, #200

DEL1:   MOV R6, #250

        DJNZ R6, $

        DJNZ R7, DEL1

        RET

        END