با سلام
دوستان من يه مدت بود از برنامه نويسي وبيسكام دور بودم
حالا ميخواستم يه يه برنامه با بسكام بنويسم همون اول كار گير كردم نميدونم چيرا اينطوري ميشه چند بارم نرم افزار بسكام رو ژاك كردم دوباره نصب كردم عيب بر طرف نشد واقعا خنده داره ها دوستوره به اين ساده گي منو داره بازي ميده
لطفا شما هم اين برنامرو ببينيد اگه زحمتي نباشه توپرتيوس تست كنيد من كه ديگه خسته شدم داره ديونم ميكنه
Config Kbd = Portd
Dim A As Byte
Dim B As Byte
Main:
Do
A = Getkbd()
If A > 15 Then
Goto Main
Else
Locate 1 , 1
Lcd A
If A < 16 Then
Goto Pp
End If
End If
Loop
Pp:
Do
A = Getkbd()
If A > 15 Then
Goto Pp
End If
Locate 1 , 2
Lcd A
goto ttt
Loop
وبقيه برنامه
........
اضافه ميكنم من نام ميكرو و lcdوپايه هاشو از طريق برنامه بيسكام برنامه ريزي كردم (m16--16*2 lcd)
اينجا در حلقه اول برنامه منتظر عددي ميمونه مثلا 8 فشار داده ميشه
وبايد در محل 1و1 نوشته بشه و وارد حلقه دوم بشه منتظر عدد دوم بشه ولي
اينطور نيست
خيلي عجيبه
كي بورد كه فشار داده شد مثلا 5 عوض اينكه بژره به حلقه بعدي منتظر بمونه
دوتا 5 رو منويسه 5 دوم رو هم تو جاي تعين شده در حلقه دوم مينويسه
چرااااااااااااااااااااااااااااااااااااااااااااااااا
دارم ديونه ميشمممممممممممممممممم
خواهش ميكنم كمك كنيد لطفا خودتون آزمايش كنيد بعد نظر بدين چون هركي نگاه بكنه ميگه درسته ولي تو عمل اينطور نيست
ببينيد
http://up.iranblog.com/images/0kfa7o4us75aoye7682e.bmp
مثلا من نميخوام عدد دوم رو وارد كنم ولي اين عدد اوا رو كه ميزن دومي رو هم خودش از روي اولي وارد ميكنه اصلا هم حلقه برنامه رو حساب نميكنه
صفحه اصلی
انجمن
جستجو
فهرست اعضا
افزونه های فایرفاکس
» 
تشکر شده توسط :
