46710: Routine at B676
| 46710 |
LD HL,49865 |
| 46713 |
LD B,0 |
| 46715 |
CALL PrintCharacters |
| 46718 |
LD B,38 |
| 46720 |
CALL PrintCharacters |
| 46723 |
LD B,100 |
| 46725 |
LD A,253 |
| 46727 |
IN A,(254) |
| 46729 |
AND %00000010 |
| 46731 |
JP Z,45244 |
| 46734 |
PUSH BC |
| 46735 |
LD HL,0 |
| 46738 |
LD DE,0 |
| 46741 |
LD BC,0 |
| 46744 |
LDIR |
| 46746 |
POP BC |
| 46747 |
DJNZ 46725 |
| 46749 |
LD HL,16384 |
| 46752 |
LD DE,16385 |
| 46755 |
LD BC,6143 |
| 46758 |
LD (HL),0 |
| 46760 |
LDIR |
| 46762 |
LD HL,50159 |
| 46765 |
LD B,0 |
| 46767 |
CALL PrintCharacters |
| 46770 |
LD B,226 |
| 46772 |
CALL PrintCharacters |
| 46775 |
LD B,100 |
| 46777 |
LD A,253 |
| 46779 |
IN A,(254) |
| 46781 |
AND 2 |
| 46783 |
JP Z,45244 |
| 46786 |
PUSH BC |
| 46787 |
LD HL,0 |
| 46790 |
LD DE,0 |
| 46793 |
LD BC,0 |
| 46796 |
LDIR |
| 46798 |
POP BC |
| 46799 |
DJNZ 46777 |
| 46801 |
LD HL,51380 |
| 46804 |
LD (23606),HL |
| 46807 |
JP 45556 |
| 46810 |
LD (65142),HL |
| 46813 |
CALL 46589 |
| 46816 |
LD A,253 |
| 46818 |
IN A,(254) |
| 46820 |
AND 2 |
| 46822 |
JP Z,45244 |
| 46825 |
LD A,(65153) |
| 46828 |
CP 4 |
| 46830 |
JP P,46807 |
| 46833 |
LD HL,16384 |
| 46836 |
LD DE,16385 |
| 46839 |
LD BC,6144 |
| 46842 |
LD (HL),0 |
| 46844 |
LDIR |
| 46846 |
LD BC,767 |
| 46849 |
LDIR |
| 46851 |
LD HL,15360 |
| 46854 |
LD (23606),HL |
| 46857 |
JP 46870 |
| 46860 |
LD A,(HL) |
| 46861 |
PUSH HL |
| 46862 |
PUSH BC |
| 46863 |
RST 16 |
| 46864 |
POP BC |
| 46865 |
POP HL |
| 46866 |
INC HL |
| 46867 |
DJNZ 46860 |
| 46869 |
RET |
| 46870 |
LD HL,49883 |
| 46873 |
LD B,0 |
| 46875 |
CALL 46860 |
| 46878 |
LD B,16 |
| 46880 |
CALL 46860 |
| 46883 |
LD B,100 |
| 46885 |
LD A,253 |
| 46887 |
IN A,(254) |
| 46889 |
AND 2 |
| 46891 |
JP Z,45244 |
| 46894 |
PUSH BC |
| 46895 |
LD HL,0 |
| 46898 |
LD DE,0 |
| 46901 |
LD BC,0 |
| 46904 |
LDIR |
| 46906 |
POP BC |
| 46907 |
DJNZ 46885 |
| 46909 |
LD HL,16384 |
| 46912 |
LD DE,16385 |
| 46915 |
LD BC,6143 |
| 46918 |
LD (HL),0 |
| 46920 |
LDIR |
| 46922 |
LD HL,50155 |
| 46925 |
LD B,0 |
| 46927 |
CALL 46860 |
| 46930 |
LD B,239 |
| 46932 |
CALL 46860 |
| 46935 |
LD B,100 |
| 46937 |
LD A,253 |
| 46939 |
IN A,(254) |
| 46941 |
AND 2 |
| 46943 |
JP Z,45244 |
| 46946 |
PUSH BC |
| 46947 |
LD HL,0 |
| 46950 |
LD DE,0 |
| 46953 |
LD BC,0 |
| 46956 |
LDIR |
| 46958 |
POP BC |
| 46959 |
DJNZ 46937 |
| 46961 |
LD HL,51380 |
| 46964 |
LD (23606),HL |
| 46967 |
JP 45556 |