25-02-2016, 09:37 PM (آخر تعديل لهذه المشاركة: 25-02-2016, 09:49 PM بواسطة Admin.)
بسم الله الرحمن الرحيم
الصلاة والسلام على رسول الله
استفسار وتوضيح حول هذا الكود تشغيل مروحة واقافها من برمجة الاخ الع؟د لخ؟؟ بارك الله فيه
ادخل سلكان في المخرج القديم للطابعة ليس مخرج usp
وجعل في أحد الاسلاك أو في كليهما تونزيستور واوصلهما بالمروحة
ولا أدري اي ثقوب ادخل تلك الاسلاك
مانوع تونزيستور وما اسمه اريــد شرح العملية
هذا كود تشقيل
كود :
procedure TForm1.Button1Click(Sender: TObject);
begin
asm
mov al, 1
in { نسيت ماذا كتب هنا لانها كانت مكتوبة في ورقة }
end;
end;
هذا كود اقاف تشقيل
كود :
procedure TForm1.Button2Click(Sender: TObject);
begin
asm
mov al, 1
mov dx, 888
out dx, al
end;
end;
ملاحظة هامة
نوع الجهاز كان بنتيوم 1 وكانت العملية عند الضغط فوق الزر الاول تشتقل المروحة
وعند الضغط الزر الثاني تتوقف المروحة
وكان هذا منذ مدة ونسيت لأنه كان يعلمنا بعض الاشياء في دلفي
أخي العزيز:
بالنسبة للتعامل مع منفذ الطابعة LPT يجب أولاً أن تتعرف على هذا المنفذ و على كل pin فيه.
يوجد 8 pin للخرج و pin واحد للأرضي, حيث يمكن أن تقوم بوصل ليد صغير مثلاً على pin من المخارج و pin الأرضي.
ثم ترسل من البرنامج قيمة 1 لذلك ال pin فتكون بذلك أرسلت 5 فولط إليه و تعمل الليد, و ترسل صفر فينطفىء.
هذا أبسط شرح ممكن.
وبالنسبة للدلفي, هذا الكود لإرسال صفر إلى جميع المخارج:
02-03-2016, 11:24 PM (آخر تعديل لهذه المشاركة: 02-03-2016, 11:27 PM بواسطة sabre.)
(28-02-2016, 06:24 AM)PLANSHARP كتب : أخي العزيز:
بالنسبة للتعامل مع منفذ الطابعة LPT يجب أولاً أن تتعرف على هذا المنفذ و على كل pin فيه.
يوجد 8 pin للخرج و pin واحد للأرضي, حيث يمكن أن تقوم بوصل ليد صغير مثلاً على pin من المخارج و pin الأرضي.
ثم ترسل من البرنامج قيمة 1 لذلك ال pin فتكون بذلك أرسلت 5 فولط إليه و تعمل الليد, و ترسل صفر فينطفىء.
هذا أبسط شرح ممكن.
وبالنسبة للدلفي, هذا الكود لإرسال صفر إلى جميع المخارج:
المخارج التي نقوم بالتحكم بها هي كما في الصورة مخارج الداتا من 2-9.
بالنسبة لليلد أقصد الضوء الصغير كما في الصورة.
تقوم بوصل هذا الليد إلى أحد مخارج الداتا و الطرف الثاني إلى أحد مخارج الأرضي ground.
