EXTERN DISPLAY

EXTERN INIT_LCD

ORG 1000H

LJMP POCZATEK

ORG 100BH

MOV TL0, #156D

SJMP PRZERW1

ORG 101BH

DJNZ R2, KONIEC1

DEC R3

MOV R2, #06D

KONIEC1:

RETI

PRZERW1:

MOV A, R1

ADD A, #01H

DA A

MOV R1, A

LCALL DISPLAY

RETI

POCZATEK:

LCALL INIT_LCD

MOV 38H, #20H

MOV 37H, #7AH

MOV 36H, #48H

MOV 35H, #30H

SETB EA

SETB ET0

SETB ET1

MOV TMOD, #00000111B

START:

MOV TL0, #156D

MOV TH0, #00H

MOV R1, #00H

MOV R2, #06D

MOV R3, #180D

MOV R5, #20D

ORL TCON, #01010000B ;URUCHOMIENIE LICZNIKOW

WAIT:

CJNE R3, #00H, WAIT

CLR TR0

CLR TR1 ;LICZNIKI STOP

MOV A, R1 ;WYSLANIE WYNIKU DO WYSWIETLACZA

ANL A, #0FH

ORL A, #30H

MOV 32H, A

MOV A, R1

ANL A, #0F0H

SWAP A

ORL A, #30H

MOV 31H, A

MOV A, TL0

SUBB A, #156D

MOV B, #10D

DIV AB

ORL A, #30H

MOV 33H, A

MOV A, B

ORL A, #30H

MOV 34H, A

LJMP START

END

---