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 |