SIM800 VE 16F628A

Başlatan muyat, 02 Aralık 2019, 14:50:26

muyat

16f628a kullanarak sim800 gsm modülüyle bir devre tasarlamak istiyorum
Yapmak istedigim şey:
gsm modülüne kendi telefonumdan bir sms gönderdiigm zaman çıkıştaki bir ledi yakmak.
Bununla ilgili picbasicle yazılmış örnek kod bulamadım.
Var mı elinizde örnegi?LCD kullanmayacagım

Dtmf

Formda ararsan bulursun murat bey.daha once paylasmistim sim800l seklinde arat

elektro77

Alıntı yapılan: Dtmf - 02 Aralık 2019, 20:05:49Formda ararsan bulursun murat bey.daha once paylasmistim sim800l seklinde arat
Bende bi bakmak için forumda arattım ama bulamadım. Böyle bir kaynak yok.
"Eğer bir konuyu öğrenmek istiyorsan o konunun öğretmeni ol; daha iyi öğrenmek istiyorsan o konuda bir kitap yaz; daha da iyi öğrenmek istiyorsan yazdığın kitabi oku"

Dtmf

#3
benım kullandıgım gayet guzel calısan bır program yolluyorum sana bazı ayarları yapman lazım AT+CFUN,AT+CMGF,AT+CMGR.. programda belırttım  bu uygulama sım800 dekı hat numarasına A1 mesajı gonderınce led yakma ugulaması.bazı komutları tekrarlayarak gondermek zorunda kaldım bazen tek komut bazen algılamadıgını gozlemledım oyuzden kolay gelsın

Dtmf

Device=16F877A
XTAL=4
ALL_DIGITAL TRUE
Include "MODEDEFS.BAS"
TRISA = 3:PORTA=0
TRISB = 0:PORTB=0
TRISC = 0:PORTC=0
PORTD = 0:PORTD=0
PORTE = 0:PORTE=0
Declare LCD_TYPE alpha
Declare LCD_LINES 2
Declare LCD_INTERFACE 4
Declare LCD_DTPIN PORTB.4
Declare LCD_RSPIN PORTB.0
Declare LCD_ENPIN PORTB.1
;=====================================================================
Print At 1,1,"...SIMCON.... "
DelayMS 4000
DON:
               Print At 1,1,"AT             "
               SerOut PORTC.6,84,["AT",13,10]
               DelayMS 5
               SerOut PORTC.6,84,["AT",13,10]
               DelayMS 5
               SerOut PORTC.6,84,["AT",13,10]
               DelayMS 5
               SerIn PORTC.7,84,5000,DON,[Wait("OK")]
               Print At 2,1,"OK           "
;=================================================================================================================                           
DelayMS 3000
DON1:
               Print At 1,1,"CFUN=1       "
              SerOut PORTC.6,84,["AT+CFUN=1",13,10] ;SerOut PORTC.6,84,["AT+CFUN=",34,"1",34,13]
               DelayMS 10
               SerOut PORTC.6,84,["AT+CFUN=1",13,10]
               SerOut PORTC.6,84,["AT+CFUN=1",13,10]
               SerOut PORTC.6,84,["AT+CFUN=1",13,10]
               SerOut PORTC.6,84,["AT+CFUN=1",13,10]
               SerIn PORTC.7,84,5000,DON1,[Wait("OK")]
               Print At 2,4,"OK"
DelayMS 3000
DON2:
                Print At 1,1,"CMGF=1   "
                SerOut PORTC.6,84,["AT+CMGF=1",13,10]
                SerOut PORTC.6,84,["AT+CMGF=1",13,10]
                SerOut PORTC.6,84,["AT+CMGF=1",13,10]
                SerOut PORTC.6,84,["AT+CMGF=1",13,10]
                SerIn PORTC.7,84,5000,DON2,[Wait("OK")]
                Print At 2,8,"OK"
