برنامه دزدگیر اماکن به زبان بیسیک

[a.mehran]

[attachment=10184]من برنامه دزدگیرو به زبان بیسیک نوشتم. نقشه مدار گیرنده هم در پست بعدی میزنم
ریموت هم از سایت roboeq.irبخرین .
سوالی بود در خدمتم
------------------------------------------------------------------

کد php:

$regfile = "m8def.DAT"
$crystal = 1150000
Config Pinb.0 = Input
Config Pinb.2 = Input
Config Portc.5 = Output
Config Portd.1 = Output
Config Portc.4 = Output
Config Portd.7 = Output
Config Portd.2 = Output
Config Portd.6 = Input

Do
If Pinb.0 = 1 Then Gosub D
D:

Waitms 880
If Pinb.0 = 1 Then Gosub Dz
Loop
End
Dz:
Toggle Portc.5
Set Portc.4
Waitms 70
Reset Portc.4
Waitms 129
Set Portc.4
Waitms 200
Reset Portc.4







Config Pinb.1 = Input

Do
If Pinb.1 = 0 Then Gosub Dz1
Loop
End
Dz1:
Set Portc.4
Set Portd.2
Set Portd.1
Wait 90
Reset Portd.1
Wait 180
Set Portd.1
Wait 90

Reset Portd.1 


----------------------------------------------------
چشم مدار از سنسور pir هست که از فروشگاه های دزدگیر خریدم این سنسور ها وقتی حرکتی حس میکنن خروجیشون صفر میشه (داخلش یه رله هست و خروجی رله رو به ما میده) خروجی چشم رو متصل کردم به یه رگولاتور 5 ولت و بعد دادم به پایه b.1 دو تا خروجی آژیر گذاشتم c.4 و d.1 که دادم به ترانزیستور
یک خروجیم گذاشتم که برای تلفن کننده میره : d.2
برای فعال کردن دزدگیر باید پین b.0تحریک مثبت شه 800 میلی ثانیه ! این جوری کردم که نویز کمتر بگیره
این مدار با دو ریموت در میاد 80000تومان! که اگه از بیرون بخرین باید 180000تومان بدین البته تو زنجان

[sinohe]

سلام
من از این سنسور ها چندتایی دارم به شماره d203b , d204s و ... ؛ اینها رو میشه همینطوری به میکرو وصل کرد یا اینکه نیاز به مدار راه انداز دارند؟ چون تو دیتاشیت 203 یک مداری گذاشته
به نظر شما ساده ترین مداری که بشه ازش جواب مناسبی گرفت چیه؟
میشه مدار خودتونو بزارید تا ببینیم؟

[a.mehran]

سلام
یه عکسی چیزی بزارید ببینم چیه

[sinohe]

اینم عکس سنسور

[aKaReZa75]

نه ، اینا یه مدار واسط هم دارن .

[a.mehran]

اینم نقشه مدارش




منبع :

کد:

http://projects.m32.ir/68/