اجوبة للأساتذة الراغبين في انجاز مناظم آلية بحاسوب او بدونه

الزيارات : 5185 - التاريخ : 16/9/2013 - الكاتب : : محمد الزين

g

نحن في انتظار اسئلتكم حول هذا الموضوع




Facebook Twitter Google+

تعليقات الزوّار


1 - boushaba - 3/1/2013

اشكركم بداية على طرح هذا الموضوع , و اود منكم ان  تعرفنا  بطريقة برمجة المنقفذ المتوازي بلغة VB6 و شكرا

2 - محمد الزين - 3/1/2013


طريقة برمجة المنفذ المتوازي بلغة VB6

contrôle du port parallèle LPT avec VB6



1- يجب نسخ المستند inpout32.dll الموجود بهذا الرابط: http://www.4shared.com/file/8jz3I-r4/inpout32.html الى المجلد:

C:WINDOWSsystem32

2- افتح le projet الذي تريد ان تضيف اليه التحكم في المنفذ المتوازي

3-اعمل كما هو موضح في الصورة التالية: http://www.4shared.com/photo/V0M6VSIB/module.html

4- في النافذة التي ستفتح اضغط مباشرة على ouvrir

5- في النافذة التي ستفتح ايضا الصق مايلي:

 


Public Declare Function Inp Lib 'inpout32.dll' _

Alias 'Inp32' (ByVal PortAddress As Integer) As Integer

Public Declare Sub Out Lib 'inpout32.dll' _

Alias 'Out32' (ByVal PortAddress As Integer, ByVal Value As Integer)


 


6- الان اصبح بامكانك استعمال


Out ADD,VAL بحيث ADD هو عنوان المنفذ و VAL هي القيمة التي تريد ارسالها الى المنفذ

مثال: Out 0378,255

Inp ADD بحيث ADD هو عنوان المنفذ الذي تريد قراءة القيمة الموجودة به

مثال: Inp 0378





ملاحظة: هذه الطريقة صالحة لجميع منافذ الحاسوب، يكفي ان تعرف عنوان المنفذ en hexadecimal



من استعصى عليه الفهم يعيد السؤال حول الجزئية الغير مفهومة

3 - boushaba - 4/1/2013

شكرا جزيلا لك استاذ ,

4 - redouane CHIBOUT - 13/1/2013

ملاحظة: هذه الطريقة صالحة لجميع منافذ الحاسوب، يكفي ان تعرف عنوان المنفذ en hexadecimal


المرجو الأخ محمد تزويدنا بعناوين منافذ الحاسوب en hexadecimal


وكذا مثال لكيفية برمجة منفذ USB

5 - alaaeddine1985 - 11/2/2013

  تحية طيبة لأساتذة مادة التكنولوجيا وجازاكم الله ألف خير ردا على سؤال الأستاذ المبدع رضوان شيبوت البرمجة   على منفذ usb  ليست سهلة ولكن يمكن استعمال دارة الملمس واستغلال أحد الثنابيل sroll lock  الغير مستعمل ربما للتحكم وأنتم لديكم خبرة في استعمال الترانزيستور و المناب . وسأرسل لك تطبيق للتحكم في إضاءة هذا التنبيل للمدة التي تختارها ............

6 - promoslim - 13/9/2013

السلام عليكم كيف أعمل ذلك أخي الكريم أنا أتوفر على حاسوب لايحتوي على المنفذ المتوازي و كذا الحاسوب المحمول  جزاكم الله خيرا ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

7 - محمد الزين - 13/9/2013

السلام عليكم كيف أعمل ذلك أخي الكريم أنا أتوفر على حاسوب لايحتوي على المنفذ المتوازي و كذا الحاسوب المحمول  جزاكم الله خيرا ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟



عليكم السلام...

ماذا تريد ان تفعل؟

المرجو توضيح السؤال

8 - Guest - 13/9/2013

الكاتب :oumara
برمجة بقية المنافد بالفيزوال بازيك مختلفة تماما عن طريقة المنفد المتوازي.

9 - alaaeddine1985 - 13/9/2013

السلام عليكم كيف أعمل ذلك أخي الكريم أنا أتوفر على حاسوب لايحتوي على المنفذ المتوازي و كذا الحاسوب المحمول  جزاكم الله خيرا ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟







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

تحية طيبة وعودة ميمونة لكل أساتذة مادة التكنولوجيا والله يحسن عوانا مع هاد التهميش من الوزارة

للأستاذ الراغب في استعمال منفذ usb  أقترح من وجهة نظري استعمال دارة الملمس ربما هو رخيص في سوق الجوطية وهذا تطبيق بسيط للتحكم في تنبيل scroll lock   أنظر الثنبيل الثالث على اليمين


                                              




هذا التنبيل لايستعمل في نظري بالملمس لذا لاخوف في التحكم به

10 - promoslim - 14/9/2013




عليكم السلام...

ماذا تريد ان تفعل؟

المرجو توضيح السؤال

أريد إنجاز الجرس باستعمال المنفذ usb

وكذا من له كود سورس يمكن من إدخال كل يوم على حدى لكي نتمكن من تغيير توقيت يوم الجمعة جزاكم الله خيرا

11 - promoslim - 14/9/2013

كيف أحول من vb إلى تطبيق يمكن تثبيته على أي حاسوب بارك الله فيكم أشكركم جزيل الشكر

12 - promoslim - 14/9/2013

أخي علاء الدين أتمنا لو تمدني بالكود وبعض شروحات إذا كان ممكن

ثم من فضلك هل يوجد هذا التنبيل في الحاسوب المحمول أنا لا يوجد عندي ؟؟؟

