Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ; this program is from iwan
- ORG 00H
- AJMP MAIN
- MAIN: MOV A,#00H
- MOV B,#00H
- MOV P1,A
- MOV P2,B
- START: MOV A,#0EEH
- MOV B,#0EEH
- MOV P2,B
- MOV P1,A
- ACALL DELAY
- MOV A,#0EBH
- MOV B,#0EEH
- MOV P2,B
- MOV P1,A
- ACALL DELAY
- MOV A,#06DH
- MOV B,#0EEH
- MOV P2,B
- MOV P1,A
- ACALL DELAY
- MOV A,#0EEH
- MOV B,#0EEH
- MOV P2,B
- MOV P1,A
- ACALL DELAY
- MOV A,#0BEH
- MOV B,#0EEH
- MOV P2,B
- MOV P1,A
- ACALL DELAY
- MOV A,#0D6H
- MOV B,#0EEH
- MOV P2,B
- MOV P1,A
- ACALL DELAY
- MOV A,#0EEH
- MOV B,#0EEH
- MOV P2,B
- MOV P1,A
- ACALL DELAY
- MOV B,#0EEH
- MOV P2,B
- ACALL DELAY
- MOV B,#0EBH
- MOV P2,B
- ACALL DELAY
- MOV B,#06DH
- MOV P2,B
- ACALL DELAY
- MOV B,#0EEH
- MOV P2,B
- ACALL DELAY
- MOV B,#0BEH
- MOV P2,B
- ACALL DELAY
- MOV B,#0D6H
- MOV P2,B
- ACALL DELAY
- MOV B,#0EEH
- MOV P2,B
- ACALL DELAY
- AJMP START
- DELAY: MOV R1,#06H
- DELAY1: MOV R2,#06H
- DELAY2: DJNZ R2,DELAY2
- DJNZ R1,DELAY1
- RET
- END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement