A248: Action: Tie
| ActionTie |
A248 |
LD A,($B6E8) |
|
A24B |
CP $12 |
|
A24D |
JR Z,ActionTie_3 |
|
A24F |
LD A,($B6E9) |
|
A252 |
CP $12 |
|
A254 |
JP NZ,$9F76 |
|
A257 |
LD IX,($B708) |
|
A25B |
BIT 1,(IX+$07) |
|
A25F |
JP NZ,$9F76 |
|
A262 |
CALL ObjectCount |
|
A265 |
CP $00 |
|
A267 |
LD HL,$B07D |
|
A26A |
JP NZ,PrintMsg |
|
A26D |
BIT 3,(IX+$07) |
|
A271 |
JR NZ,ActionTie_0 |
|
A273 |
BIT 6,(IX+$07) |
|
A277 |
JP NZ,$9F76 |
| ActionTie_0 |
A27A |
CALL $9D44 |
|
A27D |
LD IY,($B70A) |
|
A281 |
CALL $9C78 |
|
A284 |
LD A,($B6E9) |
|
A287 |
LD (IX+$01),A |
|
A28A |
JR C,ActionTie_1 |
|
A28C |
SUB A |
|
A28D |
LD ($B6FA),A |
|
A290 |
CALL Action_Pickup |
|
A293 |
LD A,($B6FB) |
|
A296 |
CP $00 |
|
A298 |
LD A,$01 |
|
A29A |
LD ($B6FA),A |
|
A29D |
LD ($B6FB),A |
|
A2A0 |
JR Z,ActionTie_2 |
| ActionTie_1 |
A2A2 |
LD A,($B6EA) |
|
A2A5 |
LD (IY+$01),A |
|
A2A8 |
RET |
| ActionTie_2 |
A2A9 |
LD (IY+$01),$FF |
|
A2AD |
RET |
| ActionTie_3 |
A2AE |
LD HL,$A248 |
|
A2B1 |
JP $9F4A |
