46740: Routine at B694
46740 |
LD IY,46836 |
46744 |
LD B,5 |
46746 |
LD A,(IY+0) |
46749 |
AND A |
46750 |
CALL NZ,46761 |
46753 |
LD DE,7 |
46756 |
ADD IY,DE |
46758 |
DJNZ 46746 |
46760 |
RET |
46761 |
LD L,(IY+5) |
46764 |
LD H,(IY+6) |
46767 |
BIT 7,(HL) |
46769 |
JR Z,46776 |
46771 |
LD (IY+0),0 |
46775 |
RET |
46776 |
EXX |
46777 |
INC A |
46778 |
AND 254 |
46780 |
LD HL,44909 |
46783 |
LD E,A |
46784 |
LD D,0 |
46786 |
ADD HL,DE |
46787 |
LD E,(HL) |
46788 |
INC HL |
46789 |
LD D,(HL) |
46790 |
LD L,(IY+1) |
46793 |
LD H,(IY+2) |
46796 |
LD C,(IY+3) |
46799 |
LD B,(IY+4) |
46802 |
LD A,7 |
46804 |
EX AF,AF' |
46805 |
LD A,(DE) |
46806 |
LD (HL),A |
46807 |
LD (BC),A |
46808 |
INC L |
46809 |
INC C |
46810 |
INC DE |
46811 |
LD A,(DE) |
46812 |
LD (HL),A |
46813 |
LD (BC),A |
46814 |
DEC L |
46815 |
INC H |
46816 |
INC DE |
46817 |
LD A,31 |
46819 |
ADD A,C |
46820 |
LD C,A |
46821 |
EX AF,AF' |
46822 |
DEC A |
46823 |
JR NZ,46804 |
46825 |
EXX |
46826 |
LD A,(IY+0) |
46829 |
INC A |
46830 |
AND 15 |
46832 |
LD (IY+0),A |
46835 |
RET |
46836 |
NOP |
46837 |
NOP |
46838 |
NOP |
46839 |
NOP |
46840 |
NOP |
46841 |
NOP |
46842 |
NOP |
46843 |
NOP |
46844 |
NOP |
46845 |
NOP |
46846 |
NOP |
46847 |
NOP |
46848 |
NOP |
46849 |
NOP |
46850 |
NOP |
46851 |
NOP |
46852 |
NOP |
46853 |
NOP |
46854 |
NOP |
46855 |
NOP |
46856 |
NOP |
46857 |
NOP |
46858 |
NOP |
46859 |
NOP |
46860 |
NOP |
46861 |
NOP |
46862 |
NOP |
46863 |
NOP |
46864 |
NOP |
46865 |
NOP |
46866 |
NOP |
46867 |
NOP |
46868 |
NOP |
46869 |
NOP |
46870 |
NOP |