DAUER		EQU 0AH

0000			ORG 0000H
0000			LJMP BEGIN
0100			ORG 0100H
0100	BEGIN:		MOV SP,#2FH
0103			MOV P1,#01H
0106	SCHLEIF:	ACALL ZEIT
0108			CPL 90H
010A			LJMP SCHLEIF

0200			ORG 0200H
0200	ZEIT:		MOV R0,#DAUER
0202	PAUSE:	DJNZ R0, PAUSE
0204			NOP
0205			RET