;	R0 = DELER = 20
;	R1 = SCHAKELAARWAARDE
;	R2 = TELLER2
;	R3 = TELLER1
		ORG	0
		
MAIN:		MOV	P1, #0H
MAIN2:		MOV	TCON, #00000000B
		MOV	TH0, #03CH
		MOV	TL0, #0AFH
MAIN3:		MOV	A,P1
		MOV	R1, A
		JB	P3.2, MAIN3	; WACHT TOT TEST KNOP IS INGEDRUKT
		MOV	TMOD, #00000001B
		MOV	TCON, #00010000B
		LCALL	KOOKTIJD
		LCALL	ZOEMER
		JMP	MAIN