;spi_read:
movfw SSPBUF; para borrar bit BF.-
movfw a ; En este caso el parametro es nulo (spi_read...)
movwf SSPBUF;
btfss ...,BF ; se testea bit BF.-
goto $-1
return SSPBUF; se retorna el valor cargado externamente en el registro.
; spi_write:
movfw SSPBUF; para borrar bit BF.-
movfw a ; A vale 0xFF
movwf SSPBUF;
btfss ...,BF ; se testea bit BF.-
goto $-1
//return SSPBUF; Puede no retornar ningun valor.