wait در باسکام

[joker]

ها بازم میگین به این باسکام فحش ندم آ :)
( خدائیش خیلی زبون خوبیه )
4 خط نوشتم برای کنترل استپر موتور

کد:

Call Direction_right()
    Call Make_pulse(tedad)
    Waitms 20
    Call Direction_left()
    Call Make_pulse(tedad)
    Waitms 20

داخل تابع makepulse نوشتم

کد:

Sub Make_pulse(tedad As Integer)
'Tedad = Tedad - 1
'           Reset Puls
        Reset Pulse
Temptedad = Tedad - 1
   For I = 0 To Temptedad

'           Waitms 1

Call Timeout()
        Set Pulse
Call Timeout()
'           Waitms 1
        Reset Pulse

   Next

End Sub

و داخل روتین تایم آوت نوشتم :

کد:

Sub Timeout()
For I = 1 To 2
   Waitus 250
Next

End Sub

خب توی تابع MakePulse وقتی از waitms 1 استفاده میکنم مشکلی ندارم
ولی وقتی از تابع شبیه سازی تایم آوت به جای waitms استفاده میکنم ، میکرو قاط میزنه و دیگه موتور تغییر جهت نمیده ! علت ؟

[t3r!p3000]

مهندس یکم خودت دقت کنی می فهمی !!!

میشه برنامه کاملتو بذاری !!!

این متغیر I ایراد کارته !!!

تو Timeout از یه متغیر دیگه استفاده کن !!!

[joker]

اوه بعله اشکال از I بود....
این متغییر توی یک تابع دیگه هم استفاده شده بود و عملا منو مورد عنایت قرار میداد :)
تشکرآت فراوان.
من میدوووووونم تا تریپ هست ، مشکلی نیست که حل نشه :) ( پاچه خواری در حد آآآآآآآآآآآآآآآآه )

[t3r!p3000]

ممنون

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

[joker]

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

پس چطوری تو را حرص بدیم ؟