برنامه ارسال SMS با ماژول SIM900 به زبان بیسیک

در قسمت اول آموزش sim900 با عنوان راه اندازی و ارسال پیامک با ماژول SIM900 در مورد نحوه راه اندازی ماژول SIM900  (و البته ماژول دیگر مانند SIM908 ,SIM808,SIM800C هم همانند این ماژول می باشد) بحث کردیم و در مورد ATcommand های مهم صحبت کردیم  و یک نمونه برنام ارسال پیامک به زبان سی در کدویژن را منتشر کردیم و در این قسمت برای علاقمندان و آن دسته از دوستان که به زبان بیسیک برای AVR  برنامه می نویسند یک برنامه نمونه برای ارسال پیامک نوشتیم.

در این برنامه با فشردن پوش باتن متصل به پایه A.0  میکروکنترلر یک پیامک ارسال می شود. البته در شکل بالا پوش باتن رسم نشده است. البته اگر می خواهید ماژول را توسط میکروکنترلر روشن کنید حتما پایه POWER_KEY ماژول را به پایه D.3 میکروکنترلر وصل کنید.

نمونه برنامه به زبان بیسیک در BASCOM :

$regfile = "m16def.dat"
$crystal = 8000000
$baud = 9600


 Power_on_gsm Alias Portd.3
 Push_button Alias Pina.0


Config Porta.0 = Input
Config Porta.3 = Output



Power_on_gsm = 1
Wait 1
Power_on_gsm = 0
Wait 1

  Do



   If Push_button = 1 Then

      Print "AT"
      Waitms 250
      Print "AT+CMGF=1"
      Waitms 250
      Print "AT+CMGS=" ; Chr(34) ; "09371548691" ; Chr(34)
      Waitms 250
      Print "Melec.ir" ; Chr(26)
      Waitms 800

    End If

  Loop

End

اگر با زبان C برنامه می نویسید مقاله زیر را هم بخوانید :

راه اندازی و ارسال پیامک با ماژول SIM900

اگر دنبال اطلاعات در مورد GPS و نحوه ارسال اطلاعات بصورت پیام کوتاه و نمایش روی نقشه گوگل هستید :

پروژه ارسال موقعیت GPS خودرو با SMS

و

پروژه ردیاب خودرو GPS+GPRS+GOOGLE MAP

و همچنین اطلاعاتی در مورد GPRS  ماژول sim900  اگر نیاز دارید :

پروژه مانيتورينگ دما و رطوبت تحت وب سایت

سوالات خودتان را در انجمن الکترونیک مطرح کنید.

اگر این نوشته‌ برایتان مفید بود لطفا کامنت بنویسید.