BD7E |
PUSH IY |
BD80 |
POP HL |
BD81 |
LD DE,$0018 |
BD84 |
ADD HL,DE |
BD85 |
BIT 7,(IY+$19) |
BD89 |
JR Z,$BD8E |
BD8B |
LD HL,$9FF6 |
BD8E |
BIT 6,(IY+$19) |
BD92 |
JR Z,$BD97 |
BD94 |
LD HL,$9FFC |
BD97 |
LD DE,$B172 |
BD9A |
LD BC,$0006 |
BD9D |
LDIR |
BD9F |
PUSH IY |
BDA1 |
POP HL |
BDA2 |
LD DE,$0008 |
BDA5 |
ADD HL,DE |
BDA6 |
LD DE,$B178 |
BDA9 |
LD BC,$0006 |
BDAC |
LDIR |
BDAE |
LD L,(IY+$00) |
BDB1 |
LD A,(IY+$01) |
BDB4 |
AND $0F |
BDB6 |
LD H,A |
BDB7 |
LD ($BA17),HL |
BDBA |
PUSH IY |
BDBC |
CALL $BDC2 |
BDBF |
POP IY |
BDC1 |
RET |
BDC2 |
CALL AdjustObjectTableForSum |
BDC5 |
LD ($BA13),IX |
BDC9 |
LD ($BA15),IX |
BDCD |
LD DE,($BA17) |
BDD1 |
LD HL,$994D |
BDD4 |
LD B,$01 |
BDD6 |
LD A,(HL) |
BDD7 |
INC HL |
BDD8 |
OR (HL) |
BDD9 |
DEC HL |
BDDA |
RET Z |
BDDB |
LD A,E |
BDDC |
CP (HL) |
BDDD |
JR NZ,$BDE5 |
BDDF |
INC HL |
BDE0 |
LD A,D |
BDE1 |
CP (HL) |
BDE2 |
DEC HL |
BDE3 |
JR Z,$BDEA |
BDE5 |
INC HL |
BDE6 |
INC HL |
BDE7 |
INC B |
BDE8 |
JR $BDD6 |
BDEA |
LD A,B |
BDEB |
LD ($BA1A),A |
BDEE |
LD A,$02 |
BDF0 |
LD ($A038),A |
BDF3 |
CALL $BE3C |
BDF6 |
CP $FF |
BDF8 |
RET Z |
BDF9 |
LD ($BA19),A |
BDFC |
CALL $BE3C |
BDFF |
CP $FF |
BE01 |
JR NZ,$BE3A |
BE03 |
LD A,($BA19) |
BE06 |
CALL $BE22 |
BE09 |
CALL $BE4B |
BE0C |
CP $FF |
BE0E |
RET Z |
BE0F |
LD ($BA1B),A |
BE12 |
CALL $BE4B |
BE15 |
CP $FF |
BE17 |
JR NZ,$BE3A |
BE19 |
LD A,($BA1B) |
BE1C |
CALL $BE22 |
BE1F |
OR $01 |
BE21 |
RET |
BE22 |
CALL FetchObjectDataPointer |
BE25 |
PUSH IX |
BE27 |
POP HL |
BE28 |
BIT 6,(IX+$05) |
BE2C |
LD DE,$9FF6 |
BE2F |
JR NZ,$BE34 |
BE31 |
LD DE,$9FFC |
BE34 |
LD BC,$0006 |
BE37 |
LDIR |
BE39 |
RET |
BE3A |
SCF |
BE3B |
RET |
BE3C |
LD IX,($BA13) |
BE40 |
LD HL,$B172 |
BE43 |
CALL $D36A |
BE46 |
LD ($BA13),IX |
BE4A |
RET |
BE4B |
LD IX,($BA15) |
BE4F |
LD HL,$B178 |
BE52 |
CALL $D36A |
BE55 |
LD ($BA15),IX |
BE59 |
RET |