[أبو زكووور]

السلام عليكم أيها الإخوة مشرفين و أعضاء
و شكراً لمساهماتكم و نقاشاتكم
و تحية خاصة للأستاذ زكي شاكر و الأستاذ حيدر ...
أحتاج لمساعدتكم في موضوع إستعصى عليَّ كثيراً
و لم أستطيع التوصل لأكثر من هذا


http://filaty.com/f/905/69410/AH.rar.html



أريد من المتحكم PIC16F84 أن يعطيني الحالات المنطقية التالية على البورتات
B0 B1 B2 B3 B4 B5
عند البداية تكون حالة البورتات 000000
عند الضغط على المفتاح SW1 و مع إستمرار الضغط فقط
تبدأ المخارج بالوميض بالتدريج على هذا النحو
000000
000001
000011
000111
001111
011111
111111
و تتوقف عن الحركة عند رفع الضغط عن SW1
و تستمر من نفس المكان عند إعادة الضغط
و تتوقف الحركة عندما تكون الحالة 111111 مهما كانت حالة SW1
أما عند الضغط على SW2 ومع إستمرار الضغط فقط
ينقص عدد المخارج المومضة بالتدريج من أي وضعية تكون عليها المخارج
مع التوقف عن النقصان عند الحالة 000000 مهما كانت حالة SW2

شكراً جزيلاً لكم أيها الإخوة و بوركت جهودكم .

[حيدر علاج حسن]

تكرم عينك اخي ابو زكور
تفضل هذا هو الكود

 char n[10]={0,1,3,7,15,31,63},i;
void main()
{
trisa.f0=1;trisa.f1=1;trisb=0;portb=0;
loop:
while(porta.f0==0 && i<6)
                        {
                        i++;
                        portb=n[i];delay_ms(500);
                        }
while(porta.f1==0 && i>0)
                        {
                        i--;
                        portb=n[i];delay_ms(500);
                        }
goto loop;
}

[أبو زكووور]

شكراً جزيلاً أخي حيدر
بارك الله فيك جزاك الله كل الخير في الدنيا و في الآخرة إنشاء الله ...
سوف أعمل به فوراً
السلام عليكم

[أبو زكووور]

شكرا لك أخي حيدر مرة أخرى
وضعت الكود على البروتوس هنالك مشكلة
البورتات تعمل دون الضغط على أي مفتاح
يجب عند الضغط على SW1 البورتات المومضة يزداد عددها ( فقط عند الضغط ) حتى تومض جميعها
كذلك الأمر بالنسبة عند الضغط على SW2
البورتات المومضة ينقص عددها حتى تنطفيء جميعها
أرجوا ملاحظة هذه المشكلة
شكرا لك أخي حيدر .

[أبو زكووور]

السلام عليكم أخي حيدر
قمت بتعديلات عل توزيع البورتات حتى تعمل كما هو مطلوب
لك مني كل الشكر والتقدير .

char n[10]={0,1,3,7,15,31,63},i;
void main()
{
trisb=0b11000000;
portb=0b11000000;
loop:
while(portb.f6==0 && i<6)
                        {
                        i++;
                        portb=n[i];delay_ms(500);
                        }
while(portb.f7==0 && i>0)
                        {
                        i--;
                        portb=n[i];delay_ms(500);
                        }
goto loop;
}

[حيدر علاج حسن]

الله يبارك بيك واتمنى لك التوفيق ان شاء الله تعالى

[حيدر علاج حسن]

اخي ابو زكور
لاجل الفائدة فقط . انا جربت الكود قبل ان اضعه هنا . تأكد فقط . وبالاخص انك لم تجري تغييرا جذريا . ارجو ان تجربه وتخبرني .

[أبو زكووور]

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

السلام عليكم
أخي حيدر التعديل فقط على توزيع البورتات
في ملف البروتوس الذي قمت أنا برفعه
إستخدمت فيه البورتات B فقط
المخارج على B0 B1 B2 B3 B4 B5
المفاتيح على B6 B7
التعديل كان فقط على توزيع البورتات كما تلاحظ
أما بالنسبة لباقي الكود فهو متقن و ممتاز
شكراً شكراً لك .
إذا سمحت عندي طلب آخر على نفس المشروع
أريد أن أظهر على البورتات A0 A1 A2 A4
رقم آخر مخرج مومض ثنائيا
عندما يكون البورت B = 000000
يكون البورت A = 0000
عندما يكون البورت B = 000001
يكون البورت A = 0001
عندما يكون البورت B = 000011
يكون البورت A = 0010
وهكذا حتى آخر رقم
شكرا لك أخي حيدر