46471: Routine at B587
46471 |
LD HL,192 |
46474 |
LD (65122),HL |
46477 |
LD HL,1 |
46480 |
LD (65142),HL |
46483 |
CALL 46429 |
46486 |
LD A,253 |
46488 |
IN A,(254) |
46490 |
AND 2 |
46492 |
JP Z,45244 |
46495 |
LD A,(65134) |
46498 |
AND 128 |
46500 |
JP NZ,46471 |
46503 |
LD A,(65119) |
46506 |
AND A |
46507 |
JP P,46471 |
46510 |
LD HL,61440 |
46513 |
LD (65118),HL |
46516 |
LD HL,10240 |
46519 |
LD (65120),HL |
46522 |
LD A,64 |
46524 |
LD (65126),A |
46527 |
LD (65130),A |
46530 |
LD HL,64 |
46533 |
LD (65122),HL |
46536 |
LD HL,3 |
46539 |
LD (65142),HL |
46542 |
CALL 46429 |
46545 |
LD A,253 |
46547 |
IN A,(254) |
46549 |
AND 2 |
46551 |
JP Z,45244 |
46554 |
LD A,(65134) |
46557 |
AND 64 |
46559 |
JP NZ,46530 |
46562 |
LD A,(65119) |
46565 |
AND A |
46566 |
JP M,46530 |
46569 |
LD A,255 |
46571 |
LD (65172),A |
46574 |
LD HL,65436 |
46577 |
LD (65174),HL |
46580 |
LD A,160 |
46582 |
LD (65130),A |
46585 |
LD HL,43008 |
46588 |
LD (65120),HL |
46591 |
LD HL,4096 |
46594 |
LD (65166),HL |
46597 |
LD HL,0 |
46600 |
LD (65122),HL |
46603 |
LD HL,5 |
46606 |
LD (65142),HL |
46609 |
CALL 46429 |
46612 |
LD A,253 |
46614 |
IN A,(254) |
46616 |
AND 2 |
46618 |
JP Z,45244 |
46621 |
LD A,(65134) |
46624 |
AND 32 |
46626 |
JP NZ,46597 |
46629 |
LD A,(65167) |
46632 |
AND A |
46633 |
JP P,46597 |
46636 |
LD A,3 |
46638 |
LD (65144),A |
46641 |
LD HL,30000 |
46644 |
LD (65136),HL |
46647 |
LD HL,2 |
46650 |
LD (65142),HL |
46653 |
CALL 46429 |
46656 |
LD A,253 |
46658 |
IN A,(254) |
46660 |
AND 2 |
46662 |
JP Z,45244 |
46665 |
LD A,(65153) |
46668 |
CP 4 |
46670 |
JP P,46647 |
46673 |
LD HL,16384 |
46676 |
LD DE,16385 |
46679 |
LD BC,6144 |
46682 |
LD (HL),0 |
46684 |
LDIR |
46686 |
LD BC,767 |
46689 |
LDIR |
46691 |
LD HL,15360 |
46694 |
LD (23606),HL |
46697 |
JP 46710 |