دوستان سلام
لطفا به کد زیر توجه کنید :
خیلی کد ساده ایه، انتظار دارم وقتی شستی و فشار میدم و نگه میدارم ، portb.0 روشن بشه و بعد از 200 میلی ثانیه خاموش بشه ، و وقتی شستی رو رها میکنم دوباره portb.0 روشن بشه و بعد از 200 میلی ثانیه خاموش بشه .
اما این اتفاق نمیفته ، بدون اینکه درست به شستی بزنم ، portb.0 خود به خود و پشت سر هم خاموش و روشن میشه
ممنون میشم راهنمایی بفرمایید.
لطفا به کد زیر توجه کنید :
کد:
$regfile = "m8def.dat" $crystal = 8000000 Config Portb = Output Config Pind.0 = Input Config Debounce = 10 Do Debounce Pind.0 , 1 , L1 , Sub Debounce Pind.1 , 0 , L2 , Sub Loop End L1: Set Portb.0 Waitms 200 Reset Portb.0 Return L2: Set Portb.0 Waitms 200 Reset Portb.0 Return
اما این اتفاق نمیفته ، بدون اینکه درست به شستی بزنم ، portb.0 خود به خود و پشت سر هم خاموش و روشن میشه
ممنون میشم راهنمایی بفرمایید.
دیدگاه