這個很簡單的流水燈程序呀,
LED?EQU?30HORG?0000H
SJMP?MAIN
ORG?0030H
MAIN:
MOV?LED,#0FEH
MOV?R7,#8
LOOP:
MOV?P0,LED
LCALL?DELAY
MOV?A,LED
RL?A
MOV?LED,A
DJNZ?R7,LOOP
MOV?LED,#7FH
MOV?R7,#8
LOOP1:
MOV?P0,LED
MOV?A,LED
RR?A
MOV?LED,A
DJNZ?R7,LOOP
SJMP?MAIN
DELAY:
MOV?R2,#250
DELAY1:
MOV?R3,#250
DJNZ?R3,$
DJNZ?R2,DELAY1
RET
END