Работа с индикатором на базе ТМ1638

@Kmusmos · Регистрация: 07.04.2014

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

Недавно прикупил себе сабж (https://www.google.com.ua/seorsh?q=TM16 ... Q_AUIBigB#), и вроде как научился с ним работать, но есть одно но. В этом контроллере дисплея возможно вычитать только состояние кнопок, состояние светодиодов вычитать невозможно. А я хочу кнопками переключать светодиоды. Завел я себе значит в программе переменную, в которой храню текущее состояние светодиодов, и при нажатии кнопки с помощью xrl инвертирую в ней бит соответствующего светодиода. И оно вроде бы работает, но как-то очень нестабильно, светодиод может изменить свое состояние при нажатии с 5-6 раза, а может и с первого, как надо:

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
;============== Главный цикл ==============================================================================================================================
mov   KeyByte,#0
mov     Led_State,#0            ; Установим начальное состояние светодиодов - все выключены
Main:
;============== Процедура преобразования порядкового номера бита в байте в число, соответствующее его порядковому номеру ===================================
mov     A,      KeyByte
jz      Main                    ; Если нет нажатыж клавиш, нечего сюда и лезть
mov     Counter,#0              ; Обнулим счетчик порядкового номера бита
Loop:
mov     Temp_Counter,Counter    ; Перенесем счетчик порядкового номера бита во временную переменную
cjne    Temp_Counter,#8,Skip    ; И проверяем, все ли 8 бит были проверены
jmp     Main                    ; Да, валим в начало (в реальности попадание сюда теоретически невозможно, потому что пустой байт jz Main не пропустит, а выставлений бит кнопки выкинет из цикла до попадания сюда)
Skip:
yms     Counter                 ; Нет, проверяем следующий бит
rr   A                       ; Заталкиваем его в ACC.7
jnb     ACC.7,  Loop
;============== Здесь мы получаем в Counter число, соответствующее порядковому номеру выставленного в KeyByte бита ========================================
mov     DPTR,   #Led_Addr_Table ; Загружаем таблицу адресов светодиодов
mov     A,      Counter         ; Порядковый номер установленого бита - это номер светодиода, состояние которого мы будем менять
movc   A,   @A+DPTR         ; Берем адрес светодиода
clr     EA                      ; Запрещаем прерывания, чтобы сканирование клавиатуры не мешало отправлять данные
mov     Byte,   A               ; Загружаем адрес свтодиода
call    Send_Byte      ; И отсылаем (адрес шлем без строба)
;============== Этот кусок определяет, включать, или выключать светодиод в зависимости от его предыдущего состояния ======================================
mov     A,      Led_State       ; Загрузим состояние светодиодов
Loop_2:
rr   A                       ; Провернем вправо
djnz   Counter,Loop_2          ; Столько раз, сколько насчитали в счетчик порядкого номера установленого бита
jb      ACC.7,Led_Off      ; Проверим, включен ли текущий светодиод (по логике, нам надо было бы проверять 0 бит, но 1 раз сдвиг мы делаем в любом случае, так что 0 бит переместится в 7, поэтому его и проверяем)
mov     Byte,#1                ; Выключен, будем зажигать
jmp     Skip_Led_Off
Led_Off:
mov     Byte,#0                ; Включен, будем гасить
Skip_Led_Off:
;=========================================================================================================================================================
call    Send_Byte
setb    STB         ; А после данных - строб
 
mov     A,      KeyByte
xrl     Led_State,A      ; Переключим состояние светодиодов
 
setb    EA
jmp     Main

В прерывании по таймеру получаю в KeyByte установленный определенный бит, как признак определенной нажатой кнопки. Процедуру отправки байта не привожу, она работает нормально.
Подскажите, где косяк ?

Новые блоги и статьи Все статьи Все блоги /
Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .	Использование значений реквизитов справочника в документе, с определенными условиями и правами Maks 07.04.2026 1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .