Работа с LPT портом

@Fransuz_F · Регистрация: 03.02.2014

Author24 — интернет-сервис помощи студентам

Добрый день форумчане, столкнулся с проблемой. Печатающее устройство получает информацию через линии данных интерфейса. Печать полной строки (80 символов) печатающее устройство подразделяет на 4 зоны по 20 символов в каждой. Бумага и красящая лента расположены между рядом 80 бойков и непрерывно вращающимся печатающим барабаном. Блок управления производит развертку хранимой в буферной памяти информации, сравнивает с кодом символов, находящихся перед рядом бойков, выбирает позиции совпадающих символов, затем в требуемый момент приводит в действие выбранный боек и печатает соответствующий символ. Если в буферную память печатающего устройства поступает код одной из команд Возврат каретки, Перевод строки, или Перевод формата, оно осуществляет сброс счетчика, печать содержимого буферной памяти и выполняет указанную команду - Возврат каретки, Перевод строки, или Перевод формата соответственно.
Вот примерная программа

@dondublon · 20.02.2014, 08:27

Вопрос-то в чём?

@Fransuz_F · 20.02.2014, 09:02 **[ТС]**

Как это осуществить? На кнопку "Запрос" считывать биты с LPT порта и вывести их в строб,
при нажатии на кнопку "строб" вывести полученные биты в Label (какие включены или отключены. т.е 1 либо 0) там должно выводиться типо 1001101, то есть какая ножка включена а какая отключена

@dondublon · 20.02.2014, 09:09

Для начала: Delphi russian knowledge base -> Системные функции и winapi -> работа с железом -> порты.
Поскольку работа идёт через winapi, можете погуглить то же самое для С.

@Fransuz_F · 20.02.2014, 09:18 **[ТС]**

Сообщение от dondublon

Для начала: Delphi russian knowledge base -> Системные функции и winapi -> работа с железом -> порты.
Поскольку работа идёт через winapi, можете погуглить то же самое для С.

Вы программу мою смотрели? Я же говорю что нужно отправить в ЛПТ порт запрос на какую либо ножку в моем случае это ножки от 2 до 8, отправить это в строб, после того как мы поймали строб записать эти данные в Label

@dondublon · 20.02.2014, 09:19

Нет, я просто сказал, куда вам копать.

@Fransuz_F · 20.02.2014, 09:21 **[ТС]**

Я просто уже копал много, но ничего не смог найти((, а эту работу до конца недели надо сдать, эх жаль наверное уволят))

@dondublon · 20.02.2014, 09:27

Точно копали много?
Гугль мне выдал первой же ссылкой: http://lexwebmaster.narod.ru/lpt_delphi.html
По-моему, там хорошо разжёвано, и установка пинов, и считывание (внизу).

@Fransuz_F · 20.02.2014, 13:02 **[ТС]**

Хорошо давайте сделаем по другому, какую процедуру написать чтоб с ЛПТ порта по нажатию кнопки выводились 0 либо 1, например нажал на кнопку процедура считала данные с ЛПТ порта если все ножки отключены выдает нам в Label или Edit 00000000, если 2,5,7, включены то 10010100. Как это мне написать с помощью какой процедуры или функции может быть

@dondublon · 20.02.2014, 13:05

Не знаю, я с LPT не работал.

@cotseec · 20.02.2014, 18:44

Работа с портами COM и LPT на низком уровне (Win7 вряд ли прокатит, на WinXP - возможно получится)
XP LPT с исходниками
посмотрите, может пригодится, также по ссылке предыдущего оратора есть библиотека Inpout32 и описание работы с ней, для

Сообщение от Fransuz_F

процедура считала данные с ЛПТ порта если все ножки отключены выдает нам в Label или Edit 00000000, если 2,5,7, включены то 10010100

используйте

Сообщение от по ссылке тов. dondublon

...Для считывания состояния (значения) используется функция Inp32. В коде выглядит так: Inp32(888);...

в результате получите значение размером байт, по которому (отдельным битам) уже можно судить о "включении/выключении ножки"

