Processor		16f84a
		radix			dec
		__config		_xt_osc & _wdt_off & _pwrte_on & _cp_off
		include			"p16f84a.inc"
;-----------------------------------------------------------------------------------------
		cblock			H'0c'
					loop
		endc
;-----------------------------------------------------------------------------------------
		org			0
		goto			main	
		org			4
;-----------------------------------------------------------------------------------------
main		bsf			status,rp0
		movlw			B'11111111'
		movwf			trisa
		movlw			B'00000000'
		movwf			trisb
		bcf			status,rp0
find		movlw			B'00000001'
		movwf			loop
		xorwf			porta,w
		btfsc			status,z
		bsf			portb,0
		movlw			B'00011000'
		movwf			portb
end