37346: Routine at 91E2
| 37346 |
LD A,(24172) |
| 37349 |
AND A |
| 37350 |
JR NZ,37479 |
| 37352 |
LD HL,36864 |
| 37355 |
LD (24718),HL |
| 37358 |
LD A,H |
| 37359 |
LD HL,4160 |
| 37362 |
CALL DrawGauge |
| 37365 |
CALL HandlerControls |
| 37368 |
BIT 0,A |
| 37370 |
JP Z,37579 |
| 37373 |
BIT 1,A |
| 37375 |
JP Z,37562 |
| 37378 |
LD A,(IX+5) |
| 37381 |
AND A |
| 37382 |
JR Z,37393 |
| 37384 |
JP P,37391 |
| 37387 |
ADD A,1 |
| 37389 |
JR 37393 |
| 37391 |
SUB 1 |
| 37393 |
LD (IX+5),A |
| 37396 |
LD HL,(24698) |
| 37399 |
BIT 7,(IX+5) |
| 37403 |
JP NZ,37556 |
| 37406 |
LD DE,65528 |
| 37409 |
ADD HL,DE |
| 37410 |
SRA H |
| 37412 |
RR L |
| 37414 |
SRA H |
| 37416 |
RR L |
| 37418 |
SRA H |
| 37420 |
RR L |
| 37422 |
LD A,H |
| 37423 |
AND %00000011 |
| 37425 |
LD H,A |
| 37426 |
LD B,6 |
| 37428 |
EX DE,HL |
| 37429 |
LD HL,28672 |
| 37432 |
ADD HL,DE |
| 37433 |
LD A,(HL) |
| 37434 |
AND A |
| 37435 |
JR Z,37450 |
| 37437 |
AND %00001000 |
| 37439 |
JR NZ,37450 |
| 37441 |
INC DE |
| 37442 |
LD A,D |
| 37443 |
AND %00000011 |
| 37445 |
LD D,A |
| 37446 |
DJNZ 37429 |
| 37448 |
JR 37456 |
| 37450 |
LD (IX+5),0 |
| 37454 |
JR 37476 |
| 37456 |
LD A,(IX+5) |
| 37459 |
AND A |
| 37460 |
JR Z,37476 |
| 37462 |
JP M,37543 |
| 37465 |
LD A,(IX+2) |
| 37468 |
RRA |
| 37469 |
AND 3 |
| 37471 |
ADD A,22 |
| 37473 |
LD (IX+0),A |
| 37476 |
CALL 36987 |
| 37479 |
CALL 34684 |
| 37482 |
LD A,(24172) |
| 37485 |
AND A |
| 37486 |
JR Z,37495 |
| 37488 |
INC A |
| 37489 |
LD (24172),A |
| 37492 |
JP 40767 |
| 37495 |
CALL 47230 |
| 37498 |
LD DE,48286 |
| 37501 |
CALL 35082 |
| 37504 |
CALL 44322 |
| 37507 |
CALL 37694 |
| 37510 |
CALL NZ,37596 |
| 37513 |
LD A,(65364) |
| 37516 |
CP 81 |
| 37518 |
RET NZ |
| 37519 |
LD A,(24128) |
| 37522 |
AND 127 |
| 37524 |
RET NZ |
| 37525 |
LD A,(24130) |
| 37528 |
AND 14 |
| 37530 |
LD C,A |
| 37531 |
LD B,0 |
| 37533 |
LD HL,40368 |
| 37536 |
ADD HL,BC |
| 37537 |
LD E,(HL) |
| 37538 |
INC HL |
| 37539 |
LD D,(HL) |
| 37540 |
JP 47548 |
| 37543 |
LD A,(IX+2) |
| 37546 |
RRA |
| 37547 |
AND 3 |
| 37549 |
ADD A,18 |
| 37551 |
LD (IX+0),A |
| 37554 |
JR 37476 |
| 37556 |
LD DE,65520 |
| 37559 |
JP 37409 |
| 37562 |
LD A,(IX+5) |
| 37565 |
AND A |
| 37566 |
JP P,37574 |
| 37569 |
CP 232 |
| 37571 |
JP C,37393 |
| 37574 |
SUB 2 |
| 37576 |
JP 37393 |
| 37579 |
LD A,(IX+5) |
| 37582 |
AND A |
| 37583 |
JP M,37591 |
| 37586 |
CP 40 |
| 37588 |
JP NC,37393 |
| 37591 |
ADD A,2 |
| 37593 |
JP 37393 |
| 37596 |
CALL 47299 |
| 37599 |
LD HL,24698 |
| 37602 |
LD DE,24722 |
| 37605 |
LD BC,14 |
| 37608 |
LDIR |
| 37610 |
LD (IX+1),120 |
| 37614 |
LD A,(IX+0) |
| 37617 |
CP 22 |
| 37619 |
JR NC,37636 |
| 37621 |
LD (IX+0),9 |
| 37625 |
LD A,26 |
| 37627 |
LD (24720),A |
| 37630 |
CALL 34356 |
| 37633 |
JP 44339 |
| 37636 |
LD (IX+0),13 |
| 37640 |
LD A,34 |
| 37642 |
JR 37627 |
