Despues de probar y seguir investigando un poco presento el codigo PBP para poder visualizar la tension analogica en el lcd con dos decimales, que simulado con el proteus me da un resultado satisfactorio
Para todos aquellos que no se animan a encarar algun proyecto pues animensen que usando unas pocas neuranas las cosas se van solucionando
aqui va:
' Programa en pic Basic para visualizar el resultado de la conversion de un
' data analogico en un display lcd 2 x1 6
'
' entrada usada es la RA0
' asignacion de los pines del micro al lcd
Define LCD_DREG PORTB
Define LCD_DBIT 4
Define LCD_RSREG PORTB
Define LCD_RSBIT 0
Define LCD_EREG PORTB
Define LCD_EBIT 1
valan var byte 'Valor analogico
entero VAR byte 'Parte entera
resto var byte 'Resto de la division
decimal var byte 'Parte decimal
TRISA = %11111111 'asignar como entradas todos los pines del puerto A
ADCON1 = %00000100 'asignar el puerto RA0 como entrada analogica
ADCON0 = %11000001 'signar el oscilador interno para la conversion, el
'puerto RA0 asi como
'la activacion del conversor A/D
loop: ADCON0.2 = 1 'Comienzo de la conversion A/D
espera: pause 5
if ADCON0.2 = 1 Then espera 'mientras la conversion no termina queda en espera
valan = ADRES 'cuando la conversion termina
entero = (valan*5) /255 'considerando que la alimentacion es de 5V y el A/D tiene una definicion de 8 bits
resto = (valan*5)-(255*entero)
decimal = ((resto*100)) / 255
Lcdout $fe, 1 'borra la pantalla del lcd
Lcdout "VALOR: ", dec entero,".", dec decimal 'visualiza el valor decimal en el display
Pause 500 'espera
Goto loop 'empezar de nuevo
End