DelayMS 3000
Cls
;=========================================================================
BASLA:
Print At 1,1,"...SIMCON.... "
SerOut PORTC.6,84,["AT+CMGR=1",13,10]
SerOut PORTC.6,84,["AT+CMGR=1",13,10]
SerOut PORTC.6,84,["AT+CMGR=1",13,10]
SerOut PORTC.6,84,["AT+CMGR=1",13,10]
             
               SerIn PORTC.7,84,5000,HAT,[Wait("A1")]
               SerIn PORTC.7,84,5000,HAT,[Wait("A1")]
               PORTA.2=1
               Print At 2,1,"  VERI ALINDI    "
               DelayMS 2000

DelayMS 3000
SerOut PORTC.6,84,["AT+CMGD=1",13,10]
SerOut PORTC.6,84,["AT+CMGD=1",13,10]
SerOut PORTC.6,84,["AT+CMGD=1",13,10]
SerOut PORTC.6,84,["AT+CMGD=1",13,10]
GoTo BASLA
;=================================
HAT:
PORTA.2=0             
Print At 2,1,"      MSJ HATA     "
DelayMS 500
Cls
GoTo BASLA
 

muyat

Şeması var mı?Mesela led hangi pine baglı?Onu da yazar mısın?

Dtmf

Semasi yok bord uzerinde kurdun denedim hangi pin oldugunu sen bulacaksin benden bu kadar biraz kafa yor.bu modul bir led yakip sondurmek icin degil sadece bu bir deneme.kafa yorki kendin gelistir

muyat

Sağolasın.internetten aldım dün bu modülden..Biraz deney yapıp sitede paylaşacagım

Dtmf

#8
Sen biraz ugras isin icinden cikamadigin yeler olursa yardimci oluruz.
1-4.2 v tan fazla verme
2-kullanacagin hatti cep tel tak ve sim sifresini kaldir
3-bir adet ch340 temin et uart seri terminalden cihazi aradiginda ring yazar ekranda istersen spk1 skp2 uclarina kucuk bir cep.tel hoparloru bagla melodiyi duyacaksin

muyat

@Dtmf
3.dediğiniz kısımdaki uart seri terminal kullanmanın asıl amacı nedir?
Bilgisayara baglayarak Cihazın çalışıp çalışmadıgını ögrenmek mi?
Son olarak hem pici hem de gsm modülünü aynı switch mode regulatorle besleyip ,gsm modülü için regulatorun çıkışına gsm hattına giden yola bir adet diyot takarak voltajı 4.2 ye düşürsek olur mu?Gerçi 1n4001 0.7volt falan voltajı düşürüyordu

Dtmf

Ch340 dedigim evet cihazi test icin birde AT komutleri ile biraz cihazi dene mesela
AT komutu yolla
Cevap olarak OK alacaksin
Sonra module arama yaptir ATD0505.....; noktali virgule dikkat et koymazsan modul arama yapmaz.
Arama yaptir.arama sonlandirmak icin  ATH Komutu yolla.besleme icin diyot kullanabilirsin ben iki tane takmistim bende gayet iyi calisti.

furkan41

Bende bir şey ekleyeyim. modül yanında gelen şu küçük sarımsı renkteki anten ile calışma yapmayın. SWR yaptırıp modüle reset attırabiliyor. ( arama yapma-alma , mesaj alma-atma zamanında heleki daha çok )

Modüle AT yollayıp OK aldıktan ve varsa pin girdikten sonra yapılması gereken ilk iş. Şebeke sinyalini sorgulamak olacaktır. ben buna dikkat etmemiştim ve 1 hafta boyunca arama yapmaya calışıp en son antenin swr yaptığını anlayınca problemi çözebilmiştim. yani ilk başta şebeke gözüksede arama yaparken swr oluştuğu için modül resetleniyor ve şebekeden düşüyor.

Buna dikkat edin.

Dtmf

#12
Ben antenle ilgili problem yasamadim belki baz istasyonuna 2km mesafe oldugu icindir.modul arama esnasinda daha fazla akim cektigini biliyorum besleme voltaji normal olabilir ama akim sarfiyatini karsilayamazsa reset atiyodur buyuk ihtimal.sebeke sorgulama ve sinyal seviye sorgulama komutlari var.

Powered by EzPortal