7000 213e71 ld hl,#713e 7003 cd4270 call #7042 7006 f3 di 7007 dd21ffff ld ix,#ffff 700b 110040 ld de,#4000 700e 3e13 ld a,#13 7010 cd5070 call #7050 7013 d23970 jp nc,#7039 7016 01107f ld bc,#7f10 7019 3e17 ld a,#17 701b ed49 out (c),c 701d ed79 out (c),a 701f 3edd ld a,#dd 7021 212300 ld hl,#0023 7024 32ae70 ld (#70ae),a 7027 22af70 ld (#70af),hl 702a dd21000c ld ix,#0c00 702e 117161 ld de,#6171 7031 3eed ld a,#ed 7033 cd5070 call #7050 7036 da000c jp c,#0c00 7039 211071 ld hl,#7110 703c cd4270 call #7042 703f c318bb jp #bb18 7042 7e ld a,(hl) 7043 feff cp #ff 7045 c8 ret z 7046 e5 push hl 7047 cd5abb call #bb5a 704a e1 pop hl 704b 7e ld a,(hl) 704c 23 inc hl 704d 3c inc a 704e 18f2 jr #7042 ; (-14) 7050 329370 ld (#7093),a 7053 0110f6 ld bc,#f610 7056 ed49 out (c),c 7058 af xor a 7059 32fe70 ld (#70fe),a 705c cdea70 call #70ea 705f 30fb jr nc,#705c ; (-5) 7061 2600 ld h,#00 7063 cdea70 call #70ea 7066 30f4 jr nc,#705c ; (-12) 7068 7c ld a,h 7069 fe0d cp #0d 706b 38f4 jr c,#7061 ; (-12) 706d cdea70 call #70ea 7070 30ea jr nc,#705c ; (-22) 7072 2e05 ld l,#05 7074 cde570 call #70e5 7077 2d dec l 7078 20fa jr nz,#7074 ; (-6) 707a 0640 ld b,#40 707c c5 push bc 707d cdcd70 call #70cd 7080 79 ld a,c 7081 fe20 cp #20 7083 c1 pop bc 7084 20db jr nz,#7061 ; (-37) 7086 10f4 djnz #707c ; (-12) 7088 cdcd70 call #70cd 708b 30cf jr nc,#705c ; (-49) 708d 79 ld a,c 708e fe20 cp #20 7090 28f6 jr z,#7088 ; (-10) 7092 fe13 cp #13 7094 20cb jr nz,#7061 ; (-53) 7096 3e1f ld a,#1f 7098 32fe70 ld (#70fe),a 709b cdcd70 call #70cd 709e 59 ld e,c 709f cdcd70 call #70cd 70a2 51 ld d,c 70a3 cdcd70 call #70cd 70a6 3016 jr nc,#70be ; (22) 70a8 dd7100 ld (ix+#00),c 70ab 79 ld a,c 70ac ad xor l 70ad 6f ld l,a 70ae cd0771 call #7107 70b1 1b dec de 70b2 7a ld a,d 70b3 b3 or e 70b4 20ed jr nz,#70a3 ; (-19) 70b6 cdcd70 call #70cd 70b9 79 ld a,c 70ba ad xor l 70bb 2001 jr nz,#70be ; (1) 70bd 3f ccf 70be 0100f6 ld bc,#f600 70c1 ed49 out (c),c 70c3 01107f ld bc,#7f10 70c6 ed49 out (c),c 70c8 0e5c ld c,#5c 70ca ed49 out (c),c 70cc c9 ret 70cd 2602 ld h,#02 70cf cde770 call #70e7 70d2 0e01 ld c,#01 70d4 1805 jr #70db ; (5) 70d6 c5 push bc 70d7 cde570 call #70e5 70da c1 pop bc 70db d0 ret nc 70dc 3e1a ld a,#1a 70de bc cp h 70df cb11 rl c 70e1 d2d670 jp nc,#70d6 70e4 c9 ret 70e5 2600 ld h,#00 70e7 cdea70 call #70ea 70ea 06f5 ld b,#f5 70ec ed48 in c,(c) 70ee 24 inc h 70ef c8 ret z 70f0 ed78 in a,(c) 70f2 a9 xor c 70f3 e680 and #80 70f5 caee70 jp z,#70ee 70f8 01107f ld bc,#7f10 70fb ed5f ld a,r 70fd e61f and #1f 70ff f640 or #40 7101 ed49 out (c),c 7103 ed79 out (c),a 7105 37 scf 7106 c9 ret 7107 dd19 add ix,de 7109 dd7c ld a,ixh 710b f6c0 or #c0 710d dd67 ld ixh,a 710f c9 ret 7110 1f rra 7111 02 ld (bc),a 7112 19 add hl,de 7113 0e01 ld c,#01 7115 0f rrca 7116 03 inc bc 7117 2a2a2a ld hl,(#2a2a) 711a 2a204c ld hl,(#4c20) 711d 6f ld l,a 711e 61 ld h,c 711f 64 ld h,h 7120 69 ld l,c 7121 6e ld l,(hl) 7122 67 ld h,a 7123 2065 jr nz,#718a ; (101) 7125 72 ld (hl),d 7126 72 ld (hl),d 7127 6f ld l,a 7128 72 ld (hl),d 7129 202d jr nz,#7158 ; (45) 712b 2050 jr nz,#717d ; (80) 712d 6c ld l,h 712e 65 ld h,l 712f 61 ld h,c 7130 73 ld (hl),e 7131 65 ld h,l 7132 2072 jr nz,#71a6 ; (114) 7134 65 ld h,l 7135 74 ld (hl),h 7136 72 ld (hl),d 7137 79 ld a,c 7138 202a jr nz,#7164 ; (42) 713a 2a2a2a ld hl,(#2a2a) 713d ff rst #38 713e 1c inc e 713f 00 nop 7140 00 nop 7141 00 nop 7142 1c inc e 7143 010606 ld bc,#0606 7146 1c inc e 7147 02 ld (bc),a 7148 0f rrca 7149 0f rrca 714a 1c inc e 714b 03 inc bc 714c 19 add hl,de 714d 19 add hl,de 714e 1d dec e 714f 00 nop 7150 00 nop 7151 04 inc b 7152 011f0a ld bc,#0a1f 7155 08 ex af,af' 7156 0e00 ld c,#00 7158 0f rrca 7159 03 inc bc 715a 47 ld b,a 715b 61 ld h,c 715c 7a ld a,d 715d 7a ld a,d 715e 61 ld h,c 715f 2049 jr nz,#71aa ; (73) 7161 49 ld c,c 7162 2028 jr nz,#718c ; (40) 7164 63 ld h,e 7165 29 add hl,hl 7166 313939 ld sp,#3939 7169 3020 jr nc,#718b ; (32) 716b 45 ld b,l 716c 6d ld l,l 716d 70 ld (hl),b 716e 69 ld l,c 716f 72 ld (hl),d 7170 65 ld h,l 7171 0f rrca 7172 02 ld (bc),a 7173 1f rra 7174 0a ld a,(bc) 7175 0d dec c 7176 50 ld d,b 7177 6c ld l,h 7178 65 ld h,l 7179 61 ld h,c 717a 73 ld (hl),e 717b 65 ld h,l 717c 2077 jr nz,#71f5 ; (119) 717e 61 ld h,c 717f 69 ld l,c 7180 74 ld (hl),h 7181 2077 jr nz,#71fa ; (119) 7183 68 ld l,b 7184 69 ld l,c 7185 6c ld l,h 7186 65 ld h,l 7187 2049 jr nz,#71d2 ; (73) 7189 1f rra 718a 0a ld a,(bc) 718b 0e63 ld c,#63 718d 6f ld l,a 718e 61 ld h,c 718f 63 ld h,e 7190 68 ld l,b 7191 2079 jr nz,#720c ; (121) 7193 6f ld l,a 7194 75 ld (hl),l 7195 72 ld (hl),d 7196 2063 jr nz,#71fb ; (99) 7198 6f ld l,a 7199 6d ld l,l 719a 70 ld (hl),b 719b 75 ld (hl),l 719c 74 ld (hl),h 719d 65 ld h,l 719e 72 ld (hl),d 719f 2eff ld l,#ff 71a1 00 nop