$MOD51
ORG 0H
JMP START
START: MOV A,#1
ORL A,#01110000B
MOV P2,A
ACALL DELAY
MOV A,#2
ORL A,#10110000B
MOV P2,A
ACALL DELAY
MOV A,#3
ORL A,#11010000B
MOV P2,A
ACALL DELAY
SJMP START
; DELAY 1 1 mS
DELAY: MOV R1,#100
LOOP1: NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
DJNZ R1,LOOP1
RET
END
Tidak ada komentar:
Posting Komentar