Hi,
Its supposed to send:
at+cpms="SM" 'and get:
+CPMS: 1,15,1,15,1,15
OK
then its supposed to send:
AT+CMGR=1 ' and get:
+CMGR: 1,,23
0791539126010000240C915391663921010000807070819341 400453FA1B0E
OK
By put the code like this
.................................................
LOOP:
HSEROUT["at+cpms=",34,"SM",34,13]
HSERIN 2000,IP,[WAIT("OK")]
IP:
HSEROUT["AT+CMGR=1",13,10]
HSERIN 2000,LI,[WAIT("OK")]
LI:
HSERIN 2000,POR,[WAIT("OK"),STR myarray\62]
POR:
if myarray[0]="0"then
'pdu sms in the phone 0791539126010000240C915391663921010000807070819341 400453FA1B0E
goto success
endif
goto LOOP
success:
High PortD.2
End
.......................
Its give on hterminal the good info
at+cpms="SM"
+CPMS: 1,15,1,15,1,15
OK
AT+CMGR=1
+CMGR: 1,,23
0791539126010000240C915391663921010000807070819341 400453FA1B0E
OK
But still cand find the myarray[0]="0" to high the led
So, you send:
at+cpms="SM"
HSEROUT["at+cpms=",34,"SM",34,13]
Then the phone sends:
+CPMS: 1,15,1,15,1,15
OK
HSERIN 2000,IP,[WAIT("OK")]
(But all you're checking for is the OK, not the rest of the items. How do you know the items are actually there?)
Then you send:
AT+CMGR=1
HSEROUT["AT+CMGR=1",13,10]
And the phone sends:
+CMGR: 1,,23
HSERIN 2000,LI,[WAIT("OK")]
(Where's the OK?)
0791539126010000240C915391663921010000807070819341 400453FA1B0E
OK
HSERIN 2000,POR,[WAIT("OK"),STR myarray\62]
(Where's the OK that the line is supposed to start off with? I see it at the end, not at the beginning.)
It looks to me like you need to rethink your code...a bunch. The order in which you are sending and receiving items to and from the phone doesn't match up with the order in which the phone is actually going to receive and send those items, at least not the way you've written your program.
Hi,
The HSEROUT["at+cpms=",34,"SM",34,13] is to change the momory of the cell phone and phone send back comfirmaction on the change +CPMS: 1,15,1,15,1,15
OK
The HSERIN 2000,IP,[WAIT("OK")] is to for the above ok and then goto next step
The IP: HSEROUT["AT+CMGR=1",13,10] is the next step and reads the pdu sms phone send back the comfirmaction AT+CMGR=1
+CMGR: 1,,23
0791539126010000240C915391663921010000807070819341 400453FA1B0E (my message)
OK (the ok by the phone)
HSERIN 2000,LI,[WAIT("OK")] whaits for the above ok and goto
LI:
HSERIN 2000,POR,[WAIT("OK"),STR myarray\62]
here i have some ??? because i dont have a ok input from the cell phone
Then if myrray zero posiction are zero like its in pda array next goto so sucess if not goto lop
POR:
if myarray[0]="0"then
'pdu sms in the phone 0791539126010000240C915391663921010000807070819341 400453FA1B0E
goto success
endif
goto LOOP
success:
High PortD.2
End
Last edited by camolas; - 10th July 2008 at 16:05.
And you've just answered your own question and/or fixed your own...if you knew where to look for it...or if you could see the forest through the trees.
Where are you filling myvar and where are you getting the last OK? And when are you going to reorder your code to match what you want?
Hi,
The HSEROUT["at+cpms=",34,"SM",34,13] is to change the momory of the cell phone and phone send back comfirmaction on the change +CPMS: 1,15,1,15,1,15
OK
The HSERIN 2000,IP,[WAIT("OK")] is to for the above ok and then goto next step
The IP: HSEROUT["AT+CMGR=1",13,10] is the next step and reads the pdu sms phone send back the comfirmaction AT+CMGR=1
+CMGR: 1,,23
0791539126010000240C915391663921010000807070819341 400453FA1B0E (my message)
OK (the ok by the phone)
HSERIN 2000,LI,[WAIT("OK")] whaits for the above ok and goto
LI:
HSERIN 2000,POR,[WAIT("OK"),STR myarray\62]
here i have some ??? because i dont have a ok input from the cell phone
Then if myrray zero posiction are zero like its in pda array next goto so sucess if not goto lop
POR:
if myarray[0]="0"then
'pdu sms in the phone 0791539126010000240C915391663921010000807070819341 400453FA1B0E
goto success
endif
goto LOOP
success:
High PortD.2
End
Anything yet? Do you understand the format of the HSERIN command? The time-out, the WAIT, the rest?
Bookmarks