B147: Routine at B147
B147 |
LD IX,($C277) |
B14B |
LD L,(IX+$30) |
B14E |
LD H,(IX+$31) |
B151 |
LD DE,$0200 |
B154 |
ADD HL,DE |
B155 |
LD DE,$7840 |
B158 |
LD BC,$0410 |
B15B |
CALL $B1B2 |
B15E |
LD L,(IX+$18) |
B161 |
LD H,(IX+$19) |
B164 |
LD BC,$0180 |
B167 |
ADD HL,BC |
B168 |
LD BC,$0C10 |
B16B |
CALL $B1B2 |
B16E |
LD L,(IX+$00) |
B171 |
LD H,(IX+$01) |
B174 |
LD BC,$0180 |
B177 |
ADD HL,BC |
B178 |
LD BC,$0410 |
B17B |
CALL $B1B2 |
B17E |
LD L,(IX+$3C) |
B181 |
LD H,(IX+$3D) |
B184 |
LD DE,$0200 |
B187 |
ADD HL,DE |
B188 |
LD DE,$785F |
B18B |
LD BC,$0410 |
B18E |
CALL $B1C3 |
B191 |
LD L,(IX+$24) |
B194 |
LD H,(IX+$25) |
B197 |
LD BC,$0180 |
B19A |
ADD HL,BC |
B19B |
LD BC,$0C10 |
B19E |
CALL $B1C3 |
B1A1 |
LD L,(IX+$0C) |
B1A4 |
LD H,(IX+$0D) |
B1A7 |
LD BC,$0180 |
B1AA |
ADD HL,BC |
B1AB |
LD BC,$0410 |
B1AE |
CALL $B1C3 |
B1B1 |
RET |