Por favor AYUDA con lcd

[Jmedina]

Saludos amigos

Estoy intentando poner a funcionar un lcd pero no he podido, ya he probado todo, el programa funciona perfectamente en la simulacion con proteus pero el circuito nada de nada, no se que pueda estar pasando incluso le agregue al programa una rutina para encender un led pues para confirmar que el pic este funconando, y en el circuito solo se enciende y apaga el led pero el lcd solo enciende el backligh ya verifique todas las conexiones al lcd y estan bien, aui les pongo el programa y el circuito es el basico pa hacer la simulacion en proteus, no se como insertar la imagen en el mensaje. Espero me puedan ayudar ya he comprado dos lcd's y lo mismo, Gracias a todos.


'device = 16f84                  ' declaramos pic a usar
'xtal = 4
 
pause 200                       
X VAR BYTE
ABC VAR BYTE
DEFINE LCD_EREG PORTB
DEFINE LCD_EBIT 3
DEFINE LCD_RSREG PORTB
DEFINE LCD_RSBIT 1
LCDOUT $FE,$7
LCDOUT $FE,1
 
 
INI:

LCDOUT $fe,$90                                      
FOR X=0 TO 22
HIGH PORTB.2
PAUSE 100
LOW PORTB.2
PAUSE 300
LOOKUP X,[ "JHON JAIRO MEDINA DAVIS"],ABC
LCDOUT,ABC
PAUSE 400
NEXT
GOTO INI
END

[Nocturno]

¿Ni siquiera ves un pequeño parpadeo negro al iniciar, o cuadros negros de fondo?
Si es así, revisa el potenciómetro de contraste.

[Jmedina]

Hey gracias Nocturno ya encontre el problema ¡¡¡¡¡¡¡¡¡¡Define osc 4 ¡¡¡¡¡¡¡¡¡ No habia definido el cristal
solo era eso ni pensar que compre otro lcd pero bueno todo esto sirve de experiencia je je
Ya los estare molestando en otra ocacion ahora voy a darle duro a los frecuencimetros y sensores de temperatura con lcd's