A2B4: Action: Untie
| ActionUntie |
A2B4 |
LD IX,($B708) |
|
A2B8 |
LD A,(IX+$01) |
|
A2BB |
CP $12 |
|
A2BD |
LD HL,$B092 |
|
A2C0 |
JP NZ,PrintMsg |
|
A2C3 |
CALL $9D44 |
|
A2C6 |
LD A,($C367) |
|
A2C9 |
LD (IX+$01),A |
|
A2CC |
RET |
|
A2CD |
CALL $9F25 |
|
A2D0 |
LD A,(IX+$02) |
|
A2D3 |
CP $00 |
|
A2D5 |
JR NZ,ActionUntie_0 |
|
A2D7 |
CALL $9D44 |
|
A2DA |
RET |
| ActionUntie_0 |
A2DB |
LD A,(IX+$00) |
|
A2DE |
LD HL,($B6E7) |
|
A2E1 |
PUSH HL |
|
A2E2 |
LD ($B6E7),A |
|
A2E5 |
LD IX,($B708) |
|
A2E9 |
SET 5,(IX+$07) |
|
A2ED |
PUSH IX |
|
A2EF |
LD A,$FF |
|
A2F1 |
LD ($B6E8),A |
|
A2F4 |
CALL Action_Dir_0 |
|
A2F7 |
POP IX |
|
A2F9 |
RES 5,(IX+$07) |
|
A2FD |
POP HL |
|
A2FE |
LD ($B6E7),HL |
|
A301 |
RET |
