راه اندازی ماژولhm با avr

راه اندازی ماژولhm با avr- اتصال ماژول hmr و hms  با فرکانس 433 مگاهرتز به میکروکنترلر avr با نرم افزار bascom avr که طبق تصاویر زیر می توانید 6 کانال را راه اندازی کنید

تصویر فرستنده مدار

در تصویر پایین شما باید ورودی  ماژول فرستنده را به پایه pd1 متصل نمایید و دو پایه دیگر را به 5ولت مدار و منفی مدار

 

 

تصویر گیرنده مدار

در مدار گیرنده شما باید پایه خروجی ماژول را به pd0 متصل نمایید و دو پایه دیگر را با رعایت قطبیت به 5 ولت و منفی مدار متصل نمایید

 

راه اندازی ماژولhm با avr

دستورات فرستنده مدار با نرم افزار bascomavr

$regfile = “m8def.dat”
$crystal = 1000000
$baud=9600
config portc=input
dim led1 as string *13
dim led2 as string *13
dim led3 as string *13
dim led4 as string *13
dim led5 as string *13
dim led6 as string *13

dim a as byte
dim b1 as bit, b2 as bit, 3b as bit, 4b as bit
dim b5 as bit, b6 as bit, b7 as bit, b8 as bit,
led1=”pc21-1″
led2=”pc21-2″
led3=”pc21-3″
led4=”pc21-4″
led5=”pc21-5″
led6=”pc21-6″

mine:
do
if pinb.0=0 then gosub p1
if pinb.1=0 then gosub p2
if pinb.2=0 then gosub p3
if pinb.3=0 then gosub p4
if pinb.4=0 then gosub p5
if pinb.5=0 then gosub p6

loop

p1:
for a= 1 to 15
print led1;chr(13);
waitms 20
next a
return

p2:
for a= 1 to 15
print led2;chr(13);
waitms 20
next a
return
p3:
for a= 1 to 15
print led3;chr(13);
waitms 20
next a
return
p4:
for a= 1 to 15
print led4;chr(13);
waitms 20
next a
return
p5:
for a= 1 to 15
print led5;chr(13);
waitms 20
next a
return

p6:
for a= 1 to 15
print led6;chr(13);
waitms 20
next a
return

دستورات گیرنده مدار

 

$regfile = “m8def.dat”
$crystal = 1000000
$baud=9600
config portc=output
dim led as string *13

dim a as byte
dim b1 as bit, b2 as bit, 3b as bit, 4b as bit
dim b5 as bit, b6 as bit, b7 as bit, b8 as bit,

mine:
do
input led
if led=”pc21-1″ then gosub p1
if led=”pc21-2″ then gosub p2
if led=”pc21-3″ then gosub p3
if led=”pc21-4″ then gosub p4
if led=”pc21-5″ then gosub p5
if led=”pc21-6″ then gosub p6
loop

p1:
portc.0=1
waitms 600
portc.0=0
return

p2:
portc.1=1
waitms 600
portc.1=0
return
p3:
portc.2=1
waitms 600
portc.2=0
return
p4:
portc.3=1
waitms 600
portc.3=0
return
p5:
portc.4=1
waitms 600
portc.4=0
return

p6:
portc.5=1
waitms 600
portc.5=0
return

فایل شبیه سازی شده با proteus7.10 بهمراه فایل هگز گیرنده و فرستنده