9E98: Move the player onto a ladder
9E98 |
LD IX,$72D8 |
9E9C |
LD A,(IX+$00) |
9E9F |
AND $07 |
9EA1 |
RET NZ |
9EA2 |
LD HL,($72D8) |
9EA5 |
INC H |
9EA6 |
EX DE,HL |
9EA7 |
LD HL,$61A8 |
9EAA |
LD B,$00 |
9EAC |
LD A,D |
9EAD |
AND $F8 |
9EAF |
SLA A |
9EB1 |
RL B |
9EB3 |
SLA A |
9EB5 |
RL B |
9EB7 |
LD C,A |
9EB8 |
ADD HL,BC |
9EB9 |
LD B,$00 |
9EBB |
LD C,E |
9EBC |
SRL C |
9EBE |
SRL C |
9EC0 |
SRL C |
9EC2 |
ADD HL,BC |
9EC3 |
LD A,(HL) |
9EC4 |
DEC A |
9EC5 |
JR NZ,$9EED |
9EC7 |
LD A,($732F) |
9ECA |
IN A,($FE) |
9ECC |
AND $1F |
9ECE |
LD C,A |
9ECF |
LD A,($732E) |
9ED2 |
OR C |
9ED3 |
CP $1F |
9ED5 |
JR Z,$9EED |
9ED7 |
LD (IX+$03),$0D |
9EDB |
INC (IX+$01) |
9EDE |
LD A,($72D9) |
9EE1 |
AND $03 |
9EE3 |
JR NZ,$9EEB |
9EE5 |
LD HL,$1E14 |
9EE8 |
CALL $9CA4 |
9EEB |
JR $9F25 |
9EED |
LD BC,$0040 |
9EF0 |
AND A |
9EF1 |
SBC HL,BC |
9EF3 |
LD BC,$0020 |
9EF6 |
LD A,D |
9EF7 |
AND $07 |
9EF9 |
JR NZ,$9EFD |
9EFB |
SBC HL,BC |
9EFD |
LD A,(HL) |
9EFE |
DEC A |
9EFF |
JR NZ,$9F32 |
9F01 |
LD A,($7331) |
9F04 |
IN A,($FE) |
9F06 |
AND $1F |
9F08 |
LD C,A |
9F09 |
LD A,($7330) |
9F0C |
OR C |
9F0D |
CP $1F |
9F0F |
JR Z,$9F32 |
9F11 |
LD (IX+$03),$0D |
9F15 |
DEC (IX+$01) |
9F18 |
LD A,($72D9) |
9F1B |
AND $03 |
9F1D |
JR NZ,$9F25 |
9F1F |
LD HL,$1E15 |
9F22 |
CALL $9CA4 |
9F25 |
LD A,(IX+$02) |
9F28 |
INC A |
9F29 |
AND $03 |
9F2B |
LD (IX+$02),A |
9F2E |
LD (IX+$4D),$00 |
9F32 |
LD HL,($72D8) |
9F35 |
LD A,(IX+$02) |
9F38 |
ADD A,(IX+$03) |
9F3B |
CALL $9A4C |
9F3E |
RET |