looping sms operator

MODE_STANBY:



MOV DPTR,#PESAN ;KIRIM PERINTAH ‘AT+CNMI=1,1′

LAGI2:

CLR A ;RESET ACC

MOVC A,@A+DPTR ;AMBIL KARAKTER DARI TABEL

CLR TI ;AKTIVASI KIRIM SERIAL

MOV SBUF,A ;KELUARKAN DATA DARI ACC KE BUFFER

JNB TI,$ ;KIRIM SERIAL

INC DPTR ;NAIKKAN PENUNJUK TABEL

CJNE A,#00,LAGI2 ;TUNGGU SEMUA KARAKTER SELESAI


RET

;—————————————


PESAN:

DB ‘AT+CNMI=1,1′,13,10

DB 0

Jika ada SMS yang masuk, maka sistem akan membaca isi SMS dengan memberikan perintah AT+CMGR=1. Potongan program berikut digunakan untuk membaca isi SMS pada alamat 1.

;——————–

;SUB RUTIN BACA SMS

;——————–

BACA_SMS:

MOV DPTR,#SMSREAD ;BACA SMS

ACALL KIRIM_DATA ;KIRIM PERINTAH ‘AT+CMGR=1′

RET


Isi sms akan diproses apakah sesuai dengan kata kunci atau tidak, jika sesuai dengan kata kunci maka perintah akan dieksekusi. Jika terjadi error maka sistem akan memberikan SMS balasan ke user.

http://4aa.blogspot.com/2010_02_01_archive.html