ايران ويج

نسخه‌ی کامل: برنامه UP و DOWN
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
صفحه‌ها: 1 2
کماکان منتظر یاری سبزتان هستیم Biggrin
این قسمتی از برنامه یه دماسنجه که جزو اولین پروژه هام با AVR بودهکه قسمت شمارنده شو جدا کردم.
هر چند برنامه مبتدیانه است اما برای آموزش خوبه.
ممنون ایلگار جان

ولی من شمارنده نمیخوام

یه برنامه ای میخوام که مربوط به پست اولم باشه یعنی اون جدول رو به ترتیب برای خروجیهای A/B/C/D عملی کنه و.....

البته کار اصلیشم همین شمارشه ها اما با رویکردی متفاوت ...........

فکر کنم برنامش باید شبیه برنامه موتورپله ای باشه که اونجا هم با ترتیب کردن وصفر رو یک کردن سیمها موتور حرکت میکنه واگه برعکسش کنیم برمیگرده و...
درست مثل همین UP و DOWN
مهندس یه سوال !

اگه رو وضعیت 1111 بود و کلید up رو فشار بدیم چی کار بشه !
کاری نشه یا اینکه صفر بشه ؟؟؟


هنگامی که 0000 هستش و کلید down رو بزنیم چطور؟
نقل قول: اگه رو وضعیت 1111 بود و کلید up رو فشار بدیم چی کار بشه !
کاری نشه یا اینکه صفر بشه ؟؟؟

اگه به اینجا رسید یعنی آخرشه وهر چه UP رو فشار بدیم همینجا بمونه .. یعنی کاری نشه


نقل قول: هنگامی که 0000 هستش و کلید down رو بزنیم چطور؟
اینم همینطور

هی من تلاش می کنم خودت برنامشو بنویسی ولی انگار نمیشه !!!
باور کن برنامش ساده تر از اون چیزیه که فکرشو بکنی !!

اینو ببین :

کد php:
$regfile "m8def.dat" $crystal 1000000

Dim Ant 
As Byte

Ddrd 
= &B11100000 Portd Ddrb 1

Sw_up Alias Pind.0 
Sw_down Alias Pind.1
A Alias Portd.5 
B Alias Portd.6
C Alias Portd.7 
D Alias Portb.0

Do
   
Debounce Sw_up Up Gosub
   Debounce Sw_down 
Down Gosub
Loop

Up
:
   
Incr Ant
   
If Ant 16 Then Ant 15
   A 
Ant.3 Ant.2 Ant.1 Ant.0
Return

Down:
   
Decr Ant
   
If Ant 255 Then Ant 0
   A 
Ant.3 Ant.2 Ant.1 Ant.0
Return 

خیلی راحت می تونی پارامترهای خروجی و ورودی ایت رو تو اول برنامه تغییر بدی ! ( قسمت alias )

مهندس در ضمن من پروتئوس نداشتم که تست کنم ولی چون خلوص نیت داشتم باید درست باشه برنامش !!!!!
علی جون برنامه های شما چشم بسته هم کار میکنه ....پروتئوس و .. نمیخوادWink

قربونتHeart

الان میرم تستش میکنمHappy
علی جون کارت خیلی درستهHappyHappyHappy

گل پسری Clap

یدونه ای Wink


تستش کردم ... البته عملا پروگرم وتست کردم بهمین دلیل طول کشیدWhistle

بازم ممنونHeart
صفحه‌ها: 1 2