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 |