13 - محمد الزين - 14/9/2013

أخي علاء الدين أتمنا لو تمدني بالكود وبعض شروحات إذا كان ممكن

ثم من فضلك هل يوجد هذا التنبيل في الحاسوب المحمول أنا لا يوجد عندي ؟؟؟



رغم  عدم وجود هذا التنبيل يمكنك استعمال LED SCROLL LOCK

تتم العملية من خلال تفكيك ملمس عادي clavier d'un PC bureau de type USB

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

يمكن تعويض LED SCROLL LOCK بواسطة ترانزيسطور يتحكم في مناب الجرس


 


 

14 - promoslim - 14/9/2013

فهمتك أخي شكرا ولكن ماهو الكود الذي سيمكنني من التحكم في الإشارة بال VB

هل أقوم بنفس العمليات التي شرحتها من قبل بارك الله فيك



15 - محمد الزين - 15/9/2013

فهمتك أخي شكرا ولكن ماهو الكود الذي سيمكنني من التحكم في الإشارة بال VB

هل أقوم بنفس العمليات التي شرحتها من قبل بارك الله فيك






هنا ستجد مثالا للتحكم في الثنبيلات الثلاث للملمس

لكنني انصحك باستعمال Scroll Lock LED فقط من خلال نسخ جزء من الكود واضافته الى مشروعك


http://www.4shared.com/zip/MUqbccNM/741-752419-allumez-et-eteindre.html




 

16 - promoslim - 15/9/2013

جزاك الله خيرا  بارك الله فيكم حفظكم الله و سامحوني كثيرا

أخي أظن أن هذا التطبيق الذي أعطيتني يجب أن يمكن من تشغيل أو إيقاف تشغيل تنبيل الماجيسكيل لكن لم يفعل ذلك في حاسوبي المحمول ؟؟؟

17 - redouane CHIBOUT - 15/9/2013


نفس الشيء الكود أخي محمد لم يغير من حالة التنبيلات على حاسوبي المحمول

شخصيا استعملت كود مغاير السنة الماضية ودون استعمال module




 

18 - redouane CHIBOUT - 15/9/2013


هذا هو الكود للتحكم في التنبيلات الثلاثة لملمس من نوع USB

وهو كود مجرب وشغال 100 %

بل وتم إنجاز جرسين الأول تم إنجاز وتركيبه بمؤسسة بعين تاوجطات

والثاني تركته أنا للتلاميذ لمعاينته عن قرب بجماعة بطيط




f declaration




Private Declare Sub keybd_event Lib 'user32.dll' (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)





Private Const VK_NUMLOCK = &H90

Private Const VK_SCROLL = &H91

Private Const VK_CAPITAL = &H14

Private Const KEYEVENTF_EXTENDEDKEY = &H1

Private Const KEYEVENTF_KEYUP = &H2

Private Const VK_SNAPSHOT = &H2C



pour commander LED dial scroll



keybd_event VK_SCROLL, 0, KEYEVENTF_EXTENDEDKEY, 0

    keybd_event VK_SCROLL, 0, KEYEVENTF_EXTENDEDKEY Or KEYEVENTF_KEYUP, 0



pour commander LED dial majuscule





keybd_event VK_CAPITAL, 0, KEYEVENTF_EXTENDEDKEY, 0

    keybd_event VK_CAPITAL, 0, KEYEVENTF_EXTENDEDKEY Or KEYEVENTF_KEYUP, 0





pour commander LED dial pavé Numerique





keybd_event VK_NUMLOCK, 0, KEYEVENTF_EXTENDEDKEY, 0

    keybd_event VK_NUMLOCK, 0, KEYEVENTF_EXTENDEDKEY Or KEYEVENTF_KEYUP, 0





 

19 - solarisimo - 15/9/2013

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

~~~~

شكرا لك اخي رضوان حبذا لو اضفت المزيد من التفاصيل  عن كيفية استغلال  إشارة الثنبيلات للتحكم  بجرس المؤسسة 

20 - promoslim - 15/9/2013

الله يحفظك يا سي شيبوت رضوان بقات ليا حاجة وحدة كفاش نديرو في الكود ديال الجرس

21 - promoslim - 15/9/2013

أنا وجدت آخر أسهل من الذي أعطيتني و يقوم بالتحكم

22 - محمد الزين - 15/9/2013

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

~~~~

شكرا لك اخي رضوان حبذا لو اضفت المزيد من التفاصيل  عن كيفية استغلال  إشارة الثنبيلات للتحكم  بجرس المؤسسة 





لتشغيل الجرس يقوم البرنام باشعال الثنبيل

23 - alaaeddine1985 - 15/9/2013

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

بالنسبة لاستعمال الحاسوب في التحكم أظن أن فيه عيوب كثيرة جدا خصوصا في دارة الجرس المدرسي ويمكن أن يتلف البور usb أو   com للحاسوب المحمول لذا يجب الاحتراس بالإضافة إلى أن الحاسوب يجب أن يكون دائما مشتعل في حالة استعماله في الإدارة أو قد يرن لك في غير وقته +++++ بزاف. لذا أفضل طريقة هي برمجة السي البيك pic  ولمن عنده طريقة البرمجة و طريقة إنجاز programmateur  فليفدنا وجزاكم الله خيرا

24 - redouane CHIBOUT - 15/9/2013


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

25 - promoslim - 16/9/2013

أخي رضوان إنني في انتظار الكود الكامل لجرس المدرسة متحكم فيه بال scroll

bougtebamed@hotmail.com

الله يرحم الوالدين سوف أعتمده كمشروع هذة السنة إن شاء الله


عذرا التعليق غير متاح للزوار
سجل دخولك للتعليق