27023: Routine at 698F
| 27023 |
CALL StoreEntity |
| 27026 |
LD A,(IX+5) |
| 27029 |
AND A |
| 27030 |
JR NZ,27059 |
| 27032 |
LD A,4 |
| 27034 |
BIT 6,(IX+0) |
| 27038 |
JR Z,27042 |
| 27040 |
NEG |
| 27042 |
ADD A,(IX+1) |
| 27045 |
CP 24 |
| 27047 |
JR C,27059 |
| 27049 |
CP 224 |
| 27051 |
JR NC,27059 |
| 27053 |
LD (IX+1),A |
| 27056 |
JP 28465 |
| 27059 |
CALL 29990 |
| 27062 |
LD (IX+0),0 |
| 27066 |
RET |
| 27067 |
CALL 26987 |
| 27070 |
JR Z,27103 |
| 27072 |
CP 56 |
| 27074 |
RET C |
| 27075 |
SUB 12 |
| 27077 |
LD (HL),82 |
| 27079 |
PUSH AF |
| 27080 |
PUSH HL |
| 27081 |
LD A,(24089) |
| 27084 |
AND 3 |
| 27086 |
LD C,A |
| 27087 |
LD B,0 |
| 27089 |
LD HL,27099 |
| 27092 |
ADD HL,BC |
| 27093 |
LD B,(HL) |
| 27094 |
POP HL |
| 27095 |
POP AF |
| 27096 |
JP 27557 |
| 27099 |
LD B,A |
| 27100 |
LD B,(HL) |
| 27101 |
LD B,L |
| 27102 |
LD B,E |
| 27103 |
CP 184 |
| 27105 |
RET NC |
| 27106 |
ADD A,24 |
| 27108 |
LD (HL),18 |
| 27110 |
JR 27079 |