
*---------------------------------------------------------*
*     Disassembled with The Flaming Bird Disassembler     *
*    (c) Phoenix corp. 1992,93  -  All rights reserved    *
*---------------------------------------------------------*

         REL
	 mx	%00

	 use	MAIN1.X.S
	 use	MAIN1.E.S

	 use	4/Load.Macs
	 use	4/Locator.Macs
	 use	4/Text.Macs
	 use	4/Util.Macs
	 
*-------------------------------

         SEP   #$20
         LDX   #$00C7
         LDY   #$0001
L0F0008  LDAL  $E19D00,X
         STA   L023E34,X
         AND   #$10
         DEY
         BNE   L0F001B
         LDY   #$0014
         ORA   #$8F
         BRA   L0F001D
L0F001B  ORA   #$8F
L0F001D  STAL  $E19D00,X
         STA   L023EFC,X
         DEX
         BPL   L0F0008
         REP   #$20
         RTL

L0F002A  ENT
         PHP
         SEP   #$20
         LDAL  $E19D00,X
         AND   #$F0
         ORA   #$0E
         STAL  $E19D00,X
         PLP
         RTL

L0F003B  ENT
         PHP
         SEP   #$20
         LDA   L023EFC,X
         STAL  $E19D00,X
         PLP
         RTL

         SEP   #$20
         LDAL  $E1C029
         STA   L023FC4
         ORA   #$80
         STAL  $E1C029
         REP   #$20
         RTL

         SEP   #$20
         LDAL  $E1C029
         AND   #$EF
         STAL  $E1C029
         REP   #$20
         RTL

         PHP
         REP   #$20
         LDX   #$001E
L0F006E  LDAL  $E19FE0,X
         STA   L023FC6,X
         LDAL  L0F0083,X
         STAL  $E19FE0,X
         DEX
         DEX
         BPL   L0F006E
         PLP
         RTL

L0F0083  HEX   0000000F0F00FF0F0000000F0F00FF0F
         HEX   0000000F0F00FF0F0000000F0F00FF0F
         PHP
         REP   #$20
         LDX   #$001E
L0F00A9  LDAL  $E19FC0,X
         STA   L023FC6,X
         LDAL  L0F00BE,X
         STAL  $E19FC0,X
         DEX
         DEX
         BPL   L0F00A9
         PLP
         RTL

L0F00BE  HEX   0F000F000F00FF0F0F000F000F00FF0F
         HEX   0F000F000F00FF0F0F000F000F00FF0F
         SEP   #$20
         LDX   #$00C7
L0F00E3  LDA   L023E34,X
         STAL  $E19D00,X
         DEX
         BPL   L0F00E3
         REP   #$20
         RTL

L0F00F0  ENT
         PHP
         SEP   #$20
         LDX   #$00C7
L0F00F6  LDA   L023EFC,X
         STAL  $E19D00,X
         DEX
         BPL   L0F00F6
         PLP
         RTL

         SEP   #$20
         LDA   L023FC4
         STAL  $E1C029
         REP   #$20
         RTL

L0F010E  ENT
         PHP
         REP   #$20
         LDX   #$001E
L0F0114  LDAL  L0F0083,X
         STAL  $E19FE0,X
         DEX
         DEX
         BPL   L0F0114
         PLP
         RTL

L0F0122  ENT
         PHP
         REP   #$20
         LDX   #$001E
L0F0128  LDA   #$0000
         STAL  $E19FE0,X
         DEX
         DEX
         BPL   L0F0128
         PLP
         RTL

L0F0135  ENT
         PHP
         SEP   #$20
         JSL   L0F0122
         JSL   L0F00F0
         JSL   L0F010E
         PLP
         RTL

L0F0146  ENT
         REP   #$20
         PHP
         STX   L020359
         STX   $72
         STY   L020357
         STY   $70
         LDY   #$0011
         LDA   [$70],Y
         STA   L02035B
         SEP   #$20
         LDA   L020359
         STAL  L0F017C+2
         LDA   #^L023E00
         STAL  L0F017C+1
         REP   #$20
         PHB
         LDA   L020357
         CLC
         ADC   #$0013
         TAX
         LDY   #L023E00
         LDA   L02035B
         DEC
L0F017C  MVN   $000000,$000000
         PLB
         PLP
         RTL

L0F0182  ENT
         REP   #$20
         PHP
         SEP   #$20
         LDA   L020359
         STAL  L0F01A6+1
         LDA   #^L023E00
         STAL  L0F01A6+2
         REP   #$20
         PHB
         LDA   L020357
         CLC
         ADC   #$0013
         TAY
         LDX   #L023E00
         LDA   L02035B
         DEC
L0F01A6  MVN   $000000,$000000
         PLB
         PLP
         RTL

L0F01AC  ENT
         PHP
         REP   #$30
         LDX   #$2000
         LDY   #$2001
         LDA   #$0000
         STAL  $E12000
         LDA   #$7CFE
         PHB
         MVN   $E10000,$E10000
         PLB
         PLP
         RTL

L0F01C6  ENT
         PEA   $0000
         PEA   $0001
         _ReadChar
         PLA
         RTL

L0F01D5  PHP
         REP   #$20
         STX   L020366
         STA   L020364
         JSL   GSOS
         DW    $0009      ; SetPrefix
         ADRL  L020362
         PLP
         RTL

         PHP
         REP   #$20
         LDX   #^L0241FE
         LDA   #L0241FE
         JSL   L0F01D5
         PLP
         RTL

L0F01F9  ENT
         PHP
         REP   #$20
         LDX   #^L024240
         LDA   #L024240
         JSL   L0F01D5
         PLP
         RTL

         JSL   GSOS
         DW    $000A      ; GetPrefix
         ADRL  L0241F2
         SEP   #$30
         STZ   L024288
         LDY   #$02
         LDX   #$01
L0F021B  LDA   L0241FE,X
         STA   L024240,X
         CMP   L02427C,X
         BEQ   L0F022C
         STA   L024288
         JMP   L0F024C

L0F022C  CMP   #$2F
         BNE   L0F0233
         DEY
         BEQ   L0F0236
L0F0233  INX
         BRA   L0F021B
L0F0236  STX   L0241FE
         STX   L024240
         LDA   L024288
         BNE   L0F0249
         DEX
         LDA   L0241FE,X
         INC
         STA   L024240,X
L0F0249  REP   #$30
         RTL

L0F024C  SEP   #$20
         LDA   #$00
         XBA
         LDA   L0241FE
         TAX
L0F0255  LDA   L0241FE,X
         STA   L024240,X
         DEX
         BPL   L0F0255
         REP   #$30
         RTL

         LDA   L024288
         BNE   L0F028E
         JSL   GSOS
         DW    $0020      ; GetDevNumber
         ADRL  L0241F8
         BCC   L0F028E
         LDA   #L0242C1
         STA   L02429E
         LDA   #^L0242C1
         STA   L0242A0
         LDA   #L0241FE
         STA   L0242A2
         LDA   #^L0241FE
         STA   L0242A4
         JSL   L0F02BD
L0F028E  RTL

L0F028F  ENT
         LDA   L024288
         BNE   L0F02BC
         JSL   GSOS
         DW    $0020      ; GetDevNumber
         ADRL  L02423A
         BCC   L0F02BC
         LDA   #L0242C1
         STA   L02429E
         LDA   #^L0242C1
         STA   L0242A0
         LDA   #L024240
         STA   L0242A2
         LDA   #^L024240
         STA   L0242A4
         JSL   L0F02BD
L0F02BC  RTL

L0F02BD  PEA   $0000
         LDA   L0242A0
         PHA
         LDA   L02429E
         PHA
         LDA   L0242A4
         PHA
         LDA   L0242A2
         PHA
         PEA   ^L0242A6
         PEA   L0242A6
         PEA   ^L0242B5
         PEA   L0242B5
         _TLTextMountVolume
         PLA
         CMP   #$0001
         BEQ   L0F02F3
         JMP   L0F02BD

         STA   L023E00
         JMPL  L0104EC
L0F02F3  RTL

         PHP
         REP   #$20
         LDA   $70
         BEQ   L0F030C
         PEA   $0000
         LDA   $70
         PHA
         PEA   $0000
         _UserShutDown
         PLA
L0F030C  PLP
         RTL

L0F030E  ENT
         PHP
L0F030F  SEP   #$20
         LDX   #L025250
         STX   $6C
         LDA   L02449C
         BEQ   L0F0379
         LDA   #$10
         STA   $64
         STZ   $65
L0F0321  REP   #$20
         LDX   $64
         PHX
         DEX
         SEP   #$20
         LDA   L023312,X
         STA   L023310
         LDA   #$00
         XBA
         LDA   ($6C)
         BEQ   L0F0366
         ASL
         ASL
         TAX
         LDY   #$0010
         LDA   ($6C),Y
         STA   $68
         LDY   #$0020
         LDA   ($6C),Y
         STA   $69
         REP   #$20
         LDA   L023324,X
         STAL  L0F035B+1
         SEP   #$20
         INX
         INX
         LDA   L023324,X
         STAL  L0F035B+3
L0F035B  JSL   $000000
         LDA   ($6C)
         BNE   L0F0366
         DEC   L02449C
L0F0366  REP   #$20
         INC   $6C
         PLA
         DEC
         STA   $64
         BNE   L0F0321
         SEP   #$20
         LDA   L02436E
         BNE   L0F0379
         PLP
         RTL

L0F0379  LDA   L02449C
         BEQ   L0F0381
         JMP   L0F030F

L0F0381  PLP
         RTL
L0F0383  ENT
         RTL

L0F0384  ENT
         PHP
         SEP   #$20
         LDA   #$01
         STA   L02447E
         LDA   L02449C
         CMP   #$10
         BCC   L0F0395
         PLP
         RTL

L0F0395  REP   #$20
         LDA   $5C
         PHA
         LDA   $64
         PHA
         LDA   $60
         PHA
         INC   L02449C
         LDA   #L025250
         STA   $60
         LDA   #$0010
         STA   $64
L0F03AD  LDA   ($60)
         AND   #$00FF
         BEQ   L0F03C2
         INC   $60
         DEC   $64
         BNE   L0F03AD
         LDA   #$0010
         STA   L02449C
         BRA   L0F03D6
L0F03C2  SEP   #$20
         LDA   #$0A
         STA   ($60)
         LDY   #$0010
         LDA   $68
         STA   ($60),Y
         LDY   #$0020
         LDA   $69
         STA   ($60),Y
L0F03D6  REP   #$20
         PLA
         STA   $60
         PLA
         STA   $64
         PLA
         STA   $5C
         PLP
         RTL

L0F03E3  ENT
         PHP
         SEP   #$20
         LDA   $64
         STA   $5C
         BNE   L0F03F3
         STZ   $5C
         STZ   $5D
         JMP   L0F0408

L0F03F3  LDA   ($6C)
         BIT   #$01
         BEQ   L0F0402
         LDA   #$55
         STA   $5C
         STA   $5D
         JMP   L0F0408

L0F0402  LDA   #$AA
         STA   $5C
         STA   $5D
L0F0408  LDA   $5C
         STA   L023D85
         LDA   $5D
         STA   L023D86
         LDA   L020002
         BEQ   L0F0427
         LDA   L023D85
         AND   #$CC
         STA   L023D85
         LDA   L023D86
         AND   #$CC
         STA   L023D86
