this will help , but maybe the serial data will need to be inverted
the pic chip expects the data line to idle " high"

Code:
mai var byte[16]
Lcdout $fe, 1
pause 200

main:
hserout ["ATI",13,10]
pauseus 300
HSerin 2000,main,[STR mai\16]  ;>ati ELM327 v1.5

pause 2000
Lcdout $fe, 1
lcdout  str mai\16