ORG 0           ;wektor zerowania
JMP main        ;bezwarunkowo skocz poza obszar wektorów przerwań
ORG 000BH       ;wektor przerwania po przepełnieniu timer0
JB P1.0, StanNiski;    ;sprawdź, który stan aktualnie jest aktywny

StanWysoki:
SETB P1.0       ;ustaw bit P1.0
MOV TH0, #0E8H
MOV TL0, #08FH  ;stan wysoki 6ms
RETI            ;powrót z przerwania

StanNiski:
CLR P1.0        ;wyzeruj bit P1.0
MOV TH0, #0A2H
MOV TL0, #03FH  ;stan niski 24ms
RETI            ;powrót z przerwania

ORG 0030H       ;początek programu głównego

main:
CLR P0.7        ;włączenie oscyloskopu
MOV TMOD, #01H  ;timer0 tryb 1
MOV TH0, #0E8H
MOV TL0, #08FH  ;start od stanu wysokiego przez 6us
SETB TR0        ;uruchom timer0
SETB EA         ;globalnie zezwól na przerwania
SETB ET0        ;zezwól na przerwanie po przepełnieniu timer0
JMP $           ;pętla pusta - czekaj na przerwania