try this one

TRISB=0
PORTB.1=0

Pause 1000 'Wait 1 second for LCD to initialize
start:
Serout Portb.1, 1, [254,1] 'Clear screen
Pause 40
Serout Portb.1, 1, ["Hello World"] 'Print Message
Pause 400
GoTo start
End