47648: Routine at BA20
47648 |
LD A,(41014) |
47651 |
LD HL,47719 |
47654 |
CP 3 |
47656 |
JR Z,47665 |
47658 |
LD HL,47975 |
47661 |
CP 2 |
47663 |
JR NZ,47668 |
47665 |
CALL 47678 |
47668 |
LD A,1 |
47670 |
POP HL |
47671 |
POP IY |
47673 |
POP IX |
47675 |
AND A |
47676 |
SCF |
47677 |
RET |
47678 |
PUSH IX |
47680 |
XOR A |
47681 |
LD (40939),A |
47684 |
LD E,(IX+5) |
47687 |
LD D,(IX+6) |
47690 |
PUSH DE |
47691 |
PUSH DE |
47692 |
POP IY |
47694 |
CALL 53723 |
47697 |
POP IX |
47699 |
PUSH AF |
47700 |
CALL 41391 |
47703 |
POP AF |
47704 |
POP IX |
47706 |
PUSH AF |
47707 |
CALL 47610 |
47710 |
POP AF |
47711 |
RET |
47712 |
NOP |
47713 |
NOP |
47714 |
NOP |
47715 |
NOP |
47716 |
NOP |
47717 |
NOP |
47718 |
NOP |
47719 |
LD (47712),A |
47722 |
LD (47713),A |
47725 |
CALL 48510 |
47728 |
JP C,48062 |
47731 |
JR Z,47782 |
47733 |
CALL 48459 |
47736 |
JR NZ,47749 |
47738 |
LD A,1 |
47740 |
CALL 47942 |
47743 |
LD (47717),IX |
47747 |
JR 47787 |
47749 |
CALL 48465 |
47752 |
JR NZ,47773 |
47754 |
LD A,2 |
47756 |
BIT 5,(IX+3) |
47760 |
JR NZ,47740 |
47762 |
CALL 53917 |
47765 |
CP 50 |
47767 |
LD A,3 |
47769 |
JR C,47740 |
47771 |
JR 47782 |
47773 |
CALL 53917 |
47776 |
CP 70 |
47778 |
LD A,4 |
47780 |
JR C,47740 |
47782 |
CALL 44713 |
47785 |
JR NZ,47725 |
47787 |
LD A,(47712) |
47790 |
AND A |
47791 |
JP Z,47935 |
47794 |
LD A,(47713) |
47797 |
AND A |
47798 |
JR Z,47894 |
47800 |
LD IX,40950 |
47804 |
CALL 41207 |
47807 |
JR Z,47861 |
47809 |
LD A,(47714) |
47812 |
CP (IX+0) |
47815 |
JR NZ,47804 |
47817 |
LD A,(47715) |
47820 |
CP (IX+1) |
47823 |
JR NZ,47804 |
47825 |
LD A,(47716) |
47828 |
CP (IX+2) |
47831 |
JR NZ,47804 |
47833 |
PUSH IY |
47835 |
PUSH IX |
47837 |
POP DE |
47838 |
LD IY,40948 |
47842 |
CALL 41220 |
47845 |
LD A,(IX-2) |
47848 |
LD (IY-2),A |
47851 |
LD A,(IX-1) |
47854 |
LD (IY-1),A |
47857 |
POP IY |
47859 |
JR 47866 |
47861 |
LD A,5 |
47863 |
CALL 41244 |
47866 |
LD A,(47714) |
47869 |
LD HL,(47715) |
47872 |
LD (IX+0),A |
47875 |
LD (IX+1),L |
47878 |
LD (IX+2),H |
47881 |
LD HL,(40948) |
47884 |
LD (40948),IX |
47888 |
LD (IX-2),L |
47891 |
LD (IX-1),H |
47894 |
LD A,(47712) |
47897 |
CP 1 |
47899 |
JR Z,47964 |
47901 |
CALL 53917 |
47904 |
CP 25 |
47906 |
JR C,47935 |
47908 |
LD IX,47714 |
47912 |
CALL 48390 |
47915 |
JR NZ,47935 |
47917 |
LD A,C |
47918 |
PUSH BC |
47919 |
CALL 42172 |
47922 |
POP AF |
47923 |
PUSH HL |
47924 |
CALL 42172 |
47927 |
PUSH HL |
47928 |
LD HL,28514 |
47931 |
CALL 42399 |
47934 |
RET |
47935 |
LD HL,28500 |
47938 |
CALL 42399 |
47941 |
RET |
47942 |
PUSH AF |
47943 |
LD A,1 |
47945 |
LD (47713),A |
47948 |
POP AF |
47949 |
LD (47712),A |
47952 |
LD HL,47641 |
47955 |
LD DE,47714 |
47958 |
LD BC,3 |
47961 |
LDIR |
47963 |
RET |
47964 |
LD IX,(47717) |
47968 |
LD L,(IX+3) |
47971 |
LD H,(IX+4) |
47974 |
JP (HL) |
47975 |
LD (47645),A |
47978 |
LD (47644),A |
47981 |
CALL 48510 |
47984 |
JP C,48062 |
47987 |
CALL 48161 |
47990 |
JR Z,47996 |
47992 |
LD HL,47644 |
47995 |
INC (HL) |
47996 |
CALL 44713 |
47999 |
JR NZ,47981 |
48001 |
LD A,(47644) |
48004 |
AND A |
48005 |
JR NZ,48014 |
48007 |
LD HL,29279 |
48010 |
CALL 42399 |
48013 |
RET |
48014 |
LD A,(47645) |
48017 |
AND A |
48018 |
JR Z,48073 |
48020 |
LD IX,(47646) |
48024 |
PUSH IX |
48026 |
CALL 48730 |
48029 |
LD A,(IX+3) |
48032 |
AND 192 |
48034 |
CP 128 |
48036 |
JR Z,48049 |
48038 |
BIT 3,(IX+3) |
48042 |
JR NZ,48049 |
48044 |
CALL 48754 |
48047 |
JR 48029 |
48049 |
POP IX |
48051 |
JR NZ,48068 |
48053 |
LD HL,29333 |
48056 |
PUSH IX |
48058 |
CALL 42399 |
48061 |
RET |
48062 |
LD HL,29251 |
48065 |
JP 42399 |
48068 |
LD HL,29350 |
48071 |
JR 48056 |
48073 |
CALL 48198 |
48076 |
CALL 48284 |
48079 |
LD A,B |
48080 |
AND A |
48081 |
JR NZ,48101 |
48083 |
CALL 48244 |
48086 |
AND A |
48087 |
JR Z,48094 |
48089 |
LD HL,29373 |
48092 |
JR 48056 |
48094 |
LD HL,29310 |
48097 |
CALL 42399 |
48100 |
RET |