L0F0427  LDA   $65
         STA   $5C
         PLP
         JMP   L0F042F

L0F042F  ENT
         PHP
         SEP   #$20
         LDA   #$00
         XBA
         LDA   $5C
         DEC
         BPL   L0F043C
         PLP
         RTL

L0F043C  ASL
         TAX
         REP   #$20
         LDA   L023352,X
         STA   $70
         LDA   $68
         STA   $24
         STA   $04
         JSL   L1809AE
         LDA   $00
         PHA
         SEP   #$20
         LDA   L024444
         CMP   #$02
         BNE   L0F0472
         LDA   #$00
         XBA
         LDA   L023310
         CLC
         ADC   $69
         TAY
         STY   $60
         LDA   ($70),Y
         STA   $68
         LDA   $69
         STA   $60
         JMP   L0F047E

L0F0472  LDA   #$00
         XBA
         LDA   $69
         TAY
         STY   $60
         LDA   ($70),Y
         STA   $68
L0F047E  LDY   $60
         LDA   L0206A8,Y
         STA   $69
         REP   #$20
         PLA
         STA   $60
         SEP   #$20
         LDA   $68
         STA   $5C
         CMP   #$18
         BCC   L0F0496
         PLP
         RTL

L0F0496  CMP   #$00
         BNE   L0F049C
         PLP
         RTL

L0F049C  REP   #$20
         LDA   $6C
         PHA
         LDA   $6E
         PHA
         LDA   L023E28
         CMP   #$00FD
         BNE   L0F04F2
         LDA   $68
         PHA
         LDA   $60
         PHA
         LDA   $5C
         PHA
         LDA   $64
         PHA
         PHX
         LDA   $24
         STA   $68
         SEP   #$20
         LDA   $68
         CLC
         ADC   #$05
         STA   $68
         JSL   L0F1E48
         PLX
         LDA   $5C
         BNE   L0F050E
         PHX
         LDA   $24
         SEC
         SBC   #$05
         STA   $68
         LDA   $25
         STA   $69
         JSL   L0F1E48
         PLX
         LDA   $5C
         BNE   L0F050E
         REP   #$20
         PLA
         STA   $64
         PLA
         STA   $5C
         PLA
         STA   $60
         PLA
         STA   $68
L0F04F2  LDA   $68
         PHA
         LDA   $60
         PHA
         JSL   L0F0524
         PLA
         STA   $60
         PLA
         STA   $68
         JSL   L0F0946
         PLA
         STA   $6E
         PLA
         STA   $6C
         PLP
         RTL

L0F050E  REP   #$20
         PLA
         STA   $64
         PLA
         STA   $5C
         PLA
         STA   $60
         PLA
         STA   $68
         PLA
         STA   $6E
         PLA
         STA   $6C
         PLP
         RTL

L0F0524  PHP
         REP   #$20
         JMP   L0F052C

L0F052A  PLP
         RTL

L0F052C  LDA   $5C
         AND   #$00FF
         ASL
         TAX
         STX   $60
         JMP   (L0F0538,X)

L0F0538  DA    L0F052A
         DA    L0F0568
         DA    L0F057F
         DA    L0F0597
         DA    L0F05AF
         DA    L0F05C7
         DA    L0F05DF
         DA    L0F05F7
         DA    L0F060F
         DA    L0F0627
         DA    L0F063F
         DA    L0F0657
         DA    L0F066F
         DA    L0F0687
         DA    L0F069F
         DA    L0F06B7
         DA    L0F06CF
         DA    L0F06E7
         DA    L0F06FF
         DA    L0F0717
         DA    L0F072F
         DA    L0F0747
         DA    L0F075F
         DA    L0F0777
L0F0568  LDA   #$0202
         STA   $64
         LDA   #$0004
         STA   L023308
         LDA   #L170140
         STA   $6C
         LDA   #^L170140
         STA   $6E
         PLP
         RTL

L0F057F  LDA   #$0003
         STA   $5C
         LDA   #L170148
         STA   $6C
         LDA   #^L170148
         STA   $6E
         SEP   #$20
         LDA   #$03
         STA   $65
         JMP   L0F078F

         MX    %00
L0F0597  LDA   #$0003
         STA   $5C
         LDA   #L170154
         STA   $6C
         LDA   #^L170154
         STA   $6E
         SEP   #$20
         LDA   #$03
         STA   $65
         JMP   L0F078F

         MX    %00
L0F05AF  LDA   #$0005
         STA   $5C
         LDA   #L170160
         STA   $6C
         LDA   #^L170160
         STA   $6E
         SEP   #$20
         LDA   #$05
         STA   $65
         JMP   L0F078F

         MX    %00
L0F05C7  LDA   #$0005
         STA   $5C
         LDA   #L170174
         STA   $6C
         LDA   #^L170174
         STA   $6E
         SEP   #$20
         LDA   #$05
         STA   $65
         JMP   L0F078F

         MX    %00
L0F05DF  LDA   #$0007
         STA   $5C
         LDA   #L170188
         STA   $6C
         LDA   #^L170188
         STA   $6E
         SEP   #$20
         LDA   #$07
         STA   $65
         JMP   L0F078F

         MX    %00
L0F05F7  LDA   #$0007
         STA   $5C
         LDA   #L1701A4
         STA   $6C
         LDA   #^L1701A4
         STA   $6E
         SEP   #$20
         LDA   #$07
         STA   $65
         JMP   L0F078F

         MX    %00
L0F060F  LDA   #$0008
         STA   $5C
         LDA   #L1701C0
         STA   $6C
         LDA   #^L1701C0
         STA   $6E
         SEP   #$20
         LDA   #$08
         STA   $65
         JMP   L0F079E

         MX    %00
L0F0627  LDA   #$0009
         STA   $5C
         LDA   #L1701F0
         STA   $6C
         LDA   #^L1701F0
         STA   $6E
         SEP   #$20
         LDA   #$09
         STA   $65
         JMP   L0F079E

         MX    %00
L0F063F  LDA   #$000A
         STA   $5C
         LDA   #L170226
         STA   $6C
         LDA   #^L170226
         STA   $6E
         SEP   #$20
         LDA   #$0A
         STA   $65
         JMP   L0F07AD

         MX    %00
L0F0657  LDA   #$000B
         STA   $5C
         LDA   #L170276
         STA   $6C
         LDA   #^L170276
         STA   $6E
         SEP   #$20
         LDA   #$0B
         STA   $65
         JMP   L0F07AD

         MX    %00
L0F066F  LDA   #$000C
         STA   $5C
         LDA   #L1702CE
         STA   $6C
         LDA   #^L1702CE
         STA   $6E
         SEP   #$20
         LDA   #$0C
         STA   $65
         JMP   L0F07AD

         MX    %00
L0F0687  LDA   #$000D
         STA   $5C
         LDA   #L17032E
         STA   $6C
         LDA   #^L17032E
         STA   $6E
         SEP   #$20
         LDA   #$0D
         STA   $65
         JMP   L0F07AD

         MX    %00
L0F069F  LDA   #$000E
         STA   $5C
         LDA   #L170396
         STA   $6C
         LDA   #^L170396
         STA   $6E
         SEP   #$20
         LDA   #$0E
         STA   $65
         JMP   L0F07AD

         MX    %00
L0F06B7  LDA   #$000F
         STA   $5C
         LDA   #L170406
         STA   $6C
         LDA   #^L170406
         STA   $6E
         SEP   #$20
         LDA   #$0F
         STA   $65
         JMP   L0F07AD

         MX    %00
L0F06CF  LDA   #$0010
         STA   $5C
         LDA   #L17047E
         STA   $6C
         LDA   #^L17047E
         STA   $6E
         SEP   #$20
         LDA   #$10
         STA   $65
         JMP   L0F07BC

         MX    %00
L0F06E7  LDA   #$0011
         STA   $5C
         LDA   #L17051E
         STA   $6C
         LDA   #^L17051E
         STA   $6E
         SEP   #$20
         LDA   #$11
         STA   $65
         JMP   L0F07BC

         MX    %00
L0F06FF  LDA   #$0012
         STA   $5C
         LDA   #L1705C8
         STA   $6C
         LDA   #^L1705C8
         STA   $6E
         SEP   #$20
         LDA   #$12
         STA   $65
         JMP   L0F07CB

         MX    %00
L0F0717  LDA   #$0013
         STA   $5C
         LDA   #L1706A0
         STA   $6C
         LDA   #^L1706A0
         STA   $6E
         SEP   #$20
         LDA   #$13
         STA   $65
         JMP   L0F07CB

         MX    %00
L0F072F  LDA   #$0014
         STA   $5C
         LDA   #L170784
         STA   $6C
         LDA   #^L170784
         STA   $6E
         SEP   #$20
         LDA   #$14
         STA   $65
         JMP   L0F07CB

         MX    %00
L0F0747  LDA   #$0015
         STA   $5C
         LDA   #L170874
         STA   $6C
         LDA   #^L170874
         STA   $6E
         SEP   #$20
         LDA   #$15
         STA   $65
         JMP   L0F07CB

         MX    %00
L0F075F  LDA   #$0016
         STA   $5C
         LDA   #L170970
         STA   $6C
         LDA   #^L170970
         STA   $6E
         SEP   #$20
         LDA   #$16
         STA   $65
         JMP   L0F07CB

         MX    %00
L0F0777  LDA   #$0017
         STA   $5C
         LDA   #L170A78
         STA   $6C
         LDA   #^L170A78
         STA   $6E
         SEP   #$20
         LDA   #$17
         STA   $65
         JMP   L0F07CB

L0F078F  LDA   #$02
         STA   $64
         REP   #$20
         AND   #$00FF
         ASL
         STA   L023308
         PLP
         RTL

         MX    %10
L0F079E  LDA   #$03
         STA   $64
         REP   #$20
         AND   #$00FF
         ASL
         STA   L023308
         PLP
         RTL

         MX    %10
L0F07AD  LDA   #$04
         STA   $64
         REP   #$20
         AND   #$00FF
         ASL
         STA   L023308
         PLP
         RTL

         MX    %10
L0F07BC  LDA   #$05
         STA   $64
         REP   #$20
         AND   #$00FF
         ASL
         STA   L023308
         PLP
         RTL

         MX    %10
L0F07CB  LDA   #$06
         STA   $64
         REP   #$20
         AND   #$00FF
         ASL
         STA   L023308
         PLP
         RTL

L0F07DA  ENT
         PHP
         SEP   #$20
         LDX   $6E
         PHX
         LDX   $6C
         PHX
         LDA   $5C
         BEQ   L0F07EA
         JMP   L0F07EE

L0F07EA  LDA   #$02
         STA   $5C
L0F07EE  LDX   $5C
         PHX
         LDX   $60
         STX   L02330C
         LDX   $68
         STX   $24
         STX   $04
         JSL   L1809AE
         LDX   $00
         STX   $64
         LDA   #$00
         XBA
         LDA   $69
         TAX
         LDA   L0206A8,X
         STA   $69
         PLX
         STX   $5C
         TXA
         STA   $68
         LDX   $64
         STX   $60
         LDX   $68
         PHX
         LDX   $60
         PHX
         SEP   #$20
         LDA   $5C
         SEC
         SBC   #$02
         STA   $5C
         BCS   L0F082D
         JMP   L0F0936

