38193: Routine at 9531
38193 |
LD HL,24158 |
38196 |
INC (HL) |
38197 |
LD A,(IX+4) |
38200 |
ADD A,2 |
38202 |
CP 176 |
38204 |
JR NC,38323 |
38206 |
LD (IX+4),A |
38209 |
LD A,(24130) |
38212 |
AND 7 |
38214 |
ADD A,80 |
38216 |
LD (IX+0),A |
38219 |
LD A,(IX+10) |
38222 |
AND A |
38223 |
JR NZ,38239 |
38225 |
BIT 0,(IX+8) |
38229 |
JR NZ,38239 |
38231 |
INC (IX+23) |
38234 |
JR NZ,38243 |
38236 |
JP 39223 |
38239 |
LD (IX+23),0 |
38243 |
LD H,(IX+3) |
38246 |
LD L,(IX+2) |
38249 |
LD A,(IX+5) |
38252 |
LD D,0 |
38254 |
SRA A |
38256 |
SRA A |
38258 |
SRA A |
38260 |
SRA A |
38262 |
JP P,38267 |
38265 |
LD D,255 |
38267 |
LD E,A |
38268 |
ADD HL,DE |
38269 |
LD A,H |
38270 |
AND 31 |
38272 |
LD (IX+3),A |
38275 |
LD (IX+2),L |
38278 |
CALL 34561 |
38281 |
CALL 34611 |
38284 |
BIT 0,(IX+16) |
38288 |
JR Z,38313 |
38290 |
LD A,(IX+0) |
38293 |
RRA |
38294 |
RRA |
38295 |
RRA |
38296 |
AND 31 |
38298 |
ADD A,1 |
38300 |
DAA |
38301 |
LD L,A |
38302 |
LD H,0 |
38304 |
ADD HL,HL |
38305 |
ADD HL,HL |
38306 |
ADD HL,HL |
38307 |
ADD HL,HL |
38308 |
LD B,H |
38309 |
LD C,L |
38310 |
CALL AddPointsToScore |
38313 |
CALL 42854 |
38316 |
CALL 45730 |
38319 |
RET NC |
38320 |
CALL 45783 |
38323 |
JP 42859 |