.INCLUDE "M32DEF.INC"	

.MACRO INITSTACK
	LDI	R16,HIGH(RAMEND)
	OUT	SPH,R16
	LDI	R16,LOW(RAMEND)
	OUT	SPL,R16
.ENDMACRO
	
	INITSTACK
	LDI	R16,0x08
	SBI	DDRB,3			
	LDI	R17,0		
BEGIN:	
	OUT	PORTB,R17		
	RCALL	DELAY
	EOR	R17,R16			
	RJMP 	BEGIN

DELAY:
	LDI	R20,0
	OUT	TCNT0,R20
	LDI	R20,9
	OUT	OCR0,R20		

	LDI	R20,0x09
	OUT	TCCR0,R20 		
AGAIN:	
	IN	R20,TIFR		
	SBRS	R20,OCF0	
	RJMP	AGAIN
	LDI	R20,0x0
	OUT	TCCR0,R20		
	LDI	R20,1<<OCF0	
	OUT	TIFR,R20		
	RET