L0F082D  STZ   $65
         LDA   $5C
         STA   $64
         STZ   $5D
         REP   #$20
         LDA   $5C
         STA   L023350
         LDA   $64
         ASL
         CLC
         ADC   L02330C
         STA   $60
         SEP   #$20
         LDA   $68
         STA   $65
         REP   #$20
         LDA   ($60)
         STA   $68
         INC   $60
         INC   $60
         LDA   ($60)
         STA   $6A
         LDA   L023350
         TAX
         JMP   (L0F0860,X)
L0F0860  DA    L0F087C
         DA    L0F087C
         DA    L0F087C
         DA    L0F087C
         DA    L0F0896
         DA    L0F0896
         DA    L0F0896
         DA    L0F0896
         DA    L0F08B0
         DA    L0F08B0
         DA    L0F08B0
         DA    L0F08B0
         DA    L0F08CA
         DA    L0F08CA
L0F087C  SEP   #$20
         LDA   #$02
         STA   $64
         REP   #$20
         ASL
         STA   L023308
         LDA   $64
         PHA
         LDA   $68
         STA   $6C
         LDA   $6A
         STA   $6E
         JMP   L0F08E1

L0F0896  SEP   #$20
         LDA   #$04
         STA   $64
         REP   #$20
         ASL
         STA   L023308
         LDA   $64
         PHA
         LDA   $68
         STA   $6C
         LDA   $6A
         STA   $6E
         JMP   L0F08E1

L0F08B0  SEP   #$20
         LDA   #$06
         STA   $64
         REP   #$20
         ASL
         STA   L023308
         LDA   $64
         PHA
         LDA   $68
         STA   $6C
         LDA   $6A
         STA   $6E
         JMP   L0F08E1

L0F08CA  SEP   #$20
         LDA   #$08
         STA   $64
         REP   #$20
         ASL
         STA   L023308
         LDA   $64
         PHA
         LDA   $68
         STA   $6C
         LDA   $6A
         STA   $6E
L0F08E1  LDA   L023E28
         CMP   #$00FD
         BNE   L0F0919
         LDX   $5C
         PHX
         LDA   $24
         STA   $68
         SEP   #$20
         LDA   $68
         CLC
         ADC   #$05
         STA   $68
         JSL   L0F1E48
         LDA   $5C
         BNE   L0F092E
         LDA   $24
         SEC
         SBC   #$05
         STA   $68
         LDA   $25
         STA   $69
         JSL   L0F1E48
         LDA   $5C
         BNE   L0F092E
         REP   #$20
         PLA
         STA   $5C
L0F0919  PLA
         STA   $64
         PLA
         STA   $60
         PLA
         STA   $68
         JSL   L0F0946
         PLA
         STA   $6C
         PLA
         STA   $6E
         PLP
         RTL

L0F092E  REP   #$20
         PLA
         STA   $5C
         PLA
         STA   $64
L0F0936  REP   #$20
         PLA
         STA   $60
         PLA
         STA   $68
         PLA
         STA   $6C
         PLA
         STA   $6E
         PLP
         RTL

L0F0946  PHP
         SEP   #$20
         STZ   L02330A
         LDA   $65
         LSR
         EOR   #$FF
         INC
         STA   $5C
         CLC
         ADC   $69
         STA   $69
         LDA   $60
         AND   #$FE
         STA   $60
         BIT   #$02
         BEQ   L0F0968
         LDA   #$01
         STA   L02330A
L0F0968  REP   #$20
         LSR   $60
         LSR   $60
         SEP   #$20
         LDA   $64
         LSR
         EOR   #$FF
         INC
         CLC
         ADC   $60
         STA   $5C
         REP   #$20
         LDA   $5C
         PHA
         LDA   $69
         AND   #$00FF
         ASL
         TAX
         LDA   L020368,X
         CLC
         ADC   L02330A
         STA   $68
         PLA
         STA   $5C
         SEP   #$20
         SEC
         SBC   #$40
         STA   $5C
         BCC   L0F09C5
         REP   #$20
         LDA   $5C
         AND   #$00FF
         ASL
         CLC
         ADC   $68
         STA   $60
         SEP   #$20
         LDA   $5C
         CMP   #$40
         BCC   L0F09B3
         PLP
         RTL

L0F09B3  CLC
         ADC   $64
         STA   $5C
         CMP   #$40
         BCS   L0F0A04
         REP   #$20
         SEP   #$20
         ASL   $64
         JMP   L0F0A1E

L0F09C5  LDA   $64
         STA   $5D
         CLC
         ADC   $5C
         DEC
         STA   $5C
         BPL   L0F09D3
         PLP
         RTL

L0F09D3  REP   #$20
         LDA   $60
         PHA
         LDA   $68
         STA   $60
         PLA
         STA   $68
         SEP   #$20
         LDA   $5C
         STA   $69
         INC
         STA   $64
         LDA   $5D
         SEC
         SBC   $64
         STA   $5D
         REP   #$20
         LDA   $5C
         XBA
         AND   #$00FF
         ASL
         CLC
         ADC   $6C
         STA   $6C
         SEP   #$20
         ASL   $64
         JMP   L0F0A1E

L0F0A04  DEC
         SEC
         SBC   $64
         EOR   #$FF
         INC
         CLC
         ADC   #$3F
         STA   $5C
         SEP   #$20
         LDA   $5C
         ASL
         SEC
         SBC   L02330A
         STA   $64
         JMP   L0F0A1E

L0F0A1E  REP   #$20
         LDA   #$00E1
         STA   $72
         LDA   $60
         STA   $70
         LDA   $64
         AND   #$00FF
         ASL
         TAX
         SEP   #$20
         LDA   $65
         STA   $5D
         REP   #$20
         JMP   (L0F0A3B,X)

L0F0A3B  DA    L0F0A5D
         DA    L0F0A5F
         DA    L0F0AAF
         DA    L0F0AFE
         DA    L0F0B8A
         DA    L0F0C13
         DA    L0F0CC5
         DA    L0F0D78
         DA    L0F0E52
         DA    L0F0F29
         DA    L0F1018
         DA    L0F1104
         DA    L0F1213
         DA    L0F131F
         DA    L0F144E
         DA    L0F157A
         DA    L0F16C9
L0F0A5D  PLP
         RTL

L0F0A5F  LDA   #$00A0
         STA   $60
L0F0A64  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCC   L0F0A96
         SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F0A7B
         PLP
         RTL

L0F0A7B  SEP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         REP   #$20
L0F0A96  LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         SEP   #$20
         DEC   $5D
         REP   #$20
         BNE   L0F0A64
         PLP
         RTL

L0F0AAF  LDA   #$00A0
         STA   $60
L0F0AB4  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCC   L0F0AE5
         SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F0ACB
         PLP
         RTL

L0F0ACB  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
L0F0AE5  LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         SEP   #$20
         DEC   $5D
         REP   #$20
         BNE   L0F0AB4
         PLP
         RTL

L0F0AFE  LDA   #$009E
         STA   $60
L0F0B03  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCC   L0F0B74
         SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F0B1A
         PLP
         RTL

L0F0B1A  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         SEP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         REP   #$20
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$0002
         STA   $6C
L0F0B6A  SEP   #$20
         DEC   $5D
         REP   #$20
         BNE   L0F0B03
         PLP
         RTL

L0F0B74  LDA   $70
         CLC
         ADC   $60
         STA   $70
         INC   $70
         INC   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F0B6A

L0F0B8A  LDA   #$009E
         STA   $60
L0F0B8F  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCC   L0F0BFD
         SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F0BA6
         PLP
         RTL

L0F0BA6  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$0002
         STA   $6C
L0F0BF3  SEP   #$20
         DEC   $5D
         REP   #$20
         BNE   L0F0B8F
         PLP
         RTL

L0F0BFD  LDA   $70
         CLC
         ADC   $60
         STA   $70
         INC   $70
         INC   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F0BF3

L0F0C13  LDA   #$009C
         STA   $60
L0F0C18  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F0C28
         JMP   L0F0CAF

L0F0C28  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F0C32
         PLP
         RTL

L0F0C32  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         SEP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         REP   #$20
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$0004
         STA   $6C
L0F0CA2  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F0CAD
         JMP   L0F0C18

L0F0CAD  PLP
         RTL

L0F0CAF  LDA   $70
         CLC
         ADC   $60
         INC
         INC
         INC
         INC
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F0CA2

L0F0CC5  LDA   #$009C
         STA   $60
L0F0CCA  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F0CDA
         JMP   L0F0D5E

L0F0CDA  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F0CE4
         PLP
         RTL

L0F0CE4  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$0004
         STA   $6C
L0F0D51  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F0D5C
         JMP   L0F0CCA

L0F0D5C  PLP
         RTL

L0F0D5E  LDA   $70
         CLC
         ADC   $60
         STA   $70
         INC   $70
         INC   $70
         INC   $70
         INC   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F0D51

L0F0D78  LDA   #$009A
         STA   $60
L0F0D7D  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F0D8D
         JMP   L0F0E34

L0F0D8D  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F0D97
         PLP
         RTL

L0F0D97  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         SEP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         REP   #$20
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$0006
         STA   $6C
L0F0E27  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F0E32
         JMP   L0F0D7D

L0F0E32  PLP
         RTL

L0F0E34  LDA   $70
         CLC
         ADC   $60
         STA   $70
         INC   $70
         INC   $70
         INC   $70
         INC   $70
         INC   $70
         INC   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F0E27

L0F0E52  LDA   #$009A
         STA   $60
L0F0E57  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F0E67
         JMP   L0F0F0B

L0F0E67  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F0E71
         PLP
         RTL

L0F0E71  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$0006
         STA   $6C
L0F0EFE  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F0F09
         JMP   L0F0E57

L0F0F09  PLP
         RTL

L0F0F0B  LDA   $70
         CLC
         ADC   $60
         STA   $70
         INC   $70
         INC   $70
         INC   $70
         INC   $70
         INC   $70
         INC   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F0EFE

L0F0F29  LDA   #$0098
         STA   $60
L0F0F2E  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F0F3E
         JMP   L0F1005

L0F0F3E  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F0F48
         PLP
         RTL

L0F0F48  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         SEP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         REP   #$20
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$0008
         STA   $6C
L0F0FF8  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F1003
         JMP   L0F0F2E

L0F1003  PLP
         RTL

L0F1005  LDA   $70
         CLC
         ADC   #$00A0
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F0FF8

L0F1018  LDA   #$0098
         STA   $60
L0F101D  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F102D
         JMP   L0F10F1

L0F102D  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F1037
         PLP
         RTL

L0F1037  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$0008
         STA   $6C
L0F10E4  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F10EF
         JMP   L0F101D

L0F10EF  PLP
         RTL

L0F10F1  LDA   $70
         CLC
         ADC   #$00A0
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F10E4

L0F1104  LDA   #$0096
         STA   $60
L0F1109  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F1119
         JMP   L0F1200

L0F1119  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F1123
         PLP
         RTL

L0F1123  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         SEP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         REP   #$20
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$000A
         STA   $6C
L0F11F3  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F11FE
         JMP   L0F1109

