Другая жизнь 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

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

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

<< Назад

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

Омега-3 помогают молодым кораллам выживать 11.11.2025

Сохранение коралловых рифов становится все более актуальной задачей в условиях глобального изменения климата. Молодые кораллы особенно уязвимы на ранних стадиях развития, когда стрессовые условия и нехватка питательных веществ могут привести к высокой смертности. Недавнее исследование ученых из Технологического университета Сиднея показывает, что специальные пищевые добавки способны существенно повысить выживаемость личинок кораллов. В ходе работы исследователи разработали особый состав "детского питания" для коралловых личинок. В него вошли масла, богатые омега-3 жирными кислотами, а также важные стерины, необходимые для формирования клеточных мембран. Личинки, получавшие эти добавки, развивались быстрее, становились крепче и демонстрировали более высокую устойчивость к стрессовым факторам. Особое внимание ученые уделили липидам. Анализ показал, что личинки активно усваивают эти вещества, что напрямую влияет на их жизнеспособность. Стерины, содержащиеся в корме, повышают устойчи ...>>

Наушники Bowers & Wilkins Px8 S2 11.11.2025

Наушники премиум-класса становятся не только аксессуаром для прослушивания музыки, но и инструментом для профессиональной работы с аудио. Новый флагман британского бренда Bowers & Wilkins - модель Px8 S2 - демонстрирует, как эти аспекты можно объединить в одной беспроводной системе. Компания представила Px8 S2 как обновленную флагманскую модель в линейке, ориентированную на пользователей, которые ценят высокое качество звука, эффективное шумоподавление и премиальный дизайн. Производитель отмечает, что наушники сочетают передовые акустические решения с эргономикой для длительного использования. Каждое устройство оснащено 40-миллиметровыми динамиками с карбоновыми диффузорами и 24-битным цифровым процессором. По словам Bowers & Wilkins, это обеспечивает точное и детализированное воспроизведение звукового спектра, а также поддержку аудио высокого разрешения. Автоматическая оптимизация соединения с источником сигнала гарантирует стабильное и качественное звучание вне зависимо ...>>

Шимпанзе могут менять свои убеждения 10.11.2025

Понимание того, как формируются убеждения и принимаются решения, традиционно считалось уникальной способностью человека. Однако недавнее исследование показало, что шимпанзе обладают способностью пересматривать свои мнения на основе новых данных, демонстрируя уровень рациональности, который ранее считался исключительно человеческим. Психологи под руководством Ханны Шлейхауф из Утрехтского университета провели серию экспериментов, направленных на изучение метапознания у шимпанзе. Исследователи впервые наблюдали, как эти обезьяны могут взвешивать различные виды доказательств и корректировать свои решения при появлении более убедительной информации. Экспериментаторы рассматривали рациональность как способность формировать убеждение о мире на основе фактических данных. При поступлении новой информации разумное существо способно сравнивать старые и новые данные и изменять свое мнение, если новые доказательства оказываются более весомыми. Для экспериментов использовались шимпанзе из ...>>

Случайная новость из Архива ИИ ослабляет когнитивные способности и критическое мышление 26.03.2025 Международной группой ученых было проведено исследование влияния генеративного искусственного интеллекта на критическое мышление людей. Главной его темой было определение того, как изменяется ощущение использованных усилий, необходимых для критического мышления через использование ИИ. В рамках проведения исследования было опрошено 319 человек всех возрастов и профессий. Каждый из них привел по три примера собственного опыта использования ИИ в рабочих задачах. Таким образом, ученые использовали более 900 реальных , подробно описанных примеров использования искусственного интеллекта. Результаты исследования показали, что хотя ИИ повышает эффективность работы, он может снижать уровень критического мышления, особенно в рутинных или менее важных задачах, где пользователи просто возлагаются на его ответы, вообще их не анализируя и не проверяя . Было также обнаружено, что ИИ может привести к чрезмерной зависимости , одновременно снижая когнитивные возможности людей. В настоящее время существует обеспокоенность, что в дальнейшем ИИ может нанести ущерб способности людей учиться и запоминать информацию. Этот феномен называют "цифровой амнезией". Самым популярным инструментом ИИ среди опрошенных пользователей был "ChatGPT" , им воспользовалось 309 из 319 человек, то есть 96,87% опрошенных. Однако, из 936 случаев использования ИИ, только в 555 из них опрошенные использовали критическое мышление, составляющее всего 60% . В остальных случаях результаты, полученные от искусственного интеллекта, вообще не проверялись. Ученые обнаружили интересную деталь. Люди с высшей самоуверенностью и верой в свои силы активнее использовали критическое мышление. В то же время пользователи, считавшие, что без использования ИИ не смогут выполнить поставленную задачу, меньше прибегали к критическому мышлению. В исследовании также указывается, что люди, уже активно использующие критическое мышление в работе, вероятно, продолжат его применять даже при использовании ИИ. Однако анализ показывает, что искусственный интеллект создает помехи, ухудшая понимание пользователями необходимости критического мышления. Некоторые участники прямо отмечали, что считали критическое мышление ненужным , особенно это касалось незначительных задач, таких как написание постов в соцсетях. Некоторое количество опрошенных отметило, что они неспособны выполнить ту или иную задачу без помощи ИИ. Зависимость от компьютерных технологий не является новым, однако инструменты ИИ могут усилить связанные с ними риски , поскольку без регулярной практики когнитивные способности могут снижаться . Как показали результаты исследования, большинство людей при использовании ИИ "меньше" или "гораздо меньше" применяют свое критическое мышление. В частности, 72% людей меньше используют критическое мышление при проверке своих знаний, 79% - в понимании полученной информации, 69% - в ее применении, 72% - при анализе результата, 76% - при его синтезе и 55% - при оценке полученной информации.

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

▪ Cadillac CTS с функцией беспилотника

▪ Самый дешевый планшетник

▪ Наножилье для солнцелюбивых бактерий

▪ Бесшумный дрон на ионном двигателе

▪ Простая технология производства динамиков в рулонах

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

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

▪ раздел сайта Регуляторы тембра, громкости. Подборка статей

▪ статья По мне уж лучше пей, да дело разумей. Крылатое выражение

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

▪ статья Инженер-системотехник. Должностная инструкция

▪ статья Композиции казеиновых красок. Простые рецепты и советы

▪ статья Автоматическая зарядка гальванических элементов и аккумуляторов асимметричным током. Энциклопедия радиоэлектроники и электротехники

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

www.diagram.com.ua
2000-2025