اطلاعیه

Collapse
No announcement yet.

دستور getkbd

Collapse
X
 
  • فیلتر
  • زمان
  • Show
Clear All
new posts

    دستور getkbd

    با عرض سلام و خسته نباشید خدمت شما.اگه من بخوام که چند تا عدد رو فقط با نوشتن یک بار دستور getkbd از صفحه کلید بگیرم باید چیکار کنم.مثلا من میخوام که 3 تا عدد 2 رقمی رو از صفحه کلید بگیرم.من برای این کار دستور getkbd رو سه بار مینویسم یعنی برای عدد اول یک دستور getkbd و بعد از گرفتن عدد اول getkbd بعدی و برای عدد سوم هم یک دستور getkbd مینویسم.حالا اگه من بخوام که تو برنامم فقط یک دستور getkbd بزارم و توسط اون 3 تا عدد بالا و یا هر چند عددی رو از صفحه کلید بگیرم باید چیکار کنم.در ضمن شما فرض کنید که من این سه تا عدد رو میخوام به صورت جداگانه در سه تا متغیر ذخیره کنم و روی آنها محاسباتی رو انجام بدم یعنی عدد اول در یک متغیر و عدد دوم در یک متغیر دیگر و عدد سوم در یک متغیر دیگری ذخیره شوند و من در طول برنامه امکان دسترسی به سه تا عدد رو داشته باشم.خیلی ممنون.

    #2
    پاسخ : دستور 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 عدد رو محاسبه کنی.

    دیدگاه


      #3
      پاسخ : دستور getkbd

      هیچی از دستور بالا نفهمیدم.لطفا کمی بیشتر و واضح تر توضیح بدهید.خیلی ممنون

      دیدگاه

      لطفا صبر کنید...
      X