18f4520 lcd problem

[merlinknight]

Hello, i am a newbie on this and was working on the 18f452. It was going great. I installed an 18f4520 to replace the 18f452 and now the lcd does not work.
Any help would greatly be appreciated. Can't figure out why.
I am not using the pro version . On order.

DEFINE OSC 4


DEFINE LCD_DREG PORTD
DEFINE LCD_DBIT 0
DEFINE LCD_RSREG PORTA
DEFINE LCD_RSBIT 3
DEFINE LCD_EREG PORTA
DEFINE LCD_EBIT 1
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
DEFINE LCD_RWREG PORTA
DEFINE LCD_RWBIT 2

ADCON1=$07
TRISA = $00
TRISD = $00
PORTA.2 = 0
PAUSE 500

LOOP:
LCDOUT $FE, 1
PAUSE 1000
LCDOUT $FE, $0F
PAUSE 1000
LCDOUT $FE, $80,"Hello "
PAUSE 5000
LCDOUT $fe, $c0,""
PAUSE 5000

GOTO LOOP