Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2002.11.21;
Скачать: [xml.tar.bz2];

Вниз

Работа с LPT портом   Найти похожие ветки 

 
isc   (2002-09-20 18:36) [0]

Нужно написать программу, в которой есть шесть кнопок.
При нажатии на первую кнопку на первую ножку LPT порта
(только на первую) должно посылаться напряжение 5 Вольт на некоторое заданное время.
При нажатии на вторую кнопку напряжение 5 Вольт должно подаваться на вторую ножку LPT порта и т.д.
Как это можно сделать?
Если кто-то знает, большая просьба выслать на isc@pisem.net


 
Сию программу   (2002-09-21 02:38) [1]

ГРАМОТНЕЕ всего, назвать "драйвером устройства". К тому же под системой NT - это и может быть только драйвером (т.е. на D3,D4,D5,D6 не пишется).


 
int64   (2002-09-21 15:30) [2]

Возьми DriverLINX Port IO Driver. http://diskdude.cjb.net
Это драйвер с компонентом.
Там есть TDLPrinterPortIO со свойством:

property Pin[Index : TPinNumber] : Boolean read GetPin write SetPin;

// Index valid is in the range 1-25 only (other values return false)
// Reading the pin returns true when it is 5V, or false when it at 0V.
// Writing true sets the pin to 5V, or 0V when false.


Дерзай.


 
MAYOR   (2002-09-22 13:51) [3]

А где конкретно лежит етот компонент???


 
andyboxer   (2002-09-22 22:05) [4]

http://venezia.cx/~diskdude/software/cbuilder/index.html


 
Серый+   (2002-09-23 13:45) [5]

Так выглядит простая программа на Паскале (7,0) :

Uses CRT;

Var
data:byte; {переменная DATA типа byte}

Begin
Readln(data); {читаем переменную -ввод ентером}
Port[MemW[$0040:$0008]:=data; {посылаем в порт}
End.

Эта программа посылает в порт введеное число.

Какое число необходимо ввести :

1 выход - 1
2 выход - 2
3 выход - 4
4 выход - 8
5 выход - 16
6 выход - 32
7 выход - 64
8 выход - 128
0 - "гасит" все выходы 255 - включает все

Если нужно подать сигнал на все выходы, то нужно просто сложить числа обоих выходов. Пример (на св.диодах): у на горит 2-й и 7-й, нам нужно зажечь 5-й, не выключая 2и7. Считаем- у второго код 2, у седьмого - 64 => сейчас на порт послано число 64+2 = 66. Теперь зажигаем 5-й - 66+16(код пятерки) = 82. Посылаем на порт 82 и у нас будут гореть 2,5,7. Но вдруг нам понадобилось погасить 7-й. Всё просто - отнимаем от того что у нас сейчас "в порте" (82) часло этого 7-го вывода - 82-64 = 18






Страницы: 1 вся ветка

Форум: "Система";
Текущий архив: 2002.11.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.008 c
3-69198
dias
2002-10-31 21:40
2002.11.21
Мастера помогите с поднятием backup в 2000


1-69393
Strumpf
2002-11-09 23:34
2002.11.21
Как изменить высоту элемента TMenuItem?


3-69150
orlando
2002-10-31 12:41
2002.11.21
TSession


1-69434
Barmaglot
2002-11-10 19:52
2002.11.21
Как конвертировать строку ?


4-69616
Alexander
2002-10-10 07:17
2002.11.21
Вопрос по PChar





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский