Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $MOD52
- MOV A,#00000000B
- MOV B,#00010000B
- MOV R5,#00100000B
- MOV R6,#00110000B
- start:
- CALL delay
- INC A
- INC B
- INC R5
- INC R6
- CJNE A,#0aH, start
- MOV A,#00000000B
- MOV B,#00010000B
- MOV R5,#00100000B
- MOV R6,#00110000B
- JMP start:
- z:
- MOV R0, #255
- DJNZ R0, $
- RET
- delay:
- MOV R1,#0001001B
- DLY0: MOV R2,#0a0h
- DLY1: MOV R3,#0FFh
- DJNZ R3,$
- MOV P2, A
- call z
- MOV P2, B
- call z
- MOV P2, R5
- call z
- MOV P2, R6
- call z
- DJNZ R2,DLY1
- DJNZ R1,DLY0
- RET
- END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement