8 kanal RF alıcı verici

[performanc3]

8 kanal alıcı verici devresidir ..

RF Alıcı

Kod: Tümünü seç


'****************************************************************
'*  Name    : Onur
'*  Author  : www.elektroarge.com
'*  Notice  :
'*          : All Rights Reserved                               *
'*  Date    : 30.04.2010                                        *
'*  Version : 1.0                                               *
'*  Notes   :  4 kanal alıcı kodu                                                 *
'*          :                                                   *
'****************************************************************
@ DEVICE pic16F628A 'işlemci 16F628
@ DEVICE pic16F628A, WDT_on 'Watch Dog timer kapalı
@ DEVICE pic16F628A, PWRT_ON 'Power on timer açık
@ DEVICE pic16F628A, PROTECT_OFF 'Kod Protek kapalı
@ DEVICE pic16F628A, MCLR_off 'MCLR pini kullanılıyor.
@ DEVICE pic16F628A, INTRC_OSC_NOCLKOUT 'Dahili osilatör kullanılacak

include "modedefs.bas"   'SERİN VE SEROUT KOMUTLARININ ÇALIŞMASI İÇİN GEREKLİ KÜTÜPHANE DOSYASI

VERI var byte      'SERİ İLETİŞİMDE ALINACAK  VERİ
TRISB=0         'PORTB TAMAMI ÇIKIŞ
CMCON=7         'KOMPARATÖR PİNLERİ DİJİTAL GİRİŞ VEYA ÇIKIŞ
TRISA=%00010      'PORTA.1 GİRİŞ
PORTB=0                 'PORTB İÇERİĞİ SIFIR NEDENİ İSE İLK ENERJİ VERİLDİĞİNDE GİRİŞ VEYA ÇIKIŞLAR AKTİF OLMAMASI İÇİN
BASLA:
serin PORTA.1,T300,["ELEKTROARGE"],veri 'PORTA.1 ELEKTROARGE VERİSİNİ AL
PORTB = veri         'PORTB'DE HANGİ VERİ ALINDIYSA O VERİYE AİT LEDİ YAK (ÇIKIŞ VER)
goto BASLA         'BASLA ETİKETİNE GİT




RF Verici

Kod: Tümünü seç


'************************************************
'*  Name    : Onur
'*  Author  : www.elektroarge.com
'*  Notice  :
'*          : All Rights Reserved                               *
'*  Date    : 30.04.2010                                        *
'*  Version : 1.0                                               *
'*  Notes   :  4 kanal verici kodu                              *
'*          :                                                   *
'**************************************************
@ DEVICE pic16F628A 'işlemci 16F628
@ DEVICE pic16F628A, WDT_on 'Watch Dog timer kapalı
@ DEVICE pic16F628A, PWRT_ON 'Power on timer açık
@ DEVICE pic16F628A, PROTECT_OFF 'Kod Protek kapalı
@ DEVICE pic16F628A, MCLR_off 'MCLR pini kullanılıyor.
@ DEVICE pic16F628A, INTRC_OSC_NOCLKOUT 'Dahili osilatör kullanılacak

include "modedefs.bas"  'SERİN VE SEROUT KOMUTLARININ ÇALIŞMASI İÇİN GEREKLİ KÜTÜPHANE DOSYASI
VERI var  byte          'SERİ İLETİŞİMDE VERİLECEK  VERİ
TRISB=%11111111         'PORTB TAMAMI GİRİŞ
CMCON=7                 'KOMPARATÖR PİNLERİ DİJİTAL GİRİŞ VEYA ÇIKIŞ
OPTION_REG=7            'PULL UP DİREÇLERİ İPTAL
PORTB=0                 'PORTB İÇERİĞİ SIFIR NEDENİ İSE İLK ENERJİ VERİLDİĞİNDE GİRİŞ VEYA ÇIKIŞLAR AKTİF OLMAMASI İÇİN
BASLA:
VERI = PORTB            'VERİ=PORTB EŞİTLE
serout PORTA.1,T300,["ELEKTROARGE",VERI]      'PORTA.1 ELEKTROARGE VERİSİNİ GÖNDER
goto basla                          'BASLA ETİKETİNE GİT




İçerik Kapalı:

Mesaj içeriğini görmek için kayıt ve giriş gerektirir

[Halil95]

hocam bu dosyaların hiç biri proteus da çalışmıyor yani devre şemasını falan ares çizimini açılmıyor