LIST P=16F877
#INCLUDE "P16F877.INC"
__CONFIG _XT_OSC&_CP_OFF&_WDT_OFF&_LVP_OFF



;
POSI	equ	020h	;position register
SPOS	equ	021h	;save of the position sensor signals

	org		00h

conf


	banksel TRISB		;Selects bank containing register
	clrf    TRISB           
	banksel PORTB   

  
start	
	clrw
	banksel PORTD
	movf	PORTD,W
	movwf	POSI		;acquisition of the sensor's signals
;
	movf	POSI,W
	movwf	SPOS
	rrf		SPOS,f
	bcf		SPOS,7
	
	goto	start
;
	end