@dondublon 4632 / 2050 / 361 Регистрация: 17.03.2012 Сообщений: 10,133 Записей в блоге: 6
	20.02.2014, 08:27	2
	Вопрос-то в чём? 0

@Fransuz_F 1 / 1 / 0 Регистрация: 03.02.2014 Сообщений: 13
	20.02.2014, 09:02 [ТС]	3
	Как это осуществить? На кнопку "Запрос" считывать биты с LPT порта и вывести их в строб, при нажатии на кнопку "строб" вывести полученные биты в Label (какие включены или отключены. т.е 1 либо 0) там должно выводиться типо 1001101, то есть какая ножка включена а какая отключена 0

@dondublon 4632 / 2050 / 361 Регистрация: 17.03.2012 Сообщений: 10,133 Записей в блоге: 6
	20.02.2014, 09:09	4
	Для начала: Delphi russian knowledge base -> Системные функции и winapi -> работа с железом -> порты. Поскольку работа идёт через winapi, можете погуглить то же самое для С. 0

@Fransuz_F 1 / 1 / 0 Регистрация: 03.02.2014 Сообщений: 13
	20.02.2014, 09:18 [ТС]	5
	Сообщение от dondublon Для начала: Delphi russian knowledge base -> Системные функции и winapi -> работа с железом -> порты. Поскольку работа идёт через winapi, можете погуглить то же самое для С. Вы программу мою смотрели? Я же говорю что нужно отправить в ЛПТ порт запрос на какую либо ножку в моем случае это ножки от 2 до 8, отправить это в строб, после того как мы поймали строб записать эти данные в Label 0

@dondublon 4632 / 2050 / 361 Регистрация: 17.03.2012 Сообщений: 10,133 Записей в блоге: 6
	20.02.2014, 09:19	6
	Нет, я просто сказал, куда вам копать. 0

@Fransuz_F 1 / 1 / 0 Регистрация: 03.02.2014 Сообщений: 13
	20.02.2014, 09:21 [ТС]	7
	Я просто уже копал много, но ничего не смог найти((, а эту работу до конца недели надо сдать, эх жаль наверное уволят)) 0

@dondublon 4632 / 2050 / 361 Регистрация: 17.03.2012 Сообщений: 10,133 Записей в блоге: 6
	20.02.2014, 09:27	8
	Точно копали много? Гугль мне выдал первой же ссылкой: http://lexwebmaster.narod.ru/lpt_delphi.html По-моему, там хорошо разжёвано, и установка пинов, и считывание (внизу). 0

@Fransuz_F 1 / 1 / 0 Регистрация: 03.02.2014 Сообщений: 13
	20.02.2014, 13:02 [ТС]	9
	Хорошо давайте сделаем по другому, какую процедуру написать чтоб с ЛПТ порта по нажатию кнопки выводились 0 либо 1, например нажал на кнопку процедура считала данные с ЛПТ порта если все ножки отключены выдает нам в Label или Edit 00000000, если 2,5,7, включены то 10010100. Как это мне написать с помощью какой процедуры или функции может быть 0

@dondublon 4632 / 2050 / 361 Регистрация: 17.03.2012 Сообщений: 10,133 Записей в блоге: 6
	20.02.2014, 13:05	10
	Не знаю, я с LPT не работал. 0

@cotseec Пишу на Delphi...иногда 1423 / 1278 / 286 Регистрация: 03.12.2012 Сообщений: 3,914 Записей в блоге: 5
	20.02.2014, 18:44	11
	Работа с портами COM и LPT на низком уровне (Win7 вряд ли прокатит, на WinXP - возможно получится) XP LPT с исходниками посмотрите, может пригодится, также по ссылке предыдущего оратора есть библиотека Inpout32 и описание работы с ней, для Сообщение от Fransuz_F процедура считала данные с ЛПТ порта если все ножки отключены выдает нам в Label или Edit 00000000, если 2,5,7, включены то 10010100 используйте Сообщение от по ссылке тов. dondublon ...Для считывания состояния (значения) используется функция Inp32. В коде выглядит так: Inp32(888);... в результате получите значение размером байт, по которому (отдельным битам) уже можно судить о "включении/выключении ножки" 0