قسم الميكروكنترولر والروبوت ودوائر الاتصال بالحاسب الالي قسم المتحكمات الـ microcontroller و المعالجات microprocessor و التحكم الرقمي بالكمبيوتر CNC والانظمة الآلية والروبوت Robots

أدوات الموضوع

yac100
:: مهندس متواجد ::
تاريخ التسجيل: Mar 2007
الدولة: فلسطين - غزة
المشاركات: 140
نشاط [ yac100 ]
قوة السمعة:0
قديم 03-05-2012, 08:25 PM المشاركة 1   
ha مساعدة بسيطة من فضلكم البيك877 Twitter FaceBook Google+



السلام عليكم ورحمة الله وبركاته
اخواني في اعضاء المنتدي الطيب واعضائه الكرام
اريد من حضراتكم مساعدة وهي
يوجد ست مداخل وكل واحد يعمل وظيفة محدد ولكن الزر السادس يعيد حالة اخر زر تم الضغظ عليه كيف تيم فعل البرنامج
مع العلم اني استخدم البيك877 وبرنامج الميكروسي
وبارك الله فيكم
والسلام علكيم ورحمة الله وبركاته

اعلانات

الصورة الرمزية 3bkarino medo
3bkarino medo
:: مهندس جيد ::
تاريخ التسجيل: Mar 2012
الدولة: دمنهور البحيرة
المشاركات: 272
نشاط [ 3bkarino medo ]
قوة السمعة:0
قديم 03-05-2012, 11:51 PM المشاركة 2   
افتراضي


اخي اليك هذا الكود

كود:
void main() { char x;
 trisa=255;
 trisb=0;
 portb=0;
 while(1){ if(porta.f0==0){portb=0b00000001; x=portb; delay_ms(500);portb=0;}

           if(porta.f1==0){portb=0b00000010; x=portb; delay_ms(500);portb=0;}

           if(porta.f2==0){portb=0b00000100; x=portb; delay_ms(500);portb=0;}

           if(porta.f3==0){portb=0b00001000; x=portb; delay_ms(500);portb=0;}

           if(porta.f4==0){portb=x; x=portb; delay_ms(500);portb=0;}




}
}
لاكني استخدمت البك 16f84a واستخدمت البورت a كدخل والبورت b كخرج

وضعت مقاومات رفع علي كل طرف من اطراف البورت a

وازرار button موصله بالارضي والطرف الاخر موصل باطراف البورت a
ووضعت علي كل طرف من اطراف البورت b ليد
وجربت علي البيروتس واشتغلت الحمد لله

اعلانات اضافية ( قم بتسجيل الدخول لاخفائها )
  

الصورة الرمزية 3bkarino medo
3bkarino medo
:: مهندس جيد ::
تاريخ التسجيل: Mar 2012
الدولة: دمنهور البحيرة
المشاركات: 272
نشاط [ 3bkarino medo ]
قوة السمعة:0
قديم 04-05-2012, 12:08 AM المشاركة 3   
افتراضي


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

كود:
void main() {char x;
adcon1=0x06;
 trisa=255;
 trisb=0;
 portb=0;
 while(1){ if(porta.f0==0){portb=0b00000001; x=portb; delay_ms(500);portb=0;}

           if(porta.f1==0){portb=0b00000010; x=portb; delay_ms(500);portb=0;}

           if(porta.f2==0){portb=0b00000100; x=portb; delay_ms(500);portb=0;}

           if(porta.f3==0){portb=0b00001000; x=portb; delay_ms(500);portb=0;}

           if(porta.f4==0){portb=0b00010000; x=portb; delay_ms(500);portb=0;}
            
           if(porta.f5==0){portb=x; x=portb; delay_ms(500);portb=0;}
}}


yac100
:: مهندس متواجد ::
تاريخ التسجيل: Mar 2007
الدولة: فلسطين - غزة
المشاركات: 140
نشاط [ yac100 ]
قوة السمعة:0
قديم 04-05-2012, 11:11 AM المشاركة 4   
افتراضي


بارك الله فيك اخي الحبيب وجعله في ميزان حسناتك
لكن عندي سؤال قبل ان أجرب البرنامج
لماذا يتم تصفير البورت بي اخر كل زر


الصورة الرمزية 3bkarino medo
3bkarino medo
:: مهندس جيد ::
تاريخ التسجيل: Mar 2012
الدولة: دمنهور البحيرة
المشاركات: 272
نشاط [ 3bkarino medo ]
قوة السمعة:0
قديم 04-05-2012, 12:20 PM المشاركة 5   
افتراضي


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


yac100
:: مهندس متواجد ::
تاريخ التسجيل: Mar 2007
الدولة: فلسطين - غزة
المشاركات: 140
نشاط [ yac100 ]
قوة السمعة:0
قديم 04-05-2012, 09:25 PM المشاركة 6   
افتراضي


با رك الله فيك اخي الحبيب
علي المجهود الطيب
وبفضل الله تم عمل الجهاز بنجاح
وادعوا الله ان يجعله في ميزان حسناتك

إضافة رد

العلامات المرجعية

«     الموضوع السابق       الموضوع التالي    »
أدوات الموضوع

الانتقال السريع إلى


الساعة معتمدة بتوقيت جرينتش +3 الساعة الآن: 05:41 PM
موقع القرية الالكترونية غير مسؤول عن أي اتفاق تجاري أو تعاوني بين الأعضاء
فعلى كل شخص تحمل مسئولية نفسه إتجاه مايقوم به من بيع وشراء وإتفاق وأعطاء معلومات موقعه
التعليقات المنشورة لا تعبر عن رأي موقع القرية الالكترونية ولايتحمل الموقع أي مسؤولية قانونية حيال ذلك (ويتحمل كاتبها مسؤولية النشر)

Powered by vBulletin® Version 3.8.6, Copyright ©2000 - 2025