楼 主:menghuixuanmou 2008年11月1日11:03

 [讨论]
我想用P1口输出LED流水灯,要求是先全亮,然后一个接一个灭,在到LP2一个个亮起来,可下面程序能实现第一步,到第二步就停下来不走了,那个大吓能帮一下忙,十分感谢!!!!
ORG 0100H
K:MOV R2,#08
START:MOV R3,#00H
MOV DPTR,#TAB
LP1:MOV A,R3
MOVC A,@A+DPTR
MOV P1,A
ACALL DL
INC R3
DJNZ R2,LP1
RET
LP2:MOV A,R3
ADD A,#08H
MOV R3,A
AJMP LP1
DL:MOV R7,#0AH
DELAY1:CLR EX0
MOV TMOD,#01H
MOV TL0,#0B0H
MOV TH0,#3CH
SETB TR0
HERE:JBC TF0,NEXT1
SJMP HERE
NEXT1:MOV TL0,#0B0H
MOV TH0,#3CH
DJNZ R7,HERE
CLR TR0
SETB EX0
RET
TAB:DB  00H 01H 03H 07H 0FH 1FH 3FH 7FH 0FFH
DB 0FFH 7FH 3FH 0FH 07H 03H 01H 00H
END