اطلاعیه

**زوار** · 2011-09-20T19:41:54

پاسخ : ماژول sim 548

برنامه را بررسی میکنم فردا دوباره باهم تست میکنیم

**hamids24** · 2011-09-20T20:05:39

پاسخ : ماژول sim 548

خیلی ممنون
اگه آدرس سایت دارین که کم درباره این پورت uart , و دستور input کامل طرز استفاده رو توضیح داده باشه معرفی کنید تا منم تا فردا یک مطالعه کنم.

**زوار** · 2011-09-20T22:14:57

پاسخ : ماژول sim 548

نه متاسفانه ندارم من خودمم از دستور input جواب نگرفتم

**hamids24** · 2011-09-21T15:20:27

پاسخ : ماژول sim 548

سلام
من lcd هم گرفتم. زدم الان نباید رو lcd نشون بده؟چیزی نشون نمیده.
یک چیز دیگه هم اینکه اگه gsm رو بعد از چند دقیقه دقیقه روشن کنم درست چشمک نمیزنه. وقتی rx و tx از میکرو جدا میکنم اون موقعه درست میشه.
یا هم اینکه باید از اول همراه هم روشن کنم.

**زوار** · 2011-09-22T11:42:23

پاسخ : ماژول sim 548

با سلام lcd را که میزنی بعد از 2-3 دقیقه بدون اینکه کلید را بزنی باید مختصات را ببینی در مورد
gsm هم هر موقع روشن کنی باید درست کار کنه الان فقط lcd را بزن و صبر کن ببین مختصات را میبینی

**hamids24** · 2011-09-22T12:03:49

پاسخ : ماژول sim 548

سلام
رو lcd چیزی نشون نمیده
میگم این قسمت برنامه که نوشتین درسته؟

کد:

Serial_data:
  Char = Chr(udr)
  If Char &lt;&gt; &quot;&quot; Then
   If A = 0 And Char = &quot;$&quot; Then A = 1
   If A = 1 And Char = &quot;G&quot; Then B = 1
   If B = 1 And Char = &quot;P&quot; Then C = 1
   If C = 1 And Char = &quot;G&quot; Then D = 1
   If D = 1 And Char = &quot;G&quot; Then E = 1
   If E = 1 And Char = &quot;A&quot; Then F = 1

a=0 این مشکل نداره؟
بعد یک چیز دیگه این کریستال که زدم 11.000mhz مشکل نداره؟ کریستال 11.0592 ندارم که بگذارم.

**زوار** · 2011-09-22T20:55:01

پاسخ : ماژول sim 548

این برنامه را تست کنید باید بتونید ساعت را روی lcd ببینید اس ام اس نزنید فقط خروجی gps را ببینید

کد:

&#039; \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\/
$regfile &quot;m8def.dat&quot;
$crystal = 11000000
$baud #1 = 9600
$baud #2 = 9600
$baud = 4800
Open &quot;comb.0:9600,8,n,1&quot; For Output As #1
Open &quot;comb.1:9600,8,n,1&quot; For Input As #2
&#039; ///////////////////////////////////////////////////////////////////////////////
&#039;| SUBs -----------------------------------------------------------&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;
&#039; \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
&#039;Declare Sub Anim
&#039; ///////////////////////////////////////////////////////////////////////////////
&#039;| CONFIGURATIONs -------------------------------------------------&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;
&#039; \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
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
&#039;Config Porta.2 = Output
Config Timer1 = Timer , Prescale = 8
&#039;Start Timer1

Cursor Off Noblink
Cls

Config Single = Scientific , Digits = 2

Config Pind.2 = Input
Config Int1 = Falling




&#039; ///////////////////////////////////////////////////////////////////////////////
&#039;| INTRRUPTs ------------------------------------------------------&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;
&#039; \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
Enable Interrupts
Enable Urxc
On Urxc Serial_data

&#039; ///////////////////////////////////////////////////////////////////////////////

&#039; ///////////////////////////////////////////////////////////////////////////////
&#039;| DIMANSIONs -----------------------------------------------------&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;
&#039; \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
Dim Flag As Bit , Flag_sms As Bit
Dim Data_s As Byte
Dim Char As String * 1
Dim Gps_data As String * 100
Dim Gps As String * 100
Dim A As Bit , B As Bit , C As Bit , D As Bit , E As Bit , F As Bit , G As Bit , Cl1 As Bit , Cl2 As Bit
Dim Utc As String * 10
Dim Lat As String * 9 , North As String * 20
Dim Lon As String * 10 , East As String * 20
Dim Sms As String * 250 : Sms = &quot;&quot;
Dim Sms1 As Byte
&#039; ///////////////////////////////////////////////////////////////////////////////
&#039;| MACROS ---------------------------------------------------------&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;
&#039; \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

Macro Split_data

  Utc = Mid(gps , 2 , 9)
  Locate 1 , 1
  Lcd Utc
  Lat = Mid(gps , 14 , 9)
  Locate 2 , 1
  Lcd Lat
  Lon = Mid(gps , 26 , 9)
  &#039;Locate 1 , 1
  &#039;Lcd Lon
End Macro

