27288: Routine at 6A98
| 27288 |
CALL 25837 |
| 27291 |
DEC E |
| 27292 |
JP Z,27251 |
| 27295 |
CALL 27202 |
| 27298 |
DEC E |
| 27299 |
JR NZ,27306 |
| 27301 |
LD A,C |
| 27302 |
AND A |
| 27303 |
JP NZ,27424 |
| 27306 |
BIT 3,(IX+4) |
| 27310 |
JP NZ,27450 |
| 27313 |
CALL 25677 |
| 27316 |
DEC E |
| 27317 |
JP Z,26524 |
| 27320 |
LD A,(IX+5) |
| 27323 |
AND A |
| 27324 |
JR Z,27331 |
| 27326 |
DEC (IX+5) |
| 27329 |
JR 27385 |
| 27331 |
LD A,(24087) |
| 27334 |
AND 3 |
| 27336 |
JR NZ,27385 |
| 27338 |
LD A,(IX+1) |
| 27341 |
CP 24 |
| 27343 |
JR C,27367 |
| 27345 |
CP 208 |
| 27347 |
JR NC,27367 |
| 27349 |
LD A,(IX+2) |
| 27352 |
BIT 7,(IX+0) |
| 27356 |
JR Z,27388 |
| 27358 |
ADD A,1 |
| 27360 |
CP 184 |
| 27362 |
JR NC,27400 |
| 27364 |
LD (IX+2),A |
| 27367 |
LD A,(IX+1) |
| 27370 |
BIT 6,(IX+0) |
| 27374 |
JR Z,27406 |
| 27376 |
ADD A,4 |
| 27378 |
CP 208 |
| 27380 |
JR NC,27418 |
| 27382 |
LD (IX+1),A |
| 27385 |
JP 28465 |
| 27388 |
SUB 1 |
| 27390 |
CP 40 |
| 27392 |
JR NC,27364 |
| 27394 |
SET 7,(IX+0) |
| 27398 |
JR 27367 |
| 27400 |
RES 7,(IX+0) |
| 27404 |
JR 27367 |
| 27406 |
SUB 4 |
| 27408 |
CP 24 |
| 27410 |
JR NC,27382 |
| 27412 |
SET 6,(IX+0) |
| 27416 |
JR 27385 |
| 27418 |
RES 6,(IX+0) |
| 27422 |
JR 27385 |
| 27424 |
AND 63 |
| 27426 |
CP 18 |
| 27428 |
JR Z,27444 |
| 27430 |
CP 8 |
| 27432 |
JP Z,27306 |
| 27435 |
LD BC,53 |
| 27438 |
CALL AddPointsToScore |
| 27441 |
JP 26076 |
| 27444 |
CALL 26059 |
| 27447 |
JP 27306 |
| 27450 |
INC (IX+5) |
| 27453 |
LD A,(24123) |
| 27456 |
INC A |
| 27457 |
LD (24123),A |
| 27460 |
BIT 3,(IX+5) |
| 27464 |
LD A,(IX+6) |
| 27467 |
JR NZ,27470 |
| 27469 |
DEC A |
| 27470 |
LD (IX+2),A |
| 27473 |
LD A,(24206) |
| 27476 |
SRL A |
| 27478 |
SUB 2 |
| 27480 |
LD C,A |
| 27481 |
LD A,(IX+2) |
| 27484 |
SRL A |
| 27486 |
SUB C |
| 27487 |
JP NC,27385 |
| 27490 |
RES 3,(IX+4) |
| 27494 |
XOR A |
| 27495 |
LD (IX+5),A |
| 27498 |
LD (IX+6),A |
| 27501 |
JP 27385 |
| 27504 |
LD A,(23672) |
| 27507 |
AND 7 |
| 27509 |
RET NZ |
| 27510 |
LD HL,24188 |
| 27513 |
LD DE,8 |
| 27516 |
LD B,2 |
| 27518 |
LD A,(HL) |
| 27519 |
AND A |
| 27520 |
JR Z,27526 |
| 27522 |
ADD HL,DE |
| 27523 |
DJNZ 27518 |
| 27525 |
RET |
| 27526 |
LD (24092),HL |
| 27529 |
LD DE,24175 |
| 27532 |
LD A,(DE) |
| 27533 |
CP 66 |
| 27535 |
JP Z,27067 |
| 27538 |
CP 70 |
| 27540 |
JP Z,26996 |
| 27543 |
CALL 26987 |
| 27546 |
JR Z,27591 |
| 27548 |
CP 48 |
| 27550 |
RET C |
| 27551 |
SUB 12 |
| 27553 |
LD (HL),68 |
| 27555 |
LD B,71 |
| 27557 |
INC HL |
| 27558 |
LD (HL),A |
| 27559 |
INC DE |
| 27560 |
INC HL |
| 27561 |
LD A,(DE) |
| 27562 |
SUB 12 |
| 27564 |
LD (HL),A |
| 27565 |
INC HL |
| 27566 |
LD (HL),B |
| 27567 |
INC HL |
| 27568 |
XOR A |
| 27569 |
LD (HL),A |
| 27570 |
INC HL |
| 27571 |
LD (HL),A |
| 27572 |
LD HL,(24092) |
| 27575 |
LD A,(HL) |
| 27576 |
AND 63 |
| 27578 |
CP 8 |
| 27580 |
JP Z,25758 |
| 27583 |
CP 18 |
| 27585 |
JP Z,25784 |
| 27588 |
JP 25801 |
| 27591 |
CP 192 |
| 27593 |
RET NC |
| 27594 |
ADD A,24 |
| 27596 |
LD (HL),4 |
| 27598 |
JR 27555 |
