单片机ofeh_单片机实验流水灯

ORG OOOOH

LJMP MAIN

ORG 1000H

MAIN:

MOV R0,#00H

MOV DPTR,#TABLE

AGAIN:

MOV A,R0

MOVC A,@A+DPTR

MOV P1,A

INC R0

MOV A,R0

MOVC A,@A+DPTR

MOV P0,A

INC R0

MOV A,R0

ANL R0,#1FH

LCALL DELAY

SJMP AGAIN

DELAY:

MOV R6,#OFFH

L1:

MOV R7,#OFFH

DJNZ R7,$

DJNZ R6,L1

RET

TABLE:DB 11111111B,11111110B,11111111B,11111101B,11111111B,11111011B,11111111B,11110111B,

DB 11111111B,11101111B,11111111B,11011111B,11111111B,10111111B,11111111B,01111111B,

DB 11111110B,11111111B,11111101B,11111111B,11111011B,11111111B,11110111B,11111111B,

DB 11101111B,11111111B,11011111B,11111111B,10111111B,11111111B,01111111B,11111111B,

END