B936: Routine at B936
| B936 |
PUSH IX |
| B938 |
PUSH IY |
| B93A |
PUSH HL |
| B93B |
LD ($B935),A |
| B93E |
CALL $B90E |
| B941 |
LD A,(IX+$07) |
| B944 |
CP $02 |
| B946 |
JP Z,$BA20 |
| B949 |
LD A,(IX+$01) |
| B94C |
CP $FF |
| B94E |
JR Z,$B98C |
| B950 |
LD A,($B935) |
| B953 |
LD ($B934),A |
| B956 |
LD A,(IX+$02) |
| B959 |
LD ($A01C),A |
| B95C |
LD C,(IX+$03) |
| B95F |
LD B,(IX+$04) |
| B962 |
LD ($B17E),BC |
| B966 |
CALL $B191 |
| B969 |
JR Z,$B9B4 |
| B96B |
LD IX,($B866) |
| B96F |
LD BC,($B17E) |
| B973 |
LD (IX+$03),C |
| B976 |
LD (IX+$04),B |
| B979 |
LD A,($A01C) |
| B97C |
LD (IX+$02),A |
| B97F |
AND A |
| B980 |
CALL Z,$B9CA |
| B983 |
LD A,$01 |
| B985 |
POP HL |
| B986 |
POP IY |
| B988 |
POP IX |
| B98A |
AND A |
| B98B |
RET |
| B98C |
LD A,(IX+$02) |
| B98F |
CALL $CEDE |
| B992 |
LD ($A033),A |
| B995 |
LD A,(IX+$03) |
| B998 |
CALL $CEDE |
| B99B |
LD ($A034),A |
| B99E |
LD A,(IX+$04) |
| B9A1 |
CALL $CEDE |
| B9A4 |
LD ($A035),A |
| B9A7 |
CALL $B9FA |
| B9AA |
JR $B983 |
| B9AC |
CALL $B9CA |
| B9AF |
JR NZ,$B9AC |
| B9B1 |
XOR A |
| B9B2 |
JR $B985 |
| B9B4 |
LD A,($A01C) |
| B9B7 |
AND A |
| B9B8 |
JR Z,$B9AC |
| B9BA |
LD IX,($B866) |
| B9BE |
LD (IX+$02),$00 |
| B9C2 |
CALL $B9CA |
| B9C5 |
JR Z,$B9B1 |
| B9C7 |
JP $B93E |
| B9CA |
LD IX,($B866) |
| B9CE |
LD L,(IY-$02) |
| B9D1 |
LD H,(IY-$01) |
| B9D4 |
LD (IX+$05),L |
| B9D7 |
LD (IX+$06),H |
| B9DA |
PUSH IX |
| B9DC |
PUSH IY |
| B9DE |
POP IX |
| B9E0 |
CALL $A1C7 |
| B9E3 |
POP IX |
| B9E5 |
LD A,L |
| B9E6 |
OR H |
| B9E7 |
JR Z,$B9F5 |
| B9E9 |
PUSH HL |
| B9EA |
POP IY |
| B9EC |
BIT 6,(IY+$01) |
| B9F0 |
JR NZ,$B9CE |
| B9F2 |
OR $01 |
| B9F4 |
RET |
| B9F5 |
CALL $B9FA |
| B9F8 |
XOR A |
| B9F9 |
RET |
