.EQU	MYTEMP = 0x200
	.INCLUDE "M32DEF.INC"
	CBI 	DDRB, 0
AGAIN:	
	SBIC	PINB, 0
	RJMP	OVER
	LDI 	R16, 0
	STS 	MYTEMP, R16
	RJMP 	AGAIN
OVER:
	LDI 	R16, 0x01
	STS 	MYTEMP, R16
	RJMP	AGAIN