أرسل بواسطة: الزمان في سبتمبر 06, 2002, 03:25:57 صباحاً
ما رأيكم يا أخواني في كتابة دروس حول ربط جهاز الكمبيوتر بدوائر إلكترونية نحن نصممها عبر منفذ الطابعة وبواسطة لغة الفيجوال بيسك التي تتميز بسهولة وسرعة تعلمها ، وأنا واثق بأننا سوف نستفيد من هذه الدروس في عمل بعض الأشياء التي تفيدنا مثلاً عمل جهاز كاشف لسرعة السيارات التي تمر أمام باب منزلك ثم يسجل في قاعدة البيانات عدد السيارات التي تجاوزت السرعة المسموح بها وغيرها من الحسابات ، ومثلاً نستطيع عمل برنامج يقوم بتشغيل إنارة المنزل في الوقت الفلاني أو يشغل التلفاز عندما أأمره بذلك وأنا خارج المنزل وذلك بالاتصال برقم الهاتف الذي عليه جهاز الكمبيوتر ثم يجيب علي الكمبيوتر فاضغط على رقم واحد مثلاً لكي أشغل التلفاز.
أرسل بواسطة: الزمان في سبتمبر 06, 2002, 05:19:46 مساءاً
هل تعرفون نظام العد الثنائي ؟؟
معرفة هذا النظام ضرورية ، فمنفذ الطابعة يتعامل بهذا النظام ، وإذا كنتم تعرفون طريقة التعامل مع هذا النظام فلن أشرح نظام العد الثنائي
وشكراً لكم
أرسل بواسطة: Mgh في سبتمبر 07, 2002, 12:13:24 صباحاً
www.message4all.jeeran.com/crane/1.htm
أرسل بواسطة: ابو تركي في سبتمبر 07, 2002, 03:16:59 صباحاً
وشكرا وانا معكم
أرسل بواسطة: Mgh في سبتمبر 08, 2002, 01:54:40 مساءاً
بسم الله الرحمن الرحيم
تحكم فى عالمك بحاسبك الشخصى :
===========================
فى هذا المقال وما سيليه من مناقشات سوف نحاول شرح كيف يمكنك أن تتحكم وترى العالم حولك بواسطة حاسبك الشخصى.
تعريف المخرج :
=============
المخرج هو مجموعة من الخطوط التى تمر بها الإشارة التى تمر بين المعالج (أو وحدة المعالجة المركزيه) و الأجزاء الأخرى من الحاسب.
والإستخدام الشائع للمخارج هو الإتصال بالطابعة أو المودم أو لوحة المفاتيح و الشاشات.
ومعظم المخارج فى الحاسب تكون رقمية (Digital) حيث تكون الإشارة فيها إما 0 أو 1 .
المخارج المتوازيه تنقل عدة وحدات من المعلومات (bits) مرة واحدة بينما ينقلها المخرج التسلسلى واحدة واحدة (ولكنها تستطيع أن تستقبل وترسل المعلومات فى نفس الوقت مما يميزها عن المخارج المتوازية فى بعض التطبيقات).
وفى هذا البحث سأتناول المخرج المتوازى (مخرج الطابعة) فهو موجود فى كل الأجهزة المتوافقة مع (IBM).
المنفذ المتوازى:
===============
فى الحاسب العديد من المخارج مثل (scsi,USB,IrDA) ولكن المنفذ التوازى هو الأشهر .
المنفذ المتوازى يحتوى على
8 مخارج
5 مداخل
وأربع خطوط تستطيع العمل كمخارج أو مداخل .
وهذه الخطوط كافية للإتصال بمعظم الأجهزة الخارجية.
وفى الحاسبات الحديثة يمكن لخطوط الخرج الثمانية أن تستخدم فى الإدخال وذلك لإتصال أسرع مع الماسحات الضوئية و الأجهزة الأخرى .
ويتكون المنفذ المتوازى من ثلاث أقسام وهم مسجل المعلومات (Data Register) ومسجل الحالة (Status Register) و مسجل التحكم (Control Rgister).
تطور المنفذ:
============
منذ أن بدأ تصميم الحاسبات و المنفذ المتوازى فى تطور والتطور هنا هدفه زيادة سرعة النقل.
فالسرعة مهمة لأن الحاسبات والأجهزة المرتبطة بها تصبح أسرع و أسرع مع الوقت و الوظائف التى يقومون بها أصبحت معقدة فأصبحت المعلومات المراد تبادلها أكثر وأكثر.
المنفذ القديم كانت سرعته كافية لنقل الكود (ASCII) لأحد الحروف إلى الطابعة ذات المصفوفة النقطية (dot-Matrix) ولكن الطابعات الحديثة تريد إستقبال معلومات أكبر لطباعة صفحة بخطوط مختلفة و رسومات واضحة.
عنوانه
======
لكل جزء فى الحاسب عنوان يمكن للمعالج أن يراسله عليه والمنفذ المتوازى له العناوين التاليةفى معظم الأجهزة المتوافقة مع IBM :
888(H378) و 889(H379) و 890(H37A)
وهم عناوين الأجزاء الثلاثة السابق ذكرها بالترتيب .
أرسل بواسطة: abood100 في سبتمبر 08, 2002, 02:28:29 مساءاً
منذ مدة وأنا أبحث حول هذا الموضوع ولكن تحت بيئة نظام التشغيل Windows NT or XP هنا تختلف المسألة تماماً فهذا النظام لا يسمح بالتعامل مع المنافذ مباشرة
أرسل بواسطة: Mgh في سبتمبر 08, 2002, 02:42:12 مساءاً
وردا عليك فإن التعامل مع المنافذ يكون بأحد لغات البرمجة وسوف أشرح هذا الموضوع بالتفصيل قريبا إن شاء الله (بإستعمال لغة الفيجوال بيزك) وسوف يعمل إنشاء الله على الأنظمة التى ذكرتها.
أرسل بواسطة: abood100 في سبتمبر 09, 2002, 01:44:58 صباحاً
أما مع الXP أو ال NT فالأمر مختلف، هناك توابع API عليك التعامل معها، يجب عليك تهيئة المنفذ قبل التعامل معه، ومن ثم إغلاقه بعد إنهاء التعامل معه، وهناك ملف يجب تحميله للذاكرة أولاً، باختصار استطعت التعامل معه، ولكني لست مقتنعاً بالنتائج التي لدي..وأود أن أرى إن كان لديك طريقة أسرع وأفضل..
وتقبل تحياتي
أرسل بواسطة: Mgh في سبتمبر 09, 2002, 03:41:21 مساءاً
لقد تعاملت مع المنفذ المتوازى (منفذ الطابعة) بواسطة الفيجوال بيزيك وتطلب ذلك وجود ملف (Win95io.dll ) وتعريف API ولكن لم يكن على أن أفتح البورت قبل التعامل معه أو أغلقه بعد ذلك
فقط كنت أكتب الأمر
Vbout 888,12
أو
a=vbinp (888) 'c
أرسل بواسطة: salwanrawas في سبتمبر 10, 2002, 01:12:41 صباحاً
الأخ الزمان شكراً لك على هذا الموضوع الممتاز
الأستاذ محمد الحريري
مشاركاتك مميزة
و أنا متابع لها
و أنتظر أن أرى الأساليب المختلفة التي تطرح فالنقاش الدائر يقود إلى وجود أكثر من أسلوب للتعامل مع هذا المخرج ..
الأستاذ عبود :
تقول أن التعامل مع منفذ الطابعة كان سهلاً و سلاساً من خلال الوندوز 95 و 98 فما لاذي حصل مع الوندوز XP ؟؟
يعني كيف كنت تتعامل مع البوابة ؟ ما هي التعليمات البرمجية في الديلفي التي استخدمتها و التي لم يعد بمقدورك التعامل معها ؟؟
على كل الأحوال أعتقد أن هناك طريقة لا تتعلق بنظام التشغيل يمكن التعامل معها مع البوابة و هي إدراج تعليمات الاسيمبلر ضمن البرنامج ديلفي .. لقد سبق لي و اختبرت هذه الطريقة ضمن النظام وندوز 98 ببرنامج ديلفي حيث تكون عملية القراءة و الكتابة ضمن البوابة باستخدام تعليمات مباشرة بالاسيمبلر ..
فهل هي نفس طريقتك ؟؟؟
أرسل بواسطة: abood100 في سبتمبر 13, 2002, 06:41:36 مساءاً
begin
ASM
mov al,no ;//put data
mov dx,378h
out dx,al
END;
end;
أرسل بواسطة: شيخ المهندسين في سبتمبر 14, 2002, 04:42:57 صباحاً
و الف شكر
أرسل بواسطة: salwanrawas في سبتمبر 14, 2002, 05:17:19 مساءاً
هل هذا الاسلوب يفشل في الوندوز xp ؟؟
و ما هي الطرق الأخرى ؟
أرسل بواسطة: Mgh في سبتمبر 15, 2002, 03:34:42 مساءاً
أرسل بواسطة: الزمان في سبتمبر 16, 2002, 01:58:42 مساءاً
في البداية أنا آسف لأني تأخرت على كتابة الدرس الأول لبعض الظروف الخاصة ، ثانياً أشكر كل من كتب رداً في هذا الموضوع خصوصاً الأخ Mgh ، والآن إليكم الدرس الأول :
الدرس الأول : نظام العد الثنائي وعلاقته بمنفذ الطابعة :
كلنا يعرف الأرقام ، وكلنا درس في المرحلة الإبتدائية نظام العد العشري ، ونظام العد العشري هو الذي يستخدم الأعداد 0 1 2 3 4 5 6 7 8 9 لكي يكون أرقامه ، وقد سمي بنظام العد العشري لأن أساسه عشرة أرقام.
أما نظام العد الثنائي فأساسه رقمان هما 0 و 1 ، فللتعبير عن الرقم 0 نستخدم 0 والرقم 1 نستخدم 1 ، ولكن كيف نعبر عن الرقم 2 ؟
بالنظام الثنائي نعبر عن الرقم 2 بـ 10 " تقرأ واحد صفر وليس عشرة " والرقم 3 بـ 11 " تقرأ واحد واحد وليس أحد عشر ".
ولكن هل يجب علينا حفظ كل رقم عشري ومايساويه من رقم ثنائي ؟ الجواب : لا ، حيث يوجد قانون بسيط يحل هذه المعضلة ، فمثلاً أنا أريد العدد الذي يساوي 2 في النظام الثنائي ، الطريقة هي عبر قسمة العدد الذي نريد مقابله على 2 إلى أن نصل إلى الرقم 1 بالطريقة التالية :
2 ÷ 2 : 0
1 × 2 : 1
فكما ترى أن العدد 2 يقبل القسمة على 2 إذاً نكتب بجانب عملية القسمة الرقم 0 ثم نضع ناتج القسمة تحت رقمنا الذي نريد تحويله ثم نجري عليه عملية قسمة أخرى ، فتلاحظ أن العدد 1 لا يقبل القسمة على 2 إذاً نكتب بجانب عملية القسمة الرقم 1 ، إذاً يكون الرقم 2 بالنظام الثنائي هو الأعداد التي كتبناها بجانب عمليات القسمة = 10 ، إذاً نستطيع تبسيط القانون كالتالي :
- نكتب الرقم 0 إذا تمت عملية القسمة دون مشاكل.
- ونكتب الرقم 1 إذا حصلت مشاكل في عملية القسمة.
الآن لنجرب الحصول على العدد 7 بالنظام الثنائي :
7 ÷ 2 : 1
3 ÷ 2 : 1
1 ÷ 2 : 1
إذاً 7 = 111 " تقرأ واحد واحد واحد وليس مائة وأحد عشر ".
والآن إذا قلت لك العدد 1010 بالنظام الثنائي كم يساوي بالنظام العشري ، فهل تعرف الإجابة ؟ إذا عرفت فأنت ممتاز وعقلك مطابق للكمبيوتر وإذا لم تعرف فلا تحزن فالقانون التالي يحل المشكلة :
س × (2 ^ ن) حيث س تساوي الرقم ، ن تساوي ترتيب الرقم.
فلنطبق الآن على العدد 1010 :
0×(2 ^ 0) + 1×(2 ^ 1) + 0×(2 ^ 2) + 1×(2 ^ 3) = 0×1 + 1×2 + 0×4 + 1×8 = 0 + 2 + 0 + 8 = 2 + 8 = 10
الطريقة طويلة قليلاً ولكن إذا فهمتها فسوف تستطيع تحويل الأرقام الثنائية القصيرة بسرعة في عقلك دون استخدام أي شيء ، علماً أن الآلات الحاسبة العلمية تستطيع التحويل من عشري إلى ثنائي والعكس.
والآن بعدما عرفت النظام الثنائي ، ألم تسأل نفسك هذا السؤال : ما علاقة النظام الثنائي بمنفذ الطابعة ؟
عندما ترى منفذ الطابعة تجد أنه يحتوي على 25 فتحة ، وهذه الفتحات مقسمة إلى عدة أقسام سوف نركز في هذا الدرس على قسم واحد من هذه الأقسام وهو قسم الإخراج الذي يضم ثمانية فتحات من فتحات منفذ الطابعة ، وهم من الفتحة رقم 2 إلى الفتحة رقم 9 ، وهنا بيت القصيد ، حيث أن هذه الفتحات تمثل ترتيب أرقام النظام الثنائي ، فمثلاً الرقم الثنائي الذي يمثل الفتحة الأولى "وهي الفتحة رقم 2 حسب ترتيب فتحات منفذ الطابعة وسوف نعتبر من الآن وصاعداً الفتحة الأولى هي الفتحة رقم 2 " هو 1 ، والفتحة الثانية هو 10 والفتحة الثالثة 100 والفتحة الرابعة 1000 ... إلخ ... إذاً على فرض أني قمت بتوصيل ثنائي باعث للضوء LED بالفتحة الثالثة فكيف سوف أشغل هذا الثنائي ؟
طريقة تشغيله هي بإرسال الرقم العشري الذي يساوي الرقم الثنائي للفتحة الثالثة ، والرقم الثنائي للفتحة الثالثة هو 100 إذاً سوف نقوم بتحويل الرقم 100 من النظام الثنائي إلى النظام العشري كالتالي :
0×(2 ^ 0) + 0×(2 ^ 1) + 1×(2 ^ 2) = 0×1 + 0×2 + 1×4 = 0 + 0 + 4 = 4
إذاً عبر الأوامر البرمجية التي سوف تعرفها بعد قليل سوف نرسل الرقم 4 لكي يعمل الثنائي الباعث للضوء الذي وصلناه بالمنفذ الثالث.
وأود أن ألفت انتباهكم إلى أن الفتحات رقم 18 و 19 و 20 و 21 و 22 و 23 و24 و 25 هي خاصة بالأرضي ، ففي مثالنا السابق حول تشغيل الثنائي الباعث للضوء LED فسوف نوصل طرف منه إلى الفتحة الثالثة والطرف الآخر إلى أحد الفتحات السابقة الخاصة بالأرضي لكي تغلق الدائرة الكهربائية كما تعلمنا في المدرسة.
والآن دعونا نذهب إلى الكيان البرمجي ونقوم بعمل برنامج يرسل الإشارة التي نريدها إلى منفذ الطابعة :
بداية أحب أن أعرفكم إلى صديقي العزيز برنامج الفيجوال بيسك - وهو الذي سوف نكتب به أوامر لغة الفيجوال بيسك - ، صديقي هذا بسيط وغير معقد ، تستطيع به عمل البرامج التي تريدها بسرعة وليس كما في اللغات الثانية وواجهة البرنامج الذي نريده سوف نصممها بسهولة عن طريق هذا الصديق ، ولن أمدح هذا الصديق زيادة عن اللازم لأن به بعض العيوب التي لن أقول لكم عنها لأن غيري قد سبقني بتوضيح كل شيء عن هذا الصديق وكذلك لكي لا أخرج عن الموضوع الذي أتكلم عنه ، إذاً عليكم جميعاً أن تقوموا بشراء قرص ليزر يحتوي على برنامج الفيجوال بيسك 6 لكي نستطيع إكمال المشوار دون تأخر أي شخص عنا ، طبعاً لا أريد أن أطيل الموضوع بشرح جزئيات الفيجوال بيسك ، فقد اختصرت الوقت ووضعت لكم وصلة لموقع متخصص بالفيجوال بيسك باللغة العربية ، وهناك تعلم المبادئ ثم ارجع إلى هذا الموضوع لنكمل المشوار.
http://www.vb4arab.com
الآن بعد أن تعرفت على الفيجوال بيسك أنشأ ملف برمجة Module وضع به تعريف مكتبة dll الخاصة بمنفذ الطابعة ، والتعريف هو :
Public Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
الآن قمنا بتعريف المكتبة الضرورية للتحكم بمنفذ الطابعة ، إذاً قم بوضع زر أوامر Command على النموذج Form1 ثم ضع الكود التالي في حدث Click لزر الأوامر :
Out &H378, 4
إن الكود السابق يقوم بإرسال الرقم 4 إلى الدالة التي عرفناها والدالة بدورها تقوم بتحويل الرقم 4 إلى النظام الثنائي وترسله إلى منفذ الطابعة وتحديداً إلى فتحات الإخراج ، فإذا كنت قد وصلت ثنائي باعث للضوء على الفتحة الثالثة فسوف تراه متوهجاً ، ولكي تنهي توهج هذا الثنائي فعليك بإرسال الرقم 0 إلى دالة منفذ الطابعة كالتالي :
Out &H378, 0
والآن بعد أن عرفت كيف تقوم بإرسال إشارات إلى منفذ الطابعة تستطيع أن توصل ثمانية ثنائيات باعثة للضوء LED كل ثنائي في فتحة وتوصل أطرافهم الأخرى في فتحات الأرضي من 18 إلى 25 ، وتقوم بإنشاء برنامج يشغل ثنائي ضوئي تلو الآخر ، أو تقوم بعمل أي شيء ، وإذا كانت لديك خبرة في الإلكترونيات فتستطيع تصميم دائرة إلكترونية تعمل عن طريق الكمبيوتر وذلك باستخدام ترانزستور NPN توصل قاعدته بإحدى فتحات الإخراج فيعمل عمل المفتاح وغير ذلك من الأعمال الرائعة.
لقد انتهينا من جزء بسيط من الدروس حول ربط الحاسب بالأجهزة والدوائر الإلكترونية ، ولكن لن أكمل الدروس حتى تقرءوا هذا الدرس مراراً وتكراراً لأنه درس مهم ، وسوف أضع في ردي التالي تمارين حول هذا الدرس وبعد التمارين سوف نكمل سلسلة الدروس.
وشكراً لكم
أرسل بواسطة: ضوء في سبتمبر 17, 2002, 09:26:28 صباحاً
رائع جدا
لكن لدي سؤال ......... الدائرة الإلكترونية كيف نركبها ؟ عذرا قد يكون السؤال يدل على جهلي لكن منكم نستفيد بإذن الله ..................
جزاكم الله خير
أرسل بواسطة: الزمان في سبتمبر 17, 2002, 03:17:47 مساءاً
الأخ ضوء : تركيب الدائرة الإلكترونية يتم إما باللحام أو باستخدام اللوحات الخاصة بالتجارب وهي لوحات موجودة عليها قطع إلكترونية كثيرة وليس عليك إلا أن توصل هذه القطع باستخدام الأسلاك دون اللحام وهذه اللوحات ممتازة للتجارب والتعلم حيث يأتي معها كتاب فيه تعليم نظري ويحتوي الكثير من الدوائر التعليمية.
والآن كما أرى أنه لاتوجد استفسارات ولا أسألة ، ولهذا سوف أضع لكم تمرين للدرس الأول لكي تكون الفكرة أفضل والطريقة أسهل :
تمرين الدرس الأول
تمرين الدرس الأول عبارة عن عمل برنامج يقوم بمثل عمل دوائر Flip – Flop حيث يشغل الثنائي الباعث للضوء الأول ثم يغلقه وبنفس الوقت يشغل الثنائي الباعث للضوء الثاني ثم يغلقه وهكذا....
الطريقة بسيطة جداً وهي كالتالي :
في البداية نضع ثنائي باعث للضوء "LED 1 " في الفتحة الأولى من فتحات الإخراج لمنفذ الطابعة حيث نوصل الكاثود في الأرضي أي الرقم 25 مثلاً والأنود في الفتحة رقم 2 ، وكذلك نقوم بوضع ثنائي باعث للضوء آخر " LED 2 " في الفتحة الثانية من فتحات الإخراج لمنفذ الطابعة حيث نوصل الكاثود في الأرضي أي الرقم 25 والأنود في الفتحة رقم 3.
الآن انتهينا من توصيل القطع الإلكترونية التي نحتاجها وبقي تصميم البرنامج ، وكما اعتدنا علينا تعريف المكتبة الخاصة بالإخراج لمنفذ الطابعة في ملف برمجة MODULE والتعريف هو :
| Code Sample |
| [color="#0021E6"]Public[/color] [color="#0021E6"]Declare[/color] [color="#0021E6"]Sub[/color] Out [color="#0021E6"]Lib[/color] "inpout32.dll" [color="#0021E6"]Alias[/color] "Out32" ([color="#0021E6"]ByVal[/color] PortAddress [color="#0021E6"]As[/color] [color="#0021E6"]Integer[/color], [color="#0021E6"]ByVal[/color] Value [color="#0021E6"]As[/color] [color="#0021E6"]Integer[/color]) |
وبعد الانتهاء من التعريف علينا كتابة الأوامر التي تقوم بعملية تشغيل وإغلاق الثنائيين الباعثين للضوء ، وبما أننا نحتاج إلى عمل برنامج Flip – Flop فنحن بحاجة إلى مؤقت يقوم بتشغيل وإغلاق الثنائيين الباعثين للضوء بعد فترة معينة وخير من يقوم بهذه المهمة هو أداة Timer فهذه الأداة تقوم بتطبيق أوامر معينة كل مدة زمنية تحددها أنت والأداة تجدها في صندوق الأدوات في الفيجوال بيسك بشكل ساعة ، إذاً عليك إضافة Timer1 ثم اكتب تعريف المتغير التالي في قسم التعريفات بالـ Form1 :
| Code Sample |
| [color="#0021E6"]Dim[/color] Led [color="#0021E6"]As[/color] [color="#0021E6"]Boolean[/color] |
ثم اكتب الأوامر التالية في حدث Form_Load :
| Code Sample |
| [color="#0021E6"]Private[/color] [color="#0021E6"]Sub[/color] Form_Load() Led = [color="#0021E6"]False[/color] Out &H378, 0 Timer1.Interval = 200 [color="#0021E6"]End[/color] [color="#0021E6"]Sub[/color] |
الأمر السابق في السطر الأول مهمته هي جعل قيمة المتغير Led هي False وهذا سوف يفيدنا في الأوامر التي سوف تشاهدها بعد قليل ، وتجد في الأمر السابق في السطر الثاني طلب من دالة الإخراج أن تقوم بإيقاف أي إشارة تخرج من منفذ الطابعة ، وفي الأمر السابق في السطر الثالث نجعل قيمة الفترة الزمنية التي سوف يطبق فيها المؤقت الأوامر هي 200 ميلي ثانية ، والآن ضع الأوامر التالية في الحدث الخاص بالـ Timer1 :
| Code Sample |
| [color="#0021E6"]Private[/color] [color="#0021E6"]Sub[/color] Timer1_Timer() [color="#0021E6"]If[/color] Led = [color="#0021E6"]True[/color] [color="#0021E6"]Then[/color] Out &H378, 2 Led = [color="#0021E6"]False[/color] [color="#0021E6"]Else[/color] Out &H378, 1 Led = [color="#0021E6"]True[/color] [color="#0021E6"]End[/color] [color="#0021E6"]If[/color] [color="#0021E6"]End[/color] [color="#0021E6"]Sub[/color] |
الأوامر السابقة بشكل عام تقوم بعملية الـ Flip – Flop حيث نختبر قيمة المتغير Led فإذا كانت صحيحة فسوف يشغل الثنائي الباعث للضوء الثاني وإذا كانت خاطئة فسوف يشغل الثنائي الباعث للضوء الأول ، وأخيراً ضع الكود التالي الخاص بإيقاف أي إشارة تخرج من منفذ الطابعة في حدث Form_Unload :
| Code Sample |
| [color="#0021E6"]Private[/color] [color="#0021E6"]Sub[/color] Form_Unload(Cancel [color="#0021E6"]As[/color] [color="#0021E6"]Integer[/color]) Out &H378, 0 [color="#0021E6"]End[/color] [color="#0021E6"]Sub[/color] |
لقد وصلنا إلى نهاية التمرين ، وإذا كانت لديكم أية استفسارات فعليكم بكتابتها على شكل رد في هذا الموضوع ، وقد أرفقت مع هذا التمرين النظري ملفات فيها الأوامر جاهزة وذلك لمن يواجه أية صعوبات مع الأوامر.
أرسل بواسطة: الزمان في سبتمبر 17, 2002, 03:22:40 مساءاً
تمرين الدرس الأول
تمرين الدرس الأول عبارة عن عمل برنامج يقوم بمثل عمل دوائر Flip – Flop حيث يشغل الثنائي الباعث للضوء الأول ثم يغلقه وبنفس الوقت يشغل الثنائي الباعث للضوء الثاني ثم يغلقه وهكذا....
الطريقة بسيطة جداً وهي كالتالي :
في البداية نضع ثنائي باعث للضوء "LED 1 " في الفتحة الأولى من فتحات الإخراج لمنفذ الطابعة حيث نوصل الكاثود في الأرضي أي الرقم 25 مثلاً والأنود في الفتحة رقم 2 ، وكذلك نقوم بوضع ثنائي باعث للضوء آخر " LED 2 " في الفتحة الثانية من فتحات الإخراج لمنفذ الطابعة حيث نوصل الكاثود في الأرضي أي الرقم 25 والأنود في الفتحة رقم 3.
الآن انتهينا من توصيل القطع الإلكترونية التي نحتاجها وبقي تصميم البرنامج ، وكما اعتدنا علينا تعريف المكتبة الخاصة بالإخراج لمنفذ الطابعة في ملف برمجة MODULE والتعريف هو :
| Code Sample |
Public Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer) |
وبعد الانتهاء من التعريف علينا كتابة الأوامر التي تقوم بعملية تشغيل وإغلاق الثنائيين الباعثين للضوء ، وبما أننا نحتاج إلى عمل برنامج Flip – Flop فنحن بحاجة إلى مؤقت يقوم بتشغيل وإغلاق الثنائيين الباعثين للضوء بعد فترة معينة وخير من يقوم بهذه المهمة هو أداة Timer فهذه الأداة تقوم بتطبيق أوامر معينة كل مدة زمنية تحددها أنت والأداة تجدها في صندوق الأدوات في الفيجوال بيسك بشكل ساعة ، إذاً عليك إضافة Timer1 ثم اكتب تعريف المتغير التالي في قسم التعريفات بالـ Form1 :
| Code Sample |
Dim Led As Boolean |
ثم اكتب الأوامر التالية في حدث Form_Load :
| Code Sample |
Private Sub Form_Load() Led = False Out &H378, 0 Timer1.Interval = 200 End Sub |
الأمر السابق في السطر الأول مهمته هي جعل قيمة المتغير Led هي False وهذا سوف يفيدنا في الأوامر التي سوف تشاهدها بعد قليل ، وتجد في الأمر السابق في السطر الثاني طلب من دالة الإخراج أن تقوم بإيقاف أي إشارة تخرج من منفذ الطابعة ، وفي الأمر السابق في السطر الثالث نجعل قيمة الفترة الزمنية التي سوف يطبق فيها المؤقت الأوامر هي 200 ميلي ثانية ، والآن ضع الأوامر التالية في الحدث الخاص بالـ Timer1 :
| Code Sample |
Private Sub Timer1_Timer() If Led = True Then Out &H378, 2 Led = False Else Out &H378, 1 Led = True End If End Sub |
الأوامر السابقة بشكل عام تقوم بعملية الـ Flip – Flop حيث نختبر قيمة المتغير Led فإذا كانت صحيحة فسوف يشغل الثنائي الباعث للضوء الثاني وإذا كانت خاطئة فسوف يشغل الثنائي الباعث للضوء الأول ، وأخيراً ضع الكود التالي الخاص بإيقاف أي إشارة تخرج من منفذ الطابعة في حدث Form_Unload :
| Code Sample |
Private Sub Form_Unload(Cancel As Integer) Out &H378, 0 End Sub |
لقد وصلنا إلى نهاية التمرين ، وإذا كانت لديكم أية استفسارات فعليكم بكتابتها على شكل رد في هذا الموضوع ، وقد أرفقت مع هذا التمرين النظري ملفات فيها الأوامر جاهزة وذلك لمن يواجه أية صعوبات مع الأوامر.
أرسل بواسطة: alaa bitar في سبتمبر 18, 2002, 10:53:52 صباحاً
شكرا لك يا استاذ على هذه الدروس الاكثر من رائعة , لدي سؤال بسيط وذلك لانني مبتدئ بالالكترونيات
حقيقة انا جربت ما شرحته بالدرس الاول وعند التنفيذ ظهرت رسالة خطأ تقول
file not found :inpout .dll
في انتظار ردكم
وشكرا لكم من القلب
علاء
أرسل بواسطة: الزمان في سبتمبر 18, 2002, 11:39:25 صباحاً
حيث أنني طالب في المرحلة الثانوية ورسالة الخطأ التي تظهر لديك تقول بأن الملف inpout.dll غير موجود وهذا صحيح حيث أن الملف الخاص بالمكتبة التي نريدها ليس هذا اسمها بل اسمها هو inpout32.dll فأعتقد بأنك أخطأت بصيغة تعريف هذه المكتبة إذاً عليك إبدال التعريف الذي كتبته أنت بالتعريف التالي :
| Code Sample |
Public Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer) |
وأريدك في التعريف السابق أن تدقق على اسم ملف المكتبة فهنا الخطأ الذي وقعت به أنت ، وأتمنى من الجميع أن لايقعوا بمثل هذه الأخطاء التي تؤدي إلى ظهور رسائل الخطأ
أرسل بواسطة: الزمان في سبتمبر 18, 2002, 11:52:14 صباحاً
أرسل بواسطة: alaa bitar في سبتمبر 22, 2002, 09:51:07 صباحاً
لقد قلت انك ستنتظر يوم او يومين وها قد فات 5 ايام
ارجو ان يكون المانع خيرا ان شاء الله
وانا في انظار ردك
اخيك
علاء
alaa57@hotmail.com
أرسل بواسطة: Mgh في سبتمبر 22, 2002, 01:15:58 مساءاً
وأرجو أن تواصل المسيرة يابطل . فموضوعك له طلابه
أرسل بواسطة: الزمان في سبتمبر 24, 2002, 05:29:27 مساءاً
أنا أعتذر على التأخير حيث أن السنة الدراسية بدأت هذا الاسبوع فأصبحت مشغولاً قليلاً
أشكر الأخ alaa bitar و الأخ Mgh على هذه الردود الجميلة التي تدل على سعيهم لطلب العلم والمعرفة ، والآن الدرس الثاني وهو معقد قليلاً ولكن إذا قرأته مرتين أو ثلاث فسوف تفهمه جيداً :
الدرس الثاني : الإدخال عبر منفذ الطابعة :
لقد تعلمت في الدرس السابق كيف تقوم بتشغيل ثنائي باعث للضوء "LED" باستخدام منفذ الطابعة ، طبعاً الدرس السابق كان تعليم لمبادئ الإخراج وهذا الدرس تعليم لبادئ الإدخال وبعد هاذين الدرسين سوف ننطلق إلى المشاريع الكبيرة باستخدام دوائر إلكترونية معقدة ، وهذا ما أسعى لإيصاله لكم ، والآن دعونا نبدأ بتعلم مبادئ الإدخال.
لقد تعلمت طريقة إعطاء الأوامر إلى دائرة إلكترونية عبر منفذ الطابعة في الدرس السابق والآن سوف تتعلم كيف تأخذ المعلومات من الدائرة الإلكترونية ، فتخيل مثلاً أننا نريد عمل إنسان آلي "روبوت" طبعاً لكي نأمر الإنسان الآلي بالتحرك إلى الأمام علينا بإرسال إشارة له باستخدام أوامر الإخراج وهذا تعرفت عليه سابقاً ولكن لنفرض أن هذا الإنسان الآلي واجه أمامه حائط إذاً على الإنسان الآلي أن يقوم بإرسال بعض المعلومات عن هذا الحائط إلى جهاز الكمبيوتر الذي هو بمثابة العقل عند الإنسان لكي يقوم الكمبيوتر بعد ذلك بتغيير وجهة الإنسان الآلي ، إذاً الحاجة إلى أوامر الإدخال ضرورية جداً بقدر ما نحتاج إلى أوامر الإخراج ، في أوامر الإخراج كنا نتعامل بالنظام الثنائي ، وكذلك في أوامر الإدخال فهي بالنظام الثنائي مع اختلافات بسيطة بين الإخراج والإدخال ، حيث أننا في أوامر الإخراج كانت لدينا ثمانية فتحات تمثل ثمانية مراتب فالفتحة الأولى كانت قيمتها 1 والثانية 2 والثالثة 4 والرابعة 8 وهكذا أي أننا نبدأ من الرقم واحد ثم نضربه بـ 2 والناتج كذلك نضربه بـ 2 ونقوم بهذه العملية ثماني مرات إلى أن نصل إلى العدد 256 ولكن فتحات الإدخال عددها خمسة فتحات هي 15 و 13 و 12 و 10 و 11 ، لاحظ أن الفتحة رقم 14 ليست من ضمن فتحات الإدخال ، وطبعاً نظام العد الثنائي لهذه الفتحات الخمس بالترتيب يبدأ من الرقم 8 ثم 16 ثم 32 ثم 64 ثم 128 ، مع بداية تشغيل البرنامج الذي سوف تعرف طريقة تصميمه بعد قليل سوف تصل إشارة قيمتها 120 ذلك لأن جميع الفتحات تكون بوضع التشغيل تلقائياً إلا الفتحة رقم 11 ففيها بوابة NOT فتعكس الإشارة ، الآن ألم تسأل نفسك كيف عرفت أن القيمة 120 هي التي سوف تصل للبرنامج تلقائياً؟
لقد قلت قبل قليل بأن كل فتحة لها قيمة فالفتحة 15 قيمتها 8 والفتحة 13 قيمتها 16 والفتحة 12 قيمتها 32 والفتحة 10 قيمتها 64 والفتحة 11 قيمتها 128 نقوم بجمع هذه القيم كالتالي :
8 + 16 + 32 + 64 + 128 = 248
وكما قلنا بأن الفتحة 11 فيها بوابة NOT إذاً نطرح قيمة الفتحة 11 من المجموع :
248 – 128 = 120
وهذه هي القيمة التي سوف تصل للكمبيوتر ، وإذا أحضرنا مقاومة كهربائية أو سلك عادي ووصلنا بين الفتحة 10 وإحدى فتحات الأرضي مثل الفتحة 25 سوف ترسل إشارة إلى الكمبيوتر قيمتها هي القيمة التلقائية " 120 " مطروح منها قيمة الفتحة 10 كالتالي :
120 – 64 = 56
ماذا نستفيد من العمليات الحسابية السابقة ؟
إن العمليات الحسابية السابقة سوف تفيدنا كثيرة في عمل البرنامج الذي سوف يعرف المعلومات التي تصل إليه من الدائرة الإلكترونية " مثلاً روبوت " حيث أنك سوف تقوم بعمل البرنامج ليستجيب لهذه القيم فمثلاً إذا قمت بإرسال الإشارة عبر الفتحة 10 فإنك تعلم بأن القيمة التي سوف تصل لبرنامجك هي 56 وإذا قمت بإرسال الإشارة عبر أي فتحة فأنت تستطيع باستخدام عملية حسابية بسيطة معرفة القيمة التي سوف تصل للبرنامج.
الآن جاء وقت البرمجة وتعلم أوامر الإدخال ، طبعاً يجب علينا تعريف المكتبة الخاصة بمنفذ الطابعة وهذه المكتبة هي نفسها الخاصة بالإخراج والإدخال ولكن تعريف الإخراج يختلف عن تعريف الإدخال ، وسوف أضع لك الآن تعريف الإخراج وتعريف الإدخال لتعرف الفرق بينهما :
تعريف الإدخال :
| Code Sample |
Public Declare Function Inp Lib "inpout32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer |
تعريف الإخراج :
| Code Sample |
Public Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer) |
التعريفان السابقان مكانهما هو ملف البرمجة MODULE ، ودرسنا هذا يحتاج لتعريف الإدخال فقط ولكن بعد أن تعرف المبادئ الأساسية للإدخال والإخراج تستطيع أن تستخدم التعريفين " لعمل الروبوت مثلاً " ، الآن ضع مؤقت TIMER1 وضع كذلك مربع نص LABEL1 ثم ضع الأوامر التالية في الحدث الخاص بالتحميل للنموذج Form_Load :
| Code Sample |
Private Sub Form_Load() Label1.Caption = “” Timer1.Interval = 5 End Sub |
الأوامر السابقة تقوم بإفراغ مربع النص وتجعل الوقت الخاص بتنفيذ الأوامر التي في Timer1 هو خمسة مللي ثانية ، الآن ضع الأوامر التالية في الحدث الوحيد للمؤقت Timer1_Timer :
| Code Sample |
Private Sub Timer1_Timer() Label1.Caption = Inp(&H379) End Sub |
الأوامر السابقة تقوم بملأ مربع النص بالقيمة التي تصل للبرنامج من فتحات الإدخال ، طبعاً كما ترى أن دالة الإدخال فيها العنوان &H379 وهذا العنوان خاص بفتحات الإدخال وفي الدرس السابق كان العنوان هو &H378 حيث أنها فتحات الإخراج.
انتهى الدرس حيث تعلمنا طريقة الإدخال من الدوائر الإلكترونية إلى الكمبيوتر وهذا أمر مهم وسوف تعرف أهميته في الدروس اللاحقة الخاصة بعمل بعض الدوائر الإلكترونية وربطها بالكمبيوتر.
بعد هذا الدرس أكون قد وصلت إلى نهاية تعليم المبادئ حيث سوف تكون الدروس التالية مشتركة بيني وبينكم يا خبراء الإلكترونيات فسوف نصمم مشاريع جماعية عبر وضع المخططات الإلكترونية للدوائر والأوامر البرمجية لعملية الربط ثم نستخدم هذه البرامج في ما يفيدنا فمثلاً نستطيع عمل دائرة إلكترونية ترسل أشعة تحت الحمراء إلى دائرة إلكترونية أخرى فإذا تم قطع الاتصال بين هاتين الدائرتين فسوف نرسل إشارة إلى الكمبيوتر ليقوم مثلاً بإشعال مصباح كهربائي ، طبعاً العملية ليست صعبة وأتمنى من المبتدئين عدم محاولة ربط مصباح كهربائي موصل لمصدر تغذية متردد AC فهذا خطير جداً ولكن في الدروس القادمة سوف نوضح أفضل الطرق لتوصيل المصباح الكهربائي لكي لا يتضرر جهاز الكمبيوتر لديك.
أي شخص يواجه صعوبة في فهم هذان الدرسان عليه بوضع استفساراته وأسئلته هنا
لقد أرفقت الملفات البرمجية التي تحتوي الأكواد السابقة لمن يواجه صعوبة في تصميم البرنامج السابق
وشكراً لكم
أرسل بواسطة: salwanrawas في سبتمبر 25, 2002, 03:04:10 صباحاً
موضوع عملي و التطبيق موجود في كل مكان
بارك الله بك ..و الثمرة لذيذة و مشبعة
أرسل بواسطة: الزمان في سبتمبر 25, 2002, 11:22:41 مساءاً
أتمنى بأن أكون قد وفقت بجعل الدروس سهلة ، وإذا كانت لديكم أية أسألة فاطرحوها الآن.
والآن اطلب من الجميع المشاركة بوضع فكرة مشروع تصميم دائرة إلكترونية مفيدة وربطها بالكمبيوتر ، وأنا سوف أبدأ بفكرة الرادار :
نريد تصميم برنامج مع دائرة إلكترونية يقومان بمعرفة سرعة السيارة التي تمر أمام مرسل الأشعة تحت الحمراء.
طبعاً الطريقة هي كالتالي :
تقوم الدائرة الإلكترونية بإرسال الأشعة تحت الحمراء بشكل دائم فإذا مرت السيارة فمن المؤكد بأن الأشعة سوف تنعكس فتستقبلها الدائرة الإلكترونية نفسها حيث أن بها مرسل ومستقبل ثم ترسل إشارة معينة إلى الكمبيوتر فيبدأ البرنامج بتشغيل مؤقت يحسب الزمن ، طبعاً السيارة مرت أمام الدائرة الإلكترونية الأولى حيث أنها سوف تمر كذلك أمام الدائرة الإلكترونية الثانية الموضوعة بعد مسافة معينة مثلاً خمسة أمتار فإذا مرت السيارة أمام هذه الدائرة فسوف تقوم بإرسال إشارة أخرى إلى الكمبيوتر إذاً سوف نقوم بإيقاف المؤقت الآن ، الآن نحن نعرف المسافة وحصلنا على الزمن ، ومن القانون الفيزيائي التالي نستطيع حساب السرعة :
السرعة = المسافة / الزمن
مستقبلاً سوف نطور البرنامج ليقوم بإنشاء قاعدة بيانات تحتوي عدد السيارات التي تجاوزت السرعة المسموح بها وغيرها من المعلومات الرائعة
والآن نريد أفكاركم لكي نستطيع عمل الأفضل والأفضل
أرسل بواسطة: الزمان في سبتمبر 26, 2002, 05:16:40 مساءاً
إليكم هذا المثال في أوامر الإخراج ، وهو مع المرفقات
أرسل بواسطة: الزمان في أكتوبر 01, 2002, 04:35:08 مساءاً
لقد تركتكم لفترة طويلة ولم أجد أي اقتراحات حول عمل أي مشروع مفيد
فماذا حدث لكم
أرسل بواسطة: الزمان في أكتوبر 05, 2002, 10:14:42 مساءاً
ألا تريدون المشاركة بعمل برامج كمبيوتر تحسب لك مثلاً سرعة سيارة أو تسارعها وغيرها من الأعمال المفيدة
أرسل بواسطة: الجارح في أكتوبر 10, 2002, 04:34:13 صباحاً
واذا ارت اي مساعدة فانا حاضر لان هذا
جانب من دراستي
الجارح
أرسل بواسطة: الزمان في أكتوبر 10, 2002, 09:44:53 مساءاً
أرسل بواسطة: salehwar في أكتوبر 14, 2002, 08:55:21 مساءاً
أخي الزمان شكرا على مجهودك الرائع و المفيد
أنا انتظر باقي دروسك من أيام ... أتمنى أن تكمل الدروس
و شكرا
أرسل بواسطة: الزمان في أكتوبر 15, 2002, 09:25:38 مساءاً
وشكراً لكم
أرسل بواسطة: حاتم في أكتوبر 17, 2002, 03:32:17 مساءاً
أريد أن أصنع دارة أستطيع من خلالها التحكم بمصباح كهربائي 220v وأرجو أن تكون الدارة مبسطة إلى أقصى درجة مع العلم أني مبتدئ وأهوى الإلكترونيك .أعرف أنني تسرعت كثيرا في البداية من هذه الدارة ولكن ...وجزاكم الله خيرا
أرسل بواسطة: salehwar في أكتوبر 17, 2002, 08:27:38 مساءاً
1- عندما اكتب Out &H378, 0 فأن الكهرباء لا يقف
يعني الضوء لا يتوقف
و الآن كلما افتح الكمبيوتر يعمل الضوء ... فما السبب و كيف أقول بإقاف تشغيله ؟
مع العمل ان عندي ويندوز 98 سيكند ايديشن و فيجوال بيسك 6
و شكرا
أرسل بواسطة: أبو سهل في أكتوبر 18, 2002, 10:31:42 صباحاً
بدايةً أشكر كل من شارك في هذا الموضوع وأسأل الله له جزيل الثواب .
لقد أعجبني الموضوع وقد سمعتُ النصيحة وأنا الآن أتابع دروس الفجيول بيسك ، ولكنني مع ذلك أرجو بيان أرقام دبابيس مخرج الطابعة ، ولكم خالص تحياتي .
أرسل بواسطة: حاتم في أكتوبر 18, 2002, 04:17:23 مساءاً
إخواني أرجو المساعدة وهو كيف أقوم بربط المكتبة ومن أين إني أحاول تتبع هذه السلسلة من الدروس وأريد أن أقوم بأول عمل لي وهو إنارو وإغلاق مصباح فالدروس في الفيسجيول بازيك لم تتطرق لهذا بعد فالرجاء الإجابة بالتفصيل في إنتظار ردكم على أحر من الجمر
وجزاكم الله خيرا
أرسل بواسطة: الزمان في أكتوبر 18, 2002, 06:22:18 مساءاً
أنا آسف لأني تأخرت في الرد
أولاً الأخ حاتم :
لكي تربط برنامجك بالمكتبة الخاصة بمنفذ الطابعة عليك كتابة السطر التالي في ملف برمجة Module :
| Code Sample |
Public Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer) |
وسوف أقوم بتوضيح طريقة تشغيل وإغلاق مصباح يعمل على 220 فولت في الرد التالي
ثانياً الأخ أبو سهل :
لقد أرفقت مع هذا الرد صورة توضح أرقام الدبابيس
ثالثاً الأخ salehwar :
تأكد بأنك تكتب الأمر بالشكل الصحيح أو على ما أعتقد فإنك قمت بتركيب الثنائي المشع للضوء في الفتحة الأولى ولو ركزت في الدروس السابقة فأنا قد قمت باستبعاد الفتحة الأولى من عملنا لأننا لانستطيع التحكم بها فهي تعمل باستمرار دون توقف.
أرسل بواسطة: الزمان في أكتوبر 18, 2002, 06:30:38 مساءاً
أرسل بواسطة: salehwar في أكتوبر 18, 2002, 07:02:46 مساءاً
فقد قرأت دروسك بكل تمعن
لا يعمل معي
ما السبب؟
أرسل بواسطة: حاتم في أكتوبر 18, 2002, 07:36:55 مساءاً
خطأ في التنفيذ"48"
ملف غير موجودinpout32.dll
ما الحل
أرسل بواسطة: حاتم في أكتوبر 18, 2002, 07:57:44 مساءاً
خطأ في التنفيذ"48"
الملف غير موجود inpout32.dll
وعند الضغط على debug
يشير إلى Out &H378, 5 في فوريم 1 ما الحل وأرجو أن لا تنزعج مني
ولمزيد من التوضيح فعندي win98 النسخة الثاني وأعمل على vb5.0
وشكرا
أرسل بواسطة: الزمان في أكتوبر 20, 2002, 10:35:31 مساءاً
أرجو منك تحميلها ووضعها في مجلد C:\windows\System
أرسل بواسطة: حاتم في أكتوبر 21, 2002, 07:35:39 مساءاً
فالرجاء منك هو تبيين المشكل مع العلم لو كتبت مكان 1000 4 لا ينير المصباح وجزاك الله خيرا نحن في إنتظار الرد
أرسل بواسطة: الزمان في أكتوبر 23, 2002, 07:49:19 مساءاً
أرجو أن تراجع الدرس الأول فمشكلتك هي كيف تتعامل مع النظام الثنائي وتطبيقه على منفذ الطابعة فإذا أردت أن تغلق جميع الأضواء فعليك بإرسال القيمة صفر
أرسل بواسطة: الزمان في أكتوبر 23, 2002, 07:58:48 مساءاً
اعذرني فقد نسيت طلبك بخصوص التحكم بمصباح 220 فولت
لكي تتحكم بأي جهاز خارجي يعمل على فرق جهد عالي عليك أن تستخدم ريليه وترانزستور بشكل أساسي حيث أننا سوف نعطي إشارة لقاعدة الترانزستور ليقوم بدوره بإغلاق دائرة الريليه ، فيقوم الريليه بإغلاق دائرة الجهاز الذي يعمل على فرق جهد عالي
لقد أرفقت صورة تحتوي على مثال ولكن للتبسيط تم وضع محرك يعمل على فرق جهد 12 فولت
أرسل بواسطة: ElectroDream في نوفمبر 03, 2002, 12:38:58 صباحاً
في احد ردود الاخ الجارح .. ذكر وجود مشكله تصادفه عند تطبيق البرنامج ..
ما أثار انتباهي هو استخدامه لنظام وندوز98 ..
حيث انني جربت البرنامج على نظام وندوز ملينيوم فاشتغل بشكل صحيح .. ولكن يحصل بعض الاخطاء عندما حاولت تشغيله بنظام وندوز 98
أرسل بواسطة: ElectroDream في نوفمبر 03, 2002, 12:43:43 صباحاً
انا اقصد العضو حاتم
أرسل بواسطة: عمار المهندس في نوفمبر 22, 2002, 06:27:52 صباحاً
يعجبني موضوعكم كثيرا واحب ان ابلغكم برغبتي الشديدة بالمشاركة ولاسيما اني حاصل على شهادة ماجستير في هذا المجال ... وبالنسبة لي يمكن ان اشارك بمشروع تحكم حتى من خلال فتحة التوسيع (Expansion Slot) علما ان هذه مشاركتي الاولى في هذا المنتدى ... والسلام ختام
أرسل بواسطة: s.o.k. في نوفمبر 22, 2002, 09:17:56 صباحاً
وان شاء الله تعم الفائدة للجميع.
ونحن بانتظار المشاركات.
أرسل بواسطة: الحبيب99 في نوفمبر 22, 2002, 02:11:20 مساءاً
أولا أحمد الله على هذا الموقع
وفي الحقيقة ابحث عن هذا الموضوع منذ زمن طويل
وأشكر القائمين على هذا الموقع
وخاصة القائم على هذا الموضوع الحيوي
قرأت الدرس الأول وعندي أسئلة
1- كيف أوصل المصباح بمخرج الطابعة هل بالأسلاك أو كيف
2- المصباح يعمل على 12فولت أو أكثر أوأقل الرجاء التوضيح
3-لو اسبدلت المصباح بمحرك سيارات الأطفال هل يعمل وكيف أوصله بمخرج الطابعة
سامحوني بس أريد التعلم
أرسل بواسطة: عمار المهندس في نوفمبر 23, 2002, 04:58:52 صباحاً
إليكم موقعا اعتقد انه مهم جدا من ناحية دراسة منفذ الطابعة واستخداماته وبعض البرامج التي يمكن التحكم من خلالها بهذا المنفذ :
http://www.dage.net/stport.html
أرسل بواسطة: احمد ربيع في نوفمبر 27, 2002, 12:59:27 صباحاً
الاخوة المشاركين في هذا الموضوع الهام جداً جداً
لدي دلفي3 علي ويندوز98 ولقد حاولت اضائة (لد)عن طريق منفذ الطابعة مستخدما لغة الاسمبلي من خلال الدلفي بالشكل التالي:
procedure TForm1.Button1Click(Sender: TObject);
procedure send(no:byte);
begin
ASM
mov al,11111111B
mov dx,378h
out dx,al
END;
end;
end.
ـــــــــــــــــــــــــــــــــــــــــــــــــــــ
ولكن لم يضيئ (اللد) ولااعرف ماهو السبب علما انني استخدمت الزر Button في دلفي كما هو موضح في البرنامج كما انني لااجيد استخدام لغة غير الاسمبلي
ارجو المســـــــــــــاعدة شاكراً تعاونكم
أرسل بواسطة: abood100 في نوفمبر 27, 2002, 01:56:52 صباحاً
procedure send(no:byte);
begin
ASM
mov al,no
mov dx,378h
out dx,al
END;
end;
procedure TForm1.Button1Click(Sender: TObject);
var b:byte;
begin
b:=255;
send(b);
end;
أرسل بواسطة: احمد ربيع في نوفمبر 27, 2002, 03:00:24 صباحاً
اشكرك جزيل الشكر علي المساعدة
ولكن لايزال هنالك مشكلة لذلك اليك البرنامج بالكامل ارجو التدقيق ان كان هنالك خطأ بالبرمجة او بالترتيب
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure send(no:byte);
begin
ASM
mov al,11111111B
mov dx,378h
out dx,al
END;
end;
procedure TForm1.Button1Click(Sender: TObject);
var b:byte;
begin
b:=255;
send(b);
end;
end.
وبما انني لست متعمقاً بالدلفي بما فيه الكفاية فارجو ان تعلمني ان كان هنالك خطوات يجب علي تنفيذها غير ذلك مثلا برمجة ملف البرمجة module كما هو وارد في الردود السابقة هل يطبق عليه ماهو مطبق في البيسك
ــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
مع خالص الشكر والامتنان
أرسل بواسطة: gmushtaha في نوفمبر 28, 2002, 12:34:13 صباحاً
كيف الحال يا إخوان ؟
لقد قرأت في منتداكم المتطور حقيقة و الذي كنت أبحث عنه و الحمدلله أنني وجدته موضوع
حول التحكم عن طريق مخرج الطابعة و أقترح الأخ زمان أن نعرض عليه مشروع من المشاريع المهمه ...
في الحقيقة إن مشروع تخرجي يتحدث و يرتبط بهذا الموضوع فانا حابب من الاخوان انهم يساعدوني في ذلك ..
المشروع كالاتي :
عندي جهازين شغالين على الانترنت كل واحد في بلد و على أحد الجهازين موصول كاميرا تلقط الفيديو و يمكن التحكم بها عن طريق مخرج الطابعة .
الجهاز الآخر (غير موصول بكاميرا) يستطيع التحكم في الكاميرا عن بعد من جهازه و يحرك الكامير و تظهر عنده الفيديو او الصوره التي تعرض على الجاز السيرفر (الموصول بالكاميرا )
أنا الآن شغال في هذا الموضوع باستخدام الجافا لأنهم قالوا لي بأن نقل الفيديو في الجافا أسرع و لكن عندما شاهدت كم هو سهل التحكم باستخدام الفيجول قمت بعرض المشروع عليكم .
فأرجوا أن أجد من يساعدني في ذلك ..
أرسل بواسطة: احمد ربيع في نوفمبر 28, 2002, 01:41:17 صباحاً
اشكرك جزيل الشكر
لقد نجح الامر اخيراً وذلك بعد التجربة في جهاز آخر وبمجرد وضع اللد في منفذ الطابعة
اضاء ثم قمت باطفائة بالشكل التالي
ASM
mov al,00000000B
mov dx,378H
out dx,al
END;
END;
ـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــ
وهذا نفس ماورد بردك في 13\9\2002
كما انني اعتقد ان سبب الفشل في الجهاز الاول
هو اخراج منفذ الطابعة لقيمه اقل من 5 فولت مماادى لعدم اضائة اللد
والله اعلم
شاكراً تعاونك
أرسل بواسطة: gmushtaha في نوفمبر 29, 2002, 12:12:37 صباحاً
أرسل بواسطة: الزمان في نوفمبر 30, 2002, 01:21:15 صباحاً
أشكرك على طرح هذه الفكرة وسوف أساعدك بالذي تريده ، ولكني حالياً في هذا الرد ليس لدي الوقت الكافي ، انتظرني لمدة ثلاثة أيام أو أربع وسوف أكون جاهز
إلى اللقاء
أرسل بواسطة: gmushtaha في نوفمبر 30, 2002, 01:52:56 صباحاً
أرسل بواسطة: عمار المهندس في ديسمبر 01, 2002, 08:27:15 مساءاً
عند تحميل الملف الخاص بالبرامج التي عرضها الأخ الكريم الزمان وجدت هنالك اختلاف بين اسم ملف مكتبة الربط الديناميكيةinpout32.dll الواجب وجوده مع البرامج والملف الذي نحصل علية بعد فتح ضغط الملف المضغوط الذي يحوي الملف المذكور .... فقد وجدته باسم post-4-38931-inpout32.dll ويلاحظ الفرق بين الاسمين لذلك يجب عليكم تغيير اسم الملف post-4-38931-inpout32.dll إلى الاسم inpout32.dll بعد عملية فتح الملف الذي يحويه .... وشكرا ...... أخي الزمان برامجك كانت في غاية الأهمية ..... وانتظر مني مشاركة جيدة جدا بأذن الله ... والسلام ختام ..... أخوكم عمار المهندس من العراق
أرسل بواسطة: Mgh في ديسمبر 02, 2002, 01:52:43 مساءاً
فى البداية أحب أن أشكر أخى الزمان على إستمرار متابعته فى هذه الدروس القيمة رغم إنشغاله بالدراسة على حد علمى.
ثانيا أحب أن أرحب بالأخ gmushtaha رغم صعوبة إسمه . وأقول لك بأت فكرتك رائعة ولكن قبل العمل فيها يجب أن نسأل أنفسنا بضعة أشياء :
1- هل يمكننا إستقبال البيانات المصورة عن طريق الكاميرا بواسطة الفيجوا بيزك؟
2- هل نستطيع إرسال معلومات بين جهازين عبر الإنترنت بواسطة الفيجوال بيزك؟
أعتقد بأننا يجب أن نقسم المشروع على عدة أجزاء حتى تسهل مناقشته :
1- إستقبال البيانات من الكاميرا (بصورة يمكننا إرسالها عبر الإنترنت)
2- نقل البيانات الازمة لتحريك الكاميرا عبر الإنترنت أيضا
3- دائرة التحكم المختصة بتحريك الكاميرا.
4- النظام الميكانيكى اللازم.
وأنا على إستعداد للمشاركة فى الثلاث نقاط الأخيرة ولكنى لا أملك كاميرا للمحاولة فى إستقبال البيانات منها .
لذا أرجو ممن لديه أى من المعلومات حول المواضيع السابقة أو من لديه تقسيم أحسن أن يخبرنا بهما .
أرسل بواسطة: الزمان في ديسمبر 02, 2002, 03:23:29 مساءاً
أخي عمار المهندس أشكرك على التصحيح وعلى إعجابك ببرامجي
وأخي Mgh لا شكر على واجب وأنا أشكرك على حسن تقديرك لظروفي الدراسية
والأخ gmushtaha إليك نبذة عن ماتريد مع برنامج يوضح طريقة الإرسال عبر الإنترنت والتحكم بالكاميرا رغم أن مثالي غير كامل فهو لا يحتوي كود إرسال الصور التي تلتقطها الكاميرا ، ولكن إذا أردت الكود فلا تتردد بطلبه :
التحكم عن بعد بالكاميرا
لكي نتحكم بالكاميرا عن بعد باستخدام الإنترنت علينا أن نقسم البرنامج إلى عدة أقسام ، القسم الأول هو كيفية ربط برنامجك بشبكة الإنترنت لكي يتصل بجهاز آخر بعيد ، وهي عملية سهلة جداً ، أما القسم الثاني فهو يختص بتحريك الكاميرا وذلك عن طريق إرسال إشارات إلى منفذ الطابعة حيث نقوم بربط محركات صغيرة ( محركات لعب الأطفال ) بمنفذ الطابعة بطريقة معينة سوف نوردها بعد قليل.
فكرة هذا البرنامج هي كالتالي :
يوجد لدينا جهازين بعيدين عن بعضهما ، ومتصلان ببعض عن طريق شبكة الإنترنت ، الذي يتحكم بكاميرا الطرف الآخر يضغط على زر تحريك الكاميرا إلى اليمين - مثلاً – فيرسل جهازه كلمة متعارف عليها بين الجهازين مثلاً كلمة " يمين " يستقبل الجهاز الآخر الرسالة ويقوم بمعرفة محتواها ، فإذا كانت " يمين " يرسل إشارة إلى أحد فتحات منفذ الطابعة تكون مختصة بتشغيل محرك يحرك الكاميرا إلى اليمين ، أعتقد أن العملية أصبحت سهلة بعد الشرح وأن أغلبكم سوف يستطيع عملها بكل يسر وسهولة.
ولكن بعضكم لا يعرف طريقة ربط جهازه مع جهاز آخر عبر الإنترنت ، وبما أن هذا القسم من المنتدى لا يختص بالبرمجة ، فعليكم مراجعة مواقع البرمجة وهي كثيرة ، وكذلك يوجد في هذا المنتدى قسم للحاسب الآلي وفيه موضوع حول الفيجوال بيسك ، فأنصحكم بمراجعته ، على العموم نحن سوف نستخدم أداة Winsock وهي المختصة بهذا العمل.
مع ملاحظة أن أغلب محركات لعب الأطفال لا تعمل على جهد منفذ الطابعة ، ولهذا سوف نستخدم ترانزيستور أو ترانزيستور وريلي وذلك حسب الحاجة ، وخصوصاً أن أغلبكم يعرف طريقة التعامل مع الريلي لسهولته فهو من أبسط القطع الإلكترونية التي عرفتها وكذلك الترانزيستور كمفتاح فهو سهل ، والذي لا يعرف فلا يتردد بالسؤال.
وأخيراً عليكم القيام بتحميل الملف المضغوط الذي يحتوي على المشروع جاهز.
أرسل بواسطة: الزمان في ديسمبر 05, 2002, 03:14:14 مساءاً
أرسل بواسطة: الله أكبر في ديسمبر 10, 2002, 11:43:45 مساءاً
اخي {الزمان} اعجبني موضوعك
واجهتني مشكلة وهي
رسالة
Run-time error'48 '
:
file not found :inpout32.dll
ومشكور على الدرس الأفضل من الرائع
أرسل بواسطة: الزمان في ديسمبر 11, 2002, 02:29:21 مساءاً
أخي ( الله أكبر ) أشكرك على اهتمامك بالموضوع وأحب أن أقول لك بأن هذا واجبي تجاه المنتدى فالذي أعرفه يجب أن أعرضه في المنتدى ليعرفه الجميع.
وبخصوص مشكلتك أتمنى أن تتأكد من وجود مكتبة inpout32.dll في جهازك ، فإذا لم تكن موجودة فعليك القيام بتحميلها من الإنترنت أو من سيدي وقد وضعت هذه المكتبة في إحدى ردودي السابقة فقم بتحميلها ، وإذا وجدت هذه المكتبة في جهازك فعليك التأكد من سطر تعريف المكتبة في برنامجك وهو كالتالي :
Public Declare Sub Out Lib "inpout32.dll" Alias _
"Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
وأخيراً أحب أن أقول لكم بأني في الأيام القادمة لن أستطيع دخول الإنترنت إلا بعد اسبوعين تقريباً وذلك للاختبارات المدرسية
أرسل بواسطة: الله أكبر في ديسمبر 11, 2002, 04:26:13 مساءاً
عفواً يأخي اظفة الملف لكن المشكلة هي لم تتغير والرسالة ذاتها
أرسل بواسطة: الزمان في ديسمبر 11, 2002, 04:35:26 مساءاً
أرسل بواسطة: الله أكبر في ديسمبر 11, 2002, 05:00:05 مساءاً
وضعته في ملف Program Files
وهذا الماسنجر
abdulrahman50@hotmail.com
ومشكور
أرسل بواسطة: نعم في ديسمبر 15, 2002, 03:12:19 صباحاً
هل يمكن تصميم دائرة وبرنامج للتحكم في عدة لمبات من حيث الفتح والغلق والتحكم بشدة الاضاءة ايضا من خلال اشرطة تمرير تشبه الخاص برفع الصوت او تخفيضه في الكمبيوتر؟
وهل يمكن تطويرها لاحقا للتعامل مع الاضاءة الخارجية للحفاظ على معدل اضاءة واحد
بمعنى انه بافتراض انه في فترة الظهيرة الاضاءة الطبيعية كافية
العصر نحتاج لاضاءة كهربائية لكن بمستوى معين يحافظ على نفس الشدة الموجودة في الظهيره
وهكذا ...
أرسل بواسطة: الزمان في ديسمبر 16, 2002, 02:43:07 مساءاً
بخصوص التحكم بشدة إضاءة اللمبات فهذا ممكن ، و سؤالك حول التعامل مع الإضاءة الخارجية فهذا ممكن ولكن ليس له دخل بالكمبيوتر حيث تستطيع استخدام مقاومة ضوئية لهذا الغرض ومشرفي هذا القسم لهم الخبرة في ذلك بشكل أفضل مني
أتمنى أن أكون قد وفقت في الإجابة على استفساراتك
أرسل بواسطة: الحبيب99 في ديسمبر 16, 2002, 10:34:12 مساءاً
أولا أحمد الله على هذا الموقع
وفي الحقيقة ابحث عن هذا الموضوع منذ زمن طويل
وأشكر القائمين على هذا الموقع
وخاصة القائم على هذا الموضوع الحيوي
قرأت الدرس الأول وعندي أسئلة
1- كيف أوصل المصباح بمخرج الطابعة هل بالأسلاك أو كيف
2- المصباح يعمل على 12فولت أو أكثر أوأقل الرجاء التوضيح
3-لو استبدلت المصباح بمحرك سيارات الأطفال هل يعمل وكيف أوصله بمخرج الطابعة
سامحوني بس أريد التعلم
أرسل بواسطة: الحبيب99 في ديسمبر 16, 2002, 10:42:04 مساءاً
أشكرك كثيرا أخي الزمان على كلام الكبير والمهذب
وآسف فقد أعدت كتابة الرسالة قبل أن أقرأ الرد
وشرحك ممتاز
ولكن ماهو الريلي
خبرتي ضعيفة جدا ولكن لدي أصرار للتعلم
وللعلم أنا من جدة فأين أجد هذة القطع
والله يعينك
أرسل بواسطة: عمار المهندس في ديسمبر 17, 2002, 09:23:19 مساءاً
أرسل بواسطة: عمار المهندس في ديسمبر 17, 2002, 09:32:48 مساءاً
أرسل بواسطة: عمار المهندس في ديسمبر 17, 2002, 09:44:24 مساءاً
أرسل بواسطة: عمار المهندس في ديسمبر 17, 2002, 09:46:58 مساءاً
أرسل بواسطة: عمار المهندس في ديسمبر 17, 2002, 10:22:05 مساءاً
أرسل بواسطة: عمار المهندس في ديسمبر 17, 2002, 10:38:03 مساءاً
صورة الدائرة
أرسل بواسطة: الزمان في ديسمبر 17, 2002, 11:42:31 مساءاً
أهنئك أخي عمار المهندس وأبارك لك مشروعك هذا ، وقد أثلجت صدري عندما قرأت ردودك ، فأنت أول شخص يعرض مشروعه كاملاً حول التحكم بالدوائر الإلكترونية باستخدام الحاسب
وقد قكت بتحميل المشروع ولكني لم أطلع عليه لضيق الوقت ، سوف أطلع عليه غداً إن شاء الله ، ولكني رأيت صورة الدائرة الإلكترونية وقد أعجبتني
أخي الحبيب 99 :
الريلي يعتبر مفتاح كهربائي الذي يقوم بغلقه وفتحه هو المجال المغناطيسي حيث نمرر تياراً كهربائياً إلى الريلي ليقوم بدوره بتوليد مجال مغناطيسي يجذب صفيحة موصلة للتيار فتغلق الدائرة الإلكترونية ، وطبعاً الريلي متوافر في محلات الإلكترونيات وورش تصليح الأجهزة ولكني لا أعلم أين تقع هذه المحلات في جدة
وأنصحك بتحميل مشروع الأخ عمار المهندس فهو يحقق ماتريد
أرسل بواسطة: عمار المهندس في ديسمبر 18, 2002, 06:57:26 مساءاً
اخي الزمان بعد ما شفت شي والجاي اكثر من الرايح
أرسل بواسطة: sahal في ديسمبر 18, 2002, 09:27:08 مساءاً
أرسل بواسطة: الزمان في ديسمبر 18, 2002, 09:42:34 مساءاً
ماهو نظام التشغيل لديك ومتى تظهر لك هذه الرسالة
أرسل بواسطة: sahal في ديسمبر 19, 2002, 12:29:20 صباحاً
اما بالنسبه للمشكله فقد ظهرت في وندز2000 ولاحظت اخيرا بعد ان جربت 98 عمل فما الحل لان جهازي لايعمل عل98 لانه يحتوي على دبل برسوسر
أرسل بواسطة: الزمان في ديسمبر 19, 2002, 02:33:48 مساءاً
فأنا لم أجرب عمل البرامج في نظام ويندوز 2000
ولكن إذا وجدت لك الحل فلن أبخل عليك به
أرسل بواسطة: اللوماني في ديسمبر 21, 2002, 10:16:03 مساءاً
اولا اهنيء جميع الاعضاء على هذا المنتدى الجميل لكن في شي واحد ما عجبني فيه و هو لون المنتدى الغامق اللي ما يعطيك مزاج للتصفح
على العموم منتدى رائع
و اشكر الاخ الزمان و كل المشاركين في هذا الموضوع فهذا الموضوع كنت ابحث عنه منذ زمن طويل
و اخيرا لقيته عندكم
انا يمكن وصلت متأخر شوي بس انا خزنت كل الصفحات و قريت كل الردود بس الدروس لسة ما قريتهم لاني مشغول حاليا بمنتداي و بقواعد البيانات وال SQL
بس مش مهم انا عندي خلفية عن هذا الموضوع من منتديات فيجوال بيسك العرب و انشالله راح اقراهم في وقت لاحق
وانا راح ابدأ معكم من اللحظة هذي
و اي سؤال خاص بالبرمجة بواسطة الفيجوال بيسك سواء DataBase او Winnsock او غيرو او اي سؤال في الجرافيكس و الفلاش و الويندوز و الهاردوويزر انا جاهز و ذلك في منتديات تكنولوجيا العرب
www.arabstechno-vb.tk
-------------
تحياتي : علي اللوماني
صاحب موقع و منتديات تكنولوجيا العرب
www.arabstechno.tk - www.arabstechno-vb.tk
طالب في الأول ثانوي
أرسل بواسطة: عمار المهندس في ديسمبر 22, 2002, 01:09:50 مساءاً
الاخوه الاعضاء اين المشاركات لحد الان لم ينشر مشروع كامل لحد الان
أرسل بواسطة: عمار المهندس في ديسمبر 22, 2002, 01:11:33 مساءاً
الاخوه الاعضاء اين المشاركات لحد الان لم ينشر مشروع كامل لحد الان
أرسل بواسطة: الزمان في ديسمبر 23, 2002, 08:31:46 مساءاً
الأخ اللوماني أشكرك على عرض المساعدة وأتمنى أن نستفيد منك ويستفيد منك باقي الأعضاء
وبخصوص المشاريع الكاملة أخي عمار المهندس ، فأنا كان هدفي من هذه الدروس أن نتعاون جميعاً في عمل برامج ودوائر إلكترونية ، وأنا قد وضعت الدروس وانتهيت منها وباقي أن يتعاون معي خبراء الإلكترونيات لمساعدتي في الدوائر الإلكترونية ، فأنا لدي الكثير من الأفكار القابلة للتطبيق ولكن تنقصني الخبرة في مجال الإلكترونيات.
أرسل بواسطة: نعم في ديسمبر 25, 2002, 12:09:50 صباحاً
وما كنت اعنيه في التعامل مع الاضاءة الخارجية هو عن طريق مقاومة ضوئية انما باستخدام ذات البرنامج المستخدم في رفع وخفض الاضاءة
اي انه يحوي زر خاص بتفعيل التحكم بالاضاءة عن طريق المقاومة الضوئية وتعطيلها
فيصبح بالامكان التحكم يدويا بكل مصباح على حدى او اتوماتيكيا بحسب شدة الاضاءة لتثبيتها عند حد معين من خلال البرنامج وبنفس الدائرة
ودمتم
أرسل بواسطة: اللوماني في ديسمبر 26, 2002, 04:45:12 مساءاً
وهو عبارة عن ادخال ارقام الى الكومبيوتر من منفذالطابعة بواسطة ازرار عادية
وقد ارفقت المخطط مع المشروع مع هذا الموضوع ارجو التعديل عليه بأسرع وقت
أرسل بواسطة: الزمان في ديسمبر 26, 2002, 07:57:14 مساءاً
أخي اللوماني لقد قمت بتحميل مشروعك وسوف أطلع عليه لمعرفة الخطأ.
المهم الآن هو أنني فكرت بعمل برنامج إنذار ضد اللصوص والغرباء الذين يدخلون الغرفة ( أو المنزل ) ، وقد قمت بالعمل على هذا المشروع ولكني كبداية استخدمت مقاومة ضوئية لكي تشعر بظل اللص ثم ترسل إشارة إلى جهاز الكمبيوتر الذي بدوره يقوم بإصدار أصوات ويشغل ثلاث LED ، ولكن مثل هذا المشروع تواجهه بعض المشاكل بسبب اعتماده على ظل اللص ، ولهذا فقد قررت أن أقوم باستخدام الأشعة تحت الحمراء.
وأنا متأكد بأن أغلبكم لا يعير لهذا المشروع أي أهمية وذلك لوجود دوائر إلكترونية تقوم مكانه دون الحاجة لجهاز الكمبيوتر ، ولكن تذكر بأنك بجهاز الكمبيوتر تستطيع عمل الكثير ، مثلاً نستطيع تطوير البرنامج لكي يتصل بالشرطة عند دخول اللص ويخبرهم عنه وكذلك إذا كانت لدينا كاميرا موصلة بالكمبيوتر فنستطيع تشغيلها وتسجيل الأحداث ، وأيضاً نستطيع أن نتصل بالإنترنت ونرسل رسالة لك على بريدك الإلكتروني إذا كنت مسافراً خارج بلدك وغير ذلك من الأشياء الرائعة.
فما رأيكم بالمشروع الآن ؟
إذا كنتم تريدون مخططه والبرنامج فأنا سوف أرسله لكم ولكنه الآن برنامج تجريبي يعتمد على الظل
أرسل بواسطة: اللوماني في ديسمبر 28, 2002, 11:29:22 صباحاً
أرسل بواسطة: الزمان في ديسمبر 29, 2002, 09:32:31 مساءاً
أخي اللوماني أنصحك بتطبيقها فهي مسلية ومفيدة في آن واحد
وأبشركم بأني تغلبت على مشكلة الظل وذلك بتوجيه شعاع ليزر إلى المقاومة الضوئية فتصبح حساسية الدائرة شديدة جداً ودقيقة ، ولكن في المقابل عليك توجيه شعاع الليزر بدقة شديدة
أرسل بواسطة: اللوماني في يناير 02, 2003, 02:49:16 مساءاً
أرسل بواسطة: احمد الفارس في يناير 22, 2003, 10:01:46 صباحاً
اخواني في عندي مشكلة في تركيب ملف inpout32.dll نزلته من بعض المواقع ، ولكن كل ما اشغل البرنامج المشروح سابقاً وهو اشعال الثنائي الباعث للضوء يحصل عندي خطأ في التطبيق هذا نصه :
An application error has occurred and an application error log is being generated.
VB6.exe
Exception: Privileged instruction (0xc0000096), address: 0x03945c06.
فارجو المساعدة لاني لا اعلم ما السبب ، وسؤال اخر كيف اميز ترتيب فتحات الطابعة إذا كان المخرج الذي استخدمه للاضاءة الثنائي هو القطعة المتصلة مع الطابعة .
وجزاكم الله خيراً
أرسل بواسطة: الزمان في يناير 22, 2003, 04:18:21 مساءاً
أخي أحمد الفارس ، بخصوص سؤالك الأول أتمنى أن تعطينا معلومات أكثر عن المشكلة ، مثلاً متى تحدث هذه المشكلة وغيرها من المعلومات
وبخصوص السؤال الثاني فتستطيع معرفة ترتيب الفتحات بالتجربة
أرسل بواسطة: احمد الفارس في يناير 23, 2003, 11:01:48 صباحاً
مشكور اخوي الزمان على الرد السريع ، على كل حال : عندما انزلت الملف ، كان البرنامج الذي انشأته جاهزاً وهو يتكون من زرين on and off ، وعندما وصلت الثنائي مع منفذ الطابعة وقمت بتشغيل البرنامج والضغط على on تخرج لي تلك الرسالة المذكورة أعلاه ، وينطفئ أو تغلق واجهة البرمجة كاملة (VB6) وحاولت التشغيل بدون الثنائي لكن نفس المشكلة ، وقد وضعت الملف في مجلد system .
أرسل بواسطة: احمد الفارس في يناير 23, 2003, 11:05:12 صباحاً
Windows NT.4 pack3
أرسل بواسطة: الزمان في يناير 23, 2003, 05:59:06 مساءاً
وإن شاء الله تحل المشكلة
أرسل بواسطة: احمد الفارس في يناير 24, 2003, 01:24:29 مساءاً
واي واحد عنده الحل ما يقصر معي ، وانا بالانتظار .
أرسل بواسطة: hdm في فبراير 01, 2003, 10:06:13 مساءاً
شكراًجزيلاًعلى الدروس القيمة
لقد قمت بالتجربة ولكن بدون وصل أي أرضي لاحدالأرجل
(10-11-12-13-15) أعطىالقيمة 127وليس 120 لماذا ؟
أرسل بواسطة: E-Adrenaline في فبراير 02, 2003, 11:03:14 صباحاً
بواسطة فيجوال بيسك ..
والآن مع winxp كلما وصل برنامجي الى الامر out &H378
يتوقف البرنامج ويظهر لي تقرير بالخطأ ,, ويظهر خياران send error report
dont send
مالذي حدث في اكس بي ؟ ؟؟؟؟
ارجو ان تساعدوني في ايجاد الحل . ولكم جزيل الشكر
أرسل بواسطة: الزمان في فبراير 02, 2003, 02:38:10 مساءاً
أخي E-Adrenaline
أشكرك على المشاركة الطيبة منك بخصوص ويندوز إكس بي
أنا واجهت نفس مشكلتك عندما جربت البرنامج على جهاز آخر به ويندوز إكس بي وإلى الآن أنا أبحث عن الحل وإن شاء الله سوف أضعه لكم عندما أجده
أخي hdm
سوف أقوم ببعض التجارب لكي أحصل على تفسير مقبول ثم أكتبه لك وعذراً على عدم وضع التفسير اللآن لأني مشغوول جداً
أرسل بواسطة: احمد الفارس في فبراير 22, 2003, 11:52:26 صباحاً
اخوي الزمان لقد قمت بتركيب نظام وندوز 98 على جهازي وقمت بتنزيل ملف inpout32.dll المتواجد على صفحتكم ، ولكن لم استطع تطبق البرنامج البسيط الموضح في الشرح . وظهر لي رسالة خطأ عند تشغيل البرنامج :
can't find DLL entry point out32 in inpout32.dll .
ولا ادري ما هو السبب على العلم اني وضعته في مجلد system وايضا وضعته في مجلد vb98 ولكن دون جدوى ، هل عندكم حل اخر ؟
وجزاكم الله خيراً
أرسل بواسطة: الزمان في فبراير 26, 2003, 01:02:02 صباحاً
أخي أحمد الفارس ، تحية طيبة وبعد
مشكلتك بسيطة جداً وهي ليست مشكلة بالجهاز بل بطريقة كتابة تعريف مكتبة DLL حيث أنك كتبت لتعريف هذه المكتبة كلمة out32 ولكنها يجب أن تكون Out32
لاحظ حرف O فقد كتبته بشكل كبير ، أرجو الإنتباه لهذه النقطة
أرسل بواسطة: احمد الفارس في مارس 01, 2003, 08:33:53 صباحاً
مشكور اخوي الزمان ، البرنامج اشتغل معي ، بس المشكلة الديود ما اشتغل !
ولا اعلم حقيقة ما هو السبب بس على شان اضعك في الصورة ، أن الديود يبقى مشتعل على طول وبستمرار من خلال الفتحات السادسة والسابعة فقط ، وحاولت أني اضع في حدث التحميل القيمة صفر على المخرج كي ينطفئ الديود ولكن لا حياة لمن تنادي
وحاولت اني اغير في ارقام مفاتيح المنفذ اللي موضوعة في الدرس ، لكن نفس النتيجة لا أدري هل هناك مفتاح للمنفذ غير اللي مكتوب في الدرس ، أما ان هناك سبب اخر لهذه المشكلة .
والسلام عليكم ورحمة الله وبركاته .
أرسل بواسطة: fdert في مارس 09, 2003, 04:17:25 مساءاً
اريد منكم ان تصمموا لي برنامج مثلا ً عندما ينفتح الباب الخاص بالمنزل يعمل لي البرنامج اتصال على جوالي ويبلغني برسالة صوتية بذلك ؟ وذلك بأن يكون موجود على الباب مفتاخ اريد عندما تكون الدائرة الكهربائية مفتوحة يعمل الاتصال بي على جوالي حيث سوف اقوم بتركيب مفتاح بالباب كالمفتاح الموجود في باب الثلاجات المنزلية الذي تعمل انارة الثلاجة مع فتح الباب . واريد طريقة تجهيز كايبل الطابعة لتوصيل المفتاح فية ؟ واكون شاكراً لكم اخي ؟ والله يكتب لكم التوفيق على مجهودكم الرائع والنادر في هذة الدروس التي عرضتموها .
الرجاء التواصل عبر الماسنجر fdert_1395@hotmail.com
أرسل بواسطة: الزمان في مارس 24, 2003, 04:29:43 مساءاً
أخي أحمد الفارس الحمد لله على انتهاء جزء من مشكلتك ، وبخصوص المشكلة الحالية فأنا للأسف لم أستطع معرفة أي حل لها إلى الآن
أخي fdert بخصوص مشروعك فهو مشروع رائع لأنظمة الإنذار ، وهو سهل التطبيق ولكن به مشكلة واحدة تواجهني وأعتقد أن لها حل ولكني لم أتوصل إليه إلى الآن ، حيث أننا نستطيع أن نجعل جهاز الكمبيوتر يشعر بفتح الباب ونستطيع كذلك أن نتصل على هاتفك الجوال ( الموبايل ) ولكن فقط يتصل من غير أن يشغل لك ملف صوتي ينبهك بأن الباب فتح يعني لن تعرف أن الاتصال بسبب فتح الباب أو اتصال عادي
عموماً أكيد يوجد حل لهذه المشكلة
أرسل بواسطة: الدوسري في أبريل 24, 2003, 06:57:19 صباحاً
ومشاركات و
من لم يسمع بهذا المنتدي و
من لم يطلع على هذا الموضوع واخراً بارك الله في طرح الموضوع و من شارك و من تابع
إنتظرو مني مفاجاة
قريباً إن شاء المولى عز وجل الدوسري
أرسل بواسطة: mhmad_8 في أبريل 24, 2003, 04:14:05 مساءاً
أنا عضو جديد بالمنتدى وبصراحه لقد وجدت مبتغاي فأنا أبحث منذ زمن على مثل هذه المواضيع
وشكرا لك أخي الزمان عل هذه المشاركات القيمه
وأود أن أطرح عليكم مشروع عباره عن التحكم ببرنامج ميديا بلير أو أي برناج عن بعد
أي بواسطة remot control عن طريق داره الكترونيه تقوم بتنبيه منافذ الإدخال
من printer bort
في الحقيقه لقد حاولت تنفيذه لكن لم أستطع تنفيذ الجزء البرمجي فيه أرجوا المساعده والتعاون
لننفذه جميعا أن أردتم
وشكرا
أرسل بواسطة: أبوعمرالسبعاوي في أبريل 28, 2003, 02:09:33 مساءاً
أرسل بواسطة: الزمان في أبريل 28, 2003, 06:02:46 مساءاً
أخي mhmad_8 :
تستطيع أن تعمل ما تريد ، وبخصوص البرمجة فباستخدام دوال API تستطيع التحكم بالميديا بلير ، ولكن للأسف فأنا ليست لدي الخبرة في مجال دوال API ، و على الرغم من ذلك تستطيع الذهاب لموقع فيجوال بيسك للعرب وتطلب منهم دوال API الخاصة بالتحكم بالميديا بلير.
الأخ أبوعمرالسبعاوي شكراً لك ، وأتمنى أن تتحفنا بمشاريعك في هذا المجال
أرسل بواسطة: الدوسري في مايو 02, 2003, 10:39:56 صباحاً
لقد جإتكم من سبأ بنبأ
يعتمد نظام NT على إغلاق جميع المنافذ للنظام فلا يمكن فتح هذه المنافذ لبرامج المستخدمة لهذه المنافذ
فتجد أنك تشتري أو تعمل برنامج يتعامل مع اجهزه خارجية يعمل على نظام 98 أو me و عندما تنتقل الى 2000 أو XP لا يعمل
لذا يبقى برنامجك دون جدوى أو تحمل 98 من أجل هذا البرنامج فقط
المفاجأة ال
تجد برفقته برنامج قم بتركيبه ليفتح لك ثغرات في المنافذ I/O الدخل و الخرج
ليس عليك الا تركيب البرنامج و من ثما إستخدام برنامج التحكم الذي عملته
يأتي مع البرنامج ملفات مصدرية لل C , VB يمكن أن توفر للمستخدم معرفة بكيفية بناء برامج تحكم
و مكتبة دخل و خرج إستعملها في نظامك للقرأة و الكتابة
واللي مايعرف لصقر يشوية
الدوســـري
أرسل بواسطة: الدوسري في مايو 02, 2003, 10:51:09 صباحاً
يبدو أن هناك مشكلة امل حلها
مع العلم أن الملف حجمه 1.42 ميغا
و شكراً
الدوسري
أرسل بواسطة: الزمان في مايو 02, 2003, 06:27:08 مساءاً
أنصحك بحجز مساحة من المساحات المجانية على الإنترنت ووضع ملفك فيها ثم تضع لنا الرابط هنا
مع جزيل الشكر
أرسل بواسطة: أبوعمرالسبعاوي في مايو 14, 2003, 05:47:22 مساءاً
أرسل بواسطة: E-Adrenaline في مايو 15, 2003, 06:46:35 صباحاً
الاخ الدوسري .. انا في انتظار ملفك على احر من الجمر فذلك سيوفر الوقت والمجهود في تغيير نظامي الي 98 ,,,
اجد الجميع كتب مشاريعه فلم لا اخبركم بمشروعي ...
مشروعي هو ذراع الكترونية لها خمسة حركات حيث تكون قادرة على نقل الاشياء حولها في قطر 70 سم ...
والمشكلة في نظام اكس بي ( واعتقد الدوسري سيحلها بملفه ) - عدد bit في منفذ الطابعة فهي 8 فقط واحتاج الى اثنين ايضا ( اربع حركات وعكسها اربعة = 8 ,, و 2بت للقبضة ( درجتين من القوة ))
والمشكلة الاخيرة التي ما زلت غارق فيها هي تصميم الذراع ميكانيكيا ....
المشروع رائع ولا اعتقد ان احدا يخالفني الرأي ....
سيكون على ثلاثة دفعات : تصميم الذراع - تصميم دوائر التحكم - البرمجة
صورة وجدتها لذراع جاهزة لا تحتاج الا من يشتريها
أرسل بواسطة: nanoeng في مايو 17, 2003, 10:15:59 صباحاً
انا مشترك جديد فم المنتدى وقرات مناقشاتكم وارى انها معظمها تدور حول التحكم بالحاسب بالفيجوال بيسك والمنفذ المتوازى - هذا شىء جميل - وقد نفذتها منذ فتره ولكن اجريت عليها بعض التعديلات فى اننى جعلتها تعمل على المنفذ المتوالى
serial port ولكن مبدئيا من خلال ال serial سوف يتم التحكم فى جهازين او ثلاثة على الاكثر واظن ان هذا سيقلل كثيرا من مشقة التعامل مع اسلاك المنفذ المتوازى الكثيرة
على اى حال فكروا فى فكرتها واحب اسمع ردودكم والمرة القادمة اشرح لكم فكرتها وصورة الدائرة
اخوكم Nanoeng
Egypt
أرسل بواسطة: E-Adrenaline في مايو 23, 2003, 03:56:46 مساءاً
وعليكم السلام ورحمة اله وبركاته ..
قرأت في منتديات انجليزية عدة عن المنفذ السيريال .. والطريقة الوحيدة التي قرأت عنها هي الميكروكنترولر ... فهر يستقبل الاوامر ولا تحتاج لاكثر من ثلاثة اسلاك لهذه العملية ..
ومن ثم يتعامل هو مع الاجهزة حوله ...طبعا هنا التحكم واسع النطاق ولكنه ليس للمبتدئين مثلي
لا أدري هل هناك حيلة غير الميكروكنترولر أو طريقة اخرى تقصدها ..
وشكرا
أرسل بواسطة: الزمان في مايو 24, 2003, 04:40:29 مساءاً
أتمنى أن تعطينا من علمك في هذا المجال حتى نستفيد أكثر
أرسل بواسطة: amrco في أغسطس 14, 2003, 05:30:43 مساءاً
بس لو سمحت اريد معلومات و شرح اكثر شوي عن البرمجة لمخرج الطابعة بإستخدام الفيجوال بيسك
..وشكرا..
أرسل بواسطة: mhamdy55 في سبتمبر 01, 2003, 10:16:12 صباحاً
any brother know any idea about how to connect infra red to parallel port
and any body know any idea how to use the microcontrollrt
AT89C51
sorry im in forgin country and i cant type arabic languge
salam alekom;)
أرسل بواسطة: الخبير الصغير في سبتمبر 27, 2003, 02:05:18 صباحاً
لأنه بصراحة [أصبح لغة العصر ولدي الكثير من المشاريع الهامة والمعقدة في هذا الموضو ع
لكنني أنتظر بفارغ الصبر الردود و المشاركات والحلقات التعليمية
أرسل بواسطة: Mgh في أكتوبر 19, 2003, 03:34:01 مساءاً
http://olom.f2web.net/ib3....0;r=1;&
أرسل بواسطة: طلخاوي في أكتوبر 29, 2003, 10:38:58 مساءاً
أولا أرحب بكل الأعضاء والمشرفين في هذا المنتدى المتميز الذي لم اره مثله
وأود أن تقبلوني عضو نشط في منتداكم
وبالمناسبة أنا مبتدئ في هذا المجال أقصد التحكم في الآلات عن طريق الحاسب
ولهذا قد سارعت بتصميم برنامج للتحكم في جميع أجهزة المنزل
وأرجو من جميع الأعضاء المتميزيين مساعدتي في تصميم الدائرة الإلكترونية اللازمة لهذا المشروع أو أدخال أي تعديلات عليه
أرسل بواسطة: server في أكتوبر 30, 2003, 01:35:01 صباحاً
وكل عام والجميع بخير
اخواني الاعزء لا اعرف ماذا اقول ولا كيف اعبر عن شكري لجميع من ساهم في اعداد
وتصميم هذى المنتدى وكذالك من اشرف علية من قام على ادارته .
وكذلك لجميع من ساهم في هذا الموضوع الذي كثير من يبحث عنه ويرد التعمق فية.
اخوني احاول ان اقوم ببرنامج يقوم بلتحكم في اجهزة المنزل عن طريق الهاتف اى عندما
اتصل بلمنزل يرد علي جهاز الحاسب وينتضر مني اشارة معينة وهي لو اني قمت مثلآ
بلضغط على رقم واحد يقوم بتشغيل مصباح معين ولو قمت بلضغط على مفتاح رقم اثنان يقوم
بتشغيل شى اخر وهكذا .
فارجو من الاخوه المساهمة والمساعدة في هذا الموضوع
وللعلم ان لدي ادوات تقوم بمعرفة رقم المفتاح الذي تم الضغط علية عن اتصالك بلجهاز
وسوف اقوم بارفاق الادوات وكذلك رابط لطريقة التعامل معها هذ اذا كاني موضوعي
قد اجد اهتمام الاخوة الاعزاء . او ا اقوم بلاعذار من الاخوة اذ كاني ما كتبتة ليجد اهتمام
منكم .
ولكم مني كل الشكر والتقدير .
أرسل بواسطة: THE MASK في نوفمبر 01, 2003, 08:02:23 مساءاً
وشكرا
أرسل بواسطة: E-Adrenaline في فبراير 20, 2004, 02:37:08 صباحاً
هل أجد عند أحدكم حلا لأكمل ما بدأت به ؟ ؟
أرسل بواسطة: طارق إبراهيم في فبراير 26, 2004, 04:27:44 صباحاً
معلومه وهى ان الانظمه العامله بتقنيه ال NT لا تسمح بالتعامل المباشر مع الهارد وير لان مايكروسوفت تفصل بين الKERNEL والهاردوير و اعتقد ان الحل ربما يكون فى برمجه VXD للتعامل مع الهاردوير ذاته وإن كنت اشك لان تلك الانظمه لا تعتمد تقنيه ال VXD
اما التعامل مع الطابعه عن طريق vb.net فهل يمكنك الامنتظارإلى حين الانتهاء من كورس ال MCAD
أرسل بواسطة: ak555 في مارس 13, 2004, 05:36:07 مساءاً
تحياتي للجميع..
أنا أعمل على المنفذ المتوازي بااستخدام Vb.net وعلى نظام ويندوز xp وبدون مشاكل..
حيث أنني أستخدم ملف dll خاص لنظام xp وهو بنفس الاسم inpout32.dll
سأرفق هذا الملف وأرجو ان يحل المشكلة
أرسل بواسطة: riaction في مارس 17, 2004, 12:58:48 صباحاً
هذه أول مشاركة لي:
باستخدام 2LEDو الارضي والفتحات 2و3 بمنفذ الطابعة
وشكرا
ولو كلن أحد عنده دائرة مولد أصوات أو طريقة للتحكم بـ seven sigmant display
أكون شاكر له
أرسل بواسطة: E-Adrenaline في مايو 19, 2004, 03:24:51 مساءاً
اسم الملف : IO.DLL
تجدونه في google
سأعود مرة اخرى للمشروع بعد فترة الانقطاع بسبب هذا الملف ..........
أرسل بواسطة: abdu205 في أغسطس 03, 2004, 01:13:22 مساءاً
بارك اللة فيك علي هذة المعلومات القيمة والجهد المبذول
علي قدر اهل العزم تأتي العزائم
أرسل بواسطة: abdu205 في أغسطس 05, 2004, 12:37:39 مساءاً
بارك الله فيك علي مثل هذا الموضوع واريد طرح بعض الاسئله
1- نقراء مرات عديدة عن ما يسمي ببرتكولات الاتصال في مثل هذة الحالات هل يمكن ان تفودوني بمعلومات عنها او موقع
2- كيف يمكنني ربط دائرة الكترونية مع الميكرو علما انني بئستخدام ال RS232
3-هل يمكن ان تتطرقوا الي الربط التسسلسلي
4 - جزاكم الله خيرا وبارك فيكم
أرسل بواسطة: abdu205 في أغسطس 13, 2004, 08:49:04 مساءاً
هل من الممكن ان تنتقلوا الي الوجة الثاني وتتحدثون عن الربط المتتالي او تدلوني علي موقع متخصص لاني بحاجة ماسة الية
شكرا
أرسل بواسطة: naloot في يوليو 26, 2005, 06:51:33 مساءاً
بارك الله فيكم
سؤالي هو دائرة مبرمج pic ؟
وجدت دائرة في احد المواقع العربية ولكن تعتمد على RS232 وانا اريدها عن طريق منفد الطابعة.
فهل استطيع استخدام نفس الدائرة لمنفد الطابعة؟
ارجو منكم التوضيح .يعني كيف ادخل برنامج لل PIC
وشكرا على المساعدة
أرسل بواسطة: محمد العوالي في أغسطس 30, 2006, 01:09:23 مساءاً
أرسل بواسطة: Mgh في أغسطس 31, 2006, 07:07:13 مساءاً
أرسل بواسطة: issam في مايو 19, 2007, 08:17:15 مساءاً
أرسل بواسطة: عذبة الكلام في مايو 21, 2007, 09:45:44 مساءاً
أرسل بواسطة: نجاوي في أغسطس 26, 2007, 09:59:56 صباحاً
اتمنى ان تردووووو فاانا مبتدئه ارجو ان تفيدوني
أرسل بواسطة: سعد الحديثي في أكتوبر 23, 2007, 03:26:26 مساءاً
أرسل بواسطة: سعد الحديثي في نوفمبر 18, 2007, 05:19:16 مساءاً
أرسل بواسطة: ابوعلي2 في مارس 28, 2008, 03:22:46 مساءاً
ارجو مساعدتي وفقكم الله
أرسل بواسطة: ابوعلي2 في مارس 28, 2008, 03:39:41 مساءاً
أرسل بواسطة: solmoon في يوليو 14, 2009, 10:55:06 صباحاً
اولا بارك الله فيك على الموضوع الشيق والمفيد
انا لدي معرفة بسيطة عن الاعداد الثنائية وكذلك عن الالكترونيك وعن الفجوال بيسك 06
وانا اوحاول عمل دائرة تراقب جهد معين فقمة بعمل دائرة بسيطة تحتوي على Relay وجرس انذار وتتغذا بجهد مستمر فعند انقطاع الجهد المعني فالمراقبة يقوم Relay بالتحويل الى الجهد المستمر والاعلام عن غياب الجهد
وسبب اشتراكي في هذا الموقع هو محاولة معرفة دائرة افظل من التي صممتها وكذلك اقل عيوب واكثر خدمة وافضل واضغر حجما
لكن عندما وجدة هذا الدرس فكرة ان اقوم بمراقة الجهد عن طريق الكمبيوتر
فهل يمكنني ان اقوم بذلك
وجزاك الله عنا كل خير