51606: Routine at C996
| 51606 |
PUSH IY |
| 51608 |
PUSH BC |
| 51609 |
CALL 51647 |
| 51612 |
POP BC |
| 51613 |
POP IY |
| 51615 |
JR C,51623 |
| 51617 |
JP Z,52035 |
| 51620 |
OR 1 |
| 51622 |
RET |
| 51623 |
PUSH HL |
| 51624 |
PUSH BC |
| 51625 |
LD HL,(40921) |
| 51628 |
LD B,1 |
| 51630 |
CALL 53120 |
| 51633 |
POP BC |
| 51634 |
POP HL |
| 51635 |
LD IX,(40923) |
| 51639 |
LD (IX+1),L |
| 51642 |
LD (IX+2),H |
| 51645 |
SCF |
| 51646 |
RET |
| 51647 |
PUSH HL |
| 51648 |
POP IY |
| 51650 |
CALL 53368 |
| 51653 |
JR NC,51667 |
| 51655 |
LD A,(IY+0) |
| 51658 |
AND 32 |
| 51660 |
JR Z,51667 |
| 51662 |
LD HL,52155 |
| 51665 |
XOR A |
| 51666 |
RET |
| 51667 |
CALL 50728 |
| 51670 |
JR Z,51665 |
| 51672 |
CALL 50878 |
| 51675 |
JR Z,51665 |
| 51677 |
BIT 6,(IY+0) |
| 51681 |
JR Z,51698 |
| 51683 |
LD L,(IY+2) |
| 51686 |
LD H,(IY+3) |
| 51689 |
PUSH IY |
| 51691 |
CALL 52020 |
| 51694 |
POP IY |
| 51696 |
JR Z,51665 |
| 51698 |
LD A,(40971) |
| 51701 |
AND A |
| 51702 |
JR NZ,51707 |
| 51704 |
OR 1 |
| 51706 |
RET |
| 51707 |
PUSH IY |
| 51709 |
LD A,(IY+1) |
| 51712 |
RRCA |
| 51713 |
RRCA |
| 51714 |
RRCA |
| 51715 |
RRCA |
| 51716 |
AND 15 |
| 51718 |
LD L,A |
| 51719 |
LD H,0 |
| 51721 |
LD (40991),HL |
| 51724 |
POP HL |
| 51725 |
LD DE,2 |
| 51728 |
ADD HL,DE |
| 51729 |
BIT 6,(IY+0) |
| 51733 |
JR Z,51736 |
| 51735 |
ADD HL,DE |
| 51736 |
LD DE,5 |
| 51739 |
BIT 4,(IY+0) |
| 51743 |
JR Z,51746 |
| 51745 |
ADD HL,DE |
| 51746 |
LD A,(40970) |
| 51749 |
LD (50321),A |
| 51752 |
LD IX,(40979) |
| 51756 |
LD A,(IX+15) |
| 51759 |
LD (50322),A |
| 51762 |
PUSH HL |
| 51763 |
PUSH IY |
| 51765 |
LD A,1 |
| 51767 |
LD (40972),A |
| 51770 |
CALL 51830 |
| 51773 |
POP IY |
| 51775 |
POP HL |
| 51776 |
BIT 7,(IY+0) |
| 51780 |
JR Z,51784 |
| 51782 |
SCF |
| 51783 |
RET |
| 51784 |
LD A,(40919) |
| 51787 |
INC A |
| 51788 |
JR NZ,51796 |
| 51790 |
LD A,(41012) |
| 51793 |
LD (40919),A |
| 51796 |
LD A,(40920) |
| 51799 |
INC A |
| 51800 |
JR NZ,51808 |
| 51802 |
LD A,(41013) |
| 51805 |
LD (40920),A |
| 51808 |
XOR A |
| 51809 |
LD (51886),A |
| 51812 |
CALL 52012 |
| 51815 |
PUSH AF |
| 51816 |
PUSH HL |
| 51817 |
CALL 51839 |
| 51820 |
LD A,(51886) |
| 51823 |
AND A |
| 51824 |
CALL Z,51887 |
| 51827 |
POP HL |
| 51828 |
POP AF |
| 51829 |
RET |
| 51830 |
LD A,(41011) |
| 51833 |
AND 128 |
| 51835 |
CALL Z,41700 |
| 51838 |
RET |
| 51839 |
LD A,(39008) |
| 51842 |
CALL FetchObjectDataPointer |
| 51845 |
LD A,(40969) |
| 51848 |
CP (IX+15) |
| 51851 |
RET Z |
| 51852 |
LD A,(41014) |
| 51855 |
PUSH AF |
| 51856 |
LD A,(39008) |
| 51859 |
LD (41014),A |
| 51862 |
CALL 51870 |
| 51865 |
POP AF |
| 51866 |
LD (41014),A |
| 51869 |
RET |
| 51870 |
LD A,(56577) |
| 51873 |
LD HL,(56575) |
| 51876 |
BIT 6,(HL) |
| 51878 |
JP NZ,53682 |
| 51881 |
SET 6,(HL) |
| 51883 |
JP 53506 |
| 51886 |
NOP |
| 51887 |
CALL 56428 |
| 51890 |
RET Z |
| 51891 |
LD A,(50321) |
| 51894 |
LD HL,40969 |
| 51897 |
CP (HL) |
| 51898 |
RET Z |
| 51899 |
LD A,(41014) |
| 51902 |
CALL 54421 |
| 51905 |
LD HL,40969 |
| 51908 |
CP (HL) |
| 51909 |
JR NZ,51920 |
| 51911 |
LD A,(41014) |
| 51914 |
LD DE,26861 |
| 51917 |
CALL 52162 |
| 51920 |
LD A,(40975) |
| 51923 |
CP 7 |
| 51925 |
RET C |
| 51926 |
LD A,(41012) |
| 51929 |
CALL 54421 |
| 51932 |
CP 255 |
| 51934 |
JR NZ,51986 |
| 51936 |
LD B,(IX+0) |
| 51939 |
LD A,(40969) |
| 51942 |
CP (IX+15) |
| 51945 |
JR Z,51952 |
| 51947 |
INC IX |
| 51949 |
DJNZ 51942 |
| 51951 |
RET |
| 51952 |
LD A,(41014) |
| 51955 |
LD B,A |
| 51956 |
LD A,255 |
| 51958 |
LD (41014),A |
| 51961 |
LD A,1 |
| 51963 |
LD (23612),A |
| 51966 |
LD A,(40969) |
| 51969 |
CALL 54385 |
| 51972 |
CP 255 |
| 51974 |
CALL NZ,51830 |
| 51977 |
SUB A |
| 51978 |
LD (23612),A |
| 51981 |
LD A,B |
| 51982 |
LD (41014),A |
| 51985 |
RET |
| 51986 |
LD A,(50322) |
| 51989 |
LD HL,40969 |
| 51992 |
CP (HL) |
| 51993 |
RET Z |
| 51994 |
LD A,(41012) |
| 51997 |
LD HL,41014 |
| 52000 |
CP (HL) |
| 52001 |
RET Z |
| 52002 |
LD DE,26861 |
| 52005 |
JP 52162 |
