Dioda zapalona tyle ile trzymany

$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