51233: Routine at C821
51233 |
PUSH IX |
51235 |
PUSH BC |
51236 |
CALL 53815 |
51239 |
LD B,A |
51240 |
LD A,(41014) |
51243 |
CALL 51299 |
51246 |
CP B |
51247 |
JR Z,51293 |
51249 |
BIT 7,(IX+5) |
51253 |
JR Z,51290 |
51255 |
LD C,A |
51256 |
LD A,B |
51257 |
LD B,C |
51258 |
CALL 51299 |
51261 |
LD C,A |
51262 |
LD A,(41014) |
51265 |
CP C |
51266 |
JR Z,51293 |
51268 |
LD A,C |
51269 |
CP B |
51270 |
JR NZ,51290 |
51272 |
INC A |
51273 |
JR NZ,51293 |
51275 |
LD B,(IX+0) |
51278 |
LD A,(40970) |
51281 |
CP (IX+15) |
51284 |
JR Z,51293 |
51286 |
INC IX |
51288 |
DJNZ 51281 |
51290 |
XOR A |
51291 |
JR 51295 |
51293 |
OR 1 |
51295 |
POP BC |
51296 |
POP IX |
51298 |
RET |