مشکل در کار با کیپد ...

[sinaitg]

سلام . من با بسکام کیپد رو اسکن کردم و عدد مربوط به کلید فشار داده شده را در یک متغیر (مثل a) ذخیره کردم ..
حالا مشکل اینه که میخوام با فشار دادن کلید اول ، عدد مربوط به اون در یه متغیر دیگه (مثل b) قرار بگیره . عدد مربوط به کلید فشرده شده بعدی تو متغیر بعدی و ... الی آخر ....

کمممممممممممممممممممممممممممممممک ...
:angry: :angry: :angry: :angry: :angry: :angry: :angry: :angry:

---

اضافه شده در تاریخ :
اگه یه سورس کد با توضیحاتش باشه که حسابی دعاتون میکنم ....

[saeed bagherani]

پاسخ : مشکل در کار با کیپد ...

چند تا عدد داری
حافظه میکرو جوابگو هستش ؟

برای راه حل ساده بهتره از ارایه ها استفاده کنید و با هر بار فشردن کلید یکی به آرایه اضافه کنید

[hadi_hashemi_85]

پاسخ : مشکل در کار با کیپد ...

واللا من بسکام بلد نیستم .
توضیحاتتون هم یه کم مبهمه .
اگه منظورتون اینه که هر کلیدی که زده میشه تو متغیر های جداگانه ذخیره بشن ، بهتره یه آرایه تعریف کنین .
مثلا
key[i]

qبعد هربار که کلید زده میشه i رو ++ کنین و مقدار کلید و تو هر عضو آرایه ذخیره کنین .

[SAMAN.ASADI]

پاسخ : مشکل در کار با کیپد ...

سلام . من با بسکام کیپد رو اسکن کردم و عدد مربوط به کلید فشار داده شده را در یک متغیر (مثل a) ذخیره کردم ..
حالا مشکل اینه که میخوام با فشار دادن کلید اول ، عدد مربوط به اون در یه متغیر دیگه (مثل b) قرار بگیره . عدد مربوط به کلید فشرده شده بعدی تو متغیر بعدی و ... الی آخر ....

کمممممممممممممممممممممممممممممممک ...
:angry: :angry: :angry: :angry: :angry: :angry: :angry: :angry:

سلام
نزن آقا
نزن . . .
مخت تاب ور میداره هااااا
شوخی بود ....
خواستم بخندی :smile:

بگذریم
چرا اینکا رو بکنی
معمولا تو کیپد اگر کلیدها رو پشت سر هم بزنیم متغیر میتونه به دو صورت ذخیره بشه
1. رشته ای
2. در حین کلید زدن عدد محاسبه بشه و ریخته بشه توی متغیر بزرگ (میتونه هم عدد صحیح باشه هم میتونه عدد ممیزی باشه)

حالا با توجه به این تعاریف شما کدومشو میخواین؟

[jafar2000]

پاسخ : مشکل در کار با کیپد ...

سلام
اگه حدسم درست باشه شما میخای در حافظه میکرو و یا روی صفحه نمایش کاراکتر های چند رقمی ایجاد کنی مثلا بتونی بنویسی 145 یا ASDC و یا غیره .برای اینکار باید اول یه رشته اصلی تعریف کنی تا کاراکتر ها در اون نوشته بشن بعد یه رشته دیگه تعریف کنی که فقط یه کاراکتر توش نوشته بشه .در هر بار فشار دادن هر یک از کلید ها ابتدا مقدار اون کلید خونده میشه و کاراکترش در رشته کوچک ریخته میشه و بعد رشته اصلی یه کاراکتر شیفت داده میشه و کاراکتر جدید در اون جای خالی نوشته میشه .این کار ها باید داخل یه حلقه انجام بشه تا امکان تکرار داشته باشه با این روش میتونی تا 256 کاراکتر رو بنویسی البته با تدابیری میشه بیشترش هم کرد

[sinaitg]

پاسخ : مشکل در کار با کیپد ...

