Problem displaying data from GPS module & using 16f877a

[financecatalyst]

Thanks for the info. I added the statement:
baud1 con 16572
and changed the following statement:
serin2 portc.4,baud1,[WAIT("$GPRMC"),STR sms\35]

Still no luck. Please help.

[aratti]

serin2 portc.4,baud1,[WAIT("$GPRMC"),STR sms\35]

Which is the value of baud1?

When you use wait string, remember that they are case sensitive "$GPRMC" is different from "$gprmc"

I already suggested you, in another thread, to use a timeout sequence. Your serin2 instruction will wait for the identifier and then it will wait for a string of 35 characters. If your GPRS will send only 34, serin2 will remain there waiting forever.

One turn around is the use of the timeout:

GPRSLoop:
sms[0]=0
serin2 portc.4,baud1,500,GPRSTest,[WAIT("$GPRMC"),STR sms\35]
GPRSTest:
If sms[0]<>0 then goto label ??     ' here you check byte[0] for data presence 
goto GPRSLoop

Al.

[mackrackit]

Thanks for the info. I added the statement:
baud1 con 16572
and changed the following statement:
serin2 portc.4,baud1,[WAIT("$GPRMC"),STR sms\35]

Still no luck. Please help.

If a RS232 chip was needed to talk to a PC then baud1 should be 188.

[financecatalyst]

Thanks guys. It´s up and running now. Love this Forum

[mackrackit]

Thanks guys. It´s up and running now. Love this Forum

In case someone else has a similar problem... What was the fix?

[financecatalyst]

In case someone else has a similar problem... What was the fix?

The array was too small to hold the sequence of characters and code was kinda stuck there. I changed it to the following :

Baud con 188
sms var byte[65]
start:
serin2 portc.4,baud,500,start,[WAIT("$GPRMC"),STR sms\65\13] ' added 13 as well
If sms[0]<>0 then goto display
goto start

These are the only corrections I have done and it fired up.

[sradayda]

Could u please provide the full program ?