96 08BB 3E 08 MVI A,8
97 08BD D3 80 OUT PORTA
98 08BF 3E 40 MVI A,64
99 08C1 D3 81 OUT PORTB
100 08C3 CD ED 08 CALL ZADER
101 08C6 3E 10 MVI A,16
102 08C8 D3 80 OUT PORTA
103 08CA 3E 80 MVI A,128
104 08CC D3 81 OUT PORTB
105 08CE CD ED 08 CALL ZADER
106 08D1 DB 82 ASD1: IN PORTC
107 08D3 E6 1A ANI KODKL1
108 08D5 CA 8A 08 JZ NADO
109 08D8 0E 19 MVI C,PVSD
110 08DA C3 12 08 JMP ZXC
111 08DD 21 45 09 PUSK: LXI H,RAB
112 08E0 36 01 MVI M,1
113 08E2 21 46 09 LXI H,REJIM
114 08E5 7E MOV A,M
115 08E6 A7 ANA A
116 08E7 CA 37 08 JZ DRNADO
117 08EA C3 8A 08 JMP NADO
118 ;--------------------------------
119 08ED 21 27 00 ZADER: LXI H,PVS
120 08F0 DB 82 ZADER1: IN PORTC
121 08F2 E6 1A ANI KODKL1
122 08F4 CA 31 09 JZ ZADER2
123 08F7 0E 19 MVI C,PVSD
124 08F9 DB 82 ZADER3: IN PORTC
125 08FB E6 1A ANI KODKL1
126 08FD CA 31 09 JZ ZADER2
127 0900 0D DCR C
128 0901 C2 F9 08 JNZ ZADER3
129 0904 E5 PUSH H
130 0905 DB 82 IN PORTC
131 0907 21 44 09 LXI H,KLAV
132 090A 77 MOV M,A
133 090B E1 POP H
134 090C 0E 19 ZADER4: MVI C,PVSD
135 090E DB 82 ZADER5: IN PORTC
136 0910 A7 ANA A
137 0911 C2 0C 09 JNZ ZADER4
138 0914 0D DCR C
139 0915 C2 0E 09 JNZ ZADER5
140 0918 E1 POP H
141 0919 21 44 09 LXI H,KLAV
142 091C 7E MOV A,M
143 091D E6 02 ANI 2
144 091F C2 29 09 JNZ OST
145 0922 21 44 09 LXI H,KLAV
146 0925 7E MOV A,M
147 0926 C3 32 08 JMP REG
148 0929 21 45 09 OST: LXI H,RAB
149 092C 36 00 MVI M,0
150 092E C3 09 08 JMP ASDF
151 0931 22 47 09 ZADER2: SHLD PUST
152 0934 22 47 09 SHLD PUST
153 0937 22 47 09 SHLD PUST
154 093A 22 47 09 SHLD PUST
155 093D 2B DCX H
156 093E 7C MOV A,H
157 093F B5 ORA L
158 0940 C2 F0 08 JNZ ZADER1
159 0943 C9 RET
160 0944 00 KLAV: DB 0
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.