parsing string from hserin

[xxxxxx]

Good job

Why don't you post your easy solution for anyone else who has similar problems or just to help encourage anyone else who reads this thread and sees how you were able to solve your own problem?

David

ws:
HSEROUT["AT+CMGL",13,10]' filter za query
LCDOUT $FE,1,"wait sms."

HSERIN 5000,ws,[WAIT("REC UNREAD"),skip 27,str TIME\6,skip 8,STR PORUKA\5\13]

pause 2000
I=0

gr[1]="U"
gr[2]="G"

istaporuka=1
FOR I=0 to 1
if gr[i+1]<>poruka[i+1] then istaporuka=0

next i

if istaporuka=1 then gosub s1

J=0

gr[1]="I"
gr[2]="G"

istaporuka1=1
FOR J=0 to 1
if poruka[J+1]<>gr[J+1] then istaporuka1=0
next J

if istaporuka1=1 then gosub s2


--
www.mtskola.com