25850: Routine at 64FA
| 25850 |
CALL 25837 |
| 25853 |
DEC E |
| 25854 |
JP Z,27251 |
| 25857 |
CALL 27202 |
| 25860 |
DEC E |
| 25861 |
JR NZ,25868 |
| 25863 |
LD A,C |
| 25864 |
AND A |
| 25865 |
JP NZ,26042 |
| 25868 |
BIT 3,(IX+4) |
| 25872 |
JP NZ,27450 |
| 25875 |
CALL 25677 |
| 25878 |
DEC E |
| 25879 |
JP Z,26524 |
| 25882 |
BIT 2,(IX+4) |
| 25886 |
JR Z,25898 |
| 25888 |
DEC (IX+5) |
| 25891 |
JP NZ,26015 |
| 25894 |
RES 2,(IX+4) |
| 25898 |
BIT 0,(IX+4) |
| 25902 |
JR NZ,25941 |
| 25904 |
LD A,(24089) |
| 25907 |
LD E,A |
| 25908 |
AND 31 |
| 25910 |
JR NZ,25941 |
| 25912 |
SET 0,(IX+4) |
| 25916 |
LD A,(24087) |
| 25919 |
AND 31 |
| 25921 |
ADD A,16 |
| 25923 |
LD A,(IX+6) |
| 25926 |
LD A,E |
| 25927 |
AND 128 |
| 25929 |
LD E,A |
| 25930 |
LD A,(IX+0) |
| 25933 |
AND 127 |
| 25935 |
OR E |
| 25936 |
LD (IX+0),A |
| 25939 |
JR 25868 |
| 25941 |
BIT 0,(IX+4) |
| 25945 |
JR Z,25991 |
| 25947 |
LD A,(IX+1) |
| 25950 |
CP 24 |
| 25952 |
JR C,25991 |
| 25954 |
CP 216 |
| 25956 |
JR NC,25991 |
| 25958 |
LD A,(IX+2) |
| 25961 |
BIT 7,(IX+0) |
| 25965 |
JR Z,26018 |
| 25967 |
ADD A,2 |
| 25969 |
CP 184 |
| 25971 |
JR C,25979 |
| 25973 |
RES 7,(IX+0) |
| 25977 |
JR 25982 |
| 25979 |
LD (IX+2),A |
| 25982 |
DEC (IX+6) |
| 25985 |
JR NZ,25991 |
| 25987 |
RES 0,(IX+4) |
| 25991 |
LD A,(IX+1) |
| 25994 |
BIT 6,(IX+0) |
| 25998 |
JR Z,26030 |
| 26000 |
ADD A,2 |
| 26002 |
CP 216 |
| 26004 |
JR C,26012 |
| 26006 |
RES 6,(IX+0) |
| 26010 |
JR 26015 |
| 26012 |
LD (IX+1),A |
| 26015 |
JP 28465 |
| 26018 |
SUB 2 |
| 26020 |
CP 40 |
| 26022 |
JR NC,25979 |
| 26024 |
SET 7,(IX+0) |
| 26028 |
JR 25979 |
| 26030 |
SUB 2 |
| 26032 |
CP 24 |
| 26034 |
JR NC,26012 |
| 26036 |
SET 6,(IX+0) |
| 26040 |
JR 26015 |
| 26042 |
AND 63 |
| 26044 |
CP 18 |
| 26046 |
JR Z,26070 |
| 26048 |
CP 8 |
| 26050 |
JP NZ,25868 |
| 26053 |
CALL 26059 |
| 26056 |
JP 25868 |
| 26059 |
SET 2,(IX+4) |
| 26063 |
LD (IX+5),16 |
| 26067 |
JP 25715 |
| 26070 |
LD BC,117 |
| 26073 |
CALL AddPointsToScore |
| 26076 |
LD A,(IX+0) |
| 26079 |
LD (IX+5),0 |
| 26083 |
LD (IX+6),A |
| 26086 |
LD (IX+0),20 |
| 26090 |
LD (IX+4),0 |
| 26094 |
JP 25733 |
| 26097 |
LD (IX+5),1 |
| 26101 |
JR 26083 |