Hola:
amigo juanez con este pequeño ejemplo que probe espero haverte atudado
el PIC esta para trabajar con un cristal a 4Mhz..
'pin-pic*******pin-lcd
' RB0 D4
' Rb1 D5
' RB2 D6
' RB3 D7
' RB4 E
' RB5 RS
' RB6 RW
DEFINE LCD_DREG PORTB
DEFINE LCD_DBIT 0
DEFINE LCD_RSREG PORTB
DEFINE LCD_RSBIT 5
DEFINE LCD_EREG PORTB
DEFINE LCD_EBIT 4
DEFINE LCD_LINES 4
trisb.6=0
Mensaje:
Lcdout $fe, 2, " Amigo Juenez"
Lcdout $fe, $c0, " Espero Ayudarte"
pause 10