--------------------------------------------------
8085 DISASSEMBLER LISTING
Line Addr Opcodes Label Instruction
--------------------------------------------------
0001 0000 31 FF 20 LXI SP,20FFH
0002 0003 DB 21 IN 21H
0003 0005 E6 40 ANI 40H
0004 0007 CA 03 01 JZ L0001
0005 000A CD 45 00 CALL L0002
0006 000D CD 9A 07 CALL L0003
0007 0010 F3 L0009: DI
0008 0011 31 FF 20 LXI SP,20FFH
0009 0014 CD 49 00 CALL L0004
0010 0017 3E 04 L0007: MVI A,04H
0011 0019 CD 31 02 CALL L0005
0012 001C CD F0 00 CALL L0006
0013 001F C3 17 00 JMP L0007
0014 0022 00 NOP
0015 0023 00 NOP
0016 0024 F3 DI
0017 0025 31 FF 20 LXI SP,20FFH
0018 0028 DB 08 IN 08H
0019 002A 3E FD MVI A,0FDH
0020 002C D3 22 OUT 22H
0021 002E 2E 05 MVI L,05H
0022 0030 C3 77 00 JMP L0008
0023 0033 00 NOP
0024 0034 F5 PUSH PSW
0025 0035 E5 PUSH H
0026 0036 DB 08 IN 08H
0027 0038 2A 01 20 LHLD 2001H
0028 003B E9 PCHL
0029 003C 3E 10 MVI A,10H
0030 003E 30 SIM
0031 003F 20 RIM
0032 0040 07 RLC
0033 0041 78 MOV A,B
0034 0042 1F RAR
0035 0043 47 MOV B,A
0036 0044 C9 RET
0037 0045 AF L0002: XRA A
0038 0046 32 0C 20 STA 200CH
0039 0049 AF L0004: XRA A
0040 004A 32 00 20 STA 2000H
0041 004D 21 74 01 L0112: LXI H,0174H
0042 0050 22 01 20 L0015: SHLD 2001H
0043 0053 3E 4D MVI A,4DH
0044 0055 30 SIM
0045 0056 FB EI
0046 0057 3E FE L0118: MVI A,0FEH
0047 0059 D3 20 OUT 20H
0048 005B 3E FD MVI A,0FDH
0049 005D D3 22 OUT 22H
0050 005F DB 23 IN 23H
0051 0061 F6 01 ORI 01H
0052 0063 D3 23 OUT 23H
0053 0065 3E 0C MVI A,0CH
0054 0067 32 AD 20 STA 20ADH
0055 006A AF XRA A
0056 006B 32 A2 20 STA 20A2H
0057 006E 3A 0C 20 LDA 200CH
0058 0071 E6 08 ANI 08H
0059 0073 32 0C 20 STA 200CH
0060 0076 C9 RET
0061 0077 CD F0 00 L0008: CALL L0006
0062 007A 20 RIM
0063 007B E6 20 ANI 20H
0064 007D CA 77 00 JZ L0008
0065 0080 2D DCR L
0066 0081 CA 10 00 JZ L0009
0067 0084 DB 08 IN 08H
0068 0086 FE 04 CPI 04H
0069 0088 C2 77 00 JNZ L0008
0070 008B CD 49 00 CALL L0004
0071 008E 32 B6 20 STA 20B6H
0072 0091 31 FF 20 L0024: LXI SP,20FFH
0073 0094 AF XRA A
0074 0095 32 0C 20 STA 200CH
0075 0098 32 A2 20 STA 20A2H
0076 009B 21 00 00 LXI H,0000H
0077 009E 22 B4 20 SHLD 20B4H
0078 00A1 22 03 20 SHLD 2003H
0079 00A4 3E 4D MVI A,4DH
0080 00A6 30 SIM
0081 00A7 FB EI
0082 00A8 CD 18 03 L0011: CALL L0010
0083 00AB CD F0 00 CALL L0006
0084 00AE 3A A2 20 LDA 20A2H
0085 00B1 E6 80 ANI 80H
0086 00B3 CA A8 00 JZ L0011
0087 00B6 3A 07 20 LDA 2007H
0088 00B9 FE 02 CPI 02H
0089 00BB C2 10 00 JNZ L0009
0090 00BE 3A 09 20 LDA 2009H
0091 00C1 FE 0B CPI 0BH
0092 00C3 3E D0 MVI A,0D0H
0093 00C5 D2 75 07 JNC L0012
0094 00C8 3A 09 20 LDA 2009H
0095 00CB 21 D8 00 LXI H,00D8H
0096 00CE 07 RLC
0097 00CF 5F MOV E,A
0098 00D0 16 00 MVI D,00H
0099 00D2 19 DAD D
0100 00D3 5E MOV E,M
0101 00D4 23 INX H
0102 00D5 56 MOV D,M
0103 00D6 EB XCHG
0104 00D7 E9 PCHL
0105 00D8 46 MOV B,M
0106 00D9 07 RLC
0107 00DA 80 ADD B
0108 00DB 07 RLC
0109 00DC 1D DCR E
0110 00DD 07 RLC
0111 00DE C7 RST 0
0112 00DF 05 DCR B
0113 00E0 46 MOV B,M
0114 00E1 07 RLC
0115 00E2 95 SUB L
0116 00E3 02 STAX B
0117 00E4 46 MOV B,M
0118 00E5 07 RLC
0119 00E6 EC 07 86 CPE L0013
0120 00E9 07 RLC
0121 00EA 46 MOV B,M
0122 00EB 07 RLC
0123 00EC 46 MOV B,M
0124 00ED 07 RLC
0125 00EE 46 MOV B,M
0126 00EF 07 RLC
0127 00F0 DB 21 L0006: IN 21H
0128 00F2 E6 40 ANI 40H
0129 00F4 3A B6 20 LDA 20B6H
0130 00F7 CA 00 01 JZ L0014
0131 00FA F6 01 ORI 01H
0132 00FC 32 B6 20 STA 20B6H
0133 00FF C9 RET
0134 0100 E6 01 L0014: ANI 01H
0135 0102 C8 RZ
0136 0103 31 FF 20 L0001: LXI SP,20FFH
0137 0106 21 C3 01 LXI H,01C3H
0138 0109 CD 50 00 CALL L0015
0139 010C AF XRA A
0140 010D 32 0C 20 STA 200CH
0141 0110 D3 23 OUT 23H
0142 0112 06 FF MVI B,0FFH
0143 0114 CD 04 04 CALL L0016
0144 0117 CD 9A 07 CALL L0003
0145 011A 32 0B 20 STA 200BH
0146 011D 32 00 20 STA 2000H
0147 0120 21 00 00 LXI H,0000H
0148 0123 22 A9 20 SHLD 20A9H
0149 0126 CD 52 05 L0023: CALL L0017
0150 0129 CD 0E 04 CALL L0018
0151 012C 21 19 20 LXI H,2019H
0152 012F 0E 80 MVI C,80H
0153 0131 7E L0022: MOV A,M
0154 0132 CD 31 02 CALL L0005
0155 0135 3A 01 20 LDA 2001H
0156 0138 FE 1A CPI 1AH
0157 013A CA 51 01 JZ L0019
0158 013D 7E MOV A,M
0159 013E FE 47 CPI 47H
0160 0140 CA 6B 01 JZ L0020
0161 0143 06 02 MVI B,02H
0162 0145 E6 F8 ANI 0F8H
0163 0147 EE 30 XRI 30H
0164 0149 CA 4E 01 JZ L0021
0165 014C 06 14 MVI B,14H
0166 014E CD 04 04 L0021: CALL L0016
0167 0151 23 L0019: INX H
0168 0152 0D DCR C
0169 0153 C2 31 01 JNZ L0022
0170 0156 2A A9 20 LHLD 20A9H
0171 0159 23 INX H
0172 015A 22 A9 20 SHLD 20A9H
0173 015D 3E 04 MVI A,04H
0174 015F BD CMP L
0175 0160 C2 26 01 JNZ L0023
0176 0163 3A 01 20 LDA 2001H
0177 0166 FE 1A CPI 1AH
0178 0168 C2 26 01 JNZ L0023
0179 016B CD 49 00 L0020: CALL L0004
0180 016E 32 B6 20 STA 20B6H
0181 0171 C3 91 00 JMP L0024
0182 0174 FE 08 CPI 08H
0183 0176 21 1A 01 LXI H,011AH
0184 0179 CA C0 01 JZ L0025
0185 017C FE 13 CPI 13H
0186 017E C2 89 01 JNZ L0026
0187 0181 3E FF MVI A,0FFH
0188 0183 32 00 20 STA 2000H
0189 0186 C3 C3 01 JMP L0027
0190 0189 6F L0026: MOV L,A
0191 018A E6 FE ANI 0FEH
0192 018C FE 10 CPI 10H
0193 018E C2 98 01 JNZ L0028
0194 0191 AF XRA A
0195 0192 32 00 20 STA 2000H
0196 0195 C3 C3 01 JMP L0027
0197 0198 3E 04 L0028: MVI A,04H
0198 019A BD CMP L
0199 019B CA 58 02 JZ L0029
0200 019E 3A A2 20 LDA 20A2H
0201 01A1 E6 80 ANI 80H
0202 01A3 C2 10 00 JNZ L0009
0203 01A6 7D MOV A,L
0204 01A7 32 07 20 STA 2007H
0205 01AA 32 9F 20 STA 209FH
0206 01AD 11 19 20 LXI D,2019H
0207 01B0 FE 01 CPI 01H
0208 01B2 CA BD 01 JZ L0030
0209 01B5 11 09 20 LXI D,2009H
0210 01B8 FE 02 CPI 02H
0211 01BA C2 10 00 JNZ L0009
0212 01BD 21 C7 01 L0030: LXI H,01C7H
0213 01C0 22 01 20 L0025: SHLD 2001H
0214 01C3 E1 L0027: POP H
0215 01C4 F1 POP PSW
0216 01C5 FB EI
0217 01C6 C9 RET
0218 01C7 4F MOV C,A
0219 01C8 32 08 20 STA 2008H
0220 01CB 32 A0 20 STA 20A0H
0221 01CE FE 81 CPI 81H
0222 01D0 D2 10 00 JNC L0009
0223 01D3 06 01 MVI B,01H
0224 01D5 21 DB 01 LXI H,01DBH
0225 01D8 C3 C0 01 JMP L0025
0226 01DB 12 STAX D
0227 01DC 1A LDAX D
0228 01DD CD 13 02 CALL L0031
0229 01E0 0D DCR C
0230 01E1 CA E8 01 JZ L0032
0231 01E4 13 INX D
0232 01E5 C3 C3 01 JMP L0027
0233 01E8 21 EE 01 L0032: LXI H,01EEH
0234 01EB C3 C0 01 JMP L0025
0235 01EE 21 9F 20 LXI H,209FH
0236 01F1 96 SUB M
0237 01F2 C2 10 00 JNZ L0009
0238 01F5 21 FB 01 LXI H,01FBH
0239 01F8 C3 C0 01 JMP L0025
0240 01FB 21 A0 20 LXI H,20A0H
0241 01FE 96 SUB M
0242 01FF C2 10 00 JNZ L0009
0243 0202 2A 9F 20 LHLD 209FH
0244 0205 22 05 20 SHLD 2005H
0245 0208 3E 80 MVI A,80H
0246 020A 32 A2 20 STA 20A2H
0247 020D 21 74 01 LXI H,0174H
0248 0210 C3 C0 01 JMP L0025
0249 0213 E5 L0031: PUSH H
0250 0214 6F MOV L,A
0251 0215 78 MOV A,B
0252 0216 EE 01 XRI 01H
0253 0218 47 MOV B,A
0254 0219 C2 24 02 JNZ L0033
0255 021C 7D L0034: MOV A,L
0256 021D 21 9F 20 LXI H,209FH
0257 0220 8E ADC M
0258 0221 77 MOV M,A
0259 0222 2E 00 MVI L,00H
0260 0224 7D L0033: MOV A,L
0261 0225 21 A0 20 LXI H,20A0H
0262 0228 8E ADC M
0263 0229 77 MOV M,A
0264 022A 2E 00 MVI L,00H
0265 022C DA 1C 02 JC L0034
0266 022F E1 POP H
0267 0230 C9 RET
0268 0231 F5 L0005: PUSH PSW
0269 0232 E5 PUSH H
0270 0233 2E 08 MVI L,08H
0271 0235 2D L0035: DCR L
0272 0236 C5 PUSH B
0273 0237 CC 0E 04 CZ L0018
0274 023A C1 POP B
0275 023B 20 RIM
0276 023C E6 10 ANI 10H
0277 023E CA 35 02 JZ L0035
0278 0241 3A 00 20 LDA 2000H
0279 0244 3C INR A
0280 0245 CA 35 02 JZ L0035
0281 0248 E1 POP H
0282 0249 F1 POP PSW
0283 024A D3 08 OUT 08H
0284 024C 3A 0C 20 LDA 200CH
0285 024F E6 08 ANI 08H
0286 0251 C8 RZ
0287 0252 3E FF MVI A,0FFH
0288 0254 32 00 20 STA 2000H
0289 0257 C9 RET
0290 0258 31 FF 20 L0029: LXI SP,20FFH
0291 025B CD 49 00 CALL L0004
0292 025E CD 4C 05 CALL L0036
0293 0261 C3 91 00 JMP L0024
0294 0264 21 17 20 L0090: LXI H,2017H
0295 0267 36 01 MVI M,01H
0296 0269 23 INX H
0297 026A 56 L0111: MOV D,M
0298 026B 14 INR D
0299 026C 14 INR D
0300 026D AF XRA A
0301 026E 32 9F 20 STA 209FH
0302 0271 32 A0 20 STA 20A0H
0303 0274 06 01 MVI B,01H
0304 0276 2B DCX H
0305 0277 7E L0037: MOV A,M
0306 0278 CD 13 02 CALL L0031
0307 027B 7E MOV A,M
0308 027C CD 31 02 CALL L0005
0309 027F 23 INX H
0310 0280 15 DCR D
0311 0281 C2 77 02 JNZ L0037
0312 0284 21 9F 20 LXI H,209FH
0313 0287 CD 8B 02 CALL L0038
0314 028A 23 INX H
0315 028B 3E 1E L0038: MVI A,1EH
0316 028D CD FB 03 CALL L0039
0317 0290 7E MOV A,M
0318 0291 CD 31 02 CALL L0005
0319 0294 C9 RET
0320 0295 CD FA 06 CALL L0040
0321 0298 CD A4 02 CALL L0041
0322 029B CD 24 03 CALL L0042
0323 029E CD 0E 04 CALL L0018
0324 02A1 C3 46 07 JMP L0043
0325 02A4 2A A9 20 L0041: LHLD 20A9H
0326 02A7 EB XCHG
0327 02A8 21 AE 20 LXI H,20AEH
0328 02AB 36 E9 MVI M,0E9H
0329 02AD 7A MOV A,D
0330 02AE FE 08 CPI 08H
0331 02B0 3E FE MVI A,0FEH
0332 02B2 D2 75 07 JNC L0012
0333 02B5 7A MOV A,D
0334 02B6 FE 04 CPI 04H
0335 02B8 3F CMC
0336 02B9 7B MOV A,E
0337 02BA 17 RAL
0338 02BB 5F MOV E,A
0339 02BC 7A MOV A,D
0340 02BD 17 RAL
0341 02BE E6 07 ANI 07H
0342 02C0 57 MOV D,A
0343 02C1 FE 04 CPI 04H
0344 02C3 DA C8 02 JC L0044
0345 02C6 36 F9 MVI M,0F9H
0346 02C8 3A 0B 20 L0044: LDA 200BH
0347 02CB FE 01 CPI 01H
0348 02CD CA D8 02 JZ L0045
0349 02D0 DA E4 02 JC L0046
0350 02D3 3E F8 MVI A,0F8H
0351 02D5 C3 75 07 JMP L0012
0352 02D8 7E L0045: MOV A,M
0353 02D9 E6 F7 ANI 0F7H
0354 02DB 77 MOV M,A
0355 02DC 3E 04 MVI A,04H
0356 02DE 2A A5 20 LHLD 20A5H
0357 02E1 C3 E9 02 JMP L0047
0358 02E4 3E 08 L0046: MVI A,08H
0359 02E6 2A A3 20 LHLD 20A3H
0360 02E9 32 B3 20 L0047: STA 20B3H
0361 02EC 4F MOV C,A
0362 02ED 3A AD 20 LDA 20ADH
0363 02F0 A1 ANA C
0364 02F1 CA F6 02 JZ L0048
0365 02F4 6B MOV L,E
0366 02F5 62 MOV H,D
0367 02F6 CD FE 02 L0048: CALL L0049
0368 02F9 EB XCHG
0369 02FA 22 A7 20 SHLD 20A7H
0370 02FD C9 RET
0371 02FE CD 18 03 L0049: CALL L0010
0372 0301 E5 PUSH H
0373 0302 21 B3 20 LXI H,20B3H
0374 0305 DB 21 IN 21H
0375 0307 A6 ANA M
0376 0308 3E F7 MVI A,0F7H
0377 030A C2 75 07 JNZ L0012
0378 030D 3A AD 20 LDA 20ADH
0379 0310 2F CMA
0380 0311 B6 ORA M
0381 0312 2F CMA
0382 0313 32 AD 20 STA 20ADH
0383 0316 E1 POP H
0384 0317 C9 RET
0385 0318 E5 L0010: PUSH H
0386 0319 DB 21 IN 21H
0387 031B E6 0C ANI 0CH
0388 031D 21 AD 20 LXI H,20ADH
0389 0320 B6 ORA M
0390 0321 77 MOV M,A
0391 0322 E1 POP H
0392 0323 C9 RET
0393 0324 3E F8 L0042: MVI A,0F8H
0394 0326 32 B0 20 STA 20B0H
0395 0329 CD FE 02 L0062: CALL L0049
0396 032C 2A A7 20 LHLD 20A7H
0397 032F 7C MOV A,H
0398 0330 E6 03 ANI 03H
0399 0332 67 MOV H,A
0400 0333 7A MOV A,D
0401 0334 E6 03 ANI 03H
0402 0336 57 MOV D,A
0403 0337 7D MOV A,L
0404 0338 93 SUB E
0405 0339 6F MOV L,A
0406 033A 7C MOV A,H
0407 033B 9A SBB D
0408 033C 67 MOV H,A
0409 033D D2 66 03 JNC L0050
0410 0340 3A B0 20 L0054: LDA 20B0H
0411 0343 3C INR A
0412 0344 32 B0 20 STA 20B0H
0413 0347 3E E0 MVI A,0E0H
0414 0349 CA 75 07 JZ L0012
0415 034C 7D MOV A,L
0416 034D 2F CMA
0417 034E 6F MOV L,A
0418 034F 7C MOV A,H
0419 0350 2F CMA
0420 0351 67 MOV H,A
0421 0352 23 INX H
0422 0353 23 INX H
0423 0354 23 INX H
0424 0355 3A AE 20 LDA 20AEH
0425 0358 F6 04 ORI 04H
0426 035A 32 AE 20 STA 20AEH
0427 035D CD 3B 04 CALL L0051
0428 0360 CD 0E 04 CALL L0018
0429 0363 C3 80 03 JMP L0052
0430 0366 AF L0050: XRA A
0431 0367 BC CMP H
0432 0368 C2 75 03 JNZ L0053
0433 036B BD CMP L
0434 036C CA 40 03 JZ L0054
0435 036F 3E 04 MVI A,04H
0436 0371 BD CMP L
0437 0372 D2 80 03 JNC L0052
0438 0375 2B L0053: DCX H
0439 0376 2B DCX H
0440 0377 2B DCX H
0441 0378 CD 3B 04 CALL L0051
0442 037B 06 0F MVI B,0FH
0443 037D CD 10 04 CALL L0055
0444 0380 3E BE L0052: MVI A,0BEH
0445 0382 D3 24 OUT 24H
0446 0384 3E C0 MVI A,0C0H
0447 0386 D3 25 OUT 25H
0448 0388 3E CE MVI A,0CEH
0449 038A D3 20 OUT 20H
0450 038C 3A AE 20 LDA 20AEH
0451 038F F6 80 ORI 80H
0452 0391 E6 FA ANI 0FAH
0453 0393 32 AE 20 STA 20AEH
0454 0396 47 MOV B,A
0455 0397 DB 22 IN 22H
0456 0399 E6 01 ANI 01H
0457 039B 78 MOV A,B
0458 039C D3 22 OUT 22H
0459 039E 06 1E MVI B,1EH
0460 03A0 C4 04 04 CNZ L0016
0461 03A3 CD 74 04 CALL L0056
0462 03A6 FE 09 CPI 09H
0463 03A8 F2 08 05 JP L0057
0464 03AB CD A9 04 CALL L0058
0465 03AE 0E 04 MVI C,04H
0466 03B0 21 9B 20 LXI H,209BH
0467 03B3 CD D9 04 CALL L0059
0468 03B6 3A 9D 20 LDA 209DH
0469 03B9 21 9B 20 LXI H,209BH
0470 03BC 2F CMA
0471 03BD BE CMP M
0472 03BE C2 E1 03 JNZ L0060
0473 03C1 3A 9E 20 LDA 209EH
0474 03C4 2F CMA
0475 03C5 23 INX H
0476 03C6 BE CMP M
0477 03C7 C2 E1 03 JNZ L0060
0478 03CA CD 20 05 CALL L0061
0479 03CD 3A A7 20 LDA 20A7H
0480 03D0 BB CMP E
0481 03D1 C2 29 03 JNZ L0062
0482 03D4 3A A8 20 LDA 20A8H
0483 03D7 BA CMP D
0484 03D8 C2 29 03 JNZ L0062
0485 03DB 2E 08 MVI L,08H
0486 03DD CD F2 03 CALL L0063
0487 03E0 C9 RET
0488 03E1 2E 10 L0060: MVI L,10H
0489 03E3 CD F2 03 CALL L0063
0490 03E6 21 B0 20 LXI H,20B0H
0491 03E9 34 INR M
0492 03EA C2 80 03 JNZ L0052
0493 03ED 3E E0 MVI A,0E0H
0494 03EF C3 75 07 JMP L0012
0495 03F2 DB 23 L0063: IN 23H
0496 03F4 AD XRA L
0497 03F5 D3 23 OUT 23H
0498 03F7 AD XRA L
0499 03F8 D3 23 OUT 23H
0500 03FA C9 RET
0501 03FB E6 FF L0039: ANI 0FFH
0502 03FD 00 NOP
0503 03FE 00 NOP
0504 03FF 3D DCR A
0505 0400 C2 FB 03 JNZ L0039
0506 0403 C9 RET
0507 0404 3E 60 L0016: MVI A,60H
0508 0406 CD FB 03 CALL L0039
0509 0409 05 DCR B
0510 040A C2 04 04 JNZ L0016
0511 040D C9 RET
0512 040E 06 2B L0018: MVI B,2BH
0513 0410 DB 21 L0055: IN 21H
0514 0412 E6 10 ANI 10H
0515 0414 C0 RNZ
0516 0415 3A AE 20 LDA 20AEH
0517 0418 EE 05 XRI 05H
0518 041A D3 22 OUT 22H
0519 041C EE 01 XRI 01H
0520 041E D3 22 OUT 22H
0521 0420 E5 PUSH H
0522 0421 67 MOV H,A
0523 0422 48 L0064: MOV C,B
0524 0423 DB 21 IN 21H
0525 0425 6F MOV L,A
0526 0426 DB 21 L0065: IN 21H
0527 0428 AD XRA L
0528 0429 E6 02 ANI 02H
0529 042B C2 22 04 JNZ L0064
0530 042E 0D DCR C
0531 042F C2 26 04 JNZ L0065
0532 0432 3A AE 20 LDA 20AEH
0533 0435 F6 01 ORI 01H
0534 0437 D3 22 OUT 22H
0535 0439 E1 POP H
0536 043A C9 RET
0537 043B 3E 5F L0051: MVI A,5FH
0538 043D D3 24 OUT 24H
0539 043F 3E C0 MVI A,0C0H
0540 0441 D3 25 OUT 25H
0541 0443 3E CE MVI A,0CEH
0542 0445 D3 20 OUT 20H
0543 0447 3A AE 20 LDA 20AEH
0544 044A E6 7E ANI 7EH
0545 044C 32 AE 20 STA 20AEH
0546 044F D3 22 OUT 22H
0547 0451 06 2D MVI B,2DH
0548 0453 CD 04 04 CALL L0016
0549 0456 CD 74 04 L0068: CALL L0056
0550 0459 FE 04 CPI 04H
0551 045B FA 14 05 JM L0066
0552 045E FE 09 CPI 09H
0553 0460 F2 07 05 JP L0067
0554 0463 CD A9 04 CALL L0058
0555 0466 CD FE 02 CALL L0049
0556 0469 2B DCX H
0557 046A AF XRA A
0558 046B BC CMP H
0559 046C C2 56 04 JNZ L0068
0560 046F BD CMP L
0561 0470 C2 56 04 JNZ L0068
0562 0473 C9 RET
0563 0474 16 0C L0056: MVI D,0CH
0564 0476 1E 00 MVI E,00H
0565 0478 06 05 MVI B,05H
0566 047A DB 21 L0069: IN 21H
0567 047C E6 90 ANI 90H
0568 047E CA 7A 04 JZ L0069
0569 0481 E6 10 ANI 10H
0570 0483 3E DF L0076: MVI A,0DFH
0571 0485 C2 75 07 JNZ L0012
0572 0488 CD C8 04 L0072: CALL L0070
0573 048B DB 21 IN 21H
0574 048D E6 80 ANI 80H
0575 048F C2 99 04 JNZ L0071
0576 0492 05 DCR B
0577 0493 CA 74 04 JZ L0056
0578 0496 C3 88 04 JMP L0072
0579 0499 20 L0071: RIM
0580 049A E6 80 ANI 80H
0581 049C CA A0 04 JZ L0073
0582 049F 1C INR E
0583 04A0 15 L0073: DCR D
0584 04A1 C2 88 04 JNZ L0072
0585 04A4 3E 1D MVI A,1DH
0586 04A6 30 SIM
0587 04A7 7B MOV A,E
0588 04A8 C9 RET
0589 04A9 F5 L0058: PUSH PSW
0590 04AA 3A AE 20 LDA 20AEH
0591 04AD F6 01 ORI 01H
0592 04AF D3 22 OUT 22H
0593 04B1 00 NOP
0594 04B2 E6 FE ANI 0FEH
0595 04B4 D3 22 OUT 22H
0596 04B6 1E 03 L0074: MVI E,03H
0597 04B8 CD C8 04 L0075: CALL L0070
0598 04BB DB 21 IN 21H
0599 04BD E6 90 ANI 90H
0600 04BF C2 B6 04 JNZ L0074
0601 04C2 1D DCR E
0602 04C3 C2 B8 04 JNZ L0075
0603 04C6 F1 POP PSW
0604 04C7 C9 RET
0605 04C8 3E 1D L0070: MVI A,1DH
0606 04CA 30 SIM
0607 04CB DB 21 L0077: IN 21H
0608 04CD E6 10 ANI 10H
0609 04CF C2 83 04 JNZ L0076
0610 04D2 20 RIM
0611 04D3 E6 40 ANI 40H
0612 04D5 CA CB 04 JZ L0077
0613 04D8 C9 RET
0614 04D9 3E 1B L0059: MVI A,1BH
0615 04DB 30 SIM