stamp

hi everyone,

could someone give me a coding to Receive a sms to my GE864 and make this sms as a output from my basic stamp using PBAISE lug plz

thx

hi everyone,

I would like to know how make my GE864 read the SmS messge which i send it to him by other Gsm!!! in stamp mircontroller!!!

lower your expectations!!!

so isn’t impossible??? at lest how you can see the messger from debug termail in basic stamp when you send it from ur phone to the GSM???

Try reading the GE864 documentation, it’s all in there.

i try this coding!!! but it doesn’t work

’ {$STAMP BS2}

’ {$PBASIC 2.5}

’ -----[ I/O Definitions ]-------------------------------------------------

GPRS_RX PIN 0

GPRS_TX PIN 1

Letter VAR Word

Go VAR Word

’ -----[ Constants ]-------------------------------------------------------

GPRS_Baud CON 84

DO

SEROUT GPRS_TX, GPRS_Baud, [“AT+CMGF=1”, CR]

SERIN GPRS_RX, GPRS_Baud, [WAIT(“+CNMI:”), Letter]

IF Letter = Go THEN

HIGH 15

ENDIF

LOOP

“i wanna send Go to make PIN 15 goes high”

can you help me with this???

best wishes

Do you have to do the escape protocol with this modem, that being

let serial port be idle for 1 second or more

send +++ without a CR or LF

wait for modem to respond with OK<cr/lf>

how the cod will be it’s like this ???

’ {$STAMP BS2}

’ {$PBASIC 2.5}

’ -----[ I/O Definitions ]-------------------------------------------------

GPRS_RX PIN 0

GPRS_TX PIN 1

Letter VAR Word

Go VAR Word

’ -----[ Constants ]-------------------------------------------------------

GPRS_Baud CON 84

DO

SEROUT GPRS_TX, GPRS_Baud, [“AT+CMGF=+++”]

PAUSE 2000

SERIN GPRS_RX, GPRS_Baud, [WAIT(“+CNMI:”), Letter]

IF Letter = Go THEN

HIGH 15

ENDIF

LOOP

thx guys i did the sofware and it’s working perfectly loool here the one and how is interesting to make a such system lool this … you can have many system controls in one stamp mircontroll thx to BS2 loooooool… here is the final code…

’ {$STAMP BS2}

’ {$PBASIC 2.5}

A VAR Word

'---------------------[Initializations]-----------------------------------------

HELP:

LOW 3

LOW 4

LOW 2

LOW 1

'================================================= ================================================== ====

'----------------------main routine --------------------------------------------------------------------

'================================================= ================================================== ====

frist:

PAUSE 500

SEROUT 14 ,84, [“AT+CMGD=1,4”,13,10] ’ Delect All messages

SERIN 15, 84 , [WAIT(“OK”)]

MAIN:

PAUSE 500

SEROUT 14 , 84, [“AT+CMGF=1”, 13,10] ’ Text mode

SERIN 15 , 84,3000,MAIN, [WAIT(“OK”)]

SECOND:

PAUSE 500

SEROUT 14,84, [“AT+CNMI=1,2,0,0,0”,13,10] ’ Read all messages

SERIN 15 , 84,3000,SECOND,[WAIT(“OK”) ]

THRID:

DO

SERIN 15 , 84, [WAIT(“>”),A] ’ Wait to recived SMS

IF A = “A” THEN

’ order to be make

HIGH 0

PAUSE 1000

SMS_Prep:

PAUSE 500

SEROUT 14, 84, [“AT+CMGF=1”, CR]

SERIN 15, 84, 3000, SMS_Prep, [WAIT(“OK”)] ’ Text mode

SMS:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS, [WAIT(“>”)]

SMS2:

PAUSE 500