سلام حدستون کاملا درسته ..
من میخوام با کیپد یه عدد ، مثلا 12546885 ، (البته بصورت رشته ها) رو روی LCD نشون بدم ..
چطوری این کار رو بکنم ؟؟
با توجه به این که هر هر کلید تا موقعی که فشار داده شده است و نگه داشته شده است ، مدام عدد مربوط به خود را برمیگرداند ......
چه کنم ؟؟؟؟
اگه باعث زحمت دوستان نباشم ، یه سورس با توضیح کاملش باشه دعاتون میکنم ..

[SAMAN.ASADI]

پاسخ : مشکل در کار با کیپد ...

سلام حدستون کاملا درسته ..
من میخوام با کیپد یه عدد ، مثلا 12546885 ، (البته بصورت رشته ها) رو روی LCD نشون بدم ..
چطوری این کار رو بکنم ؟؟
با توجه به این که هر هر کلید تا موقعی که فشار داده شده است و نگه داشته شده است ، مدام عدد مربوط به خود را برمیگرداند ......
چه کنم ؟؟؟؟
اگه باعث زحمت دوستان نباشم ، یه سورس با توضیح کاملش باشه دعاتون میکنم ..

همون روشی که من گفتم بهتره
تو بسکام کنترل کردن LCD خیلی راحته
و همینطور نمایش دادن متغیر
توی حلقه ای که دارید کیپد رو میخونید همون موقع محاسبه کنید و عدد محاسبه شده را بریزین تو همون متغیر .

موفق باشی

[sinaitg]

پاسخ : مشکل در کار با کیپد ...

ممنون .. ولی این کار را رو کردم ولی جواب نمیده ...
هیچکسی یه سورس نداره، بعنوان نمونه، ببینم چیکار باید بکنم ؟؟؟
بخخدا ثواب داره ها ...

[tofan_2050]

پاسخ : مشکل در کار با کیپد ...

dim key as byte
dim key1 as string*8
dim i as byte
for i=1 to 8
Give_key:
     Key = Getkbd()
    If Key > 15 Then Goto Give_key
    key1 = key1+str(key)
    lcd str(key)
    waitms 100
next i

یا

dim key as byte
dim key1(8) as string*1
dim i as byte
for i=1 to 8
Give_key:
    Key = Getkbd()
    If Key > 15 Then Goto Give_key
    lcd str(key)
    key1(i)=str(key)
    waitms 100
next i

[jafar2000]

پاسخ : مشکل در کار با کیپد ...

dim key as byte
dim key1 as string*8
dim i as byte
for i=1 to 8
Give_key:
     Key = Getkbd()
    If Key > 15 Then Goto Give_key
    key1 = key1+str(key)
    lcd str(key)
    waitms 100
next i

یا

dim key as byte
dim key1(8) as string*1
dim i as byte
for i=1 to 8
Give_key:
    Key = Getkbd()
    If Key > 15 Then Goto Give_key
    lcd str(key)
    key1(i)=str(key)
    waitms 100
next i

دوست عزیز منظور دوستمون از کیبورد همون کیبورد کامپیوتر هست نه صفحه کلید معمولی

[sinaitg]

پاسخ : مشکل در کار با کیپد ...

سلام . فکر کنم برنامه ارایه شده یکم مشکل داشته باشه ..
سورس و شبیه سازی شده پروتیوس رو پلود کردم تا دوستان بهتر بتونن کمکم کنن...

البته از همه دوستان عذر میخوام که مزاحم شدم ها ..

اینم لینک دانلود: http://uplod.ir/bjejyyt8ru2a/New_Win...ve_(2).zip.htm

[tofan_2050]

پاسخ : مشکل در کار با کیپد ...

دوست عزیز منظور دوستمون از کیبورد همون کیبورد کامپیوتر هست نه صفحه کلید معمولی

دوست عزیز اگه عنوان تایپیک رو ببینید نوشتن مشکل در کار با کیپد نه کیبورد

---

اضافه شده در تاریخ :

هیچکس نیست؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
:angry: :angry: :angry: :angry: :angry: :angry: :angry: :angry: :angry: :angry: :angry: :angry: :angry:

خدمت شما
فایلتون رو اصلاح کردم
http://uplod.ir/wj16p1karspv/New_Folder_(4).zip.htm