ايران ويج

نسخه‌ي كامل: switch
شما هم اكنون متن قالب بندي نشده را مي‌بينيد.مشاهده‌ي نسخه‌ي اصلي
سلام دوستان
يه برنامه با بيسكام ميخواستم كه با فشار يك با ميكرو سويچ pind.0
رو براي 20 ثانيه يك بكنه ودوباره صفر بشه تا وقتي كه دوباره ميكر سويچ
فشار داده بشه ولي تو با دوم به مدت60 ثانيه يك بشه
ودر بار سوم به طور كامل يك بشه
ممنون
کد:
$regfile = "m16def.dat"
$crystal = 1000000

Config Pind.0 = Output , pinb.0 = input

Debounce Pinb.0 , 1 , Ant1
Ant1:
set portd.0
wait 20
reset portd.0

Debounce Pinb.0 , 1 , Ant2
Ant2:
set portd.0
wait 60
reset portd.0

Debounce Pinb.0 , 1 , Ant3
Ant3:
set portd.0
Idle
END
اين ساده ترين برنامه اي هستش كه مي تونه اين كارو انجام بده .
يعد از فشار دادن دكمه سوم پايه portd.0 كلا يك شده و ميكرو به حالت IDLE رفته و ديگر هيچ دستوري را قبول نكرده و مصرف خود را نيز پايين مي آورد .
آدرس اصلي