BCF  TRISB,0
	BCF  TRISB,1
	BCF  TRISB,2
	BSF  TRISD,7
	BSF  PORTB,0		
CHK	BTFSS PORTD,7
	BRA 	CWISE
	BCF  PORTB,1		
	BSF  PORTB,2
	BRA  CHK
CWISE	BSF  PORTB,1
	BCF  PORTB,2		
	BRA  CHK