Разработка и отладка устройств дискретного управления. Хлуденев А.В. - 19 стр.

UptoLike

ВУЗ: 

ОГУ | Оренбург

Составители: 

Рубрика: 

Приложение Б
(обязательное)
Исходный текст программы LogBranch.asm
DEL EQU 1000 ; значение задержки
SEG IOSPACE, START=00h
PA: DS 1 ; порты ИС КР580ВВ55
PB: DS 1
PC: DS 1
PS: DS 1
SEG CODE, START=8000h
MVI A, 8Bh ; инициализация порта
OUT PS
MVI B,0 ; начальное состояние
LOOP: IN PB ; прием входного набора
ANI 00001100b ; выделение x
2
x
1
ORA B ; формир. входного слова и
MOV C,A ; запись его в С
CPI 0
JZ L0
CPI 2
JZ L0
CPI 3
JZ L0
CPI 8
JZ L0
CPI 10
JZ L0
CPI 11
JZ L0
CPI 4
JZ L5
CPI 12
JZ L5
CPI 1
JZ L14
CPI 5
JZ L14
CPI 6
JZ L14
CPI 9
JZ L14
CPI 13
JZ L14
CPI 15
19
                         Приложение Б
                        (обязательное)
            Исходный текст программы LogBranch.asm
DEL   EQU     1000      ; значение задержки

      SEG IOSPACE, START=00h
PA:   DS    1         ; порты ИС КР580ВВ55
PB:   DS    1
PC:   DS    1
PS:   DS    1

      SEG CODE, START=8000h
MVI   A,   8Bh        ; инициализация порта
      OUT PS
      MVI B,0         ; начальное состояние
LOOP: IN   PB         ; прием входного набора
      ANI 00001100b ; выделение x2 x1
      ORA B           ; формир. входного слова и
      MOV C,A         ; запись его в С
      CPI 0
      JZ   L0
      CPI 2
      JZ   L0
      CPI 3
      JZ   L0
      CPI 8
      JZ   L0
      CPI 10
      JZ   L0
      CPI 11
      JZ   L0
      CPI 4
      JZ   L5
      CPI 12
      JZ   L5
      CPI 1
      JZ   L14
      CPI 5
      JZ   L14
      CPI 6
      JZ   L14
      CPI 9
      JZ   L14
      CPI 13
      JZ   L14
      CPI 15

                                                     19

Страницы