Pues eso mismo al no ser que este asiendo una burrada les cuento
Estoy o mas bien intento realizar un termómetro digital para lo cual utilizo el
Mcp9701 de microchip el cual en la hoja de datos me indica que tiene una resolución de
19.5mv/c lo cual me ase pensar que no requiero ningún tipo de conversión para obtener los grados centígrados tal ves sea aquí donde este mi error porque de lo contrario ya estoy en los infiernos
Haber si tengo un voltaje de referencia de 5 volt y estoy utilizando una resolución en el conversor a/d de 8 bits entonces tengo 5/256=.0195=19.5mv cada paso es exactamente igual ala resolución por grado del mcp9701 lo cual entiendo que si la conversión del a/d me entrega 49 la temperatura es igual a 49 grados (O ESTOY EQUIBOCADA) lo cual
Me paréese una barbaridad como es posible estar casi a 50c
Midiendo la salida del mcp9701 con el multimetro me entrega .930vcc lo cual dividiendo .930/.0195=47.62 grados
Así que mi pregunta es de verdad me estoy quemando (mis cálculos son correctos) o
Estoy escribiendo puras estupideces
Anexo el programa para que lo chequen como siempre a agradezco la ayuda que tengan a bien brindarme
Device 16F876A
XTAL=4
'****** configuracion puerto serie fisico *****
HSERIAL_BAUD=2400
HSERIAL_RCSTA=%10010000
HSERIAL_TXSTA=%00100000
HSERIAL_CLEAR=On
'****** configuracion puerto analogico/digital ***
Declare ADIN_RES 8
Declare ADIN_TAD frc
Declare adin_delay 50
TRISA=%00000001
ADCON1=%00000000
Dim samples As Word
Dim sample As Byte
Dim temp As Byte
samples=0
While 1=1
High PORTC.0
For sample=1 To 20
temp=ADIn 0
samples=samples+temp
DelayMS 250
Next sample
temp=samples/20
HRSOut "temperatura=",Dec temp,"C" ,10,13
samples=0
Low PORTC.0
DelayMS 1000
Wend
l