A294: Make the player fall if we're in mid-air
A294 |
LD A,($7325) |
A297 |
DEC A |
A298 |
JR NZ,$A2B5 |
A29A |
DEC (IX+$4F) |
A29D |
JR NZ,$A30F |
A29F |
LD HL,$7325 |
A2A2 |
LD (HL),$02 |
A2A4 |
INC HL |
A2A5 |
LD (HL),$00 |
A2A7 |
INC HL |
A2A8 |
LD (HL),$FA |
A2AA |
LD (IX+$52),$FF |
A2AE |
LD A,($72DA) |
A2B1 |
CALL $A37F |
A2B4 |
RET |
A2B5 |
LD HL,$7328 |
A2B8 |
DEC (HL) |
A2B9 |
RET NZ |
A2BA |
PUSH HL |
A2BB |
LD HL,($72D8) |
A2BE |
CALL $9538 |
A2C1 |
POP HL |
A2C2 |
LD A,($732A) |
A2C5 |
DEC A |
A2C6 |
JR Z,$A2E1 |
A2C8 |
INC A |
A2C9 |
AND A |
A2CA |
JR NZ,$A2D4 |
A2CC |
LD (IX+$52),$FF |
A2D0 |
LD A,$FA |
A2D2 |
JR $A2FB |
A2D4 |
LD A,($7327) |
A2D7 |
SUB $0A |
A2D9 |
CP $28 |
A2DB |
JR NC,$A2DF |
A2DD |
LD A,$28 |
A2DF |
JR $A2FB |
A2E1 |
LD A,($72D9) |
A2E4 |
CP $A7 |
A2E6 |
JR C,$A2ED |
A2E8 |
INC (IX+$01) |
A2EB |
JR $A2CC |
A2ED |
LD A,($7327) |
A2F0 |
ADD A,$0A |
A2F2 |
CP $04 |
A2F4 |
JR NZ,$A2FB |
A2F6 |
LD (IX+$52),$00 |
A2FA |
XOR A |
A2FB |
LD ($7327),A |
A2FE |
LD (HL),A |
A2FF |
LD A,($72D9) |
A302 |
ADD A,(IX+$52) |
A305 |
CP $10 |
A307 |
JR NC,$A30C |
A309 |
POP HL |
A30A |
POP HL |
A30B |
RET |
A30C |
LD ($72D9),A |
A30F |
LD A,$01 |
A311 |
CALL $A37F |
A314 |
CALL $9E34 |
A317 |
LD BC,$003F |
A31A |
AND A |
A31B |
SBC HL,BC |
A31D |
LD A,($732A) |
A320 |
DEC A |
A321 |
JR Z,$A356 |
A323 |
LD A,($7326) |
A326 |
AND A |
A327 |
JR Z,$A356 |
A329 |
DEC A |
A32A |
JR Z,$A33E |
A32C |
LD A,($72D8) |
A32F |
AND $07 |
A331 |
CP $04 |
A333 |
JR NC,$A356 |
A335 |
DEC HL |
A336 |
LD A,(HL) |
A337 |
INC HL |
A338 |
CP $05 |
A33A |
JR NZ,$A356 |
A33C |
JR $A34E |
A33E |
LD A,($72D8) |
A341 |
AND $07 |
A343 |
CP $03 |
A345 |
JR C,$A356 |
A347 |
INC HL |
A348 |
LD A,(HL) |
A349 |
DEC HL |
A34A |
CP $05 |
A34C |
JR NZ,$A356 |
A34E |
LD A,($7326) |
A351 |
XOR $FE |
A353 |
LD ($7326),A |
A356 |
LD A,(HL) |
A357 |
AND A |
A358 |
RET Z |
A359 |
CP $05 |
A35B |
JR Z,$A36A |
A35D |
CP $03 |
A35F |
RET NC |
A360 |
DEC HL |
A361 |
DEC A |
A362 |
JR Z,$A366 |
A364 |
INC HL |
A365 |
INC HL |
A366 |
LD A,(HL) |
A367 |
CP $05 |
A369 |
RET NZ |
A36A |
LD A,($72D9) |
A36D |
INC A |
A36E |
AND $07 |
A370 |
RET NZ |
A371 |
LD (IX+$4D),$00 |
A375 |
LD HL,$72DB |
A378 |
LD A,(HL) |
A379 |
CP $0D |
A37B |
RET NZ |
A37C |
LD (HL),$00 |
A37E |
RET |