[salim2]

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
هذا البرنامج البسيط يقوم بالعمل التالي: عند الضغط على السويتش يشتعل الليد ثم ينتظر لمدة 500 ميلي ثانية ثم ينطفئ لمدة 500 ميلي ثانية ويكرر نفس العمل وهذا باستعمال البيك 16f84a والمذبذب 4.00 ميجاهرتز ، ولكن بعد التطبيق الفعلي على الواقع لاحظت وجود مشكلة وهي عند تغذية الدائرة فإن الليد في كثير من الأحيان يشتعل مباشرة من تلقاء نفسه قبل الضغط عل السويتش خاصة إذا قمت بتغذية الدائرة وفصلها بسرعة ولمرات متتالية ، لذا أريد أن لا يشتعل الليد عند التغذية مباشرة حتى يتم الضغط على السويتش فعلا جزاكم الله خيرا.

البرنامج

;void main() { trisa.f0=1; trisb=0;portb=0
while(1) { if(porta.f0==1){portb=0b00001000;delay_ms(500);por tb=0x0;delay_ms(500);}

{{

الدائرة


المعذرة لم أتمكن من وضع الصورة على الصفحة لذا وضعتها على رابط خارجي.

http://www.mediafire.com/file/l709s8...titre.png/file

[ماجد عباس محمد]

أخى
ما تقوله ليس عيب فى البرنامج بل فى الدائرة
ارجع لطرف رقم 4 ووصله كما يقول الداتاشيت هكذا


أيضا من الإعدادات فعل خاصية POR لبدء البرنامج من الأول عند انخفاض جهد التغذية

[عريبى محمود]

السلام عليكم ورحمة الله وبركاته
اخى الكريم

قم بتغذية الدائرة باستخدام البطارية .....واخبرنا

[عبدالله حجازى]

اقتباس المشاركة الأصلية كتبت بواسطة salim2 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته هذا البرنامج البسيط يقوم بالعمل التالي: عند الضغط على السويتش يشتعل الليد ثم ينتظر لمدة 500 ميلي ثانية ثم ينطفئ لمدة 500 ميلي ثانية ويكرر نفس العمل وهذا باستعمال البيك 16f84a والمذبذب 4.00 ميجاهرتز ، ولكن بعد التطبيق الفعلي على الواقع لاحظت وجود مشكلة وهي عند تغذية الدائرة فإن الليد في كثير من الأحيان يشتعل مباشرة من تلقاء نفسه قبل الضغط عل السويتش خاصة إذا قمت بتغذية الدائرة وفصلها بسرعة ولمرات متتالية ، لذا أريد أن لا يشتعل الليد عند التغذية مباشرة حتى يتم الضغط على السويتش فعلا جزاكم الله خيرا. البرنامج ;void main() { trisa.f0=1; trisb=0;portb=0 while(1) { if(porta.f0==1){portb=0b00001000;delay_ms(500);por tb=0x0;delay_ms(500);} {{ الدائرة المعذرة لم أتمكن من وضع الصورة على الصفحة لذا وضعتها على رابط خارجي. http://www.mediafire.com/file/l709s8...titre.png/file

السلام عليكم

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

  if (Button(&PORTB, 2, 10, 1)){  }

لو استخدمت هذة التعليمة هكذا

if(porta.f0==1){portb=0b00001000;}

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

  if (Button(&PORTB, 2, 10, 1)){delay_ms(500) ; }

هنا أمر اختبار هل تم تطبيق 5 فولت علي البن رقم 2 في البورت B وهنا لاحظ الإختلاف

لو تم وصول نابضة موجبة سريعه علي البن رقم 2 في البورت B ماذا سوف يحدث هل يتحقق الشرط الإجابة ( نعم ) ولكن هذة النبضه هي نبضة سريعة جدا قد تصل سرعتها الي واحد ميكرو سانية أو أكثر وعند حدوث هذة النبضه يتحقق الشرط ويدخل ينتظر 10 ميكرو سانية ويختبر الشرط مرة أخري هل ماذال هناك جهد علي البن لو موجود يتحقق الشرط لو اختفي الجهد لم يتحقق الشرط .. وهنا ميزة كبيرة جداا.

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

وهكذا يكون البرنامج اكثر استقرارا
تفصيل التعليمه

  if (Button(&PORTB, 2, 10, 1)){delay_ms(500) ; } 

if (Button(&PORTB, 2 هنا هل تم الضغط علي المفتاح 10 انتظر عشرة ميلي سانية , 1 هل ماذال مضغوط علي المفتاح حسنا نفذ ما بين القوسين

{delay_ms(500) ; }

. وهنا رقم 2 هوا رقم البن في البورت ورقم 10 وقت انتظار ورقم 1 الحاله واحد منطقي ويمكنك تغيرها ب 0 صفر منطقي

بالتوفيق

[salim2]

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

[salim2]

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

[عريبى محمود]

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

السلام عليكم ورحمة الله وبركاته
اخى الكريم

نفذ ما اشار به اخى عبد الله حجازى ...هناك امر برمجى اخر يمكن ان يحل المشكلة من وجهة نظرى






.

[عبدالله حجازى]

اقتباس المشاركة الأصلية كتبت بواسطة salim2 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته هذا البرنامج البسيط يقوم بالعمل التالي: عند الضغط على السويتش يشتعل الليد ثم ينتظر لمدة 500 ميلي ثانية ثم ينطفئ لمدة 500 ميلي ثانية ويكرر نفس العمل وهذا باستعمال البيك 16f84a والمذبذب 4.00 ميجاهرتز ، ولكن بعد التطبيق الفعلي على الواقع لاحظت وجود مشكلة وهي عند تغذية الدائرة فإن الليد في كثير من الأحيان يشتعل مباشرة من تلقاء نفسه قبل الضغط عل السويتش خاصة إذا قمت بتغذية الدائرة وفصلها بسرعة ولمرات متتالية ، لذا أريد أن لا يشتعل الليد عند التغذية مباشرة حتى يتم الضغط على السويتش فعلا جزاكم الله خيرا. البرنامج ;void main() { trisa.f0=1; trisb=0;portb=0 while(1) { if(porta.f0==1){portb=0b00001000;delay_ms(500);por tb=0x0;delay_ms(500);} {{ الدائرة المعذرة لم أتمكن من وضع الصورة على الصفحة لذا وضعتها على رابط خارجي. http://www.mediafire.com/file/l709s8...titre.png/file

اخي لقد جربت الكود علي تيست بورد ويعمل جيدا
وهذا الكود

            void main() {
           TRISA=0; PORTA=0;
           TRISB=0; PORTB=0;

             while(1){

      if(PORTA.F0==1){ PORTB.F0=1; delay_ms(230);}
       delay_ms(500); PORTB.F0=0;


    }
   }

محكاة



بالتوفيق