سؤال عن سرعة منفذ الطابعة

مرحبا..

لقد أجريت تجربة و وجدت أن سرعة المنفذ هائلة.

وكان جواب سؤالي :فكم مرة يستطيع الكمبيوتر أن يفعل هذا الأمر بالثانية على حد تقديركم؟

هو : من الممكن أن يفعل الكمبيوتر هذا بعدد الهزات الصوتية التي يسمعها الإنسان بالثانية.. بدليل:

أجريت التجربة التالية.. جربها:

صل بفلة(سبيكر) بين D1 و الأرضي على منفذ الطابعة..

قرب السبيكر منك.. بعدين دخل كود الفيجوال بيسك 6 التالي:

Private Sub Command1_Click()
For i = 1 To 2000
Out &H378, Not Inp(&H378)
For j = 1 To 50000
Next
i = i + 1
Next

For i = 1 To 2000
Out &H378, Not Inp(&H378)
For j = 1 To 55000
Next
i = i + 1
Next

For i = 1 To 1500
Out &H378, Not Inp(&H378)
For j = 1 To 50000
Next
i = i + 1
Next

For i = 1 To 13000
Out &H378, 0
Next
For i = 1 To 800
Out &H378, Not Inp(&H378)
For j = 1 To 50000
Next
i = i + 1
Next

For i = 1 To 4500
Out &H378, 0
Next

For i = 1 To 800
Out &H378, Not Inp(&H378)
For j = 1 To 50000
Next
i = i + 1
Next
End Sub

و ضع الكود التالي في موديول:

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)

و جرب برنامجك.. قلي شو بصير معك..

حاول إنك تكتب المود التالي في تايمر تحط إنترفال تبعو 1 :

Out &H378, Not Inp(&H378)

ولاحظ الفرق بين الكود الأول و الكود التاني (فرق السرعة )..

وضعت بعض الحلقات للتأخير لأن السرعة هائلة..

أتمنى الإفادة من تجربتي البسيطة..

=========\ دريد عبد الله/=========

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

هذا البرنامج عبارة عن أورغ بسيط يحوي علاملات من الدو قرار حتى الجواب مثلا..

يعتمد على منفذ الطابعة في إخراج الصوت.

فقط صل بفلة(سبيكر) بين رجل الإخراج الأولى للمنفذ(والتي ترتيبها(رقمها)2) و واحدة من أرجل الأرضي ولتكن 24 أو 25 أو ما تود..

ثم شغل البرنامج

Organ.rar

العلامات من الحرف z على لوحة المفاتيح والذي يمثل دو ثم x وهو ري حتى ,)و) و هو دو جواب.

استمتع بالعزف..

(تأكد من أن لغة الكتابة هي الإنكليزية)

يخرج البرنامج عبر منفذ الطابعة نبضات كهربائية بتردد معين(استخدمت الحلقات للتأخير لتحديد التردد).. و تظهر العلامة الموسيقية بحدة معينة تزداد بازدياد التردد.

أتمنى أن تعجبكم تجربتي البسيطة و المتواضعة ..!