avatar_mchtylmz

RF alıcı verici ile led yakan bi çalışma var. yardım lütfen

Başlatan mchtylmz, 14 Ağustos 2016, 20:22:27

AHMET ÇALIŞKAN

Anlıyamadığınız nedir ?
Devrelerin açık bağlantı şemaları  dosyada mevcut.
Siz  6 kanal mı yapmak istiyorsunuz ?
Elcik kumandanın hangi tuşuna basarsanız, alıcı devredeki  7 segment led displayden  basılan numarayı görmek istiyorsunuz değil mi?

mchtylmz

devre suan bir değişiklik yapmadım. almış bulunduğum PIC16F84A kullanıyorum. ancak deney bord uzerine kurduğum devrede 433 mhz alıcı modul bağlı olmadığı halde display da " 44 - 64 " gibi rakamlar çıkıyor. kullandığım sürücü (4511) bacak bağlantılarını kontrol ettim sorun yok. sanırım kodda bir sıkıntı var


TRISA=255
PortB=0
TrisB=%00000000
PORTA=0
SAYI     var byte
BIRLER   VAR BYTE
ONLAR    VAR BYTE


PORTB=0
SAYI=0


ALICI VAR BYTE
ALICI=0
PAUSE 500

BASLA:

SERIN2 PORTA.0,396,[WAIT("TUNA"),ALICI]

IF ALICI=10 THEN
SAYI=1
    GOTO YAZ
ELSE
SAYI=0
ENDIF   

IF ALICI=20 THEN
SAYI=2
GOTO YAZ
ELSE
SAYI=0
ENDIF 

IF ALICI=30 THEN
SAYI=3
GOTO YAZ
ELSE
SAYI=0
ENDIF 


IF ALICI=40 THEN
SAYI=4
GOTO YAZ
ELSE
SAYI=0
    ENDIF

IF ALICI=50 THEN
SAYI=5
GOTO YAZ
ELSE
SAYI=0
ENDIF

IF ALICI=60 THEN
SAYI=6
GOTO YAZ
ELSE
SAYI=0
    ENDIF
   
IF ALICI=70 THEN
SAYI=7
GOTO YAZ
ELSE
SAYI=0
    ENDIF
   
IF ALICI=80 THEN
SAYI=8
GOTO YAZ
ELSE
SAYI=0
    ENDIF
   
IF ALICI=90 THEN
SAYI=9
GOTO YAZ
ELSE
SAYI=0
    ENDIF
   
IF ALICI=100 THEN
SAYI=10
GOTO YAZ
ELSE
SAYI=0
    ENDIF
   
IF ALICI=110 THEN
SAYI=11
GOTO YAZ
ELSE
SAYI=0
    ENDIF
   
IF ALICI=120 THEN
SAYI=31
GOTO YAZ
ELSE
SAYI=0
    ENDIF
   
    IF PORTA.7=0 THEN
    SAYI=0
    ELSE
     BIRLER=SAYI DIG 0
     ONLAR= SAYI DIG 1
     
      PORTB=240 | BIRLER
      LOW PORTB.5
      PAUSE 1
      HIGH PORTB.5
      PAUSE 1
   
      PORTB=240 | ONLAR
      LOW PORTB.4
      PAUSE 1
      HIGH PORTB.4
      PAUSE 2
     
      ENDIF
     
       BIRLER=SAYI DIG 0
     ONLAR= SAYI DIG 1
     
      PORTB=240 | BIRLER
      LOW PORTB.5
      PAUSE 1
      HIGH PORTB.5
      PAUSE 1
   
      PORTB=240 | ONLAR
      LOW PORTB.4
      PAUSE 1
      HIGH PORTB.4
      PAUSE 2
     

GOTO BASLA

YAZ:
     
     BIRLER=SAYI DIG 0
     ONLAR= SAYI DIG 1
     
      PORTB=240 | BIRLER
      LOW PORTB.5
      PAUSE 1
      HIGH PORTB.5
      PAUSE 1
   
      PORTB=240 | ONLAR
      LOW PORTB.4
      PAUSE 1
      HIGH PORTB.4
      PAUSE 2
      HIGH PORTA.1
      PAUSE 1000
      LOW PORTA.1
     
      GOTO BASLA
END


yardım için teşekkürler..
Fırtınalara Yön Veren, Kelebeklerin Kanat Çırpışıdır.

Powered by EzPortal