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

   

الصورة الرمزية fathiidriss
fathiidriss
:: مهندس متواجد ::
تاريخ التسجيل: Apr 2005
الدولة: ليبيا
المشاركات: 58
نشاط [ fathiidriss ]
قوة السمعة:
قديم 21-11-2008, 02:36 AM المشاركة 9   
افتراضي



عمل جميل بحق استمر الله معك

اعلانات

ibrahimaq
:: مهندس ::
تاريخ التسجيل: Aug 2006
المشاركات: 38
نشاط [ ibrahimaq ]
قوة السمعة:
قديم 25-11-2008, 08:47 PM المشاركة 10   
افتراضي


TRISA=%11100
TRISB=0
PORTA=0
PORTB=0

hour=0
minute=0
hour_on=0
minute_off=0

start:
Cls
If setup=0 Then GoTo start

TRISA=%11100
TRIS هذا الأمر يستخدم لتحديد المنفذ مدخل أو مخرج حيث 1 مدخل و 0 مخرج ويمكن تحديده بطريقة عشريه أو ثنائية أو سداسي عشري وهنا حددنا منفذ A بطريقة ثنائية %11100
ويمكن أن نحدد أطراف المنفذ على حده بهذه الطريقة:
TRISA.1=1
أي طرف A1 مدخل
TRISB=0
أطرف منفذ ب مخارج وهنا بطريقة عشرية
PORTA=0
تصفير منفذ A
PORTB=0
تصفير منفذ B
hour=0
minute=0
hour_on=0
minute_off=0
تصفير المتغيرات
start:
بداية إجراء واسمينا هذا الإجراء start
Cls
هذا الأمر يقوم بمسح LCD

If setup=0 Then GoTo start
وهذا أمر شرطي إذا كان setup تساوي الصفر وهو منفذ A4 اذهب إلى الإجراء start

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

ibrahimaq
:: مهندس ::
تاريخ التسجيل: Aug 2006
المشاركات: 38
نشاط [ ibrahimaq ]
قوة السمعة:
قديم 30-11-2008, 06:16 PM المشاركة 11   
افتراضي


display_time:

GoSub get_time
GoSub print_time

If setup=0 Then GoTo time_set
If hour_on=hour And minute_on=minute Then PORTB.0=1
If hour_off=hour And minute_off=minute Then PORTB.0=0

GoTo display_time

start_clock:

BusOut clockout,0,[0]

Return





Syntax
BUSOUT Control , { Address } , [ OutputData ]
BusOut
يستخدم هذا الأمر لتصدير المعلومات عن طريق المسرى 12c

Clockout= 11010000 لضبط DS1307 لاستقبال البيانات
DS1307 تحتوي على سجل من 8 بيت حيث
بيت 0 = الثواني
بيت 1 = الدقائق
وهكذا
وهنا وضعنا صفر في بيت الثواني
Return
هذا الأمر يعني ارجع إلى التعليمة التي بعد الأمرGoSub


زكي شاكر
:: عضو ماسي ::
تاريخ التسجيل: May 2006
الدولة: المغرب
المشاركات: 2,945
نشاط [ زكي شاكر ]
قوة السمعة:
قديم 30-11-2008, 06:50 PM المشاركة 12   
افتراضي


شكرا أخي ابراهيم على المتابعة ..
الاخوة الذين يودون محاكاة البرنامج على بروتوس يمكنهم اخذ اي ملف Hex قديم عندهم ، وتفريغه من محتواه بعد فتحه ب notpad ثم وضع التعليمات التي جاءت في اول مشاركة، ومن تم تسجيله..


الصورة الرمزية wleed antar
wleed antar
:: عضو ماسي ::
تاريخ التسجيل: May 2006
الدولة: القاهرة - مصر
المشاركات: 1,484
نشاط [ wleed antar ]
قوة السمعة:
قديم 01-12-2008, 10:57 AM المشاركة 13   
Exclamation


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


زكي شاكر
:: عضو ماسي ::
تاريخ التسجيل: May 2006
الدولة: المغرب
المشاركات: 2,945
نشاط [ زكي شاكر ]
قوة السمعة:
قديم 02-12-2008, 07:32 PM المشاركة 14   
افتراضي


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

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


الصورة الرمزية wleed antar
wleed antar
:: عضو ماسي ::
تاريخ التسجيل: May 2006
الدولة: القاهرة - مصر
المشاركات: 1,484
نشاط [ wleed antar ]
قوة السمعة:
قديم 02-12-2008, 09:54 PM المشاركة 15   
افتراضي


أعلم فائدتها مما لاحظته لكن سؤالى هو لماذا الأعضاء الذين يكتبون البرامج بلغة الاسمبلى لا يكتبونها بلغة البيزيك ؟ حيث أن البيزيك تمكننا من عمل برنامج بتعليمات أبسط وباستخدام عدد كلمات أقل ولعلك شاهدت البرنامج المكتوب بالبيزيك اذا تحول الى اسمبلى يصبح كثير التعقيد ويصبح ملف طويل ! فلماذا الإصرار على هذه اللغة ؟ وهل يجب علىَ أن أتعلمها أم تكفينى لغة البيزيك التى أعرفها ؟


ibrahimaq
:: مهندس ::
تاريخ التسجيل: Aug 2006
المشاركات: 38
نشاط [ ibrahimaq ]
قوة السمعة:
قديم 02-12-2008, 11:39 PM المشاركة 16   
افتراضي


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




الكيجن

http://up1.m5zn.com/download-2008-12-2-05-9k4r04zl3.rar



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