GSM based design using Olimex PIC -P40 board

Status
Not open for further replies.

tommyghana

Newbie level 1
Joined
Mar 22, 2013
Messages
1
Helped
0
Reputation
0
Reaction score
0
Trophy points
1,281
Visit site
Activity points
1,294
High Guys.
Iam trying to design a GSM based system using the Olimex PIC-P40 (16f877 )
development board with 20Mhz oscillator.
https://www.olimex.com/Products/PIC/Proto/PIC-P40-20MHz/
for schematic
https://www.olimex.com/Products/PIC/Proto/PIC-P40-20MHz/resources/PIC-P40-sch.gif

I have connected it to wavecom fastrack modem but i don't get any response.
code is as follows. Any help please. My connections are:

Rx microcontroller ---Pin(12) max232(13)pin---Tx modem--pin3 of DB9 of Olimex board

Tx microcontroller --Pin(11) max232(14)pin-Rx modem--pin8 of DB9 of Olimex board


My code is:
'Definitions
DEFINE OSC 20
DEFINE HSER_TXSTA 20h
DEFINE HSER_RCSTA 90h
DEFINE HSER_BAUD 9600
DEFINE HSER_SPBRG 25

INCLUDE "modedefs.bas"

'Send SMS Test-Message
sms:
HSEROUT ["atd[+233244228546];",13]
HSERIN 5000, SMS, [WAIT("OK")]'Check OK reply, wait 5sec max.
HSerout ["AT",13,10]
HSerout ["AT",13,10]
HSERIN 5000, SMS,[WAIT("OK")] ' wait for response ok for 5 seconds
HSerout ["AT+CMGF=1",13,10] 'Set Text Mode
HSERIN 5000, SMS,[WAIT("OK")] ' wait for response ok for 5 seconds
HSerout ["AT+CMGS=",34,"+233244228546",34,",129",13,10]
HSERIN 5000 , SMS, [WAIT(">")]
HSerout ["Test-Message",10,13]
HSerout [26]
Pause 500
End
Thx
 

Status
Not open for further replies.

Similar threads

Cookies are required to use this site. You must accept them to continue using the site. Learn more…