46410: Routine at B54A
46410 |
LD A,(46409) |
46413 |
INC A |
46414 |
JR NZ,46454 |
46416 |
LD (46409),A |
46419 |
LD A,(45433) |
46422 |
BIT 7,A |
46424 |
JR Z,46454 |
46426 |
LD A,254 |
46428 |
LD (41013),A |
46431 |
LD HL,(45432) |
46434 |
LD (41009),HL |
46437 |
OR 1 |
46439 |
RET |
46440 |
LD A,(40976) |
46443 |
CP 5 |
46445 |
JR Z,46410 |
46447 |
LD A,(45433) |
46450 |
BIT 7,A |
46452 |
JR Z,46459 |
46454 |
LD A,255 |
46456 |
CP 255 |
46458 |
RET |
46459 |
PUSH IY |
46461 |
LD IX,(45440) |
46465 |
LD A,(40989) |
46468 |
AND 1 |
46470 |
LD (41016),A |
46473 |
LD A,(40976) |
46476 |
CP 5 |
46478 |
LD IY,54171 |
46482 |
JR C,46488 |
46484 |
LD IY,54122 |
46488 |
CALL 46500 |
46491 |
CP 255 |
46493 |
LD (45440),IX |
46497 |
POP IY |
46499 |
RET |
46500 |
LD HL,45432 |
46503 |
CALL 46240 |
46506 |
CP 255 |
46508 |
RET Z |
46509 |
LD (41013),A |
46512 |
LD HL,45422 |
46515 |
SET 1,(HL) |
46517 |
RET |
46518 |
LD (40987),A |
46521 |
LD IX,(40946) |
46525 |
LD (40944),IX |
46529 |
LD L,(IX-2) |
46532 |
LD H,(IX-1) |
46535 |
LD (40946),HL |
46538 |
LD (IX-2),0 |
46542 |
LD (IX-1),0 |
46546 |
RET |
46547 |
LD A,(45422) |
46550 |
BIT 0,A |
46552 |
JR Z,46608 |
46554 |
LD A,(45443) |
46557 |
LD HL,45432 |
46560 |
JR 46575 |
46562 |
LD A,(45421) |
46565 |
BIT 0,A |
46567 |
JR Z,46588 |
46569 |
LD A,(45442) |
46572 |
LD HL,45426 |
46575 |
CALL 47164 |
46578 |
CALL 46518 |
46581 |
LD HL,26760 |
46584 |
CALL 42399 |
46587 |
RET |
46588 |
CALL 46643 |
46591 |
LD HL,(45446) |
46594 |
PUSH HL |
46595 |
LD A,(45442) |
46598 |
CALL 46518 |
46601 |
LD HL,26752 |
46604 |
CALL 42399 |
46607 |
RET |
46608 |
CALL 46639 |
46611 |
LD HL,0 |
46614 |
PUSH HL |
46615 |
LD HL,45426 |
46618 |
PUSH HL |
46619 |
CALL 46643 |
46622 |
LD HL,(45446) |
46625 |
PUSH HL |
46626 |
LD A,(45443) |
46629 |
CALL 46518 |
46632 |
LD HL,26748 |
46635 |
CALL 42399 |
46638 |
RET |
46639 |
LD A,40 |
46641 |
JR 46645 |
46643 |
LD A,32 |
46645 |
LD (46665),A |
46648 |
LD (46680),A |
46651 |
LD IX,(45454) |
46655 |
LD L,(IX+4) |
46658 |
LD H,(IX+5) |
46661 |
BIT 7,(IX+7) |
46665 |
JR NZ,46670 |
46667 |
LD HL,0 |
46670 |
EX (SP),HL |
46671 |
PUSH HL |
46672 |
LD L,(IX+2) |
46675 |
LD H,(IX+3) |
46678 |
BIT 5,H |
46680 |
JR NZ,46685 |
46682 |
LD HL,0 |
46685 |
EX (SP),HL |
46686 |
JP (HL) |
46687 |
LD A,(40975) |
46690 |
CP 5 |
46692 |
JR Z,46705 |
46694 |
CP 6 |
46696 |
JR Z,46705 |
46698 |
LD A,(45427) |
46701 |
BIT 7,A |
46703 |
JR Z,46712 |
46705 |
LD HL,26709 |
46708 |
CALL 42399 |
46711 |
RET |
46712 |
LD HL,45421 |
46715 |
BIT 0,(HL) |
46717 |
LD HL,45426 |
46720 |
CALL NZ,46810 |
46723 |
CALL 46643 |
46726 |
LD A,(45421) |
46729 |
LD HL,45426 |
46732 |
LD DE,(45446) |
46736 |
PUSH DE |
46737 |
BIT 0,A |
46739 |
JR Z,46749 |
46741 |
CALL 47164 |
46744 |
LD HL,1459 |
46747 |
JR 46758 |
46749 |
LD HL,0 |
46752 |
PUSH HL |
46753 |
PUSH HL |
46754 |
PUSH HL |
46755 |
LD HL,1499 |
46758 |
PUSH HL |
46759 |
LD HL,26772 |
46762 |
CALL 42399 |
46765 |
RET |
46766 |
LD A,(40976) |
46769 |
CP 5 |
46771 |
JR Z,46705 |
46773 |
CP 6 |
46775 |
JR Z,46705 |
46777 |
LD A,(45433) |
46780 |
BIT 7,A |
46782 |
JR NZ,46705 |
46784 |
LD HL,45422 |
46787 |
BIT 0,(HL) |
46789 |
LD HL,45432 |
46792 |
CALL NZ,46832 |
46795 |
CALL 46639 |
46798 |
LD A,(45422) |
46801 |
LD HL,45432 |
46804 |
JR 46732 |