L0F11FE  PLP
         RTL

L0F1200  LDA   $70
         CLC
         ADC   #$00A0
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F11F3

L0F1213  LDA   #$0096
         STA   $60
L0F1218  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F1228
         JMP   L0F130C

L0F1228  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F1232
         PLP
         RTL

L0F1232  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$000A
         STA   $6C
L0F12FF  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F130A
         JMP   L0F1218

L0F130A  PLP
         RTL

L0F130C  LDA   $70
         CLC
         ADC   #$00A0
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F12FF

L0F131F  LDA   #$0094
         STA   $60
L0F1324  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F1334
         JMP   L0F143B

L0F1334  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F133E
         PLP
         RTL

L0F133E  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         SEP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         REP   #$20
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$000C
         STA   $6C
L0F142E  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F1439
         JMP   L0F1324

L0F1439  PLP
         RTL

L0F143B  LDA   $70
         CLC
         ADC   #$00A0
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F142E

L0F144E  LDA   #$0094
         STA   $60
L0F1453  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F1463
         JMP   L0F1567

L0F1463  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F146D
         PLP
         RTL

L0F146D  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$000C
         STA   $6C
L0F155A  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F1565
         JMP   L0F1453

L0F1565  PLP
         RTL

L0F1567  LDA   $70
         CLC
         ADC   #$00A0
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F155A

L0F157A  LDA   #$0092
         STA   $60
L0F157F  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F158F
         JMP   L0F16B6

L0F158F  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F1599
         PLP
         RTL

L0F1599  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         SEP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         REP   #$20
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$000E
         STA   $6C
L0F16A9  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F16B4
         JMP   L0F157F

L0F16B4  PLP
         RTL

L0F16B6  LDA   $70
         CLC
         ADC   #$0160
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F16A9

L0F16C9  LDA   #$0092
         STA   $60
L0F16CE  LDA   $70
         CLC
         ADC   #$0100
         STA   $64
         CMP   #$2100
         BCS   L0F16DE
         JMP   L0F1802

L0F16DE  SEP   #$20
         LDA   $65
         CMP   #$9E
         BCC   L0F16E8
         PLP
         RTL

L0F16E8  REP   #$20
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         INC   $6C
         INC   $6C
         INC   $70
         INC   $70
         LDA   [$6C]
         STA   $04
         EOR   #$FFFF
         STA   $14
         LDA   $04
         AND   L023D85
         STA   $04
         LDA   [$70]
         AND   $14
         ORA   $04
         STA   [$70]
         LDA   $70
         CLC
         ADC   $60
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         SEC
         SBC   #$000E
         STA   $6C
L0F17F5  SEP   #$20
         DEC   $5D
         REP   #$20
         BEQ   L0F1800
         JMP   L0F16CE

L0F1800  PLP
         RTL

L0F1802  LDA   $70
         CLC
         ADC   #$0160
         STA   $70
         LDA   $6C
         CLC
         ADC   L023308
         STA   $6C
         JMP   L0F17F5

L0F1815  ENT
         PHP
         REP   #$20
         LDA   #L025280
         STA   $6C
         CLC
         ADC   #$00C0
         STA   L023360
         LDA   #$0010
         STA   $64
L0F1829  LDA   ($6C)
         AND   #$00FF
         STA   $5C
         BEQ   L0F1836
         JSL   L0F183E
L0F1836  INC   $6C
         DEC   $64
         BNE   L0F1829
         PLP
         RTL

L0F183E  PHP
         REP   #$20
         LDA   $64
         PHA
         LDA   $6C
         PHA
         SEP   #$20
         LDA   $5C
         AND   #$7F
         CMP   #$04
         BNE   L0F1858
         JSL   L1216B2
         JMP   L0F1D1A

L0F1858  LDA   ($6C)
         BIT   #$80
         BEQ   L0F1887
         REP   #$20
         LDA   #$0000
         STA   L024330
         LDA   #$0000
         STA   L024332
         SEP   #$20
         LDY   #$0050
         LDA   ($6C),Y
         STA   $61
         LDY   #$0040
         LDA   ($6C),Y
         STA   $60
         LDY   #$0060
         LDA   ($6C),Y
         STA   $5C
         JSL   L0F1F47
L0F1887  LDA   L02436E
         BEQ   L0F188F
         JMP   L0F1D1A

L0F188F  LDY   #$0020
         LDA   ($6C),Y
         STA   $64
         STA   L02335E
         LDY   #$0030
         LDA   ($6C),Y
         STA   $65
         STA   L02335F
         LDA   #$00
         XBA
         LDY   #$00A0
         LDA   ($6C),Y
         ASL
         TAX
         LDY   #$0090
         LDA   ($6C),Y
         STA   $5C
         JMP   (L0F18B7,X)

L0F18B7  DA    L0F18C7
         DA    L0F18E3
         DA    L0F18FF
         DA    L0F191B
         DA    L0F1937
         DA    L0F1953
         DA    L0F196F
         DA    L0F198B
L0F18C7  JSL   L0F1E16
         LDY   #$0090
         LDA   $5C
         STA   ($6C),Y
         LDA   $64
         CLC
         ADC   $60
         STA   $68
         LDA   $65
         SEC
         SBC   #$0C
         STA   $69
         JMP   L0F19A4

L0F18E3  JSL   L0F1E2F
         LDY   #$0090
         LDA   $5C
         STA   ($6C),Y
         LDA   $64
         CLC
         ADC   #$0C
         STA   $68
         LDA   $65
         SEC
         SBC   $60
         STA   $69
         JMP   L0F19B8

L0F18FF  JSL   L0F1E2F
         LDY   #$0090
         LDA   $5C
         STA   ($6C),Y
         LDA   $64
         CLC
         ADC   #$0C
         STA   $68
         LDA   $65
         CLC
         ADC   $60
         STA   $69
         JMP   L0F19B8

L0F191B  JSL   L0F1E16
         LDY   #$0090
         LDA   $5C
         STA   ($6C),Y
         LDA   $64
         CLC
         ADC   $60
         STA   $68
         LDA   $65
         CLC
         ADC   #$0C
         STA   $69
         JMP   L0F19CC

L0F1937  JSL   L0F1E16
         LDY   #$0090
         LDA   $5C
         STA   ($6C),Y
         LDA   $64
         SEC
         SBC   $60
         STA   $68
         LDA   $65
         CLC
         ADC   #$0C
         STA   $69
         JMP   L0F19CC

L0F1953  JSL   L0F1E2F
         LDY   #$0090
         LDA   $5C
         STA   ($6C),Y
         LDA   $64
         SEC
         SBC   #$0C
         STA   $68
         LDA   $65
         CLC
         ADC   $60
         STA   $69
         JMP   L0F19E0

L0F196F  JSL   L0F1E2F
         LDY   #$0090
         LDA   $5C
         STA   ($6C),Y
         LDA   $64
         SEC
         SBC   #$0C
         STA   $68
         LDA   $65
         SEC
         SBC   $60
         STA   $69
         JMP   L0F19E0

L0F198B  JSL   L0F1E16
         LDY   #$0090
         LDA   $5C
         STA   ($6C),Y
         LDA   $64
         SEC
         SBC   $60
         STA   $68
         LDA   $65
         SEC
         SBC   #$0C
         STA   $69
L0F19A4  REP   #$20
         LDA   #L024E0A
         STA   $70
         SEP   #$20
         LDA   $69
         STA   $64
         JSL   L0F1E8E
         JMP   L0F19F4

L0F19B8  REP   #$20
         LDA   #L024E08
         STA   $70
         SEP   #$20
         LDA   $68
         STA   $64
         JSL   L0F1E8E
         JMP   L0F1AD9

L0F19CC  REP   #$20
         LDA   #L024E05
         STA   $70
         SEP   #$20
         LDA   $69
         STA   $64
         JSL   L0F1E8E
         JMP   L0F19F4

L0F19E0  REP   #$20
         LDA   #L024E09
         STA   $70
         SEP   #$20
         LDA   $68
         STA   $64
         JSL   L0F1E8E
         JMP   L0F1AD9

L0F19F4  STZ   L02580C
         LDY   #$0010
         LDA   ($6C),Y
         STA   $5C
         LDA   $65
         STA   ($6C),Y
         LDA   $5C
         EOR   $65
         STA   $5C
         BNE   L0F1A0D
         JMP   L0F1BBE

L0F1A0D  LDA   $5C
         STA   $65
         REP   #$20
         LDA   #L024E00
         STA   $70
         SEP   #$20
         LDA   $65
         BIT   #$01
         BEQ   L0F1A24
         JSL   L0F1D95
L0F1A24  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$02
         BEQ   L0F1A3D
         JSL   L0F1D95
L0F1A3D  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$04
         BEQ   L0F1A56
         JSL   L0F1D95
L0F1A56  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$08
         BEQ   L0F1A6F
         JSL   L0F1D95
L0F1A6F  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$10
         BEQ   L0F1A88
         JSL   L0F1D95
L0F1A88  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$20
         BEQ   L0F1AA1
         JSL   L0F1D95
L0F1AA1  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$40
         BEQ   L0F1ABA
         JSL   L0F1D95
L0F1ABA  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$80
         BNE   L0F1AD2
         JMP   L0F1BBE

L0F1AD2  JSL   L0F1D95
         JMP   L0F1BBE

L0F1AD9  STZ   L02580C
         LDY   #$0010
         LDA   ($6C),Y
         STA   $5C
         LDA   $65
         STA   ($6C),Y
         LDA   $5C
         EOR   $65
         STA   $5C
         BNE   L0F1AF2
         JMP   L0F1BBE

L0F1AF2  LDA   $5C
         STA   $65
         REP   #$20
         LDA   #L024E00
         STA   $70
         SEP   #$20
         LDA   $65
         BIT   #$01
         BEQ   L0F1B09
         JSL   L0F1D24
L0F1B09  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$02
         BEQ   L0F1B22
         JSL   L0F1D24
L0F1B22  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$04
         BEQ   L0F1B3B
         JSL   L0F1D24
L0F1B3B  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$08
         BEQ   L0F1B54
         JSL   L0F1D24
L0F1B54  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$10
         BEQ   L0F1B6D
         JSL   L0F1D24
L0F1B6D  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$20
         BEQ   L0F1B86
         JSL   L0F1D24
L0F1B86  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$40
         BEQ   L0F1B9F
         JSL   L0F1D24
L0F1B9F  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         INC   L02580C
         LDA   $65
         BIT   #$80
         BNE   L0F1BB7
         JMP   L0F1BBE

L0F1BB7  JSL   L0F1D24
         JMP   L0F1BBE

L0F1BBE  LDY   #$00C0
         LDA   ($6C),Y
         DEC
         STA   $5C
         BNE   L0F1C01
         REP   #$20
         LDA   $60
         PHA
         LDA   $6C
         CLC
         ADC   #$00C0
         STA   $60
         SEC
         SBC   L023360
         BIT   #$0008
         BEQ   L0F1BE9
         LDA   $60
         SEC
         SBC   #$0008
         STA   $60
         JMP   L0F1BF1

L0F1BE9  LDA   $60
         CLC
         ADC   #$0008
         STA   $60
