LREG EQU 0x20
GREG EQU 0x21
	SETF	  TRISD		
	MOVLW	  D'75'		
	CPFSGT  PORTD		
	BRA	  LEQ
	MOVFF	  PORTD, GREG
	BRA	  OVER
LEQ	CPFSLT  PORTD		
	BRA 	  OVER
	MOVFF	  PORTD, LREG	
OVER	.....