; Disassembly of the file "C:\Users\Maik\Downloads\Tiracon\TIR-A.COM" ; ; CPU Type: Z80 ; ; Created with dZ80 2.0 ; ; on Sunday, 21 of March 2021 at 07:27 PM ; 0000 310028 ld sp,2800h 0003 af xor a 0004 ed47 ld i,a 0006 180a jr 0012h 0008 ef rst 28h 0009 114114 ld de,1441h 000c 68 ld l,b 000d 05 dec b 000e c0 ret nz 000f 0b dec bc 0010 05 dec b 0011 18ed jr 0000h 0013 5e ld e,(hl) 0014 3e03 ld a,03h 0016 d37f out (7fh),a 0018 210020 ld hl,2000h 001b 110120 ld de,2001h 001e 018601 ld bc,0186h 0021 3600 ld (hl),00h 0023 edb0 ldir 0025 218820 ld hl,2088h 0028 118920 ld de,2089h 002b 010500 ld bc,0005h 002e 3660 ld (hl),60h 0030 edb0 ldir 0032 3a8721 ld a,(2187h) 0035 00 nop 0036 1803 jr 003bh 0038 c30000 jp 0000h 003b 32f620 ld (20f6h),a 003e cdc003 call 03c0h 0041 3e21 ld a,21h 0043 324d20 ld (204dh),a 0046 3ecf ld a,0cfh 0048 d3be out (0beh),a 004a 3e0f ld a,0fh 004c d3be out (0beh),a 004e 3ecf ld a,0cfh 0050 d3bf out (0bfh),a 0052 3e0f ld a,0fh 0054 d3bf out (0bfh),a 0056 d3fa out (0fah),a 0058 d3fb out (0fbh),a 005a d3df out (0dfh),a 005c 3ecf ld a,0cfh 005e d3de out (0deh),a 0060 3e80 ld a,80h 0062 d3de out (0deh),a 0064 1803 jr 0069h 0066 c36019 jp 1960h 0069 3e63 ld a,63h 006b 324120 ld (2041h),a 006e 3e06 ld a,06h 0070 d3dc out (0dch),a 0072 3e17 ld a,17h 0074 d3dd out (0ddh),a 0076 3e08 ld a,08h 0078 d37c out (7ch),a 007a 3eb7 ld a,0b7h 007c d37f out (7fh),a 007e 3e0b ld a,0bh 0080 d37f out (7fh),a 0082 cd5017 call 1750h 0085 fb ei 0086 3e11 ld a,11h 0088 320021 ld (2100h),a 008b 21fc20 ld hl,20fch 008e cd4e02 call 024eh 0091 3ab220 ld a,(20b2h) 0094 310028 ld sp,2800h 0097 b7 or a 0098 215020 ld hl,2050h 009b 2806 jr z,00a3h 009d cbc6 set 0,(hl) 009f 23 inc hl 00a0 cbc6 set 0,(hl) 00a2 2b dec hl 00a3 3a0221 ld a,(2102h) 00a6 23 inc hl 00a7 23 inc hl 00a8 fe01 cp 01h 00aa 3810 jr c,00bch 00ac 2807 jr z,00b5h 00ae cb86 res 0,(hl) 00b0 23 inc hl 00b1 cbc6 set 0,(hl) 00b3 180c jr 00c1h 00b5 cbc6 set 0,(hl) 00b7 23 inc hl 00b8 cb86 res 0,(hl) 00ba 1805 jr 00c1h 00bc cb86 res 0,(hl) 00be 23 inc hl 00bf cb86 res 0,(hl) 00c1 215620 ld hl,2056h 00c4 3a4c21 ld a,(214ch) 00c7 b7 or a 00c8 facf00 jp m,00cfh 00cb cbfe set 7,(hl) 00cd 1802 jr 00d1h 00cf cbbe res 7,(hl) 00d1 3a5321 ld a,(2153h) 00d4 b7 or a 00d5 fadc00 jp m,00dch 00d8 cbf6 set 6,(hl) 00da 1802 jr 00deh 00dc cbb6 res 6,(hl) 00de 3a5a21 ld a,(215ah) 00e1 b7 or a 00e2 fae900 jp m,00e9h 00e5 cbee set 5,(hl) 00e7 1802 jr 00ebh 00e9 cbae res 5,(hl) 00eb 3a6921 ld a,(2169h) 00ee b7 or a 00ef 2842 jr z,0133h 00f1 21ce20 ld hl,20ceh 00f4 7e ld a,(hl) 00f5 b7 or a 00f6 c40a02 call nz,020ah 00f9 215320 ld hl,2053h 00fc 36b6 ld (hl),0b6h 00fe 3a6921 ld a,(2169h) 0101 cb4f bit 1,a 0103 282e jr z,0133h 0105 2b dec hl 0106 360a ld (hl),0ah 0108 3a0f24 ld a,(240fh) 010b 2a6321 ld hl,(2163h) 010e b7 or a 010f 2803 jr z,0114h 0111 2a6521 ld hl,(2165h) 0114 11d127 ld de,27d1h 0117 eb ex de,hl 0118 b7 or a 0119 ed52 sbc hl,de 011b cb3c srl h 011d cb1d rr l 011f cb3c srl h 0121 cb1d rr l 0123 cb3d srl l 0125 7d ld a,l 0126 cb3d srl l 0128 cb3d srl l 012a 95 sub l 012b cd5009 call 0950h 012e 0602 ld b,02h 0130 cdd005 call 05d0h 0133 3a6121 ld a,(2161h) 0136 2f cpl 0137 47 ld b,a 0138 cb38 srl b 013a cb38 srl b 013c cb38 srl b 013e 3e20 ld a,20h 0140 90 sub b 0141 47 ld b,a 0142 3ada20 ld a,(20dah) 0145 cd7f08 call 087fh 0148 4f ld c,a 0149 80 add a,b 014a 57 ld d,a 014b 3ad920 ld a,(20d9h) 014e 07 rlca 014f 07 rlca 0150 5f ld e,a 0151 7a ld a,d 0152 93 sub e 0153 3001 jr nc,0156h 0155 af xor a 0156 b9 cp c 0157 3801 jr c,015ah 0159 79 ld a,c 015a cd6609 call 0966h 015d cdb705 call 05b7h 0160 222d21 ld (212dh),hl 0163 3ae020 ld a,(20e0h) 0166 cd7f08 call 087fh 0169 4f ld c,a 016a 80 add a,b 016b 57 ld d,a 016c 3adf20 ld a,(20dfh) 016f 07 rlca 0170 07 rlca 0171 5f ld e,a 0172 7a ld a,d 0173 93 sub e 0174 3001 jr nc,0177h 0176 af xor a 0177 b9 cp c 0178 3801 jr c,017bh 017a 79 ld a,c 017b cd6609 call 0966h 017e cdb705 call 05b7h 0181 220721 ld (2107h),hl 0184 3afb20 ld a,(20fbh) 0187 b7 or a 0188 c44913 call nz,1349h 018b 3a8021 ld a,(2180h) 018e fef6 cp 0f6h 0190 2019 jr nz,01abh 0192 af xor a 0193 328021 ld (2180h),a 0196 3a6921 ld a,(2169h) 0199 cb47 bit 0,a 019b 200e jr nz,01abh 019d 3ab220 ld a,(20b2h) 01a0 b7 or a 01a1 2008 jr nz,01abh 01a3 3e01 ld a,01h 01a5 32ad20 ld (20adh),a 01a8 cd2704 call 0427h 01ab c37019 jp 1970h 01ae 7e ld a,(hl) 01af fe04 cp 04h 01b1 2814 jr z,01c7h 01b3 fe06 cp 06h 01b5 2810 jr z,01c7h 01b7 fe0c cp 0ch 01b9 280c jr z,01c7h 01bb fe0e cp 0eh 01bd 2808 jr z,01c7h 01bf fe14 cp 14h 01c1 2804 jr z,01c7h 01c3 fe16 cp 16h 01c5 2002 jr nz,01c9h 01c7 d604 sub 04h 01c9 23 inc hl 01ca be cp (hl) 01cb 201d jr nz,01eah 01cd 23 inc hl 01ce 7e ld a,(hl) 01cf b7 or a 01d0 c29100 jp nz,0091h 01d3 2b dec hl 01d4 7e ld a,(hl) 01d5 23 inc hl 01d6 3602 ld (hl),02h 01d8 07 rlca 01d9 218109 ld hl,0981h 01dc 0600 ld b,00h 01de 4f ld c,a 01df 09 add hl,bc 01e0 7e ld a,(hl) 01e1 23 inc hl 01e2 66 ld h,(hl) 01e3 6f ld l,a 01e4 af xor a 01e5 019100 ld bc,0091h 01e8 c5 push bc 01e9 e9 jp (hl) 01ea 77 ld (hl),a 01eb 23 inc hl 01ec 3606 ld (hl),06h 01ee 18e8 jr 01d8h 01f0 21ce20 ld hl,20ceh 01f3 7e ld a,(hl) 01f4 b7 or a 01f5 2013 jr nz,020ah 01f7 36ff ld (hl),0ffh 01f9 3a0021 ld a,(2100h) 01fc 0601 ld b,01h 01fe cdd005 call 05d0h 0201 3a0021 ld a,(2100h) 0204 0600 ld b,00h 0206 cd0706 call 0607h 0209 c9 ret 020a 3600 ld (hl),00h 020c 215220 ld hl,2052h 020f 115320 ld de,2053h 0212 010300 ld bc,0003h 0215 3600 ld (hl),00h 0217 edb0 ldir 0219 c9 ret 021a 3ab220 ld a,(20b2h) 021d b7 or a 021e c0 ret nz 021f 3ace20 ld a,(20ceh) 0222 b7 or a 0223 280e jr z,0233h 0225 3a0021 ld a,(2100h) 0228 0601 ld b,01h 022a cd0706 call 0607h 022d 215620 ld hl,2056h 0230 cbe6 set 4,(hl) 0232 c9 ret 0233 21fd20 ld hl,20fdh 0236 cb46 bit 0,(hl) 0238 c0 ret nz 0239 2b dec hl 023a 7e ld a,(hl) 023b 3c inc a 023c 27 daa 023d 47 ld b,a 023e e60f and 0fh 0240 fe09 cp 09h 0242 78 ld a,b 0243 2009 jr nz,024eh 0245 3c inc a 0246 27 daa 0247 3c inc a 0248 fe51 cp 51h 024a 3802 jr c,024eh 024c 3e11 ld a,11h 024e 77 ld (hl),a 024f 0600 ld b,00h 0251 cdd005 call 05d0h 0254 3ab220 ld a,(20b2h) 0257 b7 or a 0258 c0 ret nz 0259 2f cpl 025a 326221 ld (2162h),a 025d cdbb17 call 17bbh 0260 cd0509 call 0905h 0263 21d309 ld hl,09d3h 0266 0e2d ld c,2dh 0268 0602 ld b,02h 026a 7e ld a,(hl) 026b cd0706 call 0607h 026e 23 inc hl 026f 23 inc hl 0270 23 inc hl 0271 23 inc hl 0272 0d dec c 0273 20f3 jr nz,0268h 0275 af xor a 0276 326221 ld (2162h),a 0279 215620 ld hl,2056h 027c cba6 res 4,(hl) 027e c9 ret 027f 21b220 ld hl,20b2h 0282 7e ld a,(hl) 0283 b7 or a 0284 280f jr z,0295h 0286 3600 ld (hl),00h 0288 3afc20 ld a,(20fch) 028b 0600 ld b,00h 028d cdd005 call 05d0h 0290 af xor a 0291 32ff20 ld (20ffh),a 0294 c9 ret 0295 3601 ld (hl),01h 0297 3eaa ld a,0aah 0299 0600 ld b,00h 029b cdd005 call 05d0h 029e c9 ret 029f 3ab220 ld a,(20b2h) 02a2 b7 or a 02a3 c0 ret nz 02a4 3ace20 ld a,(20ceh) 02a7 b7 or a 02a8 280e jr z,02b8h 02aa 3a0021 ld a,(2100h) 02ad 0699 ld b,99h 02af cd0706 call 0607h 02b2 215620 ld hl,2056h 02b5 cbe6 set 4,(hl) 02b7 c9 ret 02b8 21fd20 ld hl,20fdh 02bb cb46 bit 0,(hl) 02bd c0 ret nz 02be 2b dec hl 02bf 7e ld a,(hl) 02c0 3d dec a 02c1 27 daa 02c2 47 ld b,a 02c3 e60f and 0fh 02c5 78 ld a,b 02c6 c24e02 jp nz,024eh 02c9 3d dec a 02ca 27 daa 02cb 3d dec a 02cc fe08 cp 08h 02ce c24e02 jp nz,024eh 02d1 3e48 ld a,48h 02d3 c34e02 jp 024eh 02d6 3c inc a 02d7 3c inc a 02d8 3c inc a 02d9 3c inc a 02da 3c inc a 02db 3c inc a 02dc 3c inc a 02dd 3c inc a 02de 47 ld b,a 02df 3ab220 ld a,(20b2h) 02e2 b7 or a 02e3 21ff20 ld hl,20ffh 02e6 c27803 jp nz,0378h 02e9 3ace20 ld a,(20ceh) 02ec b7 or a 02ed ca7503 jp z,0375h 02f0 210121 ld hl,2101h 02f3 7e ld a,(hl) 02f4 b7 or a 02f5 2012 jr nz,0309h 02f7 3601 ld (hl),01h 02f9 78 ld a,b 02fa 2b dec hl 02fb 77 ld (hl),a 02fc 0601 ld b,01h 02fe cdd005 call 05d0h 0301 3eaa ld a,0aah 0303 0602 ld b,02h 0305 cdd005 call 05d0h 0308 c9 ret 0309 3600 ld (hl),00h 030b 2b dec hl 030c 7e ld a,(hl) 030d 07 rlca 030e 07 rlca 030f 07 rlca 0310 07 rlca 0311 b0 or b 0312 77 ld (hl),a 0313 0601 ld b,01h 0315 cdd005 call 05d0h 0318 7e ld a,(hl) 0319 0600 ld b,00h 031b cd0706 call 0607h 031e c9 ret 031f 210221 ld hl,2102h 0322 3600 ld (hl),00h 0324 cd5e06 call 065eh 0327 c9 ret 0328 210221 ld hl,2102h 032b 3601 ld (hl),01h 032d c9 ret 032e 210221 ld hl,2102h 0331 7e ld a,(hl) 0332 3602 ld (hl),02h 0334 b7 or a 0335 280a jr z,0341h 0337 215820 ld hl,2058h 033a 0606 ld b,06h 033c af xor a 033d 77 ld (hl),a 033e 23 inc hl 033f 10fc djnz 033dh 0341 217c20 ld hl,207ch 0344 3e63 ld a,63h 0346 0606 ld b,06h 0348 be cp (hl) 0349 23 inc hl 034a 2003 jr nz,034fh 034c 10fa djnz 0348h 034e c9 ret 034f 0606 ld b,06h 0351 217c20 ld hl,207ch 0354 3e63 ld a,63h 0356 be cp (hl) 0357 3801 jr c,035ah 0359 7e ld a,(hl) 035a 23 inc hl 035b 10f9 djnz 0356h 035d 217c20 ld hl,207ch 0360 114020 ld de,2040h 0363 4f ld c,a 0364 0606 ld b,06h 0366 7e ld a,(hl) 0367 fe63 cp 63h 0369 2803 jr z,036eh 036b 91 sub c 036c 12 ld (de),a 036d 13 inc de 036e 23 inc hl 036f 10f5 djnz 0366h 0371 3e63 ld a,63h 0373 12 ld (de),a 0374 c9 ret 0375 21fd20 ld hl,20fdh 0378 cb46 bit 0,(hl) 037a 200b jr nz,0387h 037c 3601 ld (hl),01h 037e 78 ld a,b 037f 2b dec hl 0380 77 ld (hl),a 0381 0600 ld b,00h 0383 cdd005 call 05d0h 0386 c9 ret 0387 3600 ld (hl),00h 0389 2b dec hl 038a 7e ld a,(hl) 038b 07 rlca 038c 07 rlca 038d 07 rlca 038e 07 rlca 038f b0 or b 0390 fe49 cp 49h 0392 d0 ret nc 0393 c34e02 jp 024eh 0396 21b220 ld hl,20b2h 0399 7e ld a,(hl) 039a b7 or a 039b c8 ret z 039c 3afe20 ld a,(20feh) 039f b7 or a 03a0 c8 ret z 03a1 3aff20 ld a,(20ffh) 03a4 b7 or a 03a5 c0 ret nz 03a6 cd7f02 call 027fh 03a9 cdc408 call 08c4h 03ac 3afe20 ld a,(20feh) 03af 47 ld b,a 03b0 3afc20 ld a,(20fch) 03b3 b8 cp b 03b4 2005 jr nz,03bbh 03b6 215620 ld hl,2056h 03b9 cba6 res 4,(hl) 03bb af xor a 03bc 32fe20 ld (20feh),a 03bf c9 ret 03c0 218820 ld hl,2088h 03c3 118e20 ld de,208eh 03c6 0606 ld b,06h 03c8 4f ld c,a 03c9 7e ld a,(hl) 03ca 81 add a,c 03cb 12 ld (de),a 03cc 23 inc hl 03cd 13 inc de 03ce 10f9 djnz 03c9h 03d0 c9 ret 03d1 dd219420 ld ix,2094h 03d5 0606 ld b,06h 03d7 dd7e0c ld a,(ix+0ch) 03da dd4e12 ld c,(ix+12h) 03dd cb27 sla a 03df cb11 rl c 03e1 cb27 sla a 03e3 cb11 rl c 03e5 cb27 sla a 03e7 cb11 rl c 03e9 dd7700 ld (ix+00h),a 03ec dd7106 ld (ix+06h),c 03ef dd23 inc ix 03f1 10e4 djnz 03d7h 03f3 c9 ret 03f4 215820 ld hl,2058h 03f7 115920 ld de,2059h 03fa 012300 ld bc,0023h 03fd 3600 ld (hl),00h 03ff edb0 ldir 0401 23 inc hl 0402 13 inc de 0403 010500 ld bc,0005h 0406 77 ld (hl),a 0407 edb0 ldir 0409 c9 ret 040a 3a6921 ld a,(2169h) 040d cb47 bit 0,a 040f c0 ret nz 0410 3ab220 ld a,(20b2h) 0413 b7 or a 0414 c0 ret nz 0415 3afd20 ld a,(20fdh) 0418 b7 or a 0419 c0 ret nz 041a 3e01 ld a,01h 041c 32ad20 ld (20adh),a 041f 3ef6 ld a,0f6h 0421 cd8f17 call 178fh 0424 cda006 call 06a0h 0427 215020 ld hl,2050h 042a 3602 ld (hl),02h 042c 23 inc hl 042d 3602 ld (hl),02h 042f 21ce20 ld hl,20ceh 0432 7e ld a,(hl) 0433 b7 or a 0434 c40a02 call nz,020ah 0437 3e27 ld a,27h 0439 320321 ld (2103h),a 043c dd21880a ld ix,0a88h 0440 21cf20 ld hl,20cfh 0443 11d409 ld de,09d4h 0446 0608 ld b,08h 0448 cd0b09 call 090bh 044b cd6302 call 0263h 044e 210000 ld hl,0000h 0451 222d21 ld (212dh),hl 0454 220721 ld (2107h),hl 0457 3e21 ld a,21h 0459 cdf403 call 03f4h 045c 3e20 ld a,20h 045e cdc003 call 03c0h 0461 3e2f ld a,2fh 0463 32af20 ld (20afh),a 0466 3e00 ld a,00h 0468 32b020 ld (20b0h),a 046b dd210321 ld ix,2103h 046f dd360006 ld (ix+00h),06h 0473 fd215820 ld iy,2058h 0477 0609 ld b,09h 0479 cda006 call 06a0h 047c 10fb djnz 0479h 047e fd360002 ld (iy+00h),02h 0482 0607 ld b,07h 0484 cda006 call 06a0h 0487 10fb djnz 0484h 0489 cd5305 call 0553h 048c 47 ld b,a 048d cd5305 call 0553h 0490 4f ld c,a 0491 90 sub b 0492 3002 jr nc,0496h 0494 ed44 neg 0496 fe03 cp 03h 0498 3804 jr c,049eh 049a 79 ld a,c 049b 47 ld b,a 049c 18ef jr 048dh 049e 78 ld a,b 049f fd360000 ld (iy+00h),00h 04a3 fd4e30 ld c,(iy+30h) 04a6 d67b sub 7bh 04a8 81 add a,c 04a9 fd7730 ld (iy+30h),a 04ac fd23 inc iy 04ae dd3500 dec (ix+00h) 04b1 dd7e00 ld a,(ix+00h) 04b4 b7 or a 04b5 20c7 jr nz,047eh 04b7 3e20 ld a,20h 04b9 cdc003 call 03c0h 04bc af xor a 04bd 32cf20 ld (20cfh),a 04c0 32d320 ld (20d3h),a 04c3 3c inc a 04c4 32d120 ld (20d1h),a 04c7 21d309 ld hl,09d3h 04ca 0e06 ld c,06h 04cc cd6802 call 0268h 04cf 3e09 ld a,09h 04d1 cdf403 call 03f4h 04d4 3e0d ld a,0dh 04d6 32af20 ld (20afh),a 04d9 3ef6 ld a,0f6h 04db 32b020 ld (20b0h),a 04de dd360006 ld (ix+00h),06h 04e2 fd215820 ld iy,2058h 04e6 0609 ld b,09h 04e8 cda006 call 06a0h 04eb 10fb djnz 04e8h 04ed fd360002 ld (iy+00h),02h 04f1 0607 ld b,07h 04f3 cda006 call 06a0h 04f6 10fb djnz 04f3h 04f8 cd5305 call 0553h 04fb 47 ld b,a 04fc cd5305 call 0553h 04ff 4f ld c,a 0500 90 sub b 0501 3002 jr nc,0505h 0503 ed44 neg 0505 fe03 cp 03h 0507 3804 jr c,050dh 0509 79 ld a,c 050a 47 ld b,a 050b 18ef jr 04fch 050d 78 ld a,b 050e fd360000 ld (iy+00h),00h 0512 1600 ld d,00h 0514 5f ld e,a 0515 017900 ld bc,0079h 0518 fd664e ld h,(iy+4eh) 051b fd6e48 ld l,(iy+48h) 051e b7 or a 051f ed52 sbc hl,de 0521 09 add hl,bc 0522 fd7548 ld (iy+48h),l 0525 fd744e ld (iy+4eh),h 0528 fd23 inc iy 052a dd3500 dec (ix+00h) 052d dd7e00 ld a,(ix+00h) 0530 b7 or a 0531 20ba jr nz,04edh 0533 cdd103 call 03d1h 0536 cd5e06 call 065eh 0539 af xor a 053a 0606 ld b,06h 053c 216420 ld hl,2064h 053f 77 ld (hl),a 0540 23 inc hl 0541 10fc djnz 053fh 0543 3aac20 ld a,(20ach) 0546 cdc003 call 03c0h 0549 af xor a 054a 32ad20 ld (20adh),a 054d 3afc20 ld a,(20fch) 0550 c34f02 jp 024fh 0553 3ed7 ld a,0d7h 0555 d37e out (7eh),a 0557 3e01 ld a,01h 0559 d37e out (7eh),a 055b 32ae20 ld (20aeh),a 055e 3aae20 ld a,(20aeh) 0561 b7 or a 0562 20fa jr nz,055eh 0564 3ab120 ld a,(20b1h) 0567 c9 ret 0568 f5 push af 0569 3aae20 ld a,(20aeh) 056c fe03 cp 03h 056e 281b jr z,058bh 0570 3e03 ld a,03h 0572 32ae20 ld (20aeh),a 0575 3ed7 ld a,0d7h 0577 d37e out (7eh),a 0579 3aaf20 ld a,(20afh) 057c d37e out (7eh),a 057e 3e27 ld a,27h 0580 d37d out (7dh),a 0582 3ab020 ld a,(20b0h) 0585 d37d out (7dh),a 0587 f1 pop af 0588 fb ei 0589 ed4d reti 058b 3e03 ld a,03h 058d d37e out (7eh),a 058f db7d in a,(7dh) 0591 32b120 ld (20b1h),a 0594 af xor a 0595 32ae20 ld (20aeh),a 0598 f1 pop af 0599 fb ei 059a ed4d reti 059c ff rst 38h 059d ff rst 38h 059e ff rst 38h 059f ff rst 38h 05a0 21ca0a ld hl,0acah 05a3 3a5c21 ld a,(215ch) 05a6 dd8624 add a,(ix+24h) 05a9 fe49 cp 49h 05ab 3f ccf 05ac d8 ret c 05ad 17 rla 05ae 5f ld e,a 05af 1600 ld d,00h 05b1 19 add hl,de 05b2 5e ld e,(hl) 05b3 23 inc hl 05b4 66 ld h,(hl) 05b5 6b ld l,e 05b6 c9 ret 05b7 cb3f srl a 05b9 57 ld d,a 05ba cb3f srl a 05bc 82 add a,d 05bd cb87 res 0,a 05bf 219c0a ld hl,0a9ch 05c2 18ea jr 05aeh 05c4 1600 ld d,00h 05c6 5f ld e,a 05c7 cb23 sla e 05c9 cb12 rl d 05cb 21001e ld hl,1e00h 05ce 18e1 jr 05b1h 05d0 e5 push hl 05d1 d5 push de 05d2 215020 ld hl,2050h 05d5 04 inc b 05d6 05 dec b 05d7 2804 jr z,05ddh 05d9 23 inc hl 05da 23 inc hl 05db 10fc djnz 05d9h 05dd 47 ld b,a 05de e60f and 0fh 05e0 cb38 srl b 05e2 cb38 srl b 05e4 cb38 srl b 05e6 cb38 srl b 05e8 11c309 ld de,09c3h 05eb 83 add a,e 05ec 5f ld e,a 05ed 7a ld a,d 05ee ce00 adc a,00h 05f0 57 ld d,a 05f1 1a ld a,(de) 05f2 77 ld (hl),a 05f3 23 inc hl 05f4 3ec3 ld a,0c3h 05f6 80 add a,b 05f7 5f ld e,a 05f8 3e09 ld a,09h 05fa ce00 adc a,00h 05fc 57 ld d,a 05fd 1a ld a,(de) 05fe fefc cp 0fch 0600 2001 jr nz,0603h 0602 af xor a 0603 77 ld (hl),a 0604 d1 pop de 0605 e1 pop hl 0606 c9 ret 0607 e5 push hl 0608 d5 push de 0609 c5 push bc 060a 215a06 ld hl,065ah 060d e5 push hl 060e 21d309 ld hl,09d3h 0611 162d ld d,2dh 0613 1e00 ld e,00h 0615 be cp (hl) 0616 2810 jr z,0628h 0618 1c inc e 0619 23 inc hl 061a 23 inc hl 061b 23 inc hl 061c 23 inc hl 061d 15 dec d 061e 20f5 jr nz,0615h 0620 3eaa ld a,0aah 0622 0602 ld b,02h 0624 cdd005 call 05d0h 0627 c9 ret 0628 23 inc hl 0629 fd21cf20 ld iy,20cfh 062d 1600 ld d,00h 062f fd19 add iy,de 0631 3e02 ld a,02h 0633 b8 cp b 0634 2818 jr z,064eh 0636 fd7e00 ld a,(iy+00h) 0639 80 add a,b 063a 27 daa 063b fe99 cp 99h 063d 2001 jr nz,0640h 063f af xor a 0640 be cp (hl) 0641 2803 jr z,0646h 0643 3801 jr c,0646h 0645 7e ld a,(hl) 0646 fd7700 ld (iy+00h),a 0649 0602 ld b,02h 064b cdd005 call 05d0h 064e 23 inc hl 064f 7e ld a,(hl) 0650 23 inc hl 0651 66 ld h,(hl) 0652 6f ld l,a 0653 010000 ld bc,0000h 0656 fd7e00 ld a,(iy+00h) 0659 e9 jp (hl) 065a c1 pop bc 065b d1 pop de 065c e1 pop hl 065d c9 ret 065e dde5 push ix 0660 dd215820 ld ix,2058h 0664 af xor a 0665 dd7700 ld (ix+00h),a 0668 dd7701 ld (ix+01h),a 066b dd7702 ld (ix+02h),a 066e dd7703 ld (ix+03h),a 0671 dd7704 ld (ix+04h),a 0674 dd7705 ld (ix+05h),a 0677 dd7712 ld (ix+12h),a 067a dd7713 ld (ix+13h),a 067d dd7714 ld (ix+14h),a 0680 dd7715 ld (ix+15h),a 0683 dd7716 ld (ix+16h),a 0686 dd7717 ld (ix+17h),a 0689 3e63 ld a,63h 068b dd7724 ld (ix+24h),a 068e dd7725 ld (ix+25h),a 0691 dd7726 ld (ix+26h),a 0694 dd7727 ld (ix+27h),a 0697 dd7728 ld (ix+28h),a 069a dd7729 ld (ix+29h),a 069d dde1 pop ix 069f c9 ret 06a0 3ab320 ld a,(20b3h) 06a3 fe04 cp 04h 06a5 30f9 jr nc,06a0h 06a7 3ab320 ld a,(20b3h) 06aa fe05 cp 05h 06ac 38f9 jr c,06a7h 06ae c9 ret 06af b7 or a 06b0 2806 jr z,06b8h 06b2 47 ld b,a 06b3 af xor a 06b4 c60c add a,0ch 06b6 10fc djnz 06b4h 06b8 325c21 ld (215ch),a 06bb c9 ret 06bc 328721 ld (2187h),a 06bf cd7f08 call 087fh 06c2 2f cpl 06c3 e63f and 3fh 06c5 32ac20 ld (20ach),a 06c8 c3c003 jp 03c0h 06cb cd7f08 call 087fh 06ce cd6609 call 0966h 06d1 2e00 ld l,00h 06d3 67 ld h,a 06d4 221321 ld (2113h),hl 06d7 c9 ret 06d8 cd7f08 call 087fh 06db 07 rlca 06dc cdb905 call 05b9h 06df 220f21 ld (210fh),hl 06e2 c9 ret 06e3 cd7f08 call 087fh 06e6 cd6609 call 0966h 06e9 47 ld b,a 06ea 3ad120 ld a,(20d1h) 06ed fe01 cp 01h 06ef 78 ld a,b 06f0 2008 jr nz,06fah 06f2 2e00 ld l,00h 06f4 67 ld h,a 06f5 221921 ld (2119h),hl 06f8 3eff ld a,0ffh 06fa 2e00 ld l,00h 06fc 67 ld h,a 06fd 220b21 ld (210bh),hl 0700 c9 ret 0701 214721 ld hl,2147h 0704 1803 jr 0709h 0706 215521 ld hl,2155h 0709 77 ld (hl),a 070a 3e02 ld a,02h 070c 324e21 ld (214eh),a 070f c9 ret 0710 214921 ld hl,2149h 0713 115c0b ld de,0b5ch 0716 180e jr 0726h 0718 215021 ld hl,2150h 071b 117c0b ld de,0b7ch 071e 1806 jr 0726h 0720 215721 ld hl,2157h 0723 119c0b ld de,0b9ch 0726 cd7f08 call 087fh 0729 47 ld b,a 072a b7 or a 072b 2804 jr z,0731h 072d 13 inc de 072e 13 inc de 072f 10fc djnz 072dh 0731 1a ld a,(de) 0732 47 ld b,a 0733 13 inc de 0734 1a ld a,(de) 0735 70 ld (hl),b 0736 23 inc hl 0737 77 ld (hl),a 0738 c9 ret 0739 cd7f08 call 087fh 073c 07 rlca 073d 07 rlca 073e f5 push af 073f 3a5e21 ld a,(215eh) 0742 2f cpl 0743 e60f and 0fh 0745 210002 ld hl,0200h 0748 cde807 call 07e8h 074b f1 pop af 074c 84 add a,h 074d 3002 jr nc,0751h 074f 3eff ld a,0ffh 0751 325d21 ld (215dh),a 0754 c9 ret 0755 cd6007 call 0760h 0758 00 nop 0759 40 ld b,b 075a 80 add a,b 075b d0 ret nc 075c 222921 ld (2129h),hl 075f c9 ret 0760 e1 pop hl 0761 85 add a,l 0762 6f ld l,a 0763 7c ld a,h 0764 ce00 adc a,00h 0766 67 ld h,a 0767 66 ld h,(hl) 0768 2e00 ld l,00h 076a 18f0 jr 075ch 076c cd7f08 call 087fh 076f 2f cpl 0770 e60f and 0fh 0772 325e21 ld (215eh),a 0775 3af020 ld a,(20f0h) 0778 18bf jr 0739h 077a cd7f08 call 087fh 077d cd6609 call 0966h 0780 67 ld h,a 0781 2e00 ld l,00h 0783 221d21 ld (211dh),hl 0786 c9 ret 0787 b7 or a 0788 2007 jr nz,0791h 078a dbdd in a,(0ddh) 078c cbbf res 7,a 078e d3dd out (0ddh),a 0790 c9 ret 0791 dbdd in a,(0ddh) 0793 cbff set 7,a 0795 d3dd out (0ddh),a 0797 c9 ret 0798 fe01 cp 01h 079a 2810 jr z,07ach 079c 3020 jr nc,07beh 079e dbdc in a,(0dch) 07a0 cbaf res 5,a 07a2 d3dc out (0dch),a 07a4 21000f ld hl,0f00h 07a7 221921 ld (2119h),hl 07aa 180c jr 07b8h 07ac dbdd in a,(0ddh) 07ae cbaf res 5,a 07b0 d3dd out (0ddh),a 07b2 dbdc in a,(0dch) 07b4 cbef set 5,a 07b6 d3dc out (0dch),a 07b8 3adc20 ld a,(20dch) 07bb c3e306 jp 06e3h 07be dbdd in a,(0ddh) 07c0 cbef set 5,a 07c2 d3dd out (0ddh),a 07c4 18ec jr 07b2h 07c6 b7 or a 07c7 2007 jr nz,07d0h 07c9 dbdc in a,(0dch) 07cb cbb7 res 6,a 07cd d3dc out (0dch),a 07cf c9 ret 07d0 dbdc in a,(0dch) 07d2 cbf7 set 6,a 07d4 d3dc out (0dch),a 07d6 c9 ret 07d7 b7 or a 07d8 2007 jr nz,07e1h 07da dbdd in a,(0ddh) 07dc cbb7 res 6,a 07de d3dd out (0ddh),a 07e0 c9 ret 07e1 dbdd in a,(0ddh) 07e3 cbf7 set 6,a 07e5 d3dd out (0ddh),a 07e7 c9 ret 07e8 4f ld c,a 07e9 1f rra 07ea b7 or a 07eb 281a jr z,0807h 07ed 47 ld b,a 07ee fe04 cp 04h 07f0 380f jr c,0801h 07f2 3e08 ld a,08h 07f4 90 sub b 07f5 6c ld l,h 07f6 2600 ld h,00h 07f8 47 ld b,a 07f9 cb25 sla l 07fb cb14 rl h 07fd 10fa djnz 07f9h 07ff 1800 jr 0801h