Buscador
YoReparo.com La Web 
www.YoReparo.com

Regístrate gratis para participar de los foros, o si ya estás registrado haz login.

Visualizacion en LCD de 16x2

comentario del autor Vie Abr 11, 2008 3:33 pm
   
Buen dia colegas, tengo la siguiente inquitud; resulta q quiero visualizar un dato alfanumerico en un LCD de 16x2 pero q el dato se vea en toda la pantalla o mejor dicho q se visulice del tamaño de las dos filas por ej tengo un prog para visualizar en PBP una temperatura o termometro q llaman tonces si la temperatura q esta marcando es de 25ºC q esto se visualice en de la altura de ambas filas, el prog q tengo es el siguiente, que le le debo agrgar para q se visualice de este modo el dato

;****************************************************************************************************************************************************************
DEFINE OSC 4; el oscilador es de 4 MHZ
TRISA=%011000; el puerto A se declara como salida
TRISC=%000000; todos los pines del puerto C son salida
CMCON=$07; deshabilito el modulo comparador
ANSEL=%00001000; deshabilito el modulo A/D
define ADC_BITS 8
DEFINE ADC_CLOCK 3
DEFINE ADC_SAMPLEUS 50
DEFINE LCD_DREG PORTC; las lineas de datos van al puerto C
DEFINE LCD_DBIT 0; los datos se envian empezando desde RC0
DEFINE LCD_RSREG PORTA; RS se va a conectar en el puerto A
DEFINE LCD_RSBIT 0; RS se conecto en RA0 (portA.0)
DEFINE LCD_EREG PORTA; E se va a conectar en el puerto A
DEFINE LCD_EBIT 1; E se conecto en RA1
DEFINE LCD_BITS 4; se utilizara un bus de 4 lineas
DEFINE LCD_LINES 2; es un LCD de 2 renglones
DEFINE LCD_COMMANDUS 2000; delay de comandos
DEFINE LCD_DATAUS 50; delay de datos

A VAR WORD ; codigo
;clear
RUTINA: ; Rutina llamada segundos
ADCIN 3,A
LCDOUT $FE, 1 ; borro y pongo en la primera linea
LCDOUT "TEMPERATURA ES:"
LCDOUT $FE,$C0 ; me ubico en la segunda linea y saco el valor de temperatura en decimal
LCDOUT DEC A , " ºC"
PAUSE 1000
GOTO RUTINA
END
;****************************************************************************************************************************************************************


Gracias por la atencion prestada

Att: Juan Pablo Espianal Ruiz

j10per

Reputación



Hacer una pregunta

Reglamento / P+F

Foros

Miembros / Expertos