Autor Tema: Problema con LCD!!!  (Leído 2261 veces)

0 Usuarios y 2 Visitantes están viendo este tema.

Desconectado Mecatronico_MG

  • PIC10
  • *
  • Mensajes: 20
Problema con LCD!!!
« en: 29 de Julio de 2012, 22:58:36 »
Hola amigos, estoy haciendo un proyecto, el cual consiste en enviar datos al pic 16F628A mediante comunicacion serial a traves de una interfaz en microsoft visual (he pensado en hacerla en matlab tambien, una vez que termine el proyecto), y quiero que lo que escriba en la interfaz vaya apareciendo en un LCD de 16x2. Mi problema es que cuando almaceno la cadena de datos que le llegan al pic por medio de la com. serial y uso el comando LCDOUT, en la pantalla del LCD no se muestra nada  :(

Aqui pongo el codigo:

Código: [Seleccionar]
@ DEVICE PIC16F628A
@ DEVICE PROTECT_OFF
@ DEVICE CPD_OFF
@ DEVICE WDT_OFF
@ DEVICE BOD_OFF
@ DEVICE PWRT_OFF
@ DEVICE MCLR_OFF
@ DEVICE LVP_OFF
@ DEVICE HS_OSC

INCLUDE "modedefs.bas"
DEFINE OSC 20

'Setea el port de datos LCD
DEFINE LCD_DREG PORTA
'Setea el bit de comienzo de datos (0 o 4) si el bus es de 4-bit
DEFINE LCD_DBIT 0
'Setea el port LCD Register Select
DEFINE LCD_RSREG PORTB
'Setea el bit LCD Register Select
DEFINE LCD_RSBIT 0
'Setea el port LCD Enable
DEFINE LCD_EREG PORTA
'Setea el bit LCD Enable
DEFINE LCD_EBIT 4
'Setea el tamaño del bus LCD (4 o 8 bits)
DEFINE LCD_BITS 4
'Setea el numero de lineas en el LCD
DEFINE LCD_LINES 2

TRISA=%11100000
TRISB.1=1
CMCON=7

LED VAR PORTB.4
TX VAR PORTB.2
RX VAR PORTB.1

TAMANO VAR BYTE
CADENA1 VAR BYTE

'Esta variable SMS es para comprobar si se puede emplear
'el formato ==> "LCDOUT $FE, 2, VARIABLE"
SMS VAR BYTE[4]
SMS[1]="H"
SMS[2]="O"
SMS[3]="L"
SMS[4]="A"

INICIO:

TOGGLE LED
SEROUT2 TX,84,["@"]
SERIN2 RX,84,[WAIT("@"), DEC3 CADENA1]
SEROUT2 TX,84,["#"]

LCDOUT $FE, 1 ' Limpiar LCD
PAUSE 100     
LCDOUT $FE, 2, SMS[1]
pause 2000
GOTO INICIO

Por favor, si alguien sabe solucionar el problema para poder mostrar los datos en el LCD o ha hecho el mismo proyecto, le estare muy agredecido si me puede ayudar.
Martin.

Desconectado Mecatronico_MG

  • PIC10
  • *
  • Mensajes: 20
Re: Problema con LCD!!!
« Respuesta #1 en: 31 de Julio de 2012, 00:55:08 »
Por si a alguien le interesa, solucione el problema empleando:

LCDOUT SMS[1]

Ya no usar LCDOUT $FE,2, ...  :-)
Martin.