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 |