27695: Routine at 6C2F
| 27695 |
LD HL,24011 |
| 27698 |
INC (HL) |
| 27699 |
CALL 27879 |
| 27702 |
XOR A |
| 27703 |
LD (24009),A |
| 27706 |
CALL MeteorUpdate_9 |
| 27709 |
DEC C |
| 27710 |
LD BC,64 |
| 27713 |
JP Z,28051 |
| 27716 |
CALL MeteorUpdate_4 |
| 27719 |
DEC E |
| 27720 |
JP Z,25741 |
| 27723 |
CALL 30237 |
| 27726 |
BIT 2,E |
| 27728 |
JR Z,27751 |
| 27730 |
BIT 7,E |
| 27732 |
JR NZ,27851 |
| 27734 |
BIT 4,E |
| 27736 |
JR NZ,27857 |
| 27738 |
LD A,E |
| 27739 |
AND 64 |
| 27741 |
LD E,A |
| 27742 |
LD A,(IX+4) |
| 27745 |
AND 191 |
| 27747 |
OR E |
| 27748 |
LD (IX+4),A |
| 27751 |
BIT 0,(IX+4) |
| 27755 |
JR NZ,27794 |
| 27757 |
LD A,(24014) |
| 27760 |
LD E,A |
| 27761 |
AND 15 |
| 27763 |
JR NZ,27794 |
| 27765 |
SET 0,(IX+4) |
| 27769 |
LD A,(24012) |
| 27772 |
AND 31 |
| 27774 |
ADD A,16 |
| 27776 |
LD (IX+6),A |
| 27779 |
LD A,E |
| 27780 |
AND 128 |
| 27782 |
LD E,A |
| 27783 |
LD A,(IX+4) |
| 27786 |
AND 127 |
| 27788 |
OR E |
| 27789 |
LD (IX+4),A |
| 27792 |
JR 27723 |
| 27794 |
BIT 0,(IX+4) |
| 27798 |
JR Z,27823 |
| 27800 |
LD A,(IX+2) |
| 27803 |
BIT 7,(IX+4) |
| 27807 |
JR Z,27863 |
| 27809 |
ADD A,2 |
| 27811 |
LD (IX+2),A |
| 27814 |
DEC (IX+6) |
| 27817 |
JR NZ,27823 |
| 27819 |
RES 0,(IX+4) |
| 27823 |
LD A,(IX+1) |
| 27826 |
BIT 6,(IX+4) |
| 27830 |
JR Z,27875 |
| 27832 |
ADD A,2 |
| 27834 |
LD (IX+1),A |
| 27837 |
LD A,(24009) |
| 27840 |
AND A |
| 27841 |
JP NZ,28026 |
| 27844 |
INC A |
| 27845 |
LD (24009),A |
| 27848 |
JP 27723 |
| 27851 |
RES 7,(IX+4) |
| 27855 |
JR 27751 |
| 27857 |
SET 7,(IX+4) |
| 27861 |
JR 27751 |
| 27863 |
SUB 2 |
| 27865 |
CP 40 |
| 27867 |
JR NC,27811 |
| 27869 |
SET 7,(IX+4) |
| 27873 |
JR 27811 |
| 27875 |
SUB 2 |
| 27877 |
JR 27834 |
| 27879 |
CALL StoreEntity |
| 27882 |
LD A,(IX+0) |
| 27885 |
AND 192 |
| 27887 |
OR 3 |
| 27889 |
LD (24002),A |
| 27892 |
RET |
