همون طور که از اسمش پیداست یک نشانگر وضعیته که کاربر رو از روشن بودن ماژول مطمئن می کنه . لذوما به معنای کارکرد بخش rf نیست .چون ماژول میتونه بدون بخش rf هم کار کنه .
نمایش نسخه قابل چاپ
همون طور که از اسمش پیداست یک نشانگر وضعیته که کاربر رو از روشن بودن ماژول مطمئن می کنه . لذوما به معنای کارکرد بخش rf نیست .چون ماژول میتونه بدون بخش rf هم کار کنه .
با سلام
دوستان کسی فایل آپدیت فیرم ویر رو نداره دوباره جایی آپلود کنه 4share بازی در میاره
دستتون درد نکنه
ضمیمه شد در پست اصلینقل قول:
نوشته اصلی توسط alitaroosheh [Dear Guest/Member you can't see link before replyclick here to register]
سلامنقل قول:
خير، خروجي رو با مولتي متر هم گرفتم تغيير حالت نداره و عددي حدود 0.3v رو نشون ميده
با سلام ببخشید ! یعنی کجا؟ پست اصلی کجاست؟نقل قول:
با تشکر
یعنی صفحه اول این تاپیکنقل قول:
با سلام ببخشید ! یعنی کجا؟ پست اصلی کجاست؟
با تشکر
[Dear Guest/Member you can't see link before replyclick here to register]
سلام
من با میکرو تونستم SMS ارسال کنم ولی نمیتونم SMS دریافت کنم .cry::
کسی برنامه ای نداره برای دریافت SMSبا میکرو ؟
یعنی وقتی sms میاد هیچ چیزی توی هایپر ترمینال نشون نمیده ؟
توی هایپر هم ارسال و هم دریافت میشه
ولی با میکرو نمیشه دریافت کرد !
هم sim300 هم sim900 . هیچ کدام نمیشه sms را دریافت کرد .
با سلام
دوست عزیز میشه برنامه رو ببینم
یک مشکل دیگه هم پیدا کردمکد:$regfile = "m8def.dat"
$crystal = 8000000
$baud = 9600
'~~~~~~~~~~~~~~~~~~~~~~~~~~ Configurations ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db7 = Portc.0 , Db6 = Portc.1 , Db5 = Portc.2_
, Db4 = Portc.3 , E = Portc.4 , Rs = Portc.5
Config Pind.2 = Input
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Variable ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Dim B As Byte
Dim Sms As String * 250 : Sms = ""
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ initionaliz ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Cls
Cursor Off
Home
Lcd "Get SMS..."
Waitms 1000
Cls
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Main program ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Do
If Pind.2 = 0 Then
Print "AT+CMGR=1"
Sms = ""
Do
B = Inkey()
Select Case B
Case 0:
Case 13 :
If Sms <> "" Then Exit Do
Case 10 :
If Sms <> "" Then Exit Do
Case Else
Sms = Sms + Chr(b)
End Select
Loop
Home
Lcd Sms
End If
Loop
End
پایه های tx , rx ماژول sim300czمن وقتی با تست اتصال کوتاه اهمتر تست میکنم اتصال کوتاه هست .
ولی شبکه را میسناسه ولی ارسال و دریافت اس ام اس نمیتونم باهاش انجام بدم . یعنی این ماژو دیگه به درد نمی خوره ؟
احتمالا تو لحیم کاری اتصال کوتاه شده
تو برنامه شما از پایه status به عنوان وقفه استفاده شده
بهتر از وقفه سریال استفاده کنید
ماژول را هم که از جا در میارم و تست می کنم بازم اتصال کوتاهه .....
میشه یک برنامه که کار کنه به من بدین . هر کاری میکنم جواب نمیده:unh:
نقل قول:
یک مشکل دیگه هم پیدا کردم
پایه های tx , rx ماژول sim300czمن وقتی با تست اتصال کوتاه اهمتر تست میکنم اتصال کوتاه هست .
ولی شبکه را میسناسه ولی ارسال و دریافت اس ام اس نمیتونم باهاش انجام بدم . یعنی این ماژو دیگه به درد نمی خوره ؟
مهندس بعید میدونم که توی لحیم کاری اشتباه کرده باشه و پایه tx و rx رو اتصال کوتاه کرده باشهنقل قول:
احتمالا تو لحیم کاری اتصال کوتاه شده
تو برنامه شما از پایه status به عنوان وقفه استفاده شده
بهتر از وقفه سریال استفاده کنید
چون اگه این طور بود چطوریه که sms میفرسته ولی دریافت نمیتونه کنه؟؟
من فکر میکنم برنامت مشکل داره
.
$regfile = "m8def.dat"
$crystal = 8000000
$baud = 9600
'~~~~~~~~~~~~~~~~~~~~~~~~~~ Configurations ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db7 = Portc.0 , Db6 = Portc.1 , Db5 = Portc.2_
, Db4 = Portc.3 , E = Portc.4 , Rs = Portc.5
Enable Interrupts
Enable Urxc
On Urxc Vaghfe
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Variable ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Dim B As Byte
Dim C As Byte
Dim Sms As String * 250 : Sms = ""
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ initionaliz ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Cls
Cursor Off
Home
Lcd "Get SMS..."
Waitms 1000
Cls
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Main program ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Do
If Sms = "+CMTI:" Then Print "AT+CMGR=1"
If Sms = "+CMGR:" Then C = 1
If C = 3 Then
Cls
Lcd Sms
Sms = ""
C = 0
Print "AT+CMGD=1"
End If
Loop
End
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ vaghfe ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Vaghfe:
B = Udr
If B = 13 Then
B = 10
If C = 2 Then C = 3
If C = 1 Then C = 2
If C <> 3 Then Sms = ""
End If
If B <> 10 Then Sms = Sms + Chr(b)
Return
سلام
پورت سریال ماژول اتصال کوتاه شده . اصلا کاری به برد نداره و موقعی که از روی برد م بر میدارم و تست میکنم هم همینطوره
هیچ راهی نداره که بشه با ماژول ارتباط برقرار کرد ؟
همه چی سالمه فقط نمیشه با پورت سریالش کار کرد !!!!
یعنی هیچ اهمی نداره ؟ مگه باهاش چی کار کردی؟
تقریبا 30 اهم داره
هیچکار نکردم . فقط با میکرو ارتباطش دادم . ارال می کرد ولی دریافت نمیکرد . حالا نه دیگه ارسال ونه دیگه دریافت می کنه .
با کامپیوتر هم ارتباط برقرار نمیکنه
دوستانی که در برقراری ارتباط با ماژول مشکل دارن مدار زیر رو تست کنن. این مدار باید بین پایه های RXD و TXD میکروکنترلر و ماژول قرار بگیره. در واقع میشه یه نوع مدار واسط.
من در برقراری ارتباط با ماژول SIM300 و SIM548 با این مشکل مواجه شدم که اطلاعات به ماژول ارسال میشد ولی اطلاعاتی که ماژول می فرستاد در میکرو دریافت نمیشد. با مشورت با دوست خوبم جناب esisafa ، ایشون این مدارو پیشنهاد دادن و منم استفاده کردم که %100 جواب گرفتم.
اگه فقط در دریافت اطلاعات ماژول مشکل دارید این مقاومت هارو بین پایه های RXD میکرو و TXD ماژول قرار بدید.
سلام به اساتید و دوستان عزیزم.:hi:
مهندس لطف می کنید یه بار دیگه عکس رو آپلود کنید. من عکسی نمیبینم.