&#039; ///////////////////////////////////////////////////////////////////////////////
&#039;| MAIN -----------------------------------------------------------&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;

Cls
&#039; \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
Flag = 0
Do :
   Split_data
   &#039;Home
   If Pind.2 = 0 Then
&#039;Disable Urxc
Print #1 , &quot;at&quot;
Waitms 500
Print #1 , &quot;at+cmgf=1&quot;
Waitms 500
Print #1 , &quot;AT+CMGS=&quot; ; Chr(34) ; &quot;0912*******&quot; ; Chr(34)
Waitms 500
Print #1 , Lat ; Chr(26)
Waitms 500
Print #1 , &quot;AT+CMGS=&quot; ; Chr(34) ; &quot;0912*******&quot; ; Chr(34)
Waitms 500
Print #1 , Lon ; Chr(26)
Enable Urxc
End If

End
Loop
&#039; ///////////////////////////////////////////////////////////////////////////////
&#039;| SUB ROUTINE ----------------------------------------------------&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;&gt;
&#039; \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
&#039;----------------=============== CHECK POSITION ===============-----------------

&#039;--------================= GET $GPGGA DATA FROM MODULE =================--------
Serial_data:
  Char = Chr(udr)
  If Char &lt;&gt; &quot;&quot; Then
   If A = 0 And Char = &quot;$&quot; Then A = 1
   If A = 1 And Char = &quot;G&quot; Then B = 1
   If B = 1 And Char = &quot;P&quot; Then C = 1
   If C = 1 And Char = &quot;G&quot; Then D = 1
   If D = 1 And Char = &quot;G&quot; Then E = 1
   If E = 1 And Char = &quot;A&quot; Then F = 1
   If A = 1 And B = 1 And C = 1 And D = 1 And E = 1 And F = 1 Then
     If Len(gps_data) &lt; 72 Then
      Gps_data = Gps_data + Char
     Elseif Len(gps_data) = 72 Then
      Gps = Left(gps_data , 71)
     End If
   End If
  End If
  If F = 1 And Udr = 13 Then
   A = 0 : B = 0 : C = 0 : D = 0 : E = 0 : F = 0 : Gps_data = &quot;&quot;
  End If
Return

**hamids24** · 2011-09-22T20:56:20

پاسخ : ماژول sim 548

من حتی این دستور رو زدم رو lcd علامت سوال نشون میده.

lcde "test"

دلیلش چیه؟

**زوار** · 2011-09-23T13:25:48

پاسخ : ماژول sim 548

با سلام احتمالا پایه های د یتای ال سی دی را جابجا وصل کردید در ضمن اگر از مگا 16 استفاده میکنید و ال سی دی به پورت c وصل شده باید موقع پروگرم فیوز بیت jtag را غیر فعال کنید وگرنه کار نمیکنه

**hamids24** · 2011-09-23T15:34:37

پاسخ : ماژول sim 548

سلام
lcd درست شد.فقط الان گاهی اوقات RRRRRR نشون میده گاهی اوقات zzzzzzzz
مشکل کجا میتونه باشه
حتی gsm زدم میخواستم ببینم شماره تماس گیرنده رو نشون میده یا نه
اما بازم RRRRRRRRRR رو lcd نشون میده.

**زوار** · 2011-09-23T16:12:23

پاسخ : ماژول sim 548

چه موقعی میگید rrr نشون میده؟ساعت را تونستید ببینید؟

**benyaram** · 2011-09-23T16:40:07

پاسخ : ماژول sim 548

نه عزیز ساعت رو نشون نمیده!
یه لطف میکنی یه شکل مدارتو که با atmega هست رو برامون بزاری! :agree: که مثلا بدونیم چه پایه هایی بهم مرتبط هستن و porta.2 چیه؟به کجا باید وصل شه؟
باتشکر

**hamids24** · 2011-09-24T10:11:15

پاسخ : ماژول sim 548

ببخشید RRR برای gsm (حالت نمایش نشانگر فعال کردم ) وقتی زنگ می زنم rrrr نشون میده
اما gps تنها امتحان کردم اصلا هیچی رو lcd نشون نمیده.

**benyaram** · 2011-09-24T14:02:26

پاسخ : ماژول sim 548

دوستان یه مقدار زودتر جواب میدین که روز تعطیل سر و ته پروژه هم بیاد . باز خیلی ممنوووووون

بعد در ضمن یه سوال! چراغ status دایم روشن باید باشه وقتی تغذیه ماژول رو وصل میکنیم؟ چراغ net در حالت عادی چطور باید باشه؟
مرسی ی ی ی ی ی

**benyaram** · 2011-09-29T17:12:43

پاسخ : ماژول sim 548

با سلام خدمت دوستان ، اگه لطف کنید یه شماتیک 60 پایه که کار میکنه رو بزارین تا ببینیم سخت افزار چجوری بسته میشه . الان من هر کاری میکنم دستورات قسمت gsm جواب درست نمیده مثلا میزنم atd 091212345678 جواب میده no dial tone نمیدونم مشکل از کجاست فکر کنم تنظیمات یا قلق خاصی باید داشته باشه! :redface:

اطلاعیه

ماژول sim 548

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه

دیدگاه