Hola he puesto los registros tal como comentas, pero sigue sin funcionar.
Lo de la velocidad ponia esa por ser la mas lenta para descartar problemas, pero ya he puesto 9600, no quiero usar voltaje de referencia como bien dices, y quiero usar oscilador interno a 8mhz, en realidad la velocidad me da igual, pero quiero usar el oscilador interno.
He estado mirando lo del usart en el datasheet, pero no se como se usa en pbp, estoy mirando el ejemplo del pbp y voy a probar a ver si me aclaro.
-----------------------------------------------------------------------------------
define osc 8
include "modedefs.bas"
'Define ADCIN parameters
Define ADC_BITS 10 ' Set number of bits in result
Define ADC_CLOCK 3 ' Set clock source (3=rc)
Define ADC_SAMPLEUS 50 ' Set sampling time in uS
TRISA=1 ' Puerto a como entradas
ADCON2.7=1
ADCON1=0
ADCON0.0=1
canal1 var word
canal1high var word
canal1low var word
canal2 var word
canal2high var word
canal2low var word
loop:
adcin 0,canal1
adcin 1,canal2
pause 300
canal1high= canal1.highbyte
canal1low= canal1.lowbyte
canal2high = canal2.highbyte
canal2low = canal2.lowbyte
serout2 portb.1,9600,["X",dec canal1high,dec canal1low]
pause 400
serout2 portb.1,9600,["Y",dec canal2high,dec canal2low]
pause 400
goto loop
------------------------------------------------------------------------------------------------