34166: Routine at 8576
|
34166 |
PUSH HL |
|
34167 |
LD L,A |
|
34168 |
LD A,(46842) |
|
34171 |
LD H,A |
|
34172 |
LD A,(46850) |
|
34175 |
AND H |
|
34176 |
LD A,L |
|
34177 |
POP HL |
|
34178 |
RET |
|
34179 |
PUSH AF |
|
34180 |
LD A,13 |
|
34182 |
CALL 34187 |
|
34185 |
POP AF |
|
34186 |
RET |
|
34187 |
CALL 34166 |
|
34190 |
RET Z |
|
34191 |
PUSH AF |
|
34192 |
LD A,(46849) |
|
34195 |
AND A |
|
34196 |
JR NZ,34231 |
|
34198 |
POP AF |
|
34199 |
CALL 34465 |
|
34202 |
PUSH AF |
|
34203 |
LD A,(46848) |
|
34206 |
AND A |
|
34207 |
JR NZ,34211 |
|
34209 |
POP AF |
|
34210 |
RET |
|
34211 |
POP AF |
|
34212 |
CP 83 |
|
34214 |
JR Z,34219 |
|
34216 |
CP 115 |
|
34218 |
RET NZ |
|
34219 |
PUSH AF |
|
34220 |
LD A,72 |
|
34222 |
CALL 34465 |
|
34225 |
POP AF |
|
34226 |
RET |
|
34227 |
NOP |
PercentageBuffer |
34228 |
DEFB 0,0,0 |
|
34231 |
POP AF |
|
34232 |
PUSH HL |
|
34233 |
PUSH AF |
|
34234 |
LD HL,(34228) |
|
34237 |
CP 13 |
|
34239 |
JR NZ,34248 |
|
34241 |
LD A,32 |
|
34243 |
CALL PrintChar |
|
34246 |
JR 34271 |
|
34248 |
CP 8 |
|
34250 |
JR Z,34293 |
|
34252 |
CP 97 |
|
34254 |
JR C,34262 |
|
34256 |
CP 123 |
|
34258 |
JR NC,34262 |
|
34260 |
AND 95 |
|
34262 |
CALL PrintChar |
|
34265 |
LD A,(34227) |
|
34268 |
DEC A |
|
34269 |
JR NZ,34278 |
|
34271 |
LD L,224 |
|
34273 |
CALL 34317 |
|
34276 |
LD A,32 |
|
34278 |
LD (34227),A |
|
34281 |
LD A,(34230) |
|
34284 |
LD (34228),HL |
|
34287 |
CALL PrintChar |
|
34290 |
POP AF |
|
34291 |
POP HL |
|
34292 |
RET |
|
34293 |
LD A,32 |
|
34295 |
CALL PrintChar |
|
34298 |
DEC L |
|
34299 |
DEC L |
|
34300 |
LD A,(34227) |
|
34303 |
INC A |
|
34304 |
CP 33 |
|
34306 |
JR NZ,34278 |
|
34308 |
LD L,255 |
|
34310 |
CALL 34378 |
|
34313 |
LD A,1 |
|
34315 |
JR 34278 |
|
34317 |
PUSH HL |
|
34318 |
PUSH DE |
|
34319 |
PUSH BC |
|
34320 |
PUSH AF |
|
34321 |
LD HL,20608 |
|
34324 |
LD DE,20576 |
|
34327 |
LD A,4 |
|
34329 |
LD B,0 |
|
34331 |
PUSH HL |
|
34332 |
PUSH DE |
|
34333 |
LD C,8 |
|
34335 |
PUSH HL |
|
34336 |
PUSH DE |
|
34337 |
PUSH BC |
|
34338 |
LD C,32 |
|
34340 |
LDIR |
|
34342 |
POP BC |
|
34343 |
POP DE |
|
34344 |
POP HL |
|
34345 |
INC H |
|
34346 |
INC D |
|
34347 |
DEC C |
|
34348 |
JR NZ,34335 |
|
34350 |
POP DE |
|
34351 |
POP HL |
|
34352 |
LD C,32 |
|
34354 |
ADD HL,BC |
|
34355 |
EX DE,HL |
|
34356 |
ADD HL,BC |
|
34357 |
EX DE,HL |
|
34358 |
DEC A |
|
34359 |
JR NZ,34331 |
|
34361 |
LD B,32 |
|
34363 |
LD HL,20704 |
|
34366 |
LD A,32 |
|
34368 |
CALL PrintChar |
|
34371 |
DJNZ 34368 |
|
34373 |
POP AF |
|
34374 |
POP BC |
|
34375 |
POP DE |
|
34376 |
POP HL |
|
34377 |
RET |
|
34378 |
PUSH HL |
|
34379 |
PUSH DE |
|
34380 |
PUSH BC |
|
34381 |
PUSH AF |
|
34382 |
LD HL,20672 |
|
34385 |
LD DE,20704 |
|
34388 |
LD A,5 |
|
34390 |
PUSH HL |
|
34391 |
PUSH DE |
|
34392 |
LD B,8 |
|
34394 |
PUSH HL |
|
34395 |
PUSH DE |
|
34396 |
PUSH BC |
|
34397 |
LD BC,32 |
|
34400 |
LDIR |
|
34402 |
POP BC |
|
34403 |
POP DE |
|
34404 |
POP HL |
|
34405 |
INC H |
|
34406 |
INC D |
|
34407 |
DJNZ 34394 |
|
34409 |
POP DE |
|
34410 |
POP HL |
|
34411 |
LD BC,65504 |
|
34414 |
ADD HL,BC |
|
34415 |
EX DE,HL |
|
34416 |
ADD HL,BC |
|
34417 |
EX DE,HL |
|
34418 |
DEC A |
|
34419 |
JR NZ,34390 |
|
34421 |
POP AF |
|
34422 |
POP BC |
|
34423 |
POP DE |
|
34424 |
POP HL |
|
34425 |
RET |