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