i'm going to connect between 16f877 and GPS EB-85A....
could someone help me...
i can't run this program...

'DEFINE HSER_RCSTA 90H
'DEFINE HSER_TXSTA 20H
'DEFINE HSER_BAUD 9600
'DEFINE HSER_SPBRG 25
DEFINE OSC 20
include"modedefs.bas"

pcout var portc.6 'Output to pc
pcin var portc.7 'Input from pc
gpsin var portb.2 'input from gps
gpsout var portb.1 'output to gps

gps_dat var byte
a var byte

for a = 0 to 41 step 1
lookup a,["$PMTK314,1,1,1,1,1,5,1,1,1,1,1,1,0,1,1,1,1"],gps_dat
SEROUT gpsout,T9600,[gps_dat] 'send pmtk to gps">command tok baudrate gps'

next a
pause 100

main:
serin gpsin,T9600,100,cont,[gps_dat]
cont:

SEROUT pcout,T9600,[gps_dat] 'send nmea to pc
'serout pcout,T9600,["rt",13]
goto main
end


any idea please....