کمک به کسی که تازه کار با بسکام رو شروع کرده

[saeedgreat]

سلام دوستان عزیز من اومدم از روی یه PDF که بسکام رو به خوبی آموزش داده شروع کردم به یاد گیری ولی تو اولین برنامه ایی که با توجه به اون آموزش نوشتم تو زرد از آب در اومد برنامه به قرار زیر هستش:

$regfile = "m16def.dat"
$crystal = 1000000
Config Portb.7 = Input
Config Portb.6 = Output
Bitwait Pinb.7 , Reset
Set Portb.6
Bitwait Pinb.7 , Set
Reset Portb.6
End

همونطور که از برنامه پیداست قراره با ریست شدن پایه ی 7 از پورت b پایه 6 از همون پورت یک بشه و دوباره عکس این عمل اتفاق بیفته ولی وقتی برنامه رو در محیط پرتئوس اجرا میکنم در ابتدا پورت 7 ست هست و با زدن دکمه ایی که در عکس مشخص هست رست میشه و با زدن دویاره ی کلید هیچ اتفاقی نمیفته(دوباره ست نمیشه )به نظرتون مشکل از کجاست؟

[iranesabz]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

سلام دوستان عزیز من اومدم از روی یه PDF که بسکام رو به خوبی آموزش داده شروع کردم به یاد گیری ولی تو اولین برنامه ایی که با توجه به اون آموزش نوشتم تو زرد از آب در اومد برنامه به قرار زیر هستش:

$regfile = "m16def.dat"
$crystal = 1000000
Config Portb.7 = Input
Config Portb.6 = Output
Bitwait Pinb.7 , Reset
Set Portb.6
Bitwait Pinb.7 , Set
Reset Portb.6
End

همونطور که از برنامه پیداست قراره با ریست شدن پایه ی 7 از پورت b پایه 6 از همون پورت یک بشه و دوباره عکس این عمل اتفاق بیفته ولی وقتی برنامه رو در محیط پرتئوس اجرا میکنم در ابتدا پورت 7 ست هست و با زدن دکمه ایی که در عکس مشخص هست رست میشه و با زدن دویاره ی کلید هیچ اتفاقی نمیفته(دوباره ست نمیشه )به نظرتون مشکل از کجاست؟

سلام برادر من تازه گی یک مانیتور خریدم و باز مجدد سیستم و راه انداخته ام و هنوز بیسیکم نصب نیست ولی شما کو خط 7 و مثل خط 5 بنویس ببین چی میشه ؟

[saeedgreat]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

من این کار رو انجام دادم ولی از اولش پایه ی 7 در حالت ریست هست و هیچ تغییری نمیکنه :angry:

[trrstrima]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

از من میشنوی هرچه سریعتر بسکام رو بزار کنار و برو سراغ سی...از ما گفتن بود خود دانی

[ATA.Mega64]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

از من میشنوی هرچه سریعتر بسکام رو بزار کنار و برو سراغ سی...از ما گفتن بود خود دانی

اهم اهم
نه بابا چی چی رو برو سراغ سی؟همینجا بمون.

داداش سعید شما مشکلت از اینه که ورودی هاتو با Port تعریف کردی.
بجای
Config Portb.7=input
بنویس:
Config Pinb.7=input

اگه بازم مشکلی بود بپرس

[saeedgreat]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

بازم حل نشد
کد رو به صورت زیر نوشتم

$regfile = "m16def.dat"
$crystal = 1000000
Config Pinb.7 = Input
Config Pinb.6 = Output
Bitwait Pinb.7 , Reset
Set Portb.6
Bitwait Pinb.7 , Set
Reset Portb.6
End

نمیدونم اصلا چرا از اول پایه 6 به سورت ست شده هست؟
مگه نباید منتظر بمونه که پایه 7 ریست شه بعد پایه ی 6 ست شه؟
پس این دستور Bitwait بدرد چی میخوره؟
من احساس میکنم به محض اجرای برنامه میکرو رو خط 7 میمونه (بجای اینکه منتظر برآورده شدن شرط خط 5 بمونه)
شما هم اگه میتونید همین برنامه رو اجرا کنید ببینید چی میشه!

[ATA.Mega64]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

اوه شرمنده من یک چیزی رو یادم رفت
باید برای پایه ورودیت یه پول پ بزاری
این شکلی:



من با این شماتیک و برنامه زیر که گفتم تغییرش بدی جواب گرفتم.اگر هم یه لوپ براش بزاری بارها جواب میگیری :icon_razz:

$regfile = "m16def.dat"
$crystal = 1000000
Config Pinb.7 = Input
Config Portb.6 = Output
Bitwait Pinb.7 , Reset
Set Portb.6
Bitwait Pinb.7 , Set
Reset Portb.6
End

[ARM-mohsen-AVR]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

داداش از یه مقاومت poll-down استفاده کن :nice:

[saeedgreat]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

با تشکر فراوان از دوستان عزیزی که وقتشون رو گذاشتن تا به من تازه وارد یه چیزی یاد بدن
دوتا سوال داشتم :
اول اینکه این قسمتی که تو عکس مشخص شده دقیقا چی هست

Power یا VCC یا...
دوم اینکه لطفا یک مقدار در مورد پول پ و دون توضیح بدید باز هم ممنون

[ARM-mohsen-AVR]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

اون مثلثه همون 5 ولته مثبته vcc خودمون
در مورد پول اپ : یعنی اون پایه در حالت عادی در حالت 1 منطقی قرارر داره
در مورد پول دان : یعنی در حالت عادی به صورت صفر منطقی هستش
:applause: :applause:

[saeedgreat]

پاسخ : کمک به کسی که تازه کار با بسکام رو شروع کرده

با چند دستکاری کوچیک به نتیجه رسید

$regfile = "m16def.dat"
$crystal = 1000000
Config Portb.0 = Input
Config Portb.1 = Output
Do

Bitwait Pinb.0 , Reset
Set Portb.1
Waitms 200
Bitwait Pinb.0 , Reset
Reset Portb.1
Waitms 200
Loop
End

اینم فایل شبیه سازیش
http://up.iranblog.com/images/fuzl0t8fx2ax69ukqw7m.zip