30317: Routine at 766D
| 30317 |
LD B,4 |
| 30319 |
LD HL,24576 |
| 30322 |
PUSH BC |
| 30323 |
LD A,(HL) |
| 30324 |
AND A |
| 30325 |
JP Z,30419 |
| 30328 |
INC HL |
| 30329 |
LD C,(HL) |
| 30330 |
INC HL |
| 30331 |
INC HL |
| 30332 |
LD A,(HL) |
| 30333 |
AND 252 |
| 30335 |
NEG |
| 30337 |
ADD A,C |
| 30338 |
ADD A,16 |
| 30340 |
PUSH HL |
| 30341 |
DEC HL |
| 30342 |
LD H,(HL) |
| 30343 |
LD L,A |
| 30344 |
CALL ScreenAddress |
| 30347 |
LD DE,30434 |
| 30350 |
CALL 30427 |
| 30353 |
EX (SP),HL |
| 30354 |
LD A,(HL) |
| 30355 |
EX (SP),HL |
| 30356 |
SRL A |
| 30358 |
SRL A |
| 30360 |
SUB 4 |
| 30362 |
LD B,A |
| 30363 |
LD DE,30442 |
| 30366 |
CALL 30427 |
| 30369 |
DJNZ 30366 |
| 30371 |
LD DE,30450 |
| 30374 |
CALL 30427 |
| 30377 |
POP HL |
| 30378 |
LD A,(HL) |
| 30379 |
AND 252 |
| 30381 |
NEG |
| 30383 |
ADD A,C |
| 30384 |
ADD A,16 |
| 30386 |
PUSH HL |
| 30387 |
DEC HL |
| 30388 |
LD B,(HL) |
| 30389 |
DEC HL |
| 30390 |
DEC HL |
| 30391 |
LD C,(HL) |
| 30392 |
LD H,B |
| 30393 |
LD L,A |
| 30394 |
PUSH BC |
| 30395 |
CALL AttributeAddress |
| 30398 |
POP BC |
| 30399 |
EX (SP),HL |
| 30400 |
LD A,(HL) |
| 30401 |
EX (SP),HL |
| 30402 |
SRL A |
| 30404 |
SRL A |
| 30406 |
SUB 2 |
| 30408 |
LD B,A |
| 30409 |
LD A,C |
| 30410 |
LD (HL),A |
| 30411 |
INC HL |
| 30412 |
DJNZ 30410 |
| 30414 |
POP HL |
| 30415 |
INC HL |
| 30416 |
POP BC |
| 30417 |
JR 30424 |
| 30419 |
POP BC |
| 30420 |
INC HL |
| 30421 |
INC HL |
| 30422 |
INC HL |
| 30423 |
INC HL |
| 30424 |
DJNZ 30322 |
| 30426 |
RET |
| 30427 |
PUSH BC |
| 30428 |
PUSH DE |
| 30429 |
LD B,8 |
| 30431 |
JP PrintScreen_Loop |
