Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include<REG51F380.h>
- LED EQU P2.7
- QTUM DATA 30H
- BYTE0 DATA 31H
- BYTE1 DATA 32H
- BYTE2 DATA 33H
- BYTE3 DATA 34H
- CSEG AT 0H
- JMP INIT
- CSEG AT 50H
- INIT:
- INIT_PCA: MOV XBR1, #40h
- MOV PCA0MD, #0
- INIT_MEM: MOV SP, #5FH
- MOV CLKSEL, #3
- MOV BYTE0, #255
- MOV BYTE1, #255
- MOV BYTE2, #255
- MOV BYTE3, #1
- MAIN: ACALL DELAY3
- CPL LED
- JMP MAIN
- DELAY3: MOV A, BYTE3 ; 2
- CPL A ; 1
- INC A ; 1
- CYCLE3: PUSH ACC ; 2
- ACALL DELAY2 ; 4
- POP ACC ; 2
- ADDC A, #1 ; 2
- JNC CYCLE3 ; 2/3
- CLR C ; 1
- RET ; 6
- DELAY2: MOV A, BYTE2 ; 2
- CPL A ; 1
- INC A ; 1
- CYCLE2: PUSH ACC ; 2
- ACALL DELAY1 ; 4
- POP ACC ; 2
- ADDC A, #1 ; 2
- JNC CYCLE2 ; 2/3
- CLR C ; 1
- RET ; 6
- DELAY1: MOV A, BYTE1 ; 2
- CPL A ; 1
- INC A ; 1
- CYCLE1: PUSH ACC ; 2
- ACALL DELAY0 ; 4
- POP ACC ; 2
- ADDC A, #1 ; 2
- JNC CYCLE1 ; 2/3
- CLR C ; 1
- RET ; 6
- DELAY0: MOV A, BYTE0 ; 2
- CPL A ; 1
- INC A ; 1
- CYCLE0: ADDC A, #1 ; 2
- JNC CYCLE0 ; 2/3
- CLR C ; 1
- RET ; 6
- END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement