Другая жизнь LPT порта. Часть 3. Энциклопедия радиоэлектроники и электротехники

Энциклопедия радиоэлектроники и электротехники / Компьютеры

 Комментарии к статье

Каждый из вас наверняка (раз вы читаете этот текст) сталкивался в своей жизни с флоппи, CD и т.д. дисководами, принтерами, сканерами, в общем, устройствами, в состав которых входит шаговый двигатель. Вот сейчас будем его включать. На рисунке ниже схема, которую я нашел в интернете. Пусть простит меня автор, я не даю ссылку на него (просто не помню, где я ее нашел), но если он увидит эту статью, то узнает свою схему.

(нажмите для увеличения)

На самом деле все честно, все работает. Можно выложить еще кучу всяких схем, но нам сейчас важно понять не принцип работы схемы, а принцип подачи управляющих сигналов на двигатель. На диаграмме ниже - это видно.

На каждую из обмоток двигателя поочередно подаются импульсы, иногда на двух обмотках сразу присутствует высокий уровень сигнала. Если вы посмотрите на левую часть диаграммы и заметите D0-D3, то сразу поймете куда я клоню.

Вот что мы имеем в конечном итоге, ну и, конечно же, компьютер с LPT портом. Питание для двигателя придется делать самому, причем для каждого типа двигателя - свое. В соответствии с диаграммой на входы A, B, C, D мы подаем последовательно 3, 2, 6, 4, 12, 8, 9, 1 через &H378. Причем откуда начинать не критично, вопрос в сохранении последовательности и повторении ее по "кругу" или столько, сколько нужно. Если же изменить направление последовательности (задом-наперед), вращение двигателя будет в противоположную сторону. Данная последовательность дает команду двигателю делать полушаги (это зависит от конструкции двигателя), для управления полным шагом последовательность будет такой 3, 6, 12, 9.

И тут мне на глаза попался семисегментный индикатор на светодиодах от калькулятора. Решение пришло моментально.

Вот как устроен такой индикатор.

Для простоты я нарисовал 4-х разрядный (в моем индикаторе их 12) семисегментный индикатор на светодиодах. На разряды 1-4 подаем 0, а на сегменты подаем + питание (для каждого типа индикатора свои параметры питания). Все сегменты объединены, поэтому зажигать такой индикатор нужно динамической индикацией. Кто хоть раз сам собирал электронные часы, тот знает, что это такое, но на всякий случай рассмотрим это по подробнее.

Шаг 1. На первый разряд подается низкий уровень сигнала, а на сегментах (высоким уровнем) выставляется код цифры, которую мы хотим увидеть.

Шаг 2. На второй разряд подается низкий уровень сигнала, а на сегментах (высоким уровнем) выставляется код цифры, которую мы хотим увидеть.

Шаг 3. На третий разряд подается низкий уровень сигнала, а на сегментах (высоким уровнем) выставляется код цифры, которую мы хотим увидеть.

Шаг 4. На четвертый разряд подается низкий уровень сигнала, а на сегментах (высоким уровнем) выставляется код цифры, которую мы хотим увидеть.

И опять по новой шаг 1, 2 и т.д. Все это происходит очень быстро, поэтому наши глаза не успевают увидеть мерцание цифр.

Берем наш индикатор и разряды 1, 2, 3, 4 сажаем на STROBE(1), AUTO(14), INIT(16), SELECT IN(17). Это будет управление разрядами, а сегменты A, B, C, D, E, F, G сажаем на D0, D1, D2, D3, D4, D5, D6. Чтобы зажечь в первом разряде, например 1 (сегменты B,C) надо подать на адрес &H378 число 6, а на адрес &H37A - 197.

А вот и готовая программа - электронные часы.

На форме 2 кнопки. Первая запускает часы, вторая останавливает. Параметр Z = 0.004 подбирал опытным путем. Если задержку не ставить, то цифры сливаются, слишком быстро все происходит, и светодиод не успевает погаснуть.

Option Explicit

Объявление библиотеки для работы с адресами LPT порта

Private Declare Function DlPortReadPortUchar Lib "dlportio.dll" (ByVal Port As Long) As Byte

Private Declare Sub DlPortWritePortUchar Lib "dlportio.dll" (ByVal Port As Long, ByVal Value As Byte)

Dim I, J As Integer

Dim Z As Single

Dim A As String

Private Sub Command1_Click()

J = 1       'разрешение цикла

Z = 0.004   'задержка

Do While J <> 0

DoEvents

