dorji DRF7020D27 kullanımı

Başlatan sahinler64, 15 Eylül 2012, 14:29:53

sahinler64

slm arkadaşlar. http://www.direnc.net/DRF7020D27,PR-1573.html sitede görünen bu modülü alıp yaklaşık 700 mt. gibi bir mesafede bulunan motoru açıp kapatmak ve açılıp kapandığını led yardımıyla görmek istiyorum. ama modül yabancı marka olduğu için çekiniyorum.
başka bir modül olarakta delkomrf nin drfm500pa modülü var özellikleride çok iyi. ama bununda kodlarını picbasicte nasıl yazacağım konusunda bir fikrim yok. ikiside modem modül olduğu için program kısmında biraz takıldım. özellikle dorjinin modülünü fiyat konusunda cazip olduğu için kullanmak istiyorum ama ya çalıştıramazsam ne olacak.
bu iki modül için kullanabileceğim ufak bir kod örneği istiyorum. bu konuda yardımcı olacak arkadaşlara şimdiden teşekkür ederim.

ete

Dorji nin modulunu almanı oneririm. Kullanımı kolay .
Ete

sahinler64

ete hocam kusura bakma.
dorjinin modülünü aldık diyelim. normal modül gibimi çalışıyor yoksa ön ayar yapmamız gerekiyormu. pazartesi (yarın) alıcı ve verici olarak 2 adet sipariş etmeyi düşünüyorum.
rica etsem ve sizin için bir mahsuru yoksa ve zamanınız varsa bu modülü aldığımda kullanabileceğim bir kod örneği verebilirmisin.
ben biraz daha uğraşıp sizin 14. dersinizden birşeyler yapmaya çalışacağım.

sahinler64

HOCAM ufak bir deneme yaptım. isiste pic' in rx ve tx uclarını kullanarak ve sizin ve birkaç arkadaşımızın örneklerinde olduğu gibi kesme yardımıyla isiste iyi gibi çalışıyor. ama dorjinin modülünde çalışırmı acaba diye size sormak istedim.
birde 628a ile denedim. yazılımda ayar yapmadım sıkıntı olurmu.

http://www.dosyasitesi.com/download.php?file=48aeacbe0dfaddf29f5f230ccf6ae6b4

VERİCİ kısım için;


trisa=%00000000
trisb=%00000011
define osc 4
CMCON=7
INCLUDE "modedefs.bas"
DEFINE HSER_RCSTA 90h '
DEFINE HSER_TXSTA 20h '
DEFINE HSER_SPBRG 25  '
DEFINE HSER_CLROERR 1 '
INTCON=%00000000
ON INTERRUPT GOTO INT
SYMBOL  DLED=PORTA.0 'duruyor ledi
SYMBOL  CLED=PORTA.1 'çalışıyor ledi
SYMBOL     RX=PORTA.2 'rx ledi
SYMBOL     TX=PORTA.3  'tx ledi
symbol SEVIYE=portB.0   'depo seviyesi kontrolü için
SYMBOL  GIE  =INTCON.7   'genel interruptları açıyor              /////
SYMBOL  PEIE =INTCON.6   'peripheralinterruptları açıyor         ////////  bu kısımların
SYMBOL  RCIE =PIE1.5     'USART Recive interrupt enable bit      ///////  ne işe yaradığını
SYMBOL  RCIF =PIR1.5     'USART Receive interrupt flag bit      //////    bilmiyorum

YAZILAN var byte 50
OKUNAN var byte 51
temp  var byte 64
a var byte 65
FOR temp=0 to 255
pauseus 5
next
OKUNAN=0
YAZILAN=0
RCIE=1
PEIE=1
GIE=1
pause 2000 'MODÜL HAZIRLANSIN AMAÇLI

BASLA:
    LOW RX
    HIGH TX
hserout ["S","H","N",YAZILAN]
    for a= 0 to 63200
    pauseus 2
    next
    if SEVIYE=0 then YAZILAN=11
    if SEVIYE=1 then YAZILAN=22
    if OKUNAN=33 then HIGH CLED:LOW DLED
    if OKUNAN=44 then HIGH DLED:LOW CLED
GOTO BASLA
DISABLE
INT:
GIE=0
LOW TX
HIGH RX
Hserin 200,HATA,[wait("DNM"),OKUNAN]
HATA:
TEMP=RCREG   
GIE=1
   Resume
   enable
end

*********************************************************************

ALICI kısım için;


INCLUDE "modedefs.bas"

define osc 4
DEFINE HSER_RCSTA 90h '
DEFINE HSER_TXSTA 20h '
DEFINE HSER_SPBRG 25  '
DEFINE HSER_CLROERR 1 '
INTCON=%00000000
ON INTERRUPT GOTO INT
trisa=%00000000
trisb=%00000011
CMCON=7
SYMBOL      RX=PORTA.2 'RX LEDİ
SYMBOL      TX=PORTA.3  'TX LEDİ
symbol   MOTOR=portA.0  'MOTOR ÇALIŞMASI İÇİN ROLE
symbol KONTROL=portB.0     'MOTORUN ÇALIŞTIĞINI KONTROL ETMEK İÇİN GİRİŞ
SYMBOL GIE    =INTCON.7   
SYMBOL PEIE   =INTCON.6   
SYMBOL RCIE   =PIE1.5     
SYMBOL RCIF   =PIR1.5     
OKUNAN var byte 50
YAZILAN var byte 51
temp  var byte 64
a var byte 65
  MOTOR=0
OKUNAN=0
YAZILAN=0
RCIE=1
PEIE=1
GIE=1
pause 2000
'-------------------------------------------------------------------------------
BASLA:

      IF OKUNAN=11 then low MOTOR
      IF OKUNAN=22 then high MOTOR
      if KONTROL=0 then YAZILAN=33
      if KONTROL=1 then YAZILAN=44
    low RX
    high TX
    hserout ["D","N","M",YAZILAN]
   
    for a= 0 to 63200
    pauseus 2
    next
    GOTO BASLA

DISABLE
INT:
    GIE=0
    Hserin 200,HATA,[wait("SHN"),OKUNAN]
   LOW TX
   HIGH RX
   
HATA:
    TEMP=RCREG
    GIE=1
    Resume
    enable
END


ete

Fiyat farkı varmıdır bilmiyorum ama daha önce Dorji DRF7020D13  modül kulandım bir kaç kez hiç sorun olmadı.
Bence bu modülü almanı tavsiye ederim.

Senin modülün data sheetine baktım anlamadığım bir komut şekli var sanki.  Bence bu sıkıntı yaratır. Data sheet çok kısıtlı bilgi vermiş. Anlaşılmıyor modüle nasıl komut verileceği.

Ete

fofo

DRF7020D27 bu modülden bende aldım ama frekans ve diğer değerlerini PC programıyla değiştiremedim. Böyle sorunla karşılaşan oldu mu?

ete

Pc arayüz programı ve iyi bir ara bağlantı kartınız olursa yapılmaması imkansız. Bunları firmadan alırsanız hele hiç kurtuluşu olmaz diye düşünüyorum.
Ete

sahinler64

#7
Alıntı yapılan: fofo - 22 Eylül 2012, 23:11:04
DRF7020D27 bu modülden bende aldım ama frekans ve diğer değerlerini PC programıyla değiştiremedim. Böyle sorunla karşılaşan oldu mu?
modül olmadığı için ben 1 haftadır bekliyorum.  nerden aldın kardeş.

Powered by EzPortal