L0F1BF1  SEP   #$20
         LDA   ($60)
         STA   $5C
         PLX
         STX   $60
         CMP   #$02
         BNE   L0F1C01
         JMP   L0F1D14

L0F1C01  LDY   #$0020
         LDA   $68
         STA   ($6C),Y
         LDY   #$0030
         LDA   $69
         STA   ($6C),Y
         LDA   L023E28
         CMP   #$FD
         BNE   L0F1C58
         REP   #$20
         LDA   $68
         PHA
         SEP   #$20
         LDA   $68
         CLC
         ADC   #$02
         STA   $68
         JSL   L0F1E48
         REP   #$20
         PLA
         STA   $68
         SEP   #$20
         LDA   $5C
         BEQ   L0F1C36
         JMP   L0F1D14

L0F1C36  REP   #$20
         LDA   $68
         PHA
         SEP   #$20
         LDA   $68
         SEC
         SBC   #$02
         STA   $68
         JSL   L0F1E48
         REP   #$20
         PLA
         STA   $68
         SEP   #$20
         LDA   $5C
         BEQ   L0F1C56
         JMP   L0F1D14

L0F1C56  REP   #$20
L0F1C58  REP   #$20
         LDA   $68
         STA   $04
         JSL   L1809AE
         REP   #$20
         LDA   $00
         STA   $5C
         LDA   $69
         AND   #$00FF
         ASL
         TAX
         LDA   L020568,X
         STA   $64
         SEP   #$20
         LDA   $5C
         STA   $60
         REP   #$20
         LSR   $5C
         LSR   $5C
         SEP   #$20
         LDA   $5C
         CMP   #$41
         BCS   L0F1C8B
         JMP   L0F1D14

L0F1C8B  CMP   #$7F
         BCC   L0F1C92
         JMP   L0F1D14

L0F1C92  SEC
         SBC   #$40
         STA   $5C
         REP   #$20
         LDA   $5C
         ASL
         CLC
         ADC   $64
         STA   $5C
         SEP   #$20
         LDY   #$0050
         LDA   $5D
         STA   ($6C),Y
         LDY   #$0040
         LDA   $5C
         STA   ($6C),Y
         REP   #$20
         LDA   $5C
         STA   $68
         LDA   #$FFFF
         STA   L024330
         STA   L024332
         SEP   #$20
         LDY   #$0030
         LDA   ($6C),Y
         STA   $64
         LDA   $60
         AND   #$02
         LSR
         STA   $60
         LDA   #$00
         XBA
         LDA   $64
         TAX
         LDA   L0207E8,X
         STA   $5C
         CMP   #$01
         BCS   L0F1CE1
         INC   $5C
L0F1CE1  LDA   $5C
         CMP   #$07
         BCC   L0F1CEB
         LDA   #$06
         STA   $5C
L0F1CEB  DEC   $5C
         LDA   $5C
         ASL
         CLC
         ADC   $60
         STA   $5C
         LDY   #$0060
         STA   ($6C),Y
         LDA   ($6C)
         ORA   #$80
         STA   ($6C)
         REP   #$20
         LDA   $68
         CMP   #$9800
         BCS   L0F1D14
         STA   $60
         SEP   #$20
         JSL   L0F1F47
         JMP   L0F1D1A

L0F1D14  SEP   #$20
         LDA   #$00
         STA   ($6C)
L0F1D1A  REP   #$20
         PLA
         STA   $6C
         PLA
         STA   $64
         PLP
         RTL

L0F1D24  PHP
         SEP   #$20
         LDA   $69
         STA   $5C
         LDY   #$0005
         CMP   ($70),Y
         BCC   L0F1D93
         DEC
         STA   $5C
         LDY   #$000A
         CMP   ($70),Y
         BCS   L0F1D93
         LDY   #$0007
         LDA   ($70),Y
         STA   $5C
         BEQ   L0F1D93
         LDA   ($70)
         AND   #$7F
         STA   $5C
         CMP   #$11
         BCC   L0F1D93
         LDX   L02580C
         LDA   L024D48,X
         STA   $5C
         BEQ   L0F1D93
         LDY   #$00C0
         LDA   #$02
         STA   ($6C),Y
         LDY   #$00B0
         LDA   ($6C),Y
         STA   $64
         LDY   #$0007
         LDA   ($70),Y
         SEC
         SBC   $64
         STA   $5C
         BCS   L0F1D75
         STZ   $5C
L0F1D75  LDY   #$0007
         LDA   $5C
         STA   ($70),Y
         JSL   L0F0384
         JSL   L290F5E
         LDA   #$00
         STA   ($6C)
         PLP
         PLA
         REP   #$20
         PLA
         PLA
         STA   $6C
         PLA
         STA   $64
L0F1D93  PLP
         RTL

L0F1D95  PHP
         SEP   #$20
         LDA   $68
         STA   $5C
         LDY   #$0008
         CMP   ($70),Y
         BCS   L0F1DA6
         JMP   L0F1E14

L0F1DA6  DEC   $5C
         LDA   $5C
         LDY   #$0009
         CMP   ($70),Y
         BCC   L0F1DB4
         JMP   L0F1E14

L0F1DB4  LDY   #$0007
         LDA   ($70),Y
         STA   $5C
         BNE   L0F1DC0
         JMP   L0F1E14

L0F1DC0  LDA   ($70)
         AND   #$7F
         STA   $5C
         CMP   #$11
         BCS   L0F1DCD
         JMP   L0F1E14

L0F1DCD  LDX   L02580C
         LDA   L024D48,X
         STA   $5C
         BNE   L0F1DDA
         JMP   L0F1E14

L0F1DDA  LDY   #$00C0
         LDA   #$02
         STA   ($6C),Y
         LDY   #$00B0
         LDA   ($6C),Y
         STA   $64
         LDY   #$0007
         LDA   ($70),Y
         SEC
         SBC   $64
         STA   $5C
         BCS   L0F1DF6
         STZ   $5C
L0F1DF6  LDY   #$0007
         LDA   $5C
         STA   ($70),Y
         JSL   L0F0384
         JSL   L290F5E
         LDA   #$00
         STA   ($6C)
         PLP
         PLA
         REP   #$20
         PLA
         PLA
         STA   $6C
         PLA
         STA   $64
L0F1E14  PLP
         RTL

L0F1E16  PHP
         SEP   #$20
         LDY   #$0070
         LDA   ($6C),Y
         STA   $68
         LDY   #$0080
         LDA   ($6C),Y
         STA   $69
         STZ   $60
         JSL   L1808D9
         PLP
         RTL

L0F1E2F  PHP
         SEP   #$20
         LDY   #$0070
         LDA   ($6C),Y
         STA   $69
         LDY   #$0080
         LDA   ($6C),Y
         STA   $68
         STZ   $60
         JSL   L1808D9
         PLP
         RTL

L0F1E48  ENT
         PHP
         SEP   #$20
         LDA   $68
         LSR
         LSR
         LSR
         STA   $68
         AND   #$07
         STA   $5C
         REP   #$20
         LDA   $5C
         AND   #$00FF
         TAX
         SEP   #$20
         LDA   L0257D7,X
         STA   $64
         LDA   $68
         LSR
         LSR
         LSR
         STA   $68
         LDA   $69
         SEC
         SBC   #$10
         BMI   L0F1E88
         ASL
         CLC
         ADC   $68
         REP   #$20
         AND   #$00FF
         TAX
         SEP   #$20
         LDA   L02537F,X
         AND   $64
         STA   $5C
         PLP
         RTL

L0F1E88  LDA   #$00
         STA   $5C
         PLP
         RTL

L0F1E8E  PHP
         SEP   #$20
         LDA   $69
         SEC
         SBC   #$10
         ORA   $68
         STA   $5C
         BPL   L0F1E9F
         JMP   L0F1F39

L0F1E9F  PLA
L0F1EA0  ENT
         PHP
         SEP   #$20
         LDA   ($70)
         SEC
         SBC   $64
         STA   $5C
         ROR   $65
         REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         LDA   ($70)
         SEC
         SBC   $64
         ROR   $65
         REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         LDA   ($70)
         SEC
         SBC   $64
         ROR   $65
         REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         LDA   ($70)
         SEC
         SBC   $64
         ROR   $65
         REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         LDA   ($70)
         SEC
         SBC   $64
         ROR   $65
         REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         LDA   ($70)
         SEC
         SBC   $64
         ROR   $65
         REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         LDA   ($70)
         SEC
         SBC   $64
         ROR   $65
         REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         SEP   #$20
         LDA   ($70)
         SEC
         SBC   $64
         ROR   $65
         LDA   $65
         EOR   #$FF
         STA   $65
         PLP
         RTL

L0F1F39  PLP
         PLA
         REP   #$20
         PLA
         SEP   #$20
         LDA   #$00
         STA   ($6C)
         JMP   L0F1D1A

L0F1F47  PHP
         REP   #$20
         LDA   $6C
         PHA
         LDA   $60
         STA   $70
         LDA   #$0000
         SEP   #$20
         LDA   $5C
         ASL
         TAX
         STZ   $65
         LDA   #$E1
         STA   $72
         JMP   (L0F1F63,X)

L0F1F63  DA    L0F1F7F
         DA    L0F1F7B
         DA    L0F1F94
         DA    L0F1F90
         DA    L0F1FA5
         DA    L0F1FB2
         DA    L0F1FE4
         DA    L0F1FF1
         DA    L0F2042
         DA    L0F204F
         DA    L0F20B8
         DA    L0F20C5
L0F1F7B  REP   #$20
         INC   $70
L0F1F7F  SEP   #$20
         LDA   #$E0
         AND   L024330
         STA   [$70]
         LDY   #$00A0
         STA   [$70],Y
         JMP   L0F2141

L0F1F90  REP   #$20
         INC   $70
L0F1F94  SEP   #$20
         LDA   #$EE
         AND   L024330
         STA   [$70]
         LDY   #$00A0
         STA   [$70],Y
         JMP   L0F2141

L0F1FA5  REP   #$20
         LDA   $70
         SEC
         SBC   #$00A1
         STA   $70
         JMP   L0F1FBC

L0F1FB2  REP   #$20
         LDA   $70
         SEC
         SBC   #$00A0
         STA   $70
L0F1FBC  SEP   #$20
         LDY   #$0001
         LDA   #$F0
         AND   L024330
         STA   [$70],Y
         REP   #$20
         LDY   #$00A0
         LDA   #$EE0E
         AND   L024330
         STA   [$70],Y
         SEP   #$20
         LDA   #$E0
         LDY   #$0141
         AND   L024330
         STA   [$70],Y
         JMP   L0F2141

L0F1FE4  REP   #$20
         LDA   $70
         SEC
         SBC   #$00A1
         STA   $70
         JMP   L0F1FFB

L0F1FF1  REP   #$20
         LDA   $70
         SEC
         SBC   #$00A0
         STA   $70
L0F1FFB  SEP   #$20
         LDY   #$0001
         LDA   #$FE
         AND   L024330
         STA   [$70],Y
         LDY   #$00A0
         LDA   #$0F
         AND   L024330
         STA   [$70],Y
         REP   #$20
         LDA   #$E0EE
         LDY   #$00A1
         AND   L024330
         STA   [$70],Y
         LDY   #$0140
         LDA   #$EE0F
         AND   L024330
         STA   [$70],Y
         SEP   #$20
         LDY   #$0142
         LDA   #$E0
         AND   L024330
         STA   [$70],Y
         LDY   #$01E1
         LDA   #$EE
         AND   L024330
         STA   [$70],Y
         JMP   L0F2141

