Prev: F5BE Up: Map Next: F814
F5F1: Routine at F5F1
Used by the routine at EEC1.
F5F1 LD HL,$5DE7 HL=5DE7.
F5F4 LD DE,$0020 DE=0020.
F5F7 LD BC,$F5D3 BC=F5D3.
F5FA LD (HL),$00 Write 00 to *HL.
F5FC ADD HL,DE HL+=DE.
F5FD LD (HL),$FF Write FF to *HL.
F5FF ADD HL,DE HL+=DE.
F600 LD (HL),$00 Write 00 to *HL.
F602 AND A
F603 SBC HL,DE
F605 SBC HL,DE
F607 LD A,(BC)
F608 INC BC
F609 CP $FF
F60B JR Z,$F61D
F60D OR A
F60E JR Z,$F61A
F610 CP $01
F612 JR NZ,$F617
F614 ADD HL,DE HL+=DE.
F615 JR $F61A Jump to F61A.
F617 AND A
F618 SBC HL,DE HL-=DE.
F61A INC HL Increment HL by one.
F61B JR $F5FA Jump to F5FA.
F61D LD A,$06 Write 06 to F26E.
F61F LD ($F26E),A
F622 LD IX,$F5BE IX=F5BE.
F626 LD B,$03
F628 PUSH BC
F629 LD A,$0D
F62B CALL Handler_TaskCompleted
F62E LD BC,$F5CA
F631 JR NZ,$F636
F633 LD BC,$F5CE
F636 CALL $EF35
F639 LD A,($F5D2)
F63C XOR $02
F63E LD ($F5D2),A
F641 CALL $A8A0
F644 CALL $E329
F647 POP BC
F648 DJNZ $F628
F64A RET
F64B LD BC,$FF01
F64E LD BC,$FFFF
F651 LD BC,$28FF
F654 LD B,(HL)
F655 LD BC,$0501
F658 INC B
F659 RET Z
F65A LD A,B
F65B RST $38
F65C LD BC,$0223
F65F LD H,$64
F661 LD BC,$26FF
F664 NOP
F665 RET Z
F666 LD A,B
F667 RST $38
F668 LD BC,$0223
F66B LD H,$64
F66D LD BC,$26FF
F670 NOP
F671 INC A
F672 NOP
F673 NOP
F674 LD A,$04
F676 LD ($F26E),A
F679 LD B,$05
F67B LD IX,$F653
F67F PUSH BC
F680 LD BC,$F5CA
F683 CALL $EF35
F686 DEC (IX+$00)
F689 JR NZ,$F6BB
F68B LD A,($F673)
F68E LD B,A
F68F LD A,($F672)
F692 OR B
F693 JR NZ,$F6BB
F695 LD A,R
F697 AND $3F
F699 ADD A,$14
F69B LD (IX+$00),A
F69E LD A,(IX+$01)
F6A1 ADD A,$02
F6A3 CP $08
F6A5 JR NZ,$F6A8
F6A7 XOR A
F6A8 LD (IX+$01),A
F6AB LD E,A
F6AC LD D,$00
F6AE LD HL,$F64B
F6B1 ADD HL,DE
F6B2 LD A,(HL)
F6B3 LD (IX-$02),A
F6B6 INC HL
F6B7 LD A,(HL)
F6B8 LD (IX-$01),A
F6BB LD A,($F671)
F6BE XOR $02
F6C0 LD ($F671),A
F6C3 CALL $A8A0
F6C6 CALL $E329
F6C9 INC IX
F6CB INC IX
F6CD POP BC
F6CE DJNZ $F67F
F6D0 RET
F6D1 LD B,B
F6D2 INC DE
F6D3 LD H,B
F6D4 LD E,$80
F6D6 LD A,(DE)
F6D7 AND B
F6D8 LD BC,$05C0
F6DB NOP
F6DC LD B,B
F6DD LD H,H
F6DE LD (BC),A
F6DF INC B
F6E0 OR H
F6E1 SBC A,B
F6E2 LD (BC),A
F6E3 CALL M,$4420
F6E6 LD (BC),A
F6E7 INC B
F6E8 RET Z
F6E9 LD A,B
F6EA LD (BC),A
F6EB CALL M,$C53A
F6EE DEFB $ED,$FE
F6F0 LD B,$20
F6F2 INC C
F6F3 LD A,($F6DB)
F6F6 XOR $01
F6F8 LD ($F6DB),A
F6FB JR Z,$F716
F6FD LD A,$06
F6FF DEC A
F700 JR Z,$F716
F702 LD B,A
F703 LD HL,$F6D1
F706 LD DE,$4800
F709 LD E,(HL)
F70A INC HL
F70B LD ($A838),DE
F70F LD A,(HL)
F710 INC HL
F711 CALL $A83D
F714 DJNZ $F709
F716 LD A,($EDC5)
F719 CP $06
F71B RET Z
F71C LD A,$06
F71E LD ($F26E),A
F721 LD IX,$F6DC
F725 LD B,$04
F727 PUSH BC
F728 LD BC,$F2F7
F72B CALL $EF35
F72E LD A,$76
F730 CALL $A8A0
F733 CALL $E329
F736 POP BC
F737 DJNZ $F727
F739 RET
F73A INC (HL)
F73B LD B,B
F73C NOP
F73D LD (BC),A
F73E LD (HL),H
F73F LD L,H
F740 NOP
F741 LD (BC),A
F742 OR H
F743 AND B
F744 NOP
F745 LD (BC),A
F746 LD A,$08
F748 LD ($F26E),A
F74B LD IX,$F73A
F74F LD B,$03
F751 PUSH BC
F752 LD BC,$F2F7
F755 CALL $EF35
F758 LD A,(IX-$01)
F75B CP $02
F75D JR Z,$F767
F75F LD (IX-$01),$02
F763 LD (IX-$03),$40
F767 LD A,$56
F769 CALL $A83D
F76C CALL $E329
F76F POP BC
F770 DJNZ $F751
F772 RET
F773 LD A,$02
F775 LD ($F26E),A
F778 LD A,(IY+$0A)
F77B CP $98
F77D JR NZ,$F78D
F77F LD A,(IY+$05)
F782 CP $28
F784 JR C,$F78D
F786 CP $E6
F788 JR NC,$F78D
F78A CALL $E33F
F78D LD B,$05
F78F LD A,($F7DE)
F792 INC A
F793 CP $5B
F795 JR NZ,$F799
F797 LD A,$57
F799 LD ($F7DE),A
F79C LD HL,$F7DF
F79F LD D,$98
F7A1 LD E,(HL)
F7A2 LD ($A838),DE
F7A6 INC HL
F7A7 DEC (HL)
F7A8 JR NZ,$F7AC
F7AA LD (HL),$28
F7AC LD A,(HL)
F7AD INC HL
F7AE CP $09
F7B0 JR NC,$F7D6
F7B2 LD A,(IY+$0A)
F7B5 CP $80
F7B7 JR NZ,$F7D1
F7B9 LD A,($A838)
F7BC SUB (IY+$05)
F7BF SUB $10
F7C1 CP $E0
F7C3 JR C,$F7D1
F7C5 LD A,(IY+$0A)
F7C8 ADD A,$04
F7CA LD (IY+$0A),A
F7CD LD (IY+$37),$01
F7D1 LD A,($F7DE)
F7D4 JR $F7D8
F7D6 LD A,$57
F7D8 CALL $A83D
F7DB DJNZ $F7A1
F7DD RET
F7DE DEFB $5A,$38,$29,$60,$21,$88,$19,$B0
F7E6 DEFB $11,$D8,$09
F7E9 DEFB $0E,$90,$A0,$5B,$0A,$08,$A8,$5C
F7F1 DEFB $0F,$F0,$A8,$5E,$19,$90,$A0,$5D
F7F9 DEFB $17,$20,$90,$5F,$FF,$0F,$F0,$A8
F801 DEFB $5E,$19,$90,$A0,$5D,$17,$20,$90
F809 DEFB $5F,$0E,$90,$A0,$5B,$0A,$08,$A8
F811 DEFB $5C
F812 DEFW $F7E9
Prev: F5BE Up: Map Next: F814