پاسخ : مشکل شمارش با کانتر {لطفا کمک کنید}
خانم سمیرا من قبلا این کار هارو از اب خوردن هم راحت تر انجام دادم {دیگه 4 خط برنامه که تو اینترنت موجوده رو مگه کسی هست نتونه بسازه؟؟!!!
}و قبلا هم برنامه ای نوشتم با کانتر که الان اون پروژه در حال ثبت اختراع هست....موضوع اینه کنترل پورت lcdروی پورت bهست و من میخواستم با این مشکل راه حلی اگر کسی بلده بگه که انگار راه حلی نداشت یا حتی منو مطمئن کنه از این مشکل :NO:
حالا مجبورم یاpcbجدید چاپ کنم یا این مدارو تغییر بدم ...
راستی اون راه حل که میخواستم ببینم مشکل از lcdهست یا نه با این برنامه که نوشتم مطمئن شدم که هست{lcdکاملا از مدار خارج شد هم نرم افزاری هم سخت افزاری و وقتی یک پالس وارد شده اشتباه شمرده شه پورتaتغییر وضعیت میده{که با وقتی این کار رو کردم هیچ پالسی اشتباه شمرده نشد و معلوم شد ازlcdبوده}}
اینم برنامه که اگر هچین مشکلی داشته حل بشه
[code=vb]$regfile = "m32def.dat"
$crystal = 10000000
Config Pind.2 = Input
Config Porta = Output
Config Timer2 = Timer , Async = On , Prescale = 128
Config Timer1 = Counter , Edge = Rising
Dim Cc As Long
Dim Cc1 As Long
Enable Interrupts
Enable Timer2
On Timer2 Nex2
Start Timer1
Do
Cc = Counter1
If Cc1 > 3 Then Reset Porta
If Cc1 < 3 Then Set Porta
Loop
Nex2:
Stop Timer1
Cc1 = Cc
Cc = 0
Timer1 = 0
Start Timer1
Return[/code]
و واقعا ممنون از اقای ICE-ELEC که واقعا با هدف کمک کردن کامنت دادند
خانم سمیرا من قبلا این کار هارو از اب خوردن هم راحت تر انجام دادم {دیگه 4 خط برنامه که تو اینترنت موجوده رو مگه کسی هست نتونه بسازه؟؟!!!
}و قبلا هم برنامه ای نوشتم با کانتر که الان اون پروژه در حال ثبت اختراع هست....موضوع اینه کنترل پورت lcdروی پورت bهست و من میخواستم با این مشکل راه حلی اگر کسی بلده بگه که انگار راه حلی نداشت یا حتی منو مطمئن کنه از این مشکل :NO:حالا مجبورم یاpcbجدید چاپ کنم یا این مدارو تغییر بدم ...
راستی اون راه حل که میخواستم ببینم مشکل از lcdهست یا نه با این برنامه که نوشتم مطمئن شدم که هست{lcdکاملا از مدار خارج شد هم نرم افزاری هم سخت افزاری و وقتی یک پالس وارد شده اشتباه شمرده شه پورتaتغییر وضعیت میده{که با وقتی این کار رو کردم هیچ پالسی اشتباه شمرده نشد و معلوم شد ازlcdبوده}}
اینم برنامه که اگر هچین مشکلی داشته حل بشه
[code=vb]$regfile = "m32def.dat"
$crystal = 10000000
Config Pind.2 = Input
Config Porta = Output
Config Timer2 = Timer , Async = On , Prescale = 128
Config Timer1 = Counter , Edge = Rising
Dim Cc As Long
Dim Cc1 As Long
Enable Interrupts
Enable Timer2
On Timer2 Nex2
Start Timer1
Do
Cc = Counter1
If Cc1 > 3 Then Reset Porta
If Cc1 < 3 Then Set Porta
Loop
Nex2:
Stop Timer1
Cc1 = Cc
Cc = 0
Timer1 = 0
Start Timer1
Return[/code]
و واقعا ممنون از اقای ICE-ELEC که واقعا با هدف کمک کردن کامنت دادند
یعنی همزمان کنتر مینداخت با فونت بسیار بزرگ فارسی و بعد با lcd گرافیکی 128 ساختم که باز مشکلی نداشت . و بسکام در هیچ زمینه ای باگ نداره مگه این که از نسخه کرک شده استفاده کرده باشین که احتمال داره باگ داشته باشه . ولی در کل برنامه اگه حرفه ای باشه هیچ گونه موردی نداره احتمالا برنامت مورد داره اگه حرفه ای کار نمیکنی بیخالش شو چون درسته که بسکام برنامه نویسیش راحته ولی برای برنامه حرفه ای باید باش کار کرده باشی . من خودم کارهایی با بسکام کردم که به فکرتون هم نمیرسه . وگرنه شمردن و کانتر و این قبیل براش اب خوردنه . :biggrin:
{البته هیچی نشده مشکل جدید پیش اومده ...وقتی یه موتور الکتریکی رو میزنم به باتری ای که مدار بهش وصله کانتر الکی یهو 35 تا میشماره ولی بقیه چیزا کار میکنند!!} که اینم احتمالا با همون 74ls14حل میشه :applause:
دیدگاه