L0F2042  REP   #$20
         LDA   $70
         SEC
         SBC   #$0141
         STA   $70
         JMP   L0F2059

L0F204F  REP   #$20
         LDA   $70
         SEC
         SBC   #$0140
         STA   $70
L0F2059  REP   #$20
         LDA   #$FE0F
         AND   L024330
         STA   [$70]
         LDY   #$00A0
         LDA   #$EEEE
         AND   L024330
         STA   [$70],Y
         SEP   #$20
         LDA   #$E0
         LDY   #$00A2
         AND   L024330
         STA   [$70],Y
         LDY   #$0140
         LDA   #$FE
         AND   L024330
         STA   [$70],Y
         REP   #$20
         LDY   #$0141
         LDA   #$E0EE
         AND   L024330
         STA   [$70],Y
         LDY   #$01E0
         LDA   #$EEEE
         AND   L024330
         STA   [$70],Y
         SEP   #$20
         LDY   #$01E2
         LDA   #$E0
         AND   L024330
         STA   [$70],Y
         REP   #$20
         LDY   #$0280
         LDA   #$EE0E
         AND   L024330
         STA   [$70],Y
         JMP   L0F2141

L0F20B8  REP   #$20
         LDA   $70
         SEC
         SBC   #$0141
         STA   $70
         JMP   L0F20CF

L0F20C5  REP   #$20
         LDA   $70
         SEC
         SBC   #$0140
         STA   $70
L0F20CF  SEP   #$20
         LDY   #$0001
         LDA   #$FF
         AND   L024330
         STA   [$70],Y
         LDY   #$00A0
         LDA   #$0F
         AND   L024330
         STA   [$70],Y
         REP   #$20
         LDA   #$E0FE
         LDY   #$00A1
         AND   L024330
         STA   [$70],Y
         LDY   #$0140
         LDA   #$EEFE
         AND   L024330
         STA   [$70],Y
         SEP   #$20
         LDY   #$0142
         LDA   #$EE
         AND   L024330
         STA   [$70],Y
         LDY   #$01E0
         LDA   #$FE
         AND   L024330
         STA   [$70],Y
         REP   #$20
         LDY   #$01E1
         LDA   #$EEFE
         AND   L024330
         STA   [$70],Y
         LDY   #$0280
         LDA   #$EE0E
         AND   L024330
         STA   [$70],Y
         SEP   #$20
         LDY   #$0282
         LDA   #$E0
         AND   L024330
         STA   [$70],Y
         LDY   #$0321
         LDA   #$EE
         AND   L024330
         STA   [$70],Y
L0F2141  REP   #$20
         PLA
         STA   $6C
         PLP
         RTL

L0F2148  ENT
         PHP
         REP   #$30
         LDA   L023FE8
         STA   $28
         LDX   L023FEE
         STX   $00
         LDY   L023FF0
         STY   $04
         TYA
         SEP   #$20
         SEC
         SBC   $00
         BCS   L0F2169
         STX   $04
         STY   $00
         EOR   #$FF
         INC
L0F2169  STA   $04
         LDA   $05
         SEC
         SBC   $01
         BCC   L0F2175
         JMP   L0F2246

L0F2175  EOR   #$FF
         INC
         STA   $05
         LDA   $01
         REP   #$20
         AND   #$00FF
         ASL
         TAY
         LDA   ($28),Y
         STA   $24
         LDA   #$00E1
         STA   $26
         LDA   $00
         AND   #$00FF
         LSR
         BCS   L0F21ED
         LSR
         BCS   L0F21C2
         ASL
         CLC
         ADC   $24
         STA   $24
         LDA   #$FF60
         STA   $44
         SEP   #$20
         LDA   $04
         CMP   $05
         BCC   L0F21B5
         LSR
         STA   $53
         LDA   $04
         INC
         STA   $20
         JMP   L0F23E6

         MX    %10
L0F21B5  LDA   $05
         LSR
         STA   $53
         LDA   $05
         INC
         STA   $20
         JMP   L0F231B

         MX    %00
L0F21C2  ASL
         CLC
         ADC   $24
         STA   $24
         LDA   #$FF60
         STA   $44
         SEP   #$20
         LDA   $04
         CMP   $05
         BCC   L0F21E0
         LSR
         STA   $53
         LDA   $04
         INC
         STA   $20
         JMP   L0F25E6

L0F21E0  LDA   $05
         LSR
         STA   $53
         LDA   $05
         INC
         STA   $20
         JMP   L0F2375

         MX    %00
L0F21ED  LSR
         BCS   L0F221B
         ASL
         CLC
         ADC   $24
         STA   $24
         LDA   #$FF60
         STA   $44
         SEP   #$20
         LDA   $04
         CMP   $05
         BCC   L0F220E
         LSR
         STA   $53
         LDA   $04
         INC
         STA   $20
         JMP   L0F24FF

L0F220E  LDA   $05
         LSR
         STA   $53
         LDA   $05
         INC
         STA   $20
         JMP   L0F234A

         MX    %00
L0F221B  ASL
         CLC
         ADC   $24
         STA   $24
         LDA   #$FF60
         STA   $44
         SEP   #$20
         LDA   $04
         CMP   $05
         BCC   L0F2239
         LSR
         STA   $53
         LDA   $04
         INC
         STA   $20
         JMP   L0F266B

L0F2239  LDA   $05
         LSR
         STA   $53
         LDA   $05
         INC
         STA   $20
         JMP   L0F23A7

L0F2246  STA   $05
         LDA   $01
         REP   #$20
         AND   #$00FF
         ASL
         TAY
         LDA   ($28),Y
         STA   $24
         LDA   #$00E1
         STA   $26
         LDA   $00
         AND   #$00FF
         LSR
         BCS   L0F22BB
         LSR
         BCS   L0F2290
         ASL
         CLC
         ADC   $24
         STA   $24
         LDA   #$00A0
         STA   $44
         SEP   #$20
         LDA   $04
         CMP   $05
         BCC   L0F2283
         LSR
         STA   $53
         LDA   $04
         INC
         STA   $20
         JMP   L0F23E6

L0F2283  LDA   $05
         LSR
         STA   $53
         LDA   $05
         INC
         STA   $20
         JMP   L0F231B

         MX    %00
L0F2290  ASL
         CLC
         ADC   $24
         STA   $24
         LDA   #$00A0
         STA   $44
         SEP   #$20
         LDA   $04
         CMP   $05
         BCC   L0F22AE
         LSR
         STA   $53
         LDA   $04
         INC
         STA   $20
         JMP   L0F25E6

L0F22AE  LDA   $05
         LSR
         STA   $53
         LDA   $05
         INC
         STA   $20
         JMP   L0F2375

         MX    %00
L0F22BB  LSR
         BCS   L0F22E9
         ASL
         CLC
         ADC   $24
         STA   $24
         LDA   #$00A0
         STA   $44
         SEP   #$20
         LDA   $04
         CMP   $05
         BCC   L0F22DC
         LSR
         STA   $53
         LDA   $04
         INC
         STA   $20
         JMP   L0F24FF

L0F22DC  LDA   $05
         LSR
         STA   $53
         LDA   $05
         INC
         STA   $20
         JMP   L0F234A

         MX    %00
L0F22E9  ASL
         CLC
         ADC   $24
         STA   $24
         LDA   #$00A0
         STA   $44
         SEP   #$20
         LDA   $04
         CMP   $05
         BCC   L0F2307
         LSR
         STA   $53
         LDA   $04
         INC
         STA   $20
         JMP   L0F266B

L0F2307  LDA   $05
         LSR
         STA   $53
         LDA   $05
         INC
         STA   $20
         JMP   L0F23A7

         MX    %10
L0F2314  LDA   $53
         CLC
         ADC   $05
         STA   $53
L0F231B  LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         PHA
         LDA   [$24]
         AND   #$0F
         ORA   $01,S
         STA   [$24]
         PLA
         DEC   $20
         BNE   L0F2332
         PLP
         RTL

L0F2332  REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         LDA   $53
         SEC
         SBC   $04
         STA   $53
         BCS   L0F231B
         ADC   $05
         STA   $53
L0F234A  LDA   L023FEC
         PHA
         LDA   [$24]
         AND   #$F0
         ORA   $01,S
         STA   [$24]
         PLA
         DEC   $20
         BNE   L0F235D
         PLP
         RTL

L0F235D  REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         LDA   $53
         SEC
         SBC   $04
         STA   $53
         BCS   L0F234A
         ADC   $05
         STA   $53
L0F2375  LDY   #$0001
         LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         PHA
         LDA   [$24],Y
         AND   #$0F
         ORA   $01,S
         STA   [$24],Y
         PLA
         DEC   $20
         BNE   L0F238F
         PLP
         RTL

L0F238F  REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         LDA   $53
         SEC
         SBC   $04
         STA   $53
         BCS   L0F2375
         ADC   $05
         STA   $53
L0F23A7  LDY   #$0001
         LDA   L023FEC
         PHA
         LDA   [$24],Y
         AND   #$F0
         ORA   $01,S
         STA   [$24],Y
         PLA
         DEC   $20
         BNE   L0F23BD
         PLP
         RTL

L0F23BD  REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         LDA   $53
         SEC
         SBC   $04
         STA   $53
         BCS   L0F23A7
         REP   #$20
         INC   $24
         INC   $24
         SEP   #$20
         STA   $53
         JMP   L0F2314

L0F23DE  REP   #$20
         INC   $24
         INC   $24
         SEP   #$20
L0F23E6  DEC   $20
         BNE   L0F23ED
         JMP   L0F2451

L0F23ED  LDA   $53
         SEC
         SBC   $05
         STA   $53
         BCS   L0F23F9
         JMP   L0F24DC

L0F23F9  DEC   $20
         BNE   L0F2400
         JMP   L0F2464

L0F2400  SEC
         SBC   $05
         STA   $53
         BCS   L0F240A
         JMP   L0F248D

L0F240A  DEC   $20
         BNE   L0F2411
         JMP   L0F2472

L0F2411  SEC
         SBC   $05
         STA   $53
         BCS   L0F241B
         JMP   L0F24AE

L0F241B  LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         ORA   L023FEC
         STA   [$24]
         LDY   #$0001
         STA   [$24],Y
         DEC   $20
         BNE   L0F2432
         PLP
         RTL

L0F2432  LDA   $53
         SEC
         SBC   $05
         STA   $53
         BCC   L0F243E
         JMP   L0F23DE

L0F243E  CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         JMP   L0F23DE

L0F2451  LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         PHA
         LDA   [$24]
         AND   #$0F
         ORA   $01,S
         STA   [$24]
         PLA
         PLP
         RTL

L0F2464  LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         ORA   L023FEC
         STA   [$24]
         PLP
         RTL

L0F2472  LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         PHA
         ORA   L023FEC
         STA   [$24]
         LDY   #$0001
         LDA   [$24],Y
         AND   #$0F
         ORA   $01,S
         STA   [$24],Y
         PLA
         PLP
         RTL

