LCD not working with 18F4550

[Demon]

Hi all,

I started playing around with the 18F4550, read all the threads I could find on USB, triple-checked the configs, made sure DEFINES were in caps, but now I'm stumped on the most basic operation.

- 18F4550 with 20MHz crystal
- Lab X1 experimental board powered by wall adapter
- PBP 2.60C
- MicroCode Studio Plus v2.2.1.1
- MPLAB MPASM

ASM ; 18F4550, 20mhz crystal
__CONFIG _CONFIG1L, _PLLDIV_5_1L & _CPUDIV_OSC1_PLL2_1L & _USBDIV_2_1L
__CONFIG _CONFIG1H, _FOSC_HSPLL_HS_1H
__CONFIG _CONFIG2L, _PWRT_OFF_2L & _BOR_ON_2L & _VREGEN_ON_2L
__CONFIG _CONFIG2H, _WDT_OFF_2H
__CONFIG _CONFIG3H, _CCP2MX_OFF_3H & _PBADEN_OFF_3H & _LPT1OSC_OFF_3H & _MCLRE_ON_3H
__CONFIG _CONFIG4L, _STVREN_OFF_4L & _LVP_OFF_4L & _ICPRT_OFF_4L & _XINST_OFF_4L
ENDASM
DEFINE OSC 48
DEFINE LCD_DREG PORTD
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTE
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTE
DEFINE LCD_EBIT 1
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
DEFINE LCD_COMMANDUS 2000
DEFINE LCD_DATAUS 50

TRISD = 0
TRISE = 0

PAUSE 1000
LCDOUT $FE,1,"LabX1 18F4550"
end

Nothing comes out on the LCD.

The LCD works fine, I used it for the Lab X1 examples I just added in Code Examples. I can get LEDs to blink back and forth, so I know the PIC can be programmed properly, but that's about it.

(gets ready for point-and-laugh session)

Robert

[HenrikOlsson]

Hi Robert,
Analog functions on PortE perhaps?

Also, you say that you have a 20Mhz x-tal but then you DEFINE OSC 48, is that correct? I know the oscillator on the USB devices are a bit different and I'm not saying you've got it wrong but since it doesn't work perhaps it's worth looking into. Do a simple blink-a-led with a PAUSE 500 or whatever and verify that the timing looks OK.

/Henrik.

[spcw1234]

You may need to initialize the display by sending a clear screen command, then pause 500ms or more before trying to write to it. I have had better luck with the displays doing this. Would also be worth checking the heart beat to verify osc settings like Henrik mentioned.

[Demon]

...
Analog functions on PortE perhaps?
...

Hi Henrik,

Tried ADCON1=7 with no success.

...
Also, you say that you have a 20Mhz x-tal but then you DEFINE OSC 48, is that correct? I know the oscillator on the USB devices are a bit different and I'm not saying you've got it wrong but since it doesn't work perhaps it's worth looking into.
...

That's the way Darrel does it in his DT HID260 example.

...
Do a simple blink-a-led with a PAUSE 500 or whatever and verify that the timing looks OK.
...

That was the first thing I did with this chip when I couldn't get the LCD working.

...
The LCD works fine, I used it for the Lab X1 examples I just added in Code Examples. I can get LEDs to blink back and forth, so I know the PIC can be programmed properly, but that's about it.
...

...
You may need to initialize the display by sending a clear screen command, then pause 500ms or more before trying to write to it.
...

Tried, still nothing on LCD.


Current code:

ASM
__CONFIG _CONFIG1L, _PLLDIV_5_1L & _CPUDIV_OSC1_PLL2_1L & _USBDIV_2_1L
__CONFIG _CONFIG1H, _FOSC_HSPLL_HS_1H
__CONFIG _CONFIG2L, _PWRT_OFF_2L & _BOR_ON_2L & _VREGEN_ON_2L
__CONFIG _CONFIG2H, _WDT_OFF_2H
__CONFIG _CONFIG3H, _CCP2MX_OFF_3H & _PBADEN_OFF_3H & _LPT1OSC_OFF_3H & _MCLRE_ON_3H
__CONFIG _CONFIG4L, _STVREN_OFF_4L & _LVP_OFF_4L & _ICPRT_OFF_4L & _XINST_OFF_4L
ENDASM
DEFINE OSC 48
DEFINE LCD_DREG PORTD
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTE
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTE
DEFINE LCD_EBIT 1
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
DEFINE LCD_COMMANDUS 2000
DEFINE LCD_DATAUS 50

ADCON1 = 7
TRISD = 0
TRISE = 0

WSLOOP var byte ' Loop counter

PAUSE 1000
LCDOUT $FE,1
PAUSE 2000
LCDOUT $FE,1,"LabX1 18F4550"

PORTD = %00000001 ' Turn 1st LED on
pause 100 ' Short delay

CYCLE:
for wsloop = 1 to 7 ' Turn on next LED from right to left
PORTD = PORTD << 1
pause 100
next
for wsloop = 1 to 7 ' Turn on next LED from left to right
PORTD = PORTD >> 1
pause 100
next
GOTO CYCLE
END

The LEDs blink back and forth but still no love from the LCD.

[mackrackit]

Tried ADCON1=7 with no success.

Try 15. 7 only takes care of 8-12.

DATA sheets are your friend.
Please read the chips DATA sheet and make it happy

[Demon]

Try 15. 7 only takes care of 8-12.

DATA sheets are your friend.
Please read the chips DATA sheet and make it happy

GAAAAAAAAAAAA!!!!!

That was it! You have no idea how much of that datasheet I went through, but I missed that part about ADCON1 being different. If it's one thing I learned from Steve, it's RTFM.

Thanks!

[selim]

try ADCON1 = %00001111

[selim]

sorry and LCDOUT $fe,$80,"LabX1 18F4550"

[mackrackit]

try ADCON1 = 001111

He did and it fixed it. Did you not see that post?