For one thing, the PBP manual doesn't say it specifically, but LCDDATA_US is a byte value. 1200 would actually be 176.
Have you got a pullup on A.4?
Try this then:
Code:
DEFINE LCD_DREG PORTA 'Define PIC port used for LCD Data lines
DEFINE LCD_DBIT 0 'Define first pin of portb connected to LCD DB4POTSETTTT
DEFINE LCD_RSREG PORTA 'Define PIC port used for RS line of LCD
DEFINE LCD_RSBIT 4 'Define Portb pin used for RS connection
DEFINE LCD_EREG PORTB 'Define PIC port used for E line of LCD
DEFINE LCD_EBIT 3 'Define PortB pin used for E connection
DEFINE LCD_BITS 4 'Define the 4 bit communication mode to LCD
DEFINE LCD_LINES 2 'Define using a 2 line LCDRefTime
DEFINE LCD_COMMANDUS 5000 'Define delay time between sending LCD commands
DEFINE LCD_DATAUS 200 'Define delay time between data sent.
i var word : trisb.7 = 0 : portb.7 = 1
pause 1000 : lcdout $fe , 1 : pause 1000
for i = "a" to "z" : lcdout $fe,$80,i,i+1,i+2,i+3,i+4,i+5,i+6,i+7
pause 500 :next i
END
Bookmarks