L0F248D  LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         ORA   L023FEC
         STA   [$24]
         LDA   $53
         CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         JMP   L0F25E6

L0F24AE  LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         PHA
         ORA   L023FEC
         STA   [$24]
         LDY   #$0001
         LDA   [$24],Y
         AND   #$0F
         ORA   $01,S
         STA   [$24],Y
         PLA
         LDA   $53
         CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         JMP   L0F266B

L0F24DC  LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         PHA
         LDA   [$24]
         AND   #$0F
         ORA   $01,S
         STA   [$24]
         PLA
         LDA   $53
         CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
L0F24FF  DEC   $20
         BNE   L0F2506
         JMP   L0F2565

L0F2506  LDA   $53
         SEC
         SBC   $05
         STA   $53
         BCS   L0F2512
         JMP   L0F25C7

L0F2512  DEC   $20
         BNE   L0F2519
         JMP   L0F2574

L0F2519  LDA   $53
         SEC
         SBC   $05
         STA   $53
         BCS   L0F2525
         JMP   L0F2594

L0F2525  LDA   L023FEC
         PHA
         LDA   [$24]
         AND   #$F0
         ORA   $01,S
         STA   [$24]
         PLA
         ASL
         ASL
         ASL
         ASL
         ORA   L023FEC
         LDY   #$0001
         STA   [$24],Y
         DEC   $20
         BNE   L0F2544
         PLP
         RTL

L0F2544  LDA   $53
         SEC
         SBC   $05
         STA   $53
         BCC   L0F2550
         JMP   L0F23DE

L0F2550  LDA   $53
         CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         JMP   L0F23DE

L0F2565  LDA   L023FEC
         PHA
         LDA   [$24]
         AND   #$F0
         ORA   $01,S
         STA   [$24]
         PLA
         PLP
         RTL

L0F2574  LDA   L023FEC
         PHA
         ASL
         ASL
         ASL
         ASL
         PHA
         LDY   #$0001
         LDA   [$24],Y
         AND   #$0F
         ORA   $01,S
         STA   [$24],Y
         PLA
         LDA   [$24]
         AND   #$F0
         ORA   $01,S
         STA   [$24]
         PLA
         PLP
         RTL

L0F2594  LDA   L023FEC
         PHA
         ASL
         ASL
         ASL
         ASL
         PHA
         LDY   #$0001
         LDA   [$24],Y
         AND   #$0F
         ORA   $01,S
         STA   [$24],Y
         PLA
         LDA   [$24]
         AND   #$F0
         ORA   $01,S
         STA   [$24]
         PLA
         LDA   $53
         CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         JMP   L0F266B

L0F25C7  LDA   L023FEC
         PHA
         LDA   [$24]
         AND   #$F0
         ORA   $01,S
         STA   [$24]
         PLA
         LDA   $53
         CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
L0F25E6  DEC   $20
         BNE   L0F25ED
         JMP   L0F262F

L0F25ED  LDA   $53
         SEC
         SBC   $05
         STA   $53
         BCS   L0F25F9
         JMP   L0F2645

L0F25F9  LDY   #$0001
         LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         ORA   L023FEC
         STA   [$24],Y
         DEC   $20
         BNE   L0F260E
         PLP
         RTL

L0F260E  LDA   $53
         SEC
         SBC   $05
         STA   $53
         BCC   L0F261A
         JMP   L0F23DE

L0F261A  LDA   $53
         CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         JMP   L0F23DE

L0F262F  LDY   #$0001
         LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         PHA
         LDA   [$24],Y
         AND   #$0F
         ORA   $01,S
         STA   [$24],Y
         PLA
         PLP
         RTL

L0F2645  LDY   #$0001
         LDA   L023FEC
         ASL
         ASL
         ASL
         ASL
         PHA
         LDA   [$24],Y
         AND   #$0F
         ORA   $01,S
         STA   [$24],Y
         PLA
         LDA   $53
         CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
L0F266B  LDY   #$0001
         LDA   L023FEC
         PHA
         LDA   [$24],Y
         AND   #$F0
         ORA   $01,S
         STA   [$24],Y
         PLA
         DEC   $20
         BNE   L0F2681
         PLP
         RTL

L0F2681  LDA   $53
         SEC
         SBC   $05
         STA   $53
         BCC   L0F268D
         JMP   L0F23DE

L0F268D  LDA   $53
         CLC
         ADC   $04
         STA   $53
         REP   #$20
         LDA   $24
         CLC
         ADC   $44
         STA   $24
         SEP   #$20
         JMP   L0F23DE

L0F26A2  ENT
         PHP
         REP   #$20
         STA   L023362
         JSL   L0F26B4
         LDA   #$FFFF
         STA   L023362
         PLP
         RTL

L0F26B4  ENT
         PHP
         REP   #$20
         LDA   L023FEE
         STA   $00
         LDA   L023FF0
         STA   $04
         SEP   #$20
         LDA   L02444E
         AND   #$80
         BEQ   L0F26D3
         LDA   $01
         BIT   #$80
         BNE   L0F26D3
         JMP   L0F284F

L0F26D3  LDA   $05
         CMP   $01
         BCC   L0F26FC
         CMP   #$20
         BCS   L0F26E0
         JMP   L0F284F

L0F26E0  CMP   #$E8
         BCC   L0F26E8
         LDA   #$E7
         STA   $05
L0F26E8  LDA   $01
         CMP   #$E8
         BCC   L0F26F1
         JMP   L0F284F

L0F26F1  CMP   #$20
         BCS   L0F2711
         LDA   #$20
         STA   $01
         JMP   L0F2711

L0F26FC  LDA   #$E7
         STA   $05
         LDA   $01
         CMP   #$E8
         BCC   L0F2709
         JMP   L0F284F

L0F2709  CMP   #$20
         BCS   L0F2711
         LDA   #$20
         STA   $01
L0F2711  LDA   #$00
         XBA
         LDA   L024459
         ASL
         TAX
         JMP   (L0F271C,X)

L0F271C  DA    L0F2728
         DA    L0F278D
         DA    L0F2742
         DA    L0F284F
         DA    L0F275C
         DA    L0F2776
L0F2728  LDA   $04
         SEC
         SBC   #$80
         BCS   L0F2732
         JMP   L0F284F

L0F2732  STA   $04
         LDA   $00
         SEC
         SBC   #$80
         BCS   L0F273D
         LDA   #$00
L0F273D  STA   $00
         JMP   L0F278D

L0F2742  LDA   $00
         CLC
         ADC   #$80
         BCC   L0F274C
         JMP   L0F284F

L0F274C  STA   $00
         LDA   $04
         CLC
         ADC   #$80
         BCC   L0F2757
         LDA   #$FF
L0F2757  STA   $04
         JMP   L0F278D

L0F275C  LDA   $04
         SEC
         SBC   #$82
         BCS   L0F2766
         JMP   L0F284F

L0F2766  STA   $04
         LDA   $00
         SEC
         SBC   #$82
         BCS   L0F2771
         LDA   #$00
L0F2771  STA   $00
         JMP   L0F278D

L0F2776  LDA   $00
         CLC
         ADC   #$86
         BCC   L0F2780
         JMP   L0F284F

L0F2780  STA   $00
         LDA   $04
         CLC
         ADC   #$86
         BCC   L0F278B
         LDA   #$FF
L0F278B  STA   $04
L0F278D  REP   #$20
         LDA   $00
         STA   L023FEE
         STA   L023FF0
         PLP
L0F2798  ENT
         PHP
         SEP   #$20
         LDA   $04
         CMP   $00
         BCS   L0F27A4
         JMP   L0F284F

L0F27A4  LDA   $05
         CMP   $01
         BCS   L0F27AD
         JMP   L0F284F

L0F27AD  REP   #$20
         LDA   $00
         AND   #$0003
         ASL
         TAX
         LDAL  L0F283F,X
         STA   $2C
         EOR   #$FFFF
         STA   $30
         LDA   $04
         AND   #$0003
         ASL
         TAX
         LDAL  L0F2847,X
         STA   $24
         EOR   #$FFFF
         STA   $28
         LDA   $01
         AND   #$00FF
         ASL
         CLC
         ADC   L023FE8
         STA   $10
         LDA   ($10)
         STA   $10
         LDA   #$00E1
         STA   $12
         SEP   #$20
         LDA   $04
         LSR
         AND   #$FE
         STA   $04
         LDA   $00
         LSR
         AND   #$FE
         STA   $00
         REP   #$20
         AND   #$00FF
         CLC
         ADC   $10
         STA   $10
         LDA   L023362
         STA   $34
         AND   $2C
         STA   $2C
         LDA   $34
         AND   $24
         STA   $24
         SEP   #$20
         LDA   #$00
         XBA
         LDA   $04
         SEC
         SBC   $00
         CMP   #$0B
         BCS   L0F2856
         TAX
         LDA   $05
         SEC
         SBC   $01
         INC
         JMP   (L0F2829,X)

L0F2829  DA    L0F28CC
         DA    L0F294D
         DA    L0F29DF
         DA    L0F2A95
         DA    L0F2B04
         DA    L0F2B79
         DA    L0F2BFA
         DA    L0F2C8A
         DA    L0F2D26
         DA    L0F2DCE
         DA    L0F2E82
L0F283F  DW    $FFFF
         DW    $FF0F
         DW    $FF00
         DW    $0F00
L0F2847  DW    $00F0
         DW    $00FF
         DW    $F0FF
         DW    $FFFF
L0F284F  LDA   #$FF
         STA   L023FEF
         PLP
         RTL

L0F2856  LSR
         DEC
         STA   $3C
         STZ   $3D
         LDA   $05
         SEC
         SBC   $01
         INC
         REP   #$20
         AND   #$00FF
         STA   $40
L0F2869  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDX   $3C
         LDA   L023362
L0F287A  STA   [$10]
         INC   $10
         INC   $10
         DEX
         BNE   L0F287A
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2891
         PLP
         RTL

L0F2891  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDX   $3C
         LDA   L023362
L0F28AA  STA   [$10]
         DEC   $10
         DEC   $10
         DEX
         BNE   L0F28AA
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         DEC   $40
         BNE   L0F28C1
         PLP
         RTL

L0F28C1  LDA   #$00A0
         CLC
         ADC   $10
         STA   $10
         JMP   L0F2869

L0F28CC  REP   #$20
         AND   #$00FF
         STA   $40
         LDA   $2C
         AND   $24
         STA   $38
         LDA   $30
         ORA   $28
         STA   $52
L0F28DF  LDA   $52
         AND   [$10]
         ORA   $38
         STA   [$10]
         DEC   $40
         BNE   L0F28ED
         PLP
         RTL

L0F28ED  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $52
         AND   [$10]
         ORA   $38
         STA   [$10]
         DEC   $40
         BNE   L0F2903
         PLP
         RTL

L0F2903  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $52
         AND   [$10]
         ORA   $38
         STA   [$10]
         DEC   $40
         BNE   L0F2919
         PLP
         RTL

L0F2919  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $52
         AND   [$10]
         ORA   $38
         STA   [$10]
         DEC   $40
         BNE   L0F292F
         PLP
         RTL

L0F292F  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $52
         AND   [$10]
         ORA   $38
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BNE   L0F28DF
         PLP
         RTL