A = Mid$(Time$, 5, 1)           'считываем единицы минут

DlPortWritePortUchar &H37A, 197 'разрешаем засветиться первому разряду

writetime                       'отображаем единицы минут

A = Mid$(Time$, 4, 1)           'считываем десятки минут

DlPortWritePortUchar &H37A, 198 'разрешаем засветиться второму разряду

writetime                       'отображаем десятки минут

A = Mid$(Time$, 2, 1)           'считываем единицы часов

DlPortWritePortUchar &H37A, 192 'разрешаем засветиться третьему разряду

writetime                       'отображаем единицы часов

A = Mid$(Time$, 1, 1)           'считываем десятки часов

DlPortWritePortUchar &H37A, 204 'разрешаем засветиться четвертому разряду

writetime                       'отображаем десятки часов

If J = 0 Then Exit Do

Loop

DlPortWritePortUchar &H378, 0

End Sub

Public Sub writetime()

Select Case Val(A)

Case Is = 0

I = 63    'код 0 для семисегментного индикатора

Case Is = 1

I = 6     'код 1 для семисегментного индикатора

Case Is = 2

I = 91    'код 2 для семисегментного индикатора

Case Is = 3

I = 79    'код 3 для семисегментного индикатора

Case Is = 4

I = 102   'код 4 для семисегментного индикатора

Case Is = 5

I = 109   'код 5 для семисегментного индикатора

Case Is = 6

I = 125   'код 6 для семисегментного индикатора

Case Is = 7

I = 7     'код 7 для семисегментного индикатора

Case Is = 8

I = 255   'код 8 для семисегментного индикатора

Case Is = 9

I = 239   'код 9 для семисегментного индикатора

End Select

DlPortWritePortUchar &H378, I   'пишем код для семисегментного индикатора

Pause (Z)   'задержка

End Sub

Private Sub Command2_Click()

J = 0

DlPortWritePortUchar &H378, 0

End Sub

'Процедура задержки. Формат вызова: Pause(число секунд)

Public Sub Pause(Value As Single)

Dim Start, Finish

Start = Timer

Do While Timer < Start + Value

DoEvents

Loop

Finish = Timer

End Sub

Вот так это в жизни работает.

Я не буду описывать подключение люминесцентных индикаторов, но скажу честно пробовал - работает. На сетки разрядов подавал положительный потенциал, нить накала заземлил, а на сегменты подавал 1 через D0-D6. Все светится. ЖКИ индикаторы не пробовал, надо придумать, где взять 64 Гц. Если кто подключит - буду рад получить от вас схему. Кстати интересная мысль - можно сделать бегущую строку на светодиодах для отображения буквенно-цифровой информации. В общем, лишний раз убеждаюсь, что этот порт - прекрасный инструмент для творчества.

Вот еще небольшая тема насчет электродвигателей. Не у всех есть шаговые двигатели, да и не всегда это удобно и нужно. Давайте попробуем обойтись простым двигателем с редуктором, например для точного перемещения некоторого устройства в горизонтальной плоскости. Пусть это будет карандаш или фломастер. Двигатель связан с понижающим редуктором, который в свою очередь связан с осью имеющей резьбу. На оси с резьбой жестко закреплен диск с металлическими секторами (контактными площадками или прорезями для оптики), например, такой

или

Это уже не принципиально, важно то, что, зная шаг резьбы, например, шаг 1 мм, секторов у нас 4, значит, за полный оборот диска каретка продвинется вперед на 1 мм, а за четверть оборота - на 0,25 мм. Количество секторов может быть любым - кому сколько захочется. Но что мы теперь получаем.

Идем дальше. Программа управления двигателем работает, например, по такому алгоритму.

Управление идет через шины D0-D7 и/или через порт &H37A, команды от исполнительных устройств (датчиков) приходят на &H379 и/или &H378. В общем, дальше ваша фантазия и возможности. Тот же принцип логично использовать для перемещения каретки в перпендикулярной плоскости. И вот вам станок с перемещением в двух направлениях. Т.е. построить дома станок с ЧПУ (числовым программным управлением) вполне РЕАЛЬНО.

Автор: Клюшников Алексей, г.Иваново; Публикация: cxem.net

Смотрите другие статьи раздела Компьютеры.

Читайте и пишите полезные комментарии к этой статье.

<< Назад

Последние новости науки и техники, новинки электроники:

Не вся растительная пища полезна для психики 10.09.2026

