با عرض سلام و خسته نباشید خدمت شما.اگه من بخوام که چند تا عدد رو فقط با نوشتن یک بار دستور getkbd از صفحه کلید بگیرم باید چیکار کنم.مثلا من میخوام که 3 تا عدد 2 رقمی رو از صفحه کلید بگیرم.من برای این کار دستور getkbd رو سه بار مینویسم یعنی برای عدد اول یک دستور getkbd و بعد از گرفتن عدد اول getkbd بعدی و برای عدد سوم هم یک دستور getkbd مینویسم.حالا اگه من بخوام که تو برنامم فقط یک دستور getkbd بزارم و توسط اون 3 تا عدد بالا و یا هر چند عددی رو از صفحه کلید بگیرم باید چیکار کنم.در ضمن شما فرض کنید که من این سه تا عدد رو میخوام به صورت جداگانه در سه تا متغیر ذخیره کنم و روی آنها محاسباتی رو انجام بدم یعنی عدد اول در یک متغیر و عدد دوم در یک متغیر دیگر و عدد سوم در یک متغیر دیگری ذخیره شوند و من در طول برنامه امکان دسترسی به سه تا عدد رو داشته باشم.خیلی ممنون.
اطلاعیه
Collapse
No announcement yet.
دستور getkbd
Collapse
X
-
پاسخ : دستور getkbd
سلام
تا دلت بخواد در لینکهای زیر در مورد getkbd پروژه هست:
http://micro-project.blogfa.com/
http://iranmicro.ir/forum/showthread.php?t=1322&page=12
هر بلایی خواستی سرش بیار.
به طور ساده فرضا میخوای 3 تا عدد بگیری البته نمیدونم آیا محدودیتی در تعداد ترقام هم داری یا نه( مثلا حتما 2 تا 3 رقمی باشه)
برنامه زیر به طور خیلی ساده 3 تا عدد از شما میگیره:
فرض کن key=11 همون enter هست.
Get_number:
S = 0
do
key=getkbd()
key=lookup(key,table)
if key<10 then
s=s*10
s=s+key
endif
if key=11 then
If I = 0 Then
Number1 = S
Goto Get_number
Incr I
End If
If I = 1 Then
Number2 = S
Incr I
Goto Get_number
End If
If I = 2 Then
Number2 = S
I = 0
Goto Calculate
End If
Loop
مثلا میتونی در زیر برنامه calculate میانگین این 3 عدد رو محاسبه کنی.




دیدگاه