مشکل در استفاده ی دستور wait در زیربرنامه debounce

[kingcyrus]

دوستان سلام
لطفا به کد زیر توجه کنید :

$regfile = "m8def.dat"
$crystal = 8000000
Config Portb = Output

...

[mostafa6369]

سلام خدمت دوستان
من دستورات مربوط به زیر برنامه و فراخوانی آن را بصورت بسکام مطالعه...