Estiamdos, soy nuevo en el foro y como usuario de PIC"s.
Tratando de iniciarme en esto he decidico hacer pruebas con señales analógicas.
Para ello intento hacer un voltímetro con un PIC 16f876 y un LCD 2x16.
Tomando como ejemplo algunas cosa leídas elprograma sería...
Define LOADER_USED 1
Define ADC_BITS 8
Define ADC_CLOCK 3
Define ADC_SAMPLEUS 50
Define LCD_DREG PORTB
Define LCD_DBIT 4
Define LCD_RSREG PORTB
Define LCD_RSBIT 3
Define LCD_EREG PORTB
Define LCD_EBIT 0
Define LCD_BITS 4
Define LCD_LINES 2
Define LCD_COMMANDUS 2000
Define LCD_DATAUS 50
adval var word
portb = $00
trisB = %00000000
trisA = %11111111
adcon1 = %00000010
Start:
adcin 2, adval
lcdout $fe,1, #(adval * (19576/100))
lcdout $fe, 2
goto Start
Utilizando el Simulador PROTEUS veo que la lectura es "parecida" a lo que yo quiero, ya que la cifra que se ve es entera, es decir que para 14.05Volts se visualiza 1405Volts y así sucesivamente.
Cómo sería la rutina para poder incluir el "." y separa los enteros de los decimales?.
El valor "19576" está para "convertir" la lectura hexa en decimal. No sé si está bien.
Además hay otro inconveniente, el PIC y el Xtal están seteados a 1MHz y la lectura es parpadeante, si la pongo a 4MHz... no se ve NADA!?
Desde ya agradezco vuestra ayuda.
Atte.
Gustavo.
Argentina.
