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

مشاهدة نتائج الإستفتاء: هل ترى أنه من الأفضل عمل قسم جديد في المنتدى للغات الحديثة مثل لغة MikroC ؟؟
نعم 53 92.98%
لا 4 7.02%
المصوتون: 57. أنت لم تصوت في هذا الإستفتاء

   

lahoioui
:: مهندس متواجد ::
تاريخ التسجيل: May 2009
المشاركات: 177
نشاط [ lahoioui ]
قوة السمعة:
قديم 21-07-2009, 05:48 PM المشاركة 89   
افتراضي



هدا برنامج اخر للتجربة 1 الدرس6 أقصر من السابق
http://ifile.it/ultgxr5/lesson6_experience_1.rar

اعلانات

الصورة الرمزية ahmad_s_f
ahmad_s_f
:: المهندس/ أحمد سمير فايد ::
تاريخ التسجيل: Jun 2006
الدولة: سائح في ارض الله
المشاركات: 632
نشاط [ ahmad_s_f ]
قوة السمعة:
قديم 21-07-2009, 08:37 PM المشاركة 90   
افتراضي حل آخر للتجربة رقم 17


أخي الكريم lahoioui

إن الحل الذي وضعته للتجربة رقم 17 ليس رائعاً بل هو أكثر من رائع
وهذا إن دل على شيء فإنما يدل على الفكر البرمجي المتميز

أرجو من جميع المشاركين أن يستفيدوا من الكود الذي وضعه الأخ lahoioui
وهذا هو الكود لمن لم يقم بتحميل الملف
كود:
void main(){ trisb=0; trisa=0xff; portb=0; while(1){if(porta.f0==0){portb=(portb<<1)+1;delay_ms(500);} } }
هذا الكود يعتبر حل إضافي رائع للتجربة رقم 17

بارك الله فيك أخي lahoioui ( لا أعرف اسمك إلى الآن لعدم كتابة صيغة اشتراكك في الدورة) .

================================
وفقنا الله جميعا لما يحب ويرضى ورزقنا وإياكم العلم النافع والعمل الصالح
والسلام عليكم ورحمة الله وبركاته

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

الصورة الرمزية mohamedse
mohamedse
:: عضو ذهبي ::
تاريخ التسجيل: Aug 2008
الدولة: مصر الأسكندرية
المشاركات: 631
نشاط [ mohamedse ]
قوة السمعة:
قديم 21-07-2009, 09:28 PM المشاركة 91   
افتراضي


السلام عليكم

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


كود:
void main()
{trisb=0;
 trisa.f0=1;
 portb=0;
while(1)
loop:
if(porta.f0==0)
              {if(portb==0b11111111){portb=0;delay_ms(1000);goto loop;}
               portb=portb*2+1;
               delay_ms(500);
              }
}


الصورة الرمزية ahmad_s_f
ahmad_s_f
:: المهندس/ أحمد سمير فايد ::
تاريخ التسجيل: Jun 2006
الدولة: سائح في ارض الله
المشاركات: 632
نشاط [ ahmad_s_f ]
قوة السمعة:
قديم 21-07-2009, 11:33 PM المشاركة 92   
افتراضي


السلام عليكم

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


كود:
void main()
{trisb=0;
 trisa.f0=1;
 portb=0;
while(1)
loop:
if(porta.f0==0)
              {if(portb==0b11111111){portb=0;delay_ms(1000);goto loop;}
               portb=portb*2+1;
               delay_ms(500);
              }
}

ماشاء الله فكر متميز جداً ويدل على الفهم الجيد للنظام الثنائي وعلى المهارة البرمجية الجيدة ... لك من كل قلبي كل الأمنيات بمزيد من النجاح والتميز أخي الكريم .

وفقك الله .


lahoioui
:: مهندس متواجد ::
تاريخ التسجيل: May 2009
المشاركات: 177
نشاط [ lahoioui ]
قوة السمعة:
قديم 23-07-2009, 02:19 PM المشاركة 93   
افتراضي


التجربة20 الدرس6
ماراي الأخ أحمد بما أننا نتحدث عن الازاحات لو جعلنا التجربة 20 من الدرس6 كلها
ازاجات كما في البرنامج التالي
http://ifile.it/u2g1k8q/lesson6_experience20.rar


الصورة الرمزية Eng_Bandar
Eng_Bandar
:: عضو فضي ::
تاريخ التسجيل: Jul 2009
الدولة: المملكة العربية السعودية
المشاركات: 195
نشاط [ Eng_Bandar ]
قوة السمعة:
قديم 23-07-2009, 03:12 PM المشاركة 94   
افتراضي


بسم الله الرحمن الرحيم

ارجو من المهندس أحمد و الأخوة التعليق
أنا صممت إشارة مرور كاملة (( يعني 12 ليد )) واشتغلت الدائرة على ما يرام


وهذه صورة الدائرة وهي شغالة



وهذا البرنامج

void main()
{
TRISB=0;
TRISA=0;
loop:
PORTB=0B00110010;
PORTA=0B00001000;
delay_ms(1000);

PORTB=0B01010010;
PORTA=0B00001000;
delay_ms(1000);

PORTB=0B10000110;
PORTA=0B00001000;
delay_ms(1000);

PORTB=0B10001010;
PORTA=0B00001000;
delay_ms(1000);

PORTB=0B10010000;
PORTA=0B00001001;
delay_ms(1000);

PORTB=0B10010001;
PORTA=0B00001000;
delay_ms(1000);

PORTB=0B10010010;
PORTA=0B00000010;
delay_ms(1000);

PORTB=0B10010010;
PORTA=0B00000100;
delay_ms(1000);

PORTB=0B10010010;
PORTA=0B00001000;
goto loop;
}
علماً أنني لم أشاهد أي أي مشروع في ذلك و أنا أعرف أنه بعض الأعضاء قام بتصميم هذا المشروع لكن أنا لم انظر إليه و أردت أن اجرب ذلك بنفسي


lahoioui
:: مهندس متواجد ::
تاريخ التسجيل: May 2009
المشاركات: 177
نشاط [ lahoioui ]
قوة السمعة:
قديم 23-07-2009, 04:20 PM المشاركة 95   
افتراضي


التجربة20 الدرس6
أونجعلها متحركة كما في البرنامج التالي
http://ifile.it/4ezapqc/lesson6_experience20_2.rar


الصورة الرمزية Eng_Bandar
Eng_Bandar
:: عضو فضي ::
تاريخ التسجيل: Jul 2009
الدولة: المملكة العربية السعودية
المشاركات: 195
نشاط [ Eng_Bandar ]
قوة السمعة:
قديم 23-07-2009, 05:58 PM المشاركة 96   
افتراضي


تفضل مهندس أحمد كما أمرت

الكود و دائرة المحاكاة للإشارة المرورية



http://up4.m5zn.com/download-2009-7-23-07-eb657ihlc.c

http://up4.m5zn.com/download-2009-7-23-07-4snlk777x.dsn



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