سلام من یه برنامه تو محیط بسکام نوشتم که توش از دستور wait 3استفاده کردم اما وقتی برنامه رو simulator بسکام چک میکنم مبینم روی دستورwaitمیمونه وخط های بعدیشو اجرا نمیکنه.توی پروتئوسم چک میکنم خروجی روی یک میمونه و بعد از 3 ثانیه صفر نمیشه یعنی بعد از 3 ثانیه خروجیم تغییری نمیکنه.به نظرتون مشکلش چیه؟
اطلاعیه
Collapse
No announcement yet.
مشکل با دستور wait
Collapse
X
-
پاسخ : مشکل با دستور wait
برنامم اینه
"regfile = "m8def.dat $
crystal = 1000000 $
Config Portb = 0
Portb = 255
Config Portd = 1
Dim X As Bit
First:
Do
X = Pinb.4
Loop Until X = 1
Do
X = Pinb.4
Loop Until X = 0
If Pinb.0 = 1 Or Pinb.1 = 1 Or Pinb.2 = 1 Or Pinb.3 = 1 Then
Pind.0 = 1
Wait 3
Pind.0 = 0
End If
Goto First
End
دیدگاه
دیدگاه