SEROUT 14, 84, [“The Light’s Number 1 is on!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS2, [WAIT(“OK”)]

GOTO THRID

ELSEIF A = “a” THEN

’ order to be make

LOW 0

PAUSE 1000

SMS_Prep1:

PAUSE 500

SEROUT 14, 84, [“AT+CMGF=1”, CR] ’ Text mode

SERIN 15, 84, 3000, SMS_Prep1, [WAIT(“OK”)]

SMS1:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS1, [WAIT(“>”)]

SMS8:

PAUSE 500

SEROUT 14, 84, [“The Light’s Number 1 is off!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS8, [WAIT(“OK”)]

GOTO THRID

ELSEIF A = “B” THEN ’ order to be make

HIGH 1

PAUSE 1000

SMS_Prep2:

PAUSE 500

SEROUT 14, 84, [“AT+CMGF=1”, CR] ’ Text mode

SERIN 15, 84, 3000, SMS_Prep2, [WAIT(“OK”)]

SMS9:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS9, [WAIT(“>”)]

SMS3:

PAUSE 500

SEROUT 14, 84, [“The Light’s Number 2 is on!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS3, [WAIT(“OK”)]

GOTO THRID

ELSEIF A = “b” THEN ’ order to be make

LOW 1

PAUSE 1000

SMS_Prep3:

PAUSE 500

SEROUT 14, 84, [“AT+CMGF=1”, CR] ’ Text mode

SERIN 15, 84, 3000, SMS_Prep3, [WAIT(“OK”)]

SMS10:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS10, [WAIT(“>”)]

SMS4:

PAUSE 500

SEROUT 14, 84, [“The Light’s Number 2 is off!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS4, [WAIT(“OK”)]

GOTO THRID

ELSEIF A = “D” THEN

’ order to be make

HIGH 2

PAUSE 1000

SMS_Prep4:

PAUSE 500

SEROUT 14, 84, [“AT+CMGF=1”, CR] ’ Text mode

SERIN 15, 84, 3000, SMS_Prep4, [WAIT(“OK”)]

SMS11:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS11, [WAIT(“>”)]

SMS5:

PAUSE 500

SEROUT 14, 84, [“The Light’s Number 3 is on!!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS5, [WAIT(“OK”)]

GOTO THRID

ELSEIF A = “d” THEN ’ order to be make

LOW 2

PAUSE 1000

SMS_Prep5:

PAUSE 500

SEROUT 14, 84, [“AT+CMGF=1”, CR] ’ Text mode

SERIN 15, 84, 3000, SMS_Prep5, [WAIT(“OK”)]

SMS12:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS12, [WAIT(“>”)]

SMS6:

PAUSE 500

SEROUT 14, 84, [“The Light’s Number 3 is off!!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS6, [WAIT(“OK”)]

GOTO THRID

ELSEIF A = “C” THEN

’ order to be make

HIGH 3

PAUSE 1000

SMS_Prep6:

PAUSE 500

SEROUT 14, 84, [“AT+CMGF=1”, CR] ’ Text mode

SERIN 15, 84, 3000, SMS_Prep6, [WAIT(“OK”)]

SMS13:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS13, [WAIT(“>”)]

SMS7:

PAUSE 500

SEROUT 14, 84, [“The Light’s Number 4 is on!!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS7, [WAIT(“OK”)]

GOTO THRID

ELSEIF A = “c” THEN ’ order to be make

LOW 3

PAUSE 1000

SMS_Prep7:

PAUSE 500 ’ Text mode

SEROUT 14, 84, [“AT+CMGF=1”, CR]

SERIN 15, 84, 3000, SMS_Prep7, [WAIT(“OK”)]

SMS15:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS15, [WAIT(“>”)]

SMS16:

PAUSE 500

SEROUT 14, 84, [“The Light’s Number 4 is off!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS16, [WAIT(“OK”)]

GOTO THRID

ELSEIF A = “X” THEN

LOW 0

LOW 1

LOW 2

LOW 3

PAUSE 1000

SMS_Prep8:

PAUSE 500 ’ Text mode

SEROUT 14, 84, [“AT+CMGF=1”, CR]

SERIN 15, 84, 3000, SMS_Prep8, [WAIT(“OK”)]

SMS18:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS18, [WAIT(“>”)]

SMS17:

PAUSE 500

SEROUT 14, 84, [“ALL lights are off!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS17, [WAIT(“OK”)]

GOTO THRID

ELSEIF A = “x” THEN

HIGH 0

HIGH 1

HIGH 2

HIGH 3

PAUSE 1000

SMS_Prep9:

PAUSE 500 ’ Text mode

SEROUT 14, 84, [“AT+CMGF=1”, CR]

SERIN 15, 84, 3000, SMS_Prep9, [WAIT(“OK”)]

SMS19:

PAUSE 500

SEROUT 14,84, [“AT+CMGS=”, $22, “33008808”, $22, CR] ’ Send to this phone number

SERIN 15, 84, 3000, SMS19, [WAIT(“>”)]

SMS20:

PAUSE 500

SEROUT 14, 84, [“ALL lights are on!”, $1A] ’ Data to be send

SERIN 15, 84, 5000, SMS20, [WAIT(“OK”)]

GOTO THRID

ENDIF

LOOP