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 ;
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.