46668: Routine at B64C
| 46668 |
PUSH IX |
| 46670 |
LD IX,(49783) |
| 46674 |
RES 1,(IX+33) |
| 46678 |
RES 1,(IX+45) |
| 46682 |
SET 3,(IX+33) |
| 46686 |
SET 3,(IX+45) |
| 46690 |
ADD IX,DE |
| 46692 |
LD (49783),IX |
| 46696 |
BIT 5,(IX+33) |
| 46700 |
LD L,40 |
| 46702 |
JR NZ,46711 |
| 46704 |
LD DE,12 |
| 46707 |
ADD IX,DE |
| 46709 |
LD L,216 |
| 46711 |
LD A,(IX+32) |
| 46714 |
LD C,A |
| 46715 |
RRCA |
| 46716 |
RR L |
| 46718 |
RRCA |
| 46719 |
RR L |
| 46721 |
RRCA |
| 46722 |
RR L |
| 46724 |
OR %01100000 |
| 46726 |
LD IX,50006 |
| 46730 |
LD (IX+16),L |
| 46733 |
LD (IX+17),A |
| 46736 |
LD (IX+19),0 |
| 46740 |
LD A,31 |
| 46742 |
AND C |
| 46743 |
NEG |
| 46745 |
ADD A,21 |
| 46747 |
LD (IX+7),A |
| 46750 |
LD (47384),A |
| 46753 |
LD C,34 |
| 46755 |
LD A,5 |
| 46757 |
BIT 4,L |
| 46759 |
JR Z,46765 |
| 46761 |
LD C,2 |
| 46763 |
LD A,26 |
| 46765 |
LD (IX+23),C |
| 46768 |
LD (47383),A |
| 46771 |
POP IX |
| 46773 |
LD HL,50057 |
| 46776 |
RES 0,(HL) |
| 46778 |
RET |