مشکل با کی برد 4*4وسون سگمنت

[mahdi210]

با سلام دوستان یه مشکلی برای من پیش اومده من می خوام عدد فشرده شده روی سون سگمنت نشون داده بشه و به نوبت اولین عدد گرفته شده از کی برد در سون سگمنت اول دومین عدد گرفته شده در دومین سون سگمنت و...
نهوه نوشتن دستور رو هم بلدم
ولی تا میای عدد رو وارد بکنی عدد ها خیلی چشمک میزنن وثابت نیستتن
در دستور waitms هم کم گرفتم هم زیاد در نظر گرفتم نشد اصلا ثابت نمیمونه

ولی وقتی بدون دستور get kbd()آزمایش میکنم وخودم به متغییر ها از قبل عدد میدم سون سگمنتها عدد رو ثابت نشون میدن ووضعیت خوبه
ولی بدرد من نمیخوره من میخوام عدد گرفته شده رو نمایش بدم
لطفا یه راهی رو پیشنهاد بکنید .ممنون :cry2:

[mahdi210]

پاسخ : مشکل با کی برد 4*4وسون سگمنت

خواهش میکنم راهنمایی کنید .بد جوری گیر کردم :cry2:

[8925347]

پاسخ : مشکل با کی برد 4*4وسون سگمنت

خواهش میکنم راهنمایی کنید .بد جوری گیر کردم :cry2:

سلام
زمان گرفتن اطلاعات از کیبر خیلی زیاده به نظر من باید گریستال میکرو رو زیاد کنی یا خودت کیبرد رو پیکر بندی کنی

[سوران آراسته]

پاسخ : مشکل با کی برد 4*4وسون سگمنت

در این جور مواقع که سرعت اسکن سون سگمنت مهمه و در حین اجرای برنامه نباید دستورات دیگه در سرعت اسکن تاثیر بزارن بهتره از اینتراپت استفاده کنید. شما کیپد رو وصل کن به یکی از پینهای اینتراپت تا با زدن هر کلید در برنامه اینتراپت، کیپد چک بشه و در برنامه اسکن سون سگمنت تاثیر نداشته باشه.

[mahdi210]

پاسخ : مشکل با کی برد 4*4وسون سگمنت

آقا سوران میشه بیشتر راهنمایی کنید اگه میشه با چند خط برنامه ممنون

[mahdi210]

پاسخ : مشکل با کی پد4*4وسون سگمنت

یعنی تو این انجمن کسی این کارو تا حالا انجام نداده؟(با بسکام) :cry2:

[skiboys]

پاسخ : مشکل با کی پد4*4وسون سگمنت

یعنی تو این انجمن کسی این کارو تا حالا انجام نداده؟(با بسکام) :cry2:

سلام
نوشتن درست برنامه اسکن خیلی مهمه به طوری که قسمت های دیگه برنامه روی روند اسکن کردن تاثیر نزاره شما برنامه خود را در اینجا قرار دهید که ببینیم چی نوشته اید

[MA90]

پاسخ : مشکل با کی برد 4*4وسون سگمنت

من هم همین مشکل رو داشتم ولی میخواستم روی lcd گرافیکی نمایش بدم که مشکل با ایجاد یه تاخیر 25 میلی ثانیه برای چک کردن هر پایه پورت میکرو حل شد فکر کنم تو همون تاخیر مشکل دارین با سون سگمنت کار نکردم ولی فکر نکنم از اون باشه !!!!

[mahdi210]

پاسخ : مشکل با کی برد 4*4وسون سگمنت

Config Portb = Input پورت مربوط به کی پد
Config Portd = Output پورت مربوط رفرش سون سگمنت
Config Portc = Output پورت مربوط به اطلاعات
Config Kbd = Portb , Debounce = 30 , Delay = 30
Dim A As Byte , B As Byte , C As Byte , D As Byte

'***********************************
Ali: اسم زیر برنلمه
Do
A = Getkbd()
If A > 15 Then : Goto Ali : End If
If A > 0 And A < 16 Then : Goto Ali2 : End If این قسمت برای اینه که اگه عددی گرفته شد تشخیص بدیم واز حلقه بریم بیرون
Loop
'***********************************
Ali2: اسم زیر برنامه
Do
Reset Portc.0
Reset Portc.2 در قسمت بالا عدد گرفته شده به این صورت روی 7سگمنت نمایش داده میشه و بازم منتظر گرفتن عدد دوم هست
Set Portc.1
Portd = Lookup(b , Jd)
B = Getkbd()
If B > 15 Then : Goto Ali2 : End If
If B > 0 And A < 16 Then : Goto Ali3 : End If
Loop
'***********************************
Ali3: زیر برنامه سوم
Reset Portc.1
Reset Portc.2
Set Portc.0
Portd = Lookup(a , Jd) در این قسمت عدد دوم هم گرفته شده ونمایش پیدا
waitms 10
میکنه ومنتظر میمونه عدد سوم وارد بشه
Reset Portc.0
Reset Portc.2
Set Portc.1
Portd = Lookup(b , Jd)
waitms 10
C = Getkbd()
If C > 15 Then : Goto Ali3 : End If
If C > 0 And A < 16 Then : Goto Ali4 : End If
Loop
Ali4 : ......

Jd:
Data &B1000000 , &B1001111 , &B0100100 , &B0110000 , &B0011001 , &B0010010 , &B0000010 , &B1111000 , &B0000000 , &B0010000 &B0100100


این اول برنامه بود که متوقف شدم کجای کار میلنگه؟؟؟؟ تاخیرهارو کم وزیاد کردم هر کاری کردم نشد که نشد. :angry:

[mahdi210]

پاسخ : مشکل با کی برد 4*4وسون سگمنت

مشکل همچنان باقیه :angry: :angry: :angry: انشالله به کمک دوستان باید حلش کنیم

یا علی

[mahdi210]

پاسخ : مشکل با کی برد 4*4وسون سگمنت

سلام
نوشتن درست برنامه اسکن خیلی مهمه به طوری که قسمت های دیگه برنامه روی روند اسکن کردن تاثیر نزاره شما برنامه خود را در اینجا قرار دهید که ببینیم چی نوشته اید

دیدی؟؟؟؟؟؟؟؟

[سوران آراسته]

پاسخ : مشکل با کی برد 4*4وسون سگمنت

سلام
اینجا یه نمونه برنامه و کد گذاشته نگا کن ببین به دردت می خوره:
http://www.qsl.net/pa3ckr/bascom%20a...rds/index.html
شماتیک چسز خاصی نداره فقط 4تا دیود به مدار اضافه میشه و همین!!
باز مشکل داشتی در خدمتم