L0F294D  REP   #$20
         AND   #$00FF
         STA   $40
L0F2954  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F296E
         PLP
         RTL

L0F296E  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         DEC   $40
         BNE   L0F2990
         PLP
         RTL

L0F2990  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F29B2
         PLP
         RTL

L0F29B2  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BEQ   L0F29DD
         JMP   L0F2954

L0F29DD  PLP
         RTL

L0F29DF  REP   #$20
         AND   #$00FF
         STA   $40
L0F29E6  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2A09
         PLP
         RTL

L0F2A09  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         DEC   $40
         BNE   L0F2A34
         PLP
         RTL

L0F2A34  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2A5F
         PLP
         RTL

L0F2A5F  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BEQ   L0F2A93
         JMP   L0F29E6

L0F2A93  PLP
         RTL

L0F2A95  REP   #$20
         AND   #$00FF
         STA   $40
L0F2A9C  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2AC8
         PLP
         RTL

L0F2AC8  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BEQ   L0F2B02
         JMP   L0F2A9C

L0F2B02  PLP
         RTL

L0F2B04  REP   #$20
         AND   #$00FF
         STA   $40
L0F2B0B  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2B3A
         PLP
         RTL

L0F2B3A  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BNE   L0F2B0B
         PLP
         RTL

L0F2B79  REP   #$20
         AND   #$00FF
         STA   $40
L0F2B80  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2BB5
         PLP
         RTL

L0F2BB5  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BNE   L0F2B80
         PLP
         RTL

L0F2BFA  REP   #$20
         AND   #$00FF
         STA   $40
L0F2C01  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2C3C
         PLP
         RTL

L0F2C3C  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BEQ   L0F2C88
         JMP   L0F2C01

L0F2C88  PLP
         RTL

L0F2C8A  REP   #$20
         AND   #$00FF
         STA   $40
L0F2C91  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2CD2
         PLP
         RTL

L0F2CD2  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BEQ   L0F2D24
         JMP   L0F2C91

L0F2D24  PLP
         RTL

L0F2D26  REP   #$20
         AND   #$00FF
         STA   $40
L0F2D2D  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2D74
         PLP
         RTL

L0F2D74  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BEQ   L0F2DCC
         JMP   L0F2D2D

L0F2DCC  PLP
         RTL

L0F2DCE  REP   #$20
         AND   #$00FF
         STA   $40
L0F2DD5  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2E22
         PLP
         RTL

L0F2E22  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BEQ   L0F2E80
         JMP   L0F2DD5

L0F2E80  PLP
         RTL

L0F2E82  REP   #$20
         AND   #$00FF
         STA   $40
L0F2E89  LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         INC   $10
         INC   $10
         LDA   L023362
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         STA   [$10]
         INC   $10
         INC   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $40
         BNE   L0F2EDC
         PLP
         RTL

L0F2EDC  LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         LDA   $28
         AND   [$10]
         ORA   $24
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   L023362
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         STA   [$10]
         DEC   $10
         DEC   $10
         LDA   $30
         AND   [$10]
         ORA   $2C
         STA   [$10]
         LDA   $10
         CLC
         ADC   #$00A0
         STA   $10
         DEC   $40
         BEQ   L0F2F40
         JMP   L0F2E89

L0F2F40  PLP
         RTL

L0F2F42  ENT
         PHP
         REP   #$20
         LDA   L023E28
         AND   #$00FF
         CMP   #$00FD
         BNE   L0F2F52
         BRA   L0F2F56
L0F2F52  JSL   L0F01AC
L0F2F56  LDA   #$2080
         STA   $24
         LDA   #$00E1
         STA   $26
         LDX   #$0000
         LDA   #$0004
         STA   $44
L0F2F68  LDAL  L023929,X
         STA   $46
         INX
         INX
         PHX
         LDA   #$0004
         JSL   L0F3175
         LDA   $24
         SEC
         SBC   #$04FC
         STA   $24
         LDA   #$0006
         STA   $48
L0F2F85  LDA   #$0000
         JSL   L0F3175
         LDA   $24
         SEC
         SBC   #$04FC
         STA   $24
         DEC   $48
         BNE   L0F2F85
         LDA   #$0005
         JSL   L0F3175
         LDA   $24
         SEC
         SBC   #$001C
         STA   $24
L0F2FA7  LDA   #$0002
         JSL   L0F3175
         LDA   $24
         SEC
         SBC   #$04E4
         STA   $24
         LDA   #$0003
         JSL   L0F3175
         LDA   $24
         SEC
         SBC   #$001C
         STA   $24
         DEC   $46
         BNE   L0F2FA7
         LDA   #$0006
         JSL   L0F3175
         LDA   $24
         SEC
         SBC   #$04FC
         STA   $24
         LDA   #$0006
         STA   $48
L0F2FDD  LDA   #$0001
         JSL   L0F3175
         LDA   $24
         SEC
         SBC   #$04FC
         STA   $24
         DEC   $48
         BNE   L0F2FDD
         LDA   #$0007
         JSL   L0F3175
         LDA   $24
         SEC
         SBC   #$001C
         STA   $24
         PLX
         DEC   $44
         BEQ   L0F3007
         JMP   L0F2F68

L0F3007  LDA   #$2586
         STA   $24
         LDA   #L023B31
         STA   $28
         LDA   #^L023B31
         STA   $2A
         LDA   L025808
         AND   #$00FF
         BNE   L0F3026
         LDA   #$5555
         STA   L023D85
         BRA   L0F302C
L0F3026  LDA   #$FFFF
         STA   L023D85
L0F302C  LDA   #$0005
         STA   $44
L0F3031  JSL   L0F318D
         LDA   $24
         SEC
         SBC   #$04FC
         STA   $24
         LDA   $28
         CLC
         ADC   #$0020
         STA   $28
         DEC   $44
         BNE   L0F3031
         LDA   #$9384
         STA   $24
         LDA   #$0004
         STA   $44
L0F3053  JSL   L0F318D
         LDA   $24
         SEC
         SBC   #$04FC
         STA   $24
         LDA   $28
         CLC
         ADC   #$0020
         STA   $28
         DEC   $44
         BNE   L0F3053
         LDA   #L0C0000
         LDX   L024309
         BEQ   L0F307A
L0F3073  CLC
         ADC   #$02A0
         DEX
         BNE   L0F3073
L0F307A  TAX
         LDY   #$6684
         JSL   L0F31CB
         LDA   #L0C0D20
         LDX   L02430B
         BEQ   L0F3091
L0F308A  CLC
         ADC   #$02A0
         DEX
         BNE   L0F308A
L0F3091  TAX
         LDY   #$6690
         JSL   L0F31CB
         LDA   L02431B
         BEQ   L0F30A7
L0F309E  PHA
         JSL   L1804EC
         PLA
         DEC
         BNE   L0F309E
L0F30A7  JSL   L1805C1
         LDA   L024307
         DEC
         BEQ   L0F30BD
         BMI   L0F30BD
L0F30B3  PHA
         DEC
         JSL   L18060E
         PLA
         DEC
         BNE   L0F30B3
L0F30BD  LDA   L024321
         BEQ   L0F30C9
         LDA   #$0003
         JSL   L18060E
L0F30C9  LDA   L024319
         BEQ   L0F30D5
         LDA   #$0004
         JSL   L18060E
L0F30D5  LDA   L02431D
         BEQ   L0F30E1
         LDA   #$0005
         JSL   L18060E
L0F30E1  PLP
         PHP
         REP   #$20
         LDA   #$00E1
         STA   $02
         LDX   #$0005
L0F30ED  LDA   L024313,X
         AND   #$00FF
         BNE   L0F30F8
         DEX
         BPL   L0F30ED
L0F30F8  TXA
         INC
         ASL
         TAX
         JMP   (L0F30FF,X)

L0F30FF  DA    L0F3167
         DA    L0F3158
         DA    L0F3149
         DA    L0F313A
         DA    L0F312B
         DA    L0F311C
         DA    L0F310D
L0F310D  LDA   #$2A86
         STA   $00
         LDA   L024318
         AND   #$00FF
         JSL   L18042E
L0F311C  LDA   #$2A89
         STA   $00
         LDA   L024317
         AND   #$00FF
         JSL   L18048E
L0F312B  LDA   #$2A8C
         STA   $00
         LDA   L024316
         AND   #$00FF
         JSL   L18042E
L0F313A  LDA   #$2A8F
         STA   $00
         LDA   L024315
         AND   #$00FF
         JSL   L18048E
L0F3149  LDA   #$2A92
         STA   $00
         LDA   L024314
         AND   #$00FF
         JSL   L18042E
L0F3158  LDA   #$2A95
         STA   $00
         LDA   L024313
         AND   #$00FF
         JSL   L18048E
L0F3167  LDA   #$2A98
         STA   $00
         LDA   #$0000
         JSL   L18042E
         PLP
         RTL

L0F3175  ASL
         ASL
         ASL
         ASL
         ASL
         CLC
         ADC   L025800
         STA   $28
         LDA   #$0000
         ADC   L025802
         STA   $2A
         JSL   L0F318D
         RTL

L0F318D  LDX   #$0008
         LDY   #$0000
L0F3193  LDA   [$28],Y
         EOR   #$FFFF
         AND   [$24]
         PHA
         LDA   [$28],Y
         AND   L023D85
         ORA   $01,S
         STA   [$24]
         PLA
         INY
         INY
         INC   $24
         INC   $24
         LDA   [$28],Y
         EOR   #$FFFF
         AND   [$24]
         PHA
         LDA   [$28],Y
         AND   L023D85
         ORA   $01,S
         STA   [$24]
         PLA
         INY
         INY
         LDA   $24
         CLC
         ADC   #$009E
         STA   $24
         DEX
         BNE   L0F3193
         RTL

L0F31CB  LDA   #$0038
         STA   $0E
         STX   $28
         LDX   #^L0C0000
         STX   $2A
         STY   $24
         LDX   #$00E1
         STX   $26
L0F31DE  LDY   #$0000
         LDA   [$28],Y
         ORA   L025806
         STA   [$24],Y
         INY
         INY
         LDA   [$28],Y
         ORA   L025806
         STA   [$24],Y
         INY
         INY
         LDA   [$28],Y
         ORA   L025806
         STA   [$24],Y
         INY
         INY
         LDA   [$28],Y
         ORA   L025806
         STA   [$24],Y
         INY
         INY
         LDA   [$28],Y
         ORA   L025806
         STA   [$24],Y
         INY
         INY
         LDA   [$28],Y
         ORA   L025806
         STA   [$24],Y
         INY
         INY
         LDA   $24
         CLC
         ADC   #$00A0
         STA   $24
         TYA
         CLC
         ADC   $28
         STA   $28
         DEC   $0E
         BNE   L0F31DE
         RTL

L0F322A  ENT
         PHP
         REP   #$20
         STZ   L023CAD
         LDA   #$0005
         STA   L023C89
L0F3236  LDA   L023CAD
         INC
         STA   L023CAD
         LDA   L023C89
         BNE   L0F3236
         LDA   L023CAD
         CMP   #$0800
         BCC   L0F3253
         LDA   #$0001
         STA   L0242FB
         JMP   L0F3256

L0F3253  STZ   L0242FB
L0F3256  PLP
         RTL

