How to decode an SMS which looks like this ...

[financecatalyst]

Hi
I am trying to decode an sms like this:
serout2 tx,baud,["AT^SMGR=1",13]
Serin2 rx,baud,5000,main,[WAIT("REC UNREAD"),SKIP 3, STR num\12, skip 28, STR sms\8]

To send an sms I use:
serout2 tx,baud,["AT+CMGS=",34,"+44xxxxxxxxxx",34,13] ' It works fine when I put an predefined number
Serin2 rx,baud,5000,check,[WAIT(">")] ' then sms and enter

Problem:
I want to send an text to the number from which an sms came, So I tried the above command in the following ways:
serout2 tx,baud,["AT+CMGS=",34,STR num\12,34,13]
serout2 tx,baud,["AT+CMGS=",34,STR num,34,13]

It is not working. Can anyone correct me if I am wrong or advise me an alternative Please.
Thanks