LCDout Command w/ LCD 4x40 display

[mister_e]

DEFINE OSC 10
DEFINE LCD_DREG PORTB
DEFINE LCD_BIT 0
DEFINE LCD_RSREG PORTD
DEFINE LCD_RSBIT 7
DEFINE LCD_EREG PORTD
DEFINE LCD_BITS 8
DEFINE LCD_LINES 4
DEFINE LCD_EBIT 6

dsp var portd.5
FLAGS = 0

START:

dsp = 0
LCDOUT $FE,1 :PAUSE 500 : LCDOUT "SYSTEM 1" 'lcd upper

dsp = 1
LCDOUT $FE,1 :PAUSE 500 : LCDOUT "TWO SYSTEM" ' bottom lcd

goto start

by this code, you're saying that you using the full 8bit for data... right???
1. Be sure you don't revert D0 to D7.
2. IMO you must define a LCD_LINES 2. This is why you have 2 enable lines... BUT I'M REALLY NOT SURE... i just see it's a 4X40 LCD...
3. What about if you play with the voltage on Vo pin??? Is at least you see some black square???
4. AND you didn't set direction of your dsp PIN... TRISD.5=0
5. You may need a startup delay (about .5 to 2 sec) at the begining.
6. Maybe DEFINE LCD_DATAUS and DEFINE LCD_COMMANDUS defines may do something.