53924: Routine at D2A4
| 53924 |
CALL 53933 |
| 53927 |
BIT 7,A |
| 53929 |
RET Z |
| 53930 |
NEG |
| 53932 |
RET |
| 53933 |
PUSH IX |
| 53935 |
PUSH BC |
| 53936 |
LD C,A |
| 53937 |
SLA A |
| 53939 |
JR NC,53943 |
| 53941 |
LD A,255 |
| 53943 |
LD B,A |
| 53944 |
LD IX,41017 |
| 53948 |
INC (IX+1) |
| 53951 |
JR NZ,53956 |
| 53953 |
INC (IX+0) |
| 53956 |
LD IX,(41017) |
| 53960 |
LD A,(41015) |
| 53963 |
ADC A,(IX+0) |
| 53966 |
ADD IX,DE |
| 53968 |
XOR (IX+1) |
| 53971 |
PUSH HL |
| 53972 |
LD HL,41015 |
| 53975 |
CP (HL) |
| 53976 |
POP HL |
| 53977 |
JR Z,53944 |
| 53979 |
LD (41015),A |
| 53982 |
CP B |
| 53983 |
JR C,53992 |
| 53985 |
JR Z,53992 |
| 53987 |
SRL A |
| 53989 |
JP 53982 |
| 53992 |
SUB C |
| 53993 |
POP BC |
| 53994 |
POP IX |
| 53996 |
RET |
| 53997 |
PUSH BC |
| 53998 |
LD B,1 |
| 54000 |
JR 54005 |