Растительная пища традиционно считается одной из основ здорового рациона, поэтому специалисты по питанию обычно рекомендуют чаще включать в меню овощи, фрукты, цельнозерновые продукты и другие продукты растительного происхождения. Однако важна не только принадлежность пищи к растительной категории, но и способ ее обработки, количество сахара и другие характеристики рациона. Исследование иранских ученых показывает, что разные варианты растительного питания могут по-разному отражаться на психологическом состоянии человека. К такому выводу пришли исследователи из Исфаханского университета медицинских наук. Они изучали взаимосвязь между характером питания и эмоциональным состоянием взрослых людей, уделяя особое внимание симптомам депрессии и тревожности. Результаты работы были опубликованы в научном журнале PLOS One. При этом специалисты не утверждали, что отдельные продукты непосредственно вызывают депрессию: речь шла о статистической связи между определенными пищевыми привычками и сос ...>>

Подвесной робот Stringman для уборки комнаты 10.09.2026

Домашняя робототехника в основном развивается вокруг двух привычных направлений: роботов-пылесосов и многофункциональных гуманоидных машин. Но далеко не все задачи требуют колесной платформы или сложного человекоподобного механизма. Инженер Натаниэль Нифонг (Nathaniel Nifong), основатель стартапа Newfangled, предложил необычную альтернативу - подвесного робота Stringman, способного перемещаться над полом и самостоятельно собирать разбросанные предметы. Вместо того чтобы передвигаться по поверхности помещения, Stringman использует принцип, знакомый по тросовым системам камер Spidercam, применяемым на стадионах. В четырех верхних углах комнаты устанавливаются натяжные блоки, от которых к центральному рабочему модулю идут тонкие, но прочные тросы. Изменяя их натяжение, система может перемещать манипулятор практически в любую точку обслуживаемого пространства. Такое решение позволяет обойти некоторые ограничения традиционных роботов на колесах. Подвесной механизм не сталкивается с пр ...>>

Микрогравитация не ослабляет сердечные клетки 09.09.2026

Продолжительное пребывание в космосе подвергает человеческий организм воздействию условий, с которыми он никогда не сталкивается на Земле. Микрогравитация изменяет распределение жидкостей, способствует потере костной и мышечной массы, а космическое излучение способно повреждать ДНК. Особое значение для будущих длительных экспедиций имеет состояние сердечно-сосудистой системы. Новый эксперимент с мышами на борту Международной космической станции показал, что клетки сердечной мышцы могут сохранять силу сокращения даже после нескольких недель пребывания в микрогравитации. Исследователи давно наблюдают за тем, каким образом отсутствие привычной земной гравитационной нагрузки отражается на организме. В космосе жидкости перераспределяются в сторону верхней части тела, позвоночник немного растягивается, из-за чего рост временно увеличивается, а скелетные мышцы постепенно теряют массу и силу. Однако сердечная мышца работает в несколько иных условиях, поэтому специалисты Чикагского университ ...>>

Случайная новость из Архива Данные передаются в момент рукопожатия 27.12.2002 Японская компания "NTT DoCoMo" разработала систему, позволяющую передавать данные со скоростью до 10 Мбит/с между двумя переносными компьютерами в момент, когда их владельцы обмениваются рукопожатиями. Работа этой системы, которая, в отличие от беспроводных технологий передачи данных, намного лучше защищена от несанкционированного съема информации, возможна благодаря тому, что кожные покровы человека обладают сравнительно неплохой проводимостью. Другим возможным применением новинки может стать ее использование для автоматической идентификации личности, например, при касании дверной ручки или клавиатуры компьютера.

Другие интересные новости:

▪ Гусеницы могут поедать полиэтиленовые отходы

▪ Навигатор Garmin Speak

▪ Влияние кофеина на устойчивость к лекарственным препаратам

▪ Подводная лодка на литий-ионных батареях

▪ Электричество с колес

Лента новостей науки и техники, новинок электроники

Интересные материалы Бесплатной технической библиотеки:

▪ раздел сайта Аудиотехника. Подборка статей

▪ статья Римский огурец. Крылатое выражение

▪ статья Почему нидерландский корабль плыл в Австралию, замаскировавшись под остров? Подробный ответ

▪ статья Какая форма Земли на самом деле? Детская научная лаборатория

▪ статья Антенна лисолова на 3,5 МГц. Энциклопедия радиоэлектроники и электротехники

▪ статья Hi-Fi и регулятор громкости. Энциклопедия радиоэлектроники и электротехники

Оставьте свой комментарий к этой статье:

www.diagram.com.ua
2000-2026