Разработка микропроцессорной централизации малой станции. Разработка структурной схемы МПС. Блок центрального процессора, страница 14

01D2  D3 C7                OUT   PPI1MS   ; GO!=0 снимаем строб готовности вывода

01D4  3A 53 20             LDA   OUT_MODE ;

01D7  E6 02                ANI   02H      ; определяем вид выставленной информации


01D9  CA E4 01             JZ    VIVOD    ; простой вывод

01DC  3A 53 20             LDA   OUT_MODE ;

01DF  E6 02                ANI   02H      ;

01E1  CA EC 01             JZ    STRELKI  ; перевод стрелок

01E4  3E 04      VIVOD:    MVI   A,04H    ;

01E6  32 53 20             STA   OUT_MODE ; "вывод осуществлен"

01E9  C3 F7 01             JMP   EXIT_G   ;

01EC  3E 03      STRELKI:  MVI   A,03H    ;

01EE  D3 F7                OUT   PPI4MS   ; GATE0=1 - запускаем таймер стрелок

01F0  3E 08                MVI   A,08H    ;

01F2  32 53 20             STA   OUT_MODE ; "перевод начат"

01F5  3E 0F                MVI   A,0FH    ; включаем лампочку "ИДЕТ УСТАНОВКА"

01F7  3E 20      EXIT_G:   MVI   A,20H    ;

01F9  D3 C0                OUT   PICW1    ; завершаем прерывание

01FB  FB                   EI             ; разрешаем прерывания

01FC  F1                   POP   PSW      ; восстанавливаем сосояние

01FD  C9                   RET            ; выход

01FE  F3         INIT:     DI             ; запрет прерываний

01FF  31 FF 2F             LXI   SP,2FFFH ; указатель вершины стека

0202  3E 88                MVI   A,88H    ;

0204  D3 C7                OUT   PPI1MS   ; PPI1: PA-out, PB-out, PCL-out,PCH-in режим 0

0206  3E 9B                MVI   A,9BH    ;

0208  D3 D7                OUT   PPI2MS   ; PPI2: PA-in, PB-in, PC-in режим 0

020A  3E 93                MVI   A,93H    ;

020C  D3 F7                OUT   PPI4MS   ; PPI4: PA-in, PB-in, PCL-in, PCH-out режим 0

020E  3E 92                MVI   A,92H    ;

0210  D3 E7                OUT   PPI3MS   ; PPI3: PA-in, PB-in, PC-out, режим 0

0212  3E 9E                MVI   A,9EH    ; PCI: асинхронный режим, 1:16, слово-8бит

0214  D3 B1                OUT   PCIC     ; длина старт-стоповых символов 1.5 бита

0216  3E 15                MVI   A,15H    ; контроль нечетности, сброс битов ошибок

0218  D3 B1                OUT   PCIC     ; разрешение приема-передачи

021A  3E 96                MVI   A,96H    ; формат адреса, 4 байта

021C  D3 C0                OUT   PICW1    ; базовый адрес 0080H

021E  3E 00                MVI   A,00     ; контроллер единственный

0220  D3 C1                OUT   PICW2    ; режим строгой вложенности

0222  3E E0                MVI   A,E0H    ; маска на 5-7 прерывания

0224  D3 C1                OUT   PICW2    ;

0226  3E 30                MVI   A,30H    ; PIT, канал 0: режим 0

0228  D3 A7                OUT   PITCW    ; 180 с

022A  3E 2C                MVI   A,2CH    ;

022C  D3 A4                OUT   PIT0     ;

022E  3E 01                MVI   A,01H    ;

0230  D3 A4                OUT   PIT0     ;

0232  3E 70                MVI   A,70H    ; PIT, канал 1: режим 0

0234  D3 A7                OUT   PITCW    ; 6 с

0236  3E 28                MVI   A,28H    ;

0238  D3 A5                OUT   PIT1     ;

023A  3E 23                MVI   A,23H    ;

023C  D3 A4                OUT   PIT0     ;

023E  3E B6                MVI   A,B6H    ; PIT, канал 2: режим 3

0240  D3 A7                OUT   PITCW    ; 50 Hz

0242  3E 40                MVI   A,40H    ;

0244  D3 A4                OUT   PIT0     ;

0246  3E 9C                MVI   A,9CH    ;

0248  D3 A6                OUT   PIT2     ;

024A  3E 00                MVI   A,00H    ; стоп всем таймерам

024C  D3 F6                OUT   PORT12   ;

024E  FB                   EI             ;

024F  3E 03      BASE:     MVI   A,03H    ; WD1=1

0251  D3 C7                OUT   PPI1MS   ;

0253  DB C6      M2:       IN    PORT9    ;

0255  E6 10                ANI   10H      ; WD2=1?

0257  CC 95 02             CZ    WAIT1    ; подождем готовности второго

025A  DB C6                IN    PORT9    ;

025C  E6 10                ANI   10H      ;