arx-34 ... mü bozuk program mı yanlış?

Başlatan mech, 03 Mart 2007, 01:45:46

mech

Alıcı programı(12f629):
include "modedefs.bas"
b var word
trisio=%00000001
low gpio.1
devam:
serin gpio.0,N300,["AA"],b
if b=10 then high gpio.1
if b=20 then low gpio.1
goto devam


verici programı(12f629):
include "modedefs.bas"
u var word
trisio=%00000000
devam:
for u =1 to 25
serout gpio.0,N300,["sAA",10]
pause 50
next
pause 200
for u =1 to 25
serout gpio.0,N300,["sAA",20]
pause 50
next
pause 200
goto devam


Alıcıdaki led hiç yanmıyor. Acaba atx-34 veya arx-34 mü bozuk yoksa programlar mı hatalı . Teşekkürler...
Bilginin Efendisi Olmak İçin Çalışmanın Kölesi Olmak Şarttır

aslan_korhan

İlk önce PIC'leri kablo ile birbirine bağla ve dene bence...
Dünyada 10 çeşit insan vardır. Binary bilen ve bilmeyenler.

mech

VERİCİ
@ device  pic12F629, intrc_osc_noclkout, wdt_off, pwrt_on, mclr_off, protect_off, bod_off
include "modedefs.bas" 
CMCON=7 
IOC=%00000000  
INTCON=0 
OPTION_REG=%00000000 
TRISIO=%00000000 

u var word 

devam: 
serout gpio.0,N300,["sAA",10]
pause 200

serout gpio.0,N300,["sAA",20] 
pause 200

goto devam


ALICI
@ device  pic12F629, intrc_osc_noclkout, wdt_off, pwrt_on, mclr_off, protect_off, bod_off
include "modedefs.bas" 
CMCON=7 
IOC=%00000000  
INTCON=0 
OPTION_REG=%00000000 
TRISIO=%00000001 

b var word 
low gpio.1 

devam: 
serin gpio.0,N300,["AA"],b 
if b=10 then high gpio.1 
if b=20 then low gpio.1 
goto devam  


Picleri birbirine bağladım. Proteusta çalışıyor. Ama gerçekte çalışmıyor.
Bilginin Efendisi Olmak İçin Çalışmanın Kölesi Olmak Şarttır

mech

dışardan 4 MHz kristal takınca 2 pic arası seri iletişim kabloyla sağlandı. Ama alıcı verici modülleri arx atx -34 'lerin antenlerini birleştirmeden çalışmıyo. ??
Bilginin Efendisi Olmak İçin Çalışmanın Kölesi Olmak Şarttır

mech

baud oranını 2400'den 300'e çekince çalıştı. 30 metreden denedim çalışıyor...Teşekkürler...
Bilginin Efendisi Olmak İçin Çalışmanın Kölesi Olmak Şarttır