Hi Guys,
here is my first test, unfortunatly no success.
I tried several changes in the code but always something went wrong.
This is the code:
;Device 16F84A
DEFINE OSC 4

CALLER VAR BYTE[13]
BAUD VAR BYTE
LED VAR PORTB.2 ' Assign PortB.2 for Status LED
TX VAR PORTB.1 ' TX to Phone
RX VAR PORTA.0 ' RX from Phone

BAUD = 32 ' 19200,8,N,1(True,driven)

Start:

SerOut2 TX, BAUD,["AT",13]
Pause 500
SerOut2 TX, BAUD, ["AT+CMGF=1",13] ' Use TXT Mode
Pause 1000 ' Pause for 1 second
SerOut2 TX, BAUD,["AT+CMGL",13,10]
Pause 5000 ' Pause for 1 second
SerIn2 RX, BAUD,[wait("REC READ"),skip 3,STR CALLER\13]
Pause 1000
High LED ' Turn ON Status LED
SerOut2 TX, BAUD, ["Result: ",STR CALLER,13,10]
Pause 2000
Low LED
End

This is what I get on hyperterm monitor:

AT
OK
AT+CMGF=1
OK
AT+CMGL

+CMGL: 1,"REC READ","44544",,"05/05/31,16:58:21+08"
Super! Viel Gluck in der Verlosung! - Bonne chance au tirage au sort! - Buona fortuna per l'estrazione! Swisscom Mobile

OK

I think that after the "OK" the pic should send out:
Result: 44544
Maybe also some other characters, Caller var byte has 13 byte
In any case there is a record that matched and I believe I should
see something
Led does not also go on.
What am I doing wrong ?

Thanks

Lotondo