code	at 1000h				;organizacja od adresu 1000h

		ljmp	start			;skok do poczatku programu

code	at 2000h

start:	mov a,#01h
			mov p4,a
			mov TMOD,#01010001b

			setb TR0
			setb TR1
			setb ET0
			setb ET1
			setb EAL
			setb EX0
			mov TH0,#00h
			mov TL0,#00000000b

			mov TH1,#11111111b
			mov TL1,#11111000b

			mov r2,#00h	; jednostki
	      mov r3,#00h ;    dziesiatki

	      mov a,#00h

main:		ljmp main


code at 101Bh
			mov TH1,#11111111b
			mov TL1,#11111000b
			inc r2
			cjne r2,#0Ah,wyswietl
			mov r2,#00h
			mov a,r3
			add a,#10h
			mov r3,a
			cjne r3,#10100000b,wyswietl
			mov r3,#00h

wyswietl:
			mov a,#00h
			add a,r3
			add a,r2
			mov	p4,a		;P4 <- ACC

koniec:	RETI


code at 100Bh
			mov TH0,#00h
			mov TL0,#00000000b

			cpl P3.5
			cpl P3.5
kon:		RETI




;-------------------------------------------------------------------------------

END