[اوشة محمود]

ارجو مساعدتى فى برنامج لاضاءة 3 ليد بمفتاح واحد

يعنى بالضغط على المفتاح يضاء الليد الاول
بالضغط ثانية على المفتاح يضاء الليد الثانى مع استمرار اضاءة الليد الاول
وبالضغط تالثا على المفتاح يضاء الليد الثالث مع استمرار اضاءة الليد الثانى والثالث
وبالضغط رابعا على المفتاح يتم اطفاء الــ3 ليدات

وهكذا وياريت باستخدام البيك 84A او البيك 628A

ولكم جزيل الشكر لكل من ساعدنى

[ياسين الحانوتي]

void main() {
TRISB = 0x00;
trisa = 0xFF;

portb=0;


        while(1) {
             if(porta.b0==1) {
             
             while(porta.b0==1) {  }
               
             portb  = (portb<<1)+1;
             if(portb==15)  { portb=0; }

          }
        }

وضعت الليدات على ال PORTB البت 0 و 1 و 2
المدخل هو PORTA.B0 ، لازم يعطي واحد أثناء الضغط على الزر

تحياتي..

[مشتاق الله]

اقتباس المشاركة الأصلية كتبت بواسطة ياسين الحانوتي void main() { TRISB = 0x00; trisa = 0xFF; portb=0; while(1) { if(porta.b0==1) { while(porta.b0==1) { } portb = (portb<<1)+1; if(portb==15) { portb=0; } } } وضعت الليدات على ال PORTB البت 0 و 1 و 2 المدخل هو PORTA.B0 ، لازم يعطي واحد أثناء الضغط على الزر تحياتي..

كود مختصر , الله يزيدك
جميييييييييييييييل

[اوشة محمود]

شكرا كثيرا اخوانى على الرد السريع والاهتمام البالغ

قمت بوضع البرنامج على برنامج ميكروسى وكانت النتيجة ان


بهاخطـــأ مثل الصورة ادناه


وبتحليل برنامج حضرتك تبين ســـهوا عدم وجود قوس مثل الصورة ادناه وبوضعه لم يعد به خطأ



وبتطبيق البرنامج على الدائرة المذكورة ادناه وعلى الدخل A0 وعلى المخارج B0 -B1 B2 وبالبيك رقم 16F628A تبين انها تضىء الليد الاول

فقط ولا شىء غير ذلك



ارجو منك اخى تعديل البرنامج ولكم كل الشكر والسلام عليكم

[ياسين الحانوتي]

اقتباس المشاركة الأصلية كتبت بواسطة اوشة محمود وبتطبيق البرنامج على الدائرة المذكورة ادناه وعلى الدخل A0 وعلى المخارج B0 -B1 B2 وبالبيك رقم 16F628A تبين انها تضىء الليد الاول فقط ولا شىء غير ذلك ارجو منك اخى تعديل البرنامج ولكم كل الشكر والسلام عليكم

تأكد من مطابقة نفس البيك ونفس الاعدادات في الميكروسي وال ISIS
الكود شغال جربته على PIC16F628A , 16F84A ولا مشكلة

ملاحظة: لاداعي لوضع تلك المقاومات ودارة المذبذب في المحاكاة...

[salah56bachir]

اقتباس المشاركة الأصلية كتبت بواسطة ياسين الحانوتي void main() { TRISB = 0x00; trisa = 0xFF; portb=0; while(1) { if(porta.b0==1) { while(porta.b0==1) { } portb = (portb<<1)+1; if(portb==15) { portb=0; } } } وضعت الليدات على ال PORTB البت 0 و 1 و 2 المدخل هو PORTA.B0 ، لازم يعطي واحد أثناء الضغط على الزر تحياتي..

السلام عليكم أخي ياسين
هلا تفضلت بوضع تنويه أمام آخر سطرين حتى يتضح معنى الكود...أو تكرمت بشرح موجز للكود كله خصوصا وأنه مختصر ورائع حتى تتم الفائدة....تحياتي.

[ياسين الحانوتي]

اقتباس المشاركة الأصلية كتبت بواسطة salah56bachir السلام عليكم أخي ياسين هلا تفضلت بوضع تنويه أمام آخر سطرين حتى يتضح معنى الكود...أو تكرمت بشرح موجز للكود كله خصوصا وأنه مختصر ورائع حتى تتم الفائدة....تحياتي.

وعليكم السلام .. بالتأكيد أخي ، هذا شرح موجز أتمنى أن يفيدك ..

هذا الجزء الشائع :

if(porta.b0==1) {       
             while(porta.b0==1) {  }
              //كود
}

أعتقد واضح ,, يختبر حالة دخل المفتاح إذا ما وجد 1 (يعني الزر مضغوط) يدخل في حلقة فارغة لينتظر
حتى تنتهي الضغطة،، ثم ينفد التعليمات ..

------
الكود بسيط جدا أولا

portb=portb<<1;

//هذه التعليمة تعمل ازاحة للبور b بت واحد باتجاه اليسار
لو كان مثلا:

PORTB = 0B00000111

النتيجة:

PORTB = 0b00001110

- - -

في حالتنا هذه في البداية تكون قيمة ال portb = 0b00000000
-السطر الأول يعمل ازاحة نحو اليسار ثم يضيف واحد للنتيجة
مثال:

0b00000000
بعد الإزاحة
0b00000000
بعد إضافة واحد
0b00000001

مثال اخر

0b00000001
بعد الإزاحة
0b00000010
بعد إضافة واحد
0b00000011
...

وهكذا في كل مرة تتحرك الوحدات إلى اليسار ويضاف واحد ليملئ الفراغ في اليمين..

-السطر الثاني ببساطة يختبر ال portb إذا ما وصل للقيمة 1111 يعيده للصفر .. وتتكرر الدورة من جديد

أتمنى أن تتضح الفكرة,,
تحياتي..

[اوشة محمود]

تم تجربة البرنامج وكان شغال 100% على بيك 84 وبيك 626 شكرا لاخى ياسين الحانوتى اشكره من كل قلبى واسأل الله العلى الكريم ان يديم عليك نعمته ويزيدها عليك كما سرنى جدا شرحك للبرنامج لكن لى سؤال
ما هو وظيفة السطلر البرمجى الذى به 15 ..يعنى لماذا 15 ؟ اكرر شكرى لك مرة اخرى كما اكرر شكرى للاخ مشتاق الله على مساعدته للاخوة فى مواضيع اخرى ... دمتم لنا مع الشكر