What you know about your LCD ? Baudrate, command... tell us the exact things you have on hand.

I'll consider that your serial LCD is a 2400 baud, drive true, and accept common command.

Serpin VAR PORTB.0
TRISB.0=0
Serpin=0
pause 1000 'waiting for lcd startup

Serout serpin,0,[$fe,1,"hello",13,10]
here : goto here