Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $mod52
- org 00H
- JMP start
- org 03H
- JMP pressed
- org 1BH
- JMP full
- full:
- INC R3
- MOV TL1, #0
- MOV TH1, #0
- ANL TCON, #01111111b
- RETI
- pressed:
- MOV R3, #0 ; ILE PRZERWAN ZEGAROWYCH PRZYSZLO
- MOV R4, #0
- MOV TMOD, #00010000b ; START TIMERA
- MOV TCON, #01000000b
- loop: ; USUNIĘCIE DRGAŃ ZESTYKÓW
- MOV A, R3
- CJNE A, #5, loop
- JB P3.2, return
- JNB P3.2, $ ; CZEKANIE DOPÓKI NIE PUŚCI SIĘ PRZYCISKU
- ;####### PRZYCISK ZOSTAŁ PUSZCZONY
- MOV TMOD, #0
- MOV TCON, #0
- MOV IE, #10001000b ; WYŁĄCZENIE PRZERWAN EX0
- MOV A, R3
- MOV R4, A ; PRZEPISANIE CZASU TRZYMANIA GUZIKA DO REJESTRU
- MOV R3, #0
- MOV TL1, #0
- MOV TH1, #0
- CLR P3.4 ; ZAPALENIE DIODY
- MOV TMOD, #00010000b
- MOV TCON, #01000000b
- light:
- MOV A, R4 ; ILE CZASU GUZIK BYŁ PRZYTRZYMANY
- CJNE A, 03H, light
- SETB P3.4
- MOV IE, #10001001b
- return:
- RETI
- start:
- MOV IE, #10001001b
- SETB IP.3
- sjmp $
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement