*
* HypercardGS
* segment: $0B HyperTalk
*
* (k) 2015, Brutal Deluxe Software
*

         mx    %00
         rel
         dsk   HyperTalk.l
         lst   off

*---------------------------------------

         use   HyperTalk.E
         use   HyperTalk.X

         use   4/Ctl.Macs
         use   4/Desk.Macs
         use   4/Dialog.Macs
         use   4/Event.Macs
         use   4/Int.Macs
         use   4/Line.Macs
         use   4/List.Macs
         use   4/Locator.Macs
         use   4/Mem.Macs
         use   4/Menu.Macs
         use   4/MidiSyn.Macs
         use   4/Misc.Macs
         use   4/Qd.Macs
         use   4/SANE.Macs
         use   4/Sound.Macs
         use   4/Std.Macs
         use   4/Text.Macs
         use   4/Util.Macs
         use   4/Window.Macs

*---------------------------------------

L0B0000  ENT
         PHD
         TSC
         SEC
         SBC   #$000C
         TCD
         TCS
         LDA   L051BDE
         DEC
         DEC
         BNE   L0B0015
         LDA   L051BE0
         DEC
         BEQ   L0B0068
L0B0015  LDA   L0553B5
         STA   $01
         LDA   L0553B7
         STA   $03
         LDY   #$0008
         LDA   [$01],Y
         INC
         STA   [$01],Y
         LDY   #$000A
         CMP   [$01],Y
         BCC   L0B0030
         STA   [$01],Y
L0B0030  DEC
         ASL
         ASL
         ASL
         TAX
         LDY   #$0004
         LDA   [$01],Y
         STA   $05
         INY
         INY
         LDA   [$01],Y
         STA   $07
         LDY   #$0002
         LDA   [$05]
         STA   $09
         LDA   [$05],Y
         STA   $0B
         TXY
         LDA   [$09],Y
         STA   L051BDE
         INY
         INY
         LDA   [$09],Y
         STA   L051BE0
         INY
         INY
         LDA   [$09],Y
         STA   L051BE2
         INY
         INY
         LDA   [$09],Y
         STA   L051BE4
L0B0068  TDC
         TCS
         PLY
         PLY
         PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B0072  ENT
         PHD
         TSC
         SEC
         SBC   #$0040
         TCD
         TCS
         STZ   $46
         PHA
         PHA
         JSL   L0B3773
         PLA
         PLX
         CMP   #$0000
         BNE   L0B008C
         BRL   L0B00A6
L0B008C  CMP   #$0011
         BNE   L0B0094
         BRL   L0B0159
L0B0094  CMP   #$0012
         BNE   L0B009B
         INC   $46
L0B009B  LDX   $41
         TDC
         CLC
         ADC   #$0042
         TCS
         TXA
         TCD
         RTL

L0B00A6  PHA
         PHA
         PEA   $0000
         JSL   L031415
         PLA
         STA   $05
         PLA
         STA   $07
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         JSL   L032589
         TDC
         CLC
         ADC   #$0022
         STA   $09
         STZ   $0B
         STZ   $01
L0B00CD  LDA   #$00FF
         AND   [$05]
         CMP   #$002D
         BEQ   L0B00E1
         CMP   #$0030
         BCC   L0B010C
         CMP   #$003A
         BCS   L0B010C
L0B00E1  LDA   $01
         INC
         STA   $01
         CMP   #$000A
         BCC   L0B00EE
         BRL   L0B0156
L0B00EE  SEP   #$20
         LDA   [$05]
         STA   [$09]
         REP   #$20
         INC   $09
         BCC   L0B0100
         INC   $0A
         BCC   L0B0100
         INC   $0B
L0B0100  INC   $05
         BCC   L0B00CD
         INC   $06
         BCC   L0B00CD
         INC   $07
         BRA   L0B00CD
L0B010C  CMP   #$0020
         BEQ   L0B011E
         CMP   #$000D
         BEQ   L0B011E
         CMP   #$0000
         BEQ   L0B011E
         BRL   L0B009B
L0B011E  LDA   $01
         BEQ   L0B0156
         SEP   #$20
         STA   $21
         REP   #$20
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         JSL   L032589
         LDA   #$00FF
         AND   [$05]
         BNE   L0B0156
         INC
         STA   $46
         JSL   L0E0000
         PHY
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$0021
         PHA
         JSL   L071DE3
         JSL   L0E0DE2
L0B0156  BRL   L0B009B
L0B0159  TDC
         CLC
         ADC   #$000D
         PEA   $0000
         PHA
         JSL   L0E04A7
         TDC
         CLC
         ADC   #$000D
         PEA   $0000
         PHA
         LDA   $0D
         STA   $17
         LDA   $0F
         STA   $19
         LDA   $11
         STA   $1B
         LDA   $13
         STA   $1D
         LDA   $15
         STA   $1F
         PEA   $0014
         _SANEFP816
         LDA   $0D
         CMP   $17
         BNE   L0B01C3
         LDA   $0F
         CMP   $19
         BNE   L0B01C3
         LDA   $11
         CMP   $1B
         BNE   L0B01C3
         LDA   $13
         CMP   $1D
         BNE   L0B01C3
         LDA   $15
         CMP   $1F
         BNE   L0B01C3
         INC   $46
         PHA
         PHA
         TDC
         CLC
         ADC   #$000D
         PEA   $0000
         PHA
         JSL   L150082
         JSL   L0E0DE2
         BRL   L0B009B
L0B01C3  TDC
         CLC
         ADC   #$0017
         PEA   $0000
         PHA
         JSL   L0E0C71
         BRL   L0B009B
L0B01D3  PHD
         TSC
         SEC
         SBC   #$000C
         TCD
         TCS
         STZ   $1A
         LDA   [$16]
         BNE   L0B01E4
         BRL   L0B0268
L0B01E4  STA   $03
         LDA   #$0000
         TAX
         SEP   #$20
         LDA   [$12]
         CMP   #$02
         BNE   L0B0217
         LDY   #$0001
         LDA   [$12],Y
         TAX
         LDAL  L0714D9,X
         CMP   #$69
         BNE   L0B0217
         INY
         LDA   [$12],Y
         TAX
         LDAL  L0714D9,X
         CMP   #$74
         BNE   L0B0217
         LDY   #$0004
         REP   #$20
         LDA   [$16],Y
         STA   $1A
         BRA   L0B0268
L0B0217  REP   #$20
         PHA
         PEI   $14
         PEI   $12
         LDY   #$0008
         LDA   [$16],Y
         PHA
         DEY
         DEY
         LDA   [$16],Y
         PHA
         JSL   L03261F
         PLA
         BEQ   L0B0268
         STA   $01
         LDY   #$000A
         LDA   [$16],Y
         STA   $09
         INY
         INY
         LDA   [$16],Y
         STA   $0B
         LDA   [$09]
         STA   $05
         LDY   #$0002
         LDA   [$09],Y
         STA   $07
         LDX   #$0000
         TXY
L0B024E  LDA   [$05],Y
         CMP   $01
         BEQ   L0B0265
         INX
         CPX   $03
         BEQ   L0B0268
         TYA
         CLC
         ADC   #$000E
         TAY
         BCC   L0B024E
         INC   $07
         BRA   L0B024E
L0B0265  INX
         STX   $1A
L0B0268  LDA   $10
         STA   $18
         LDA   $0F
         STA   $17
         LDX   $0D
         TDC
         CLC
         ADC   #$0016
         TCS
         TXA
         TCD
         RTL

L0B027B  PHD
         TSC
         SEC
         SBC   #$0016
         TCD
         TCS
         STZ   $2C
         PHY
         PHY
         LDA   L0553D5
         LDX   L0553D7
         STA   $0F
         STX   $11
         LDY   #$0002
         LDA   [$0F],Y
         STA   $0D
         PHA
         LDA   [$0F]
         STA   $0B
         PHA
         PEI   $2A
         PEI   $28
         JSL   L0324CD
         PLA
         STA   $01
         PLA
         STA   $03
         LDA   #$1000
         ADC   $0B
         STA   $0B
         BCC   L0B02B7
         INC   $0D
L0B02B7  LDA   [$28]
         AND   #$00FF
         ASL
         ASL
         ASL
         CLC
         ADC   #$0054
         STA   $09
L0B02C5  LDY   #$0002
         LDA   [$01],Y
         BNE   L0B02CF
         BRL   L0B0344
L0B02CF  INC
         BEQ   L0B031E
         PHY
         LDA   L0553CD
         LDX   L0553CF
         STA   $0F
         STX   $11
         LDY   #$0002
         LDA   [$0F],Y
         TAX
         LDA   [$0F]
         CLC
         ADC   [$01],Y
         BCC   L0B02EB
         INX
L0B02EB  PHX
         PHA
         PEI   $2A
         PEI   $28
         JSL   L071C56
         PLA
         BEQ   L0B031E
         INC   $2C
         LDA   [$01]
         AND   #$00FF
         STA   [$24]
         LDY   #$0002
         LDA   [$01],Y
         EOR   #$FFFF
         INC
         STA   [$1C]
         DEY
         LDA   [$01],Y
         AND   #$00FF
         BIT   #$0080
         BEQ   L0B031A
         ORA   #$FF80
L0B031A  STA   [$20]
         BRA   L0B034E
L0B031E  LDA   $09
         CLC
         ADC   $01
         STA   $01
         BCC   L0B0329
         INC   $03
L0B0329  LDA   $03
         CMP   $0D
         BCC   L0B02C5
         LDA   $01
         CMP   $0B
         BCC   L0B02C5
         LDA   $01
         SEC
         SBC   #$1000
         STA   $01
         BCS   L0B0341
         DEC   $03
L0B0341  BRL   L0B02C5
L0B0344  LDA   #$0015
         STA   [$24]
         LDA   #$0000
         STA   [$20]
L0B034E  LDA   $1A
         STA   $2A
         LDA   $19
         STA   $29
         LDX   $17
         TDC
         CLC
         ADC   #$0028
         TCS
         TXA
         TCD
         RTL

L0B0361  ENT
         PHD
         TSC
         SEC
         SBC   #$000A
         TCD
         TCS
         LDY   #$0002
         LDA   [$14]
         STA   $01
         LDA   [$14],Y
         STA   $03
         CLC
         LDA   $10
         ADC   #$0001
         STA   $05
         LDA   $12
         ADC   #$0000
         STA   $07
         LDY   #$FFFF
         SEP   #$20
         LDA   #$20
         STA   $09
L0B038C  INY
         CMP   [$01],Y
         BEQ   L0B038C
         JSR   L0B03F0
         LDA   #$22
         CMP   [$01]
         BNE   L0B03A2
         STA   $09
         LDY   #$0001
         JSR   L0B03F0
L0B03A2  LDY   #$0000
         SEP   #$10
L0B03A7  LDA   [$01],Y
         CMP   $09
         BEQ   L0B03BC
         CMP   #$0D
         BEQ   L0B03BC
         CMP   #$00
         BEQ   L0B03BC
         STA   [$05],Y
         INY
         CPY   #$FE
         BNE   L0B03A7
L0B03BC  TYA
         STA   [$10]
         LDA   $09
         CMP   #$22
         BEQ   L0B03C6
         DEY
L0B03C6  LDA   #$20
L0B03C8  INY
         CMP   [$01],Y
         BEQ   L0B03C8
         JSR   L0B03F0
         REP   #$30
         LDY   #$0002
         LDA   $01
         STA   [$14]
         LDA   $03
         STA   [$14],Y
         LDA   $0E
         STA   $16
         LDA   $0D
         STA   $15
         LDX   $0B
         TDC
         CLC
         ADC   #$0014
         TCS
         TXA
         TCD
         RTL

L0B03F0  PHP
         REP   #$20
         TYA
         CLC
         ADC   $01
         STA   $01
         BCC   L0B03FD
         INC   $03
L0B03FD  PLP
         RTS

L0B03FF  ENT
         PHD
         TSC
         SEC
         SBC   #$0014
         TCD
         TCS
         LDA   L0553C5
         STA   $05
         LDA   L0553C7
         STA   $07
         LDA   L0553C3
         BNE   L0B0419
         BRL   L0B04A1
L0B0419  DEC
         ASL
         ASL
         ASL
         ASL
         CLC
         ADC   [$05]
         STA   $09
         LDY   #$0002
         LDA   [$05],Y
         ADC   #$0000
         STA   $0B
         LDA   [$09]
         STA   $01
         LDA   [$09],Y
         STA   $03
         LDA   $09
         ADC   #$0006
         STA   $09
         BCC   L0B0440
         INC   $0B
L0B0440  LDA   $03
         BNE   L0B0479
         LDA   $01
         BEQ   L0B049E
         CMP   #$000B
         BCS   L0B0479
         LSR
         BCC   L0B046C
         BNE   L0B045C
         SEP   #$20
         LDA   [$09]
         STA   [$1A]
         REP   #$20
         BRA   L0B049E
L0B045C  ROL
         DEC
         TAY
         SEP   #$20
L0B0461  LDA   [$09],Y
         STA   [$1A],Y
         DEY
         BPL   L0B0461
         REP   #$20
         BRA   L0B049E
L0B046C  DEC
         ASL
         TAY
L0B046F  LDA   [$09],Y
         STA   [$1A],Y
         DEY
         DEY
         BPL   L0B046F
         BRA   L0B049E
L0B0479  LDA   [$09]
         STA   $0D
         LDA   [$09],Y
         STA   $0F
         LDA   [$0D],Y
         PHA
         LDA   [$0D]
         PHA
         PEI   $1C
         PEI   $1A
         PEI   $03
         PEI   $01
         JSL   L070597
         PEI   $0F
         PEI   $0D
         _DisposeHandle
L0B049E  DEC   L0553C3
L0B04A1  LDA   $18
         STA   $1C
         LDA   $17
         STA   $1B
         LDX   $15
         TDC
         CLC
         ADC   #$001A
         TCS
         TXA
         TCD
         RTL

L0B04B4  ENT
         PHD
         TSC
         SEC
         SBC   #$0012
         TCD
         TCS
         STZ   $22
         STZ   $01
         LDA   L0553C3
         CMP   L0553C1
         BNE   L0B04D3
         PHY
         JSL   L0B18F9
         PLA
         BNE   L0B04D3
         BRL   L0B05A1
L0B04D3  LDA   $1C
         BNE   L0B04DE
         LDA   $1A
         CMP   #$000B
         BCC   L0B050F
L0B04DE  PHY
         PHY
         PEI   $1C
         PEI   $1A
         LDA   L0553DB
         PHA
         PEA   $8000
         LDA   #$0000
         PHA
         PHA
         _NewHandle
         PLX
         PLY
         BCC   L0B04FE
         BRL   L0B05A1
L0B04FE  STY   $05
         STX   $03
         LDY   #$0002
         LDA   [$03]
         STA   $07
         LDA   [$03],Y
         STA   $09
         INC   $01
L0B050F  LDA   L0553C5
         STA   $0B
         LDA   L0553C7
         STA   $0D
         LDA   L0553C3
         INC   L0553C3
         ASL
         ASL
         ASL
         ASL
         CLC
         ADC   [$0B]
         STA   $0F
         LDY   #$0002
         LDA   [$0B],Y
         ADC   #$0000
         STA   $11
         LDA   $1A
         STA   [$0F]
         LDA   $1C
         STA   [$0F],Y
         LDA   $18
         AND   #$00FF
         INY
         INY
         STA   [$0F],Y
         LDA   $0F
         ADC   #$0006
         STA   $0F
         BCC   L0B054E
         INC   $11
L0B054E  LDA   $01
         BNE   L0B0584
         LDA   $1A
         BEQ   L0B059F
         LDY   #$0000
         DEC
         LSR
         BEQ   L0B057E
         DEC
         BEQ   L0B0578
         DEC
         BEQ   L0B0572
         DEC
         BEQ   L0B056C
         LDA   [$1E],Y
         STA   [$0F],Y
         INY
         INY
L0B056C  LDA   [$1E],Y
         STA   [$0F],Y
         INY
         INY
L0B0572  LDA   [$1E],Y
         STA   [$0F],Y
         INY
         INY
L0B0578  LDA   [$1E],Y
         STA   [$0F],Y
         INY
         INY
L0B057E  LDA   [$1E],Y
         STA   [$0F],Y
         BRA   L0B059F
L0B0584  LDY   #$0002
         LDA   $03
         STA   [$0F]
         LDA   $05
         STA   [$0F],Y
         PEI   $20
         PEI   $1E
         PEI   $09
         PEI   $07
         PEI   $1C
         PEI   $1A
         JSL   L070597
L0B059F  INC   $22
L0B05A1  LDA   $16
         STA   $20
         LDA   $15
         STA   $1F
         LDX   $13
         TDC
         CLC
         ADC   #$001E
         TCS
         TXA
         TCD
         RTL

L0B05B4  ENT
         PHD
         PHY
         TSC
         TCD
         LDA   #$0000
         STA   $10
         STA   [$08]
         TAY
         SEP   #$30
         LDA   [$0C]
         BEQ   L0B0619
         STA   $01
         TAY
L0B05C9  LDA   [$0C],Y
         CMP   #$20
         BEQ   L0B05D3
         CMP   #$0D
         BNE   L0B05D9
L0B05D3  DEY
         BNE   L0B05C9
         BRL   L0B0619
L0B05D9  CPY   #$04
         BEQ   L0B05E1
         CPY   #$05
         BNE   L0B0619
L0B05E1  TYA
         STA   [$0C]
         REP   #$30
         PHA
         PEI   $0E
         PEI   $0C
         CPY   #$0005
         BEQ   L0B0604
         PEA   ^L032E38
         PEA   L032E38
         JSL   L071C56
         PLA
         BEQ   L0B0613
         LDA   #$0001
         STA   [$08]
         BRA   L0B0611
L0B0604  PEA   ^L032E0A
         PEA   L032E0A
         JSL   L071C56
         PLA
         BEQ   L0B0613
L0B0611  INC   $10
L0B0613  SEP   #$30
         LDA   $01
         STA   [$0C]
L0B0619  REP   #$30
         LDA   $06
         STA   $0E
         LDA   $05
         STA   $0D
         TDC
         TCS
         PLY
         PLD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B062C  PHD
         TSC
         TCD
         LDA   $06
         DEC
         ASL
         ASL
         ASL
         CLC
         ADC   [$08]
         STA   $0C
         LDY   #$0002
         LDA   [$08],Y
         ADC   #$0000
         STA   $0E
         LDA   $04
         STA   $0A
         LDA   $03
         STA   $09
         TDC
         TCS
         PLD
         PLY
         PLY
         PLY
         RTL

L0B0653  ENT
         PHD
         TSC
         TCD
         LDX   #$0001
         LDA   $06
         CMP   L0550ED
         BEQ   L0B0675
         CMP   L0550DD
         BEQ   L0B0675
         CMP   L0550E1
         BEQ   L0B0675
         CMP   L0550E9
         BEQ   L0B0675
         CMP   L0550E5
         BEQ   L0B0675
         DEX
L0B0675  STX   $0A
         LDA   $04
         STA   $08
         LDA   $03
         STA   $07
         TDC
         TCS
         PLD
         PLY
         PLY
         RTL

         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         PHY
         PHY
         PEI   $10
         PEI   $0E
         JSL   L151301
         PLA
         STA   $01
         PLX
         STX   $03
         PHY
         PHY
         LDY   #$0002
         LDA   [$0E],Y
         PHA
         LDA   [$0E]
         PHA
         LDA   $01
         LSR
         LSR
         JSL   L150488
         PHX
         PHA
         JSL   L071E31
         PLA
         STA   $12
         PLX
         STX   $14
         LDA   $0C
         STA   $10
         LDA   $0B
         STA   $0F
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B06CE  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         LDA   #$0001
         STA   $01
L0B06DB  PEI   $01
         JSL   L0B06F1
         LDA   #$0008
         CMP   $01
         BEQ   L0B06EC
         INC   $01
         BRA   L0B06DB
L0B06EC  PLY
         PLY
         PLY
         PLD
         RTL

L0B06F1  ENT
         PHD
         TSC
         CLC
         ADC   #$FFE0
         TCS
         TCD
         LDA   $26
         DEC
         PEA   $000A
         JSL   L150BEE
*         PLX
*         TXA
         pla
         CLC
         ADC   #L05106C
         LDX   #^L05106C
         BCC   L0B070F
         INX
L0B070F  STA   $15
         STX   $17
         LDY   #$0004
         LDA   [$15],Y
         BNE   L0B071D
         BRL   L0B07D8
L0B071D  LDY   #$0006
         LDA   [$15],Y
         BEQ   L0B0789
         LDY   #$0008
         LDA   [$15],Y
         BEQ   L0B073F
         PHY
         PHY
         LDY   #$0004
         LDA   [$15],Y
         PHA
         JSL   L075BBA
         PLA
         STA   $19
         PLX
         STX   $1B
         BRA   L0B0751
L0B073F  PHY
         PHY
         LDY   #$0004
         LDA   [$15],Y
         PHA
         JSL   L075B7B
         PLA
         STA   $19
         PLX
         STX   $1B
L0B0751  LDAL  L05565D
         BNE   L0B0789
         LDY   #$0004
         LDA   [$15],Y
         PHA
         PEI   $1B
         PEI   $19
         JSL   L075DD3
         LDAL  L05565D
         BEQ   L0B0789
         PEA   $0016
         PEA   $0000
         TDC
         CLC
         ADC   #$0001
         PHA
         LDAL  L05565D
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         JSL   L0B0841
L0B0789  LDY   #$0004
         LDA   [$15],Y
         PHA
         JSL   L075A4F
         LDAL  L05565D
         BEQ   L0B07B7
         PEA   $0016
         PEA   $0000
         TDC
         CLC
         ADC   #$0001
         PHA
         LDAL  L05565D
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         JSL   L0B0841
L0B07B7  LDA   #$0000
         LDY   #$0004
         STA   [$15],Y
         LDY   #$0002
         LDA   [$15],Y
         PHA
         LDA   [$15]
         PHA
         JSL   L07185A
         LDA   #$0000
         TAX
         STA   [$15]
         TXA
         LDY   #$0002
         STA   [$15],Y
L0B07D8  LDA   $24
         STA   $26
         LDA   $23
         STA   $25
         LDA   $21
         TCD
         TSC
         CLC
         ADC   #$0024
         TCS
         RTL

L0B07EA  ENT
         PHD
         TSC
         CLC
         ADC   #$FEFC
         TCS
         ADC   #$0011
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         PEA   ^L04063C
         PEA   L04063C
         PEA   ^L04063D
         PEA   L04063D
         PEA   ^L04063E
         PEA   L04063E
         JSL   L073C22
         PEA   $0000
         JSL   L0B0904
         LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$010A
         TCS
         RTL

L0B0841  ENT
         PHD
         TSC
         CLC
         ADC   #$FEFC
         TCS
         ADC   #$0013
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         PEI   $F8
         PEI   $F6
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         PEA   ^L04063F
         PEA   L04063F
         PEA   ^L040640
         PEA   L040640
         PEA   ^L040641
         PEA   L040641
         JSL   L073C22
         PEI   $FA
         JSL   L0B0904
         LDA   $F4
         STA   $FA
         LDA   $F3
         STA   $F9
         LDA   $F1
         TCD
         TSC
         CLC
         ADC   #$010C
         TCS
         RTL

L0B0897  ENT
         PHD
         TSC
         CLC
         ADC   #$FDFC
         TCS
         ADC   #$0117
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEI   $F8
         PEI   $F6
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE9
         PHA
         PEI   $F4
         PEI   $F2
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE9
         PHA
         PEA   ^L040642
         PEA   L040642
         PEA   ^L040643
         PEA   L040643
         JSL   L073C22
         PEI   $FA
         JSL   L0B0904
         LDA   $F0
         STA   $FA
         LDA   $EF
         STA   $F9
         LDA   $ED
         TCD
         TSC
         CLC
         ADC   #$0210
         TCS
         RTL

L0B0904  PHD
         TSC
         CLC
         ADC   #$FDF2
         TCS
         ADC   #$0119
         TCD
         LDA   L055389
         BEQ   L0B0923
         LDA   L05538B
         LDX   L05538D
         PHX
         PHA
         JSL   L07185A
         STZ   L055389
L0B0923  LDA   L0553A5
         PHA
         PHY
         JSL   L07005C
         PLA
         ORA   $01,S
         PLX
         STA   L0553A5
         LDA   L0553A5	; LOGO
         BEQ   L0B093B
         BRL   L0B0B68
L0B093B  LDA   #$0001
         STA   L0553A5
         LDA   L05539D
         SEC
         SBC   #$0000
         BEQ   L0B094F
         BMI   L0B094F
         BRL   L0B0A71
L0B094F  LDA   L0553A3
         BNE   L0B0957
         BRL   L0B0A6E
L0B0957  LDA   $FA
         BNE   L0B0978
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE7
         PHA
         LDAL  L0540CF
         PHA
         LDAL  L0540CD
         PHA
         PEA   $0100
         JSL   L0313BE
         BRL   L0B0A17
L0B0978  PEA   $0000
         TDC
         CLC
         ADC   #$FFE7
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE7
         PHA
         PEI   $FA
         JSL   L0B127A
         PEA   $0100
         JSL   L0313BE
         PHY
         PHY
         PEA   $0001
         PEA   ^L0540CD
         PEA   L0540CD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE8
         PHA
         LDA   #$00FF
         LDX   #$FFE7
         AND   $00,X
         PHA
         JSL   L1514A2
         PLA
         STA   $E9
         PLX
         STX   $EB
         PHY
         PHY
         PEI   $EB
         PEI   $E9
         JSL   L151301
         PLA
         PLX
         INC
         BNE   L0B09CE
         INX
L0B09CE  STA   $E7
         LDA   $E7
         JSL   L150488
         PHX
         PHA
         PEI   $EB
         PEI   $E9
         JSL   L1512FB
         LDY   #$0002
         LDA   [$E9],Y
         TAX
         LDA   [$E9]
         STA   $F1
         STX   $F3
         LDA   $E7
         DEC
         TAY
         LDA   #$0000
         SEP   #$20
         STA   [$F1],Y
         REP   #$20
         LDY   #$0002
         LDA   [$E9],Y
         PHA
         LDA   [$E9]
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE7
         PHA
         JSL   L071FF8
         PEI   $EB
         PEI   $E9
         JSL   L07185A
L0B0A17  LDA   L05539F
         LDX   L0553A1
         STA   $F1
         STX   $F3
         LDY   #$0002
         LDA   [$F1],Y
         TAX
         LDA   [$F1]
         STA   $F1
         STX   $F3
         LDA   [$F1]
         BNE   L0B0A4D
         PEA   ^L040644
         PEA   L040644
         PEA   ^L040645
         PEA   L040645
         PEA   ^L040646
         PEA   L040646
         PEA   ^L040647
         PEA   L040647
         JSL   L0B24DB
L0B0A4D  PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE7
         PHA
         LDA   L05539F
         LDX   L0553A1
         PHX
         PHA
         JSL   L03250F
         PLA
         LSR
         BCS   L0B0A6E
         PEA   $05F9
         JSL   L07272E
L0B0A6E  BRL   L0B0B68
L0B0A71  JSL   L0B1BD6
         PHY
         PEA   $FFFF
         PEA   $0000
         JSL   L150B28
         PLA
         STA   $ED
         STZ   L055371
         LDA   #$0001
         STA   $EF
         LDA   #L051BE6
         LDX   #^L051BE6
         CMP   L0553B9
         BNE   L0B0A99
         CPX   L0553BB
L0B0A99  BEQ   L0B0AA0
         LDA   #$0000
         BRA   L0B0AA3
L0B0AA0  LDA   #$0001
L0B0AA3  BNE   L0B0ABF
         PHA
         LDA   L0551FB
         SEC
         SBC   #$0005
         BVS   L0B0AB2
         EOR   #$8000
L0B0AB2  BPL   L0B0AB9
         LDA   #$0000
         BRA   L0B0ABC
L0B0AB9  LDA   #$0001
L0B0ABC  ORA   $01,S
         PLX
L0B0ABF  PHA
         PLA
         BNE   L0B0AE9
         PHA
         LDA   L0553B9
         LDX   L0553BB
         CLC
         ADC   #$003A
         BCC   L0B0AD1
         INX
L0B0AD1  STA   $F1
         STX   $F3
         LDA   [$F1]
         LDY   #$0002
         ORA   [$F1],Y
         BEQ   L0B0AE3
         LDA   #$0000
         BRA   L0B0AE6
L0B0AE3  LDA   #$0001
L0B0AE6  ORA   $01,S
         PLX
L0B0AE9  CMP   #$0000
         BNE   L0B0AFC
         LDX   #$0000
         LDA   #$002B
         CMP   $FA
         BNE   L0B0AF9
         INX
L0B0AF9  TXA
         BEQ   L0B0AFE
L0B0AFC  STZ   $EF
L0B0AFE  LDA   $FA
         BEQ   L0B0B0A
         LDA   #$0BB8
         CLC
         ADC   $FA
         STA   $FA
L0B0B0A  LDA   #$0001
         STA   L054FB3
         PHY
         PEI   $FA
         PEI   $EF
         PEA   $0834
         JSL   L072032
         PLA
         STA   $ED
         STZ   L054FB3
         JSL   L09AFB1
         LDX   #$0000
         LDA   $ED
         DEC
         DEC
         BNE   L0B0B30
         INX
L0B0B30  TXA
         AND   $EF
         BEQ   L0B0B64
         LDA   L0550B9
         DEC
         BNE   L0B0B42
         PEA   $0001
         JSL   L090635
L0B0B42  PHY
         LDA   L0553B9
         LDX   L0553BB
         CLC
         ADC   #$0020
         BCC   L0B0B50
         INX
L0B0B50  PHX
         PHA
         PEA   $0001
         JSL   L0F0635
         PLA
         LSR
         BCS   L0B0B64
         PEA   $0C1C
         JSL   L0727E0
L0B0B64  JSL   L073A49
L0B0B68  LDA   $F8
         STA   $FA
         LDA   $F7
         STA   $F9
         LDA   $F5
         TCD
         TSC
         CLC
         ADC   #$0212
         TCS
         RTL

L0B0B7A  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PEI   $0A
         JSL   L0B0904
         LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B0B98  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PEI   $0C
         PEI   $0A
         LDA   $0E
         LDX   $10
         JSL   L1512A5
         STA   $12
         STX   $14
         LDA   $08
         STA   $10
         LDA   $07
         STA   $0F
         LDA   $05
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B0BC2  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         STZ   $01
         STZ   $03
         TDC
         CLC
         ADC   #$0012
         PEA   $0000
         PHA
         JSL   L032589
L0B0BDB  PEI   $14
         PEI   $12
         LDA   $0E
         LDX   $10
         JSL   L033477
         BVS   L0B0BEC
         EOR   #$8000
L0B0BEC  BMI   L0B0C16
         LDA   $01
         LDX   $03
         INC
         BNE   L0B0BF6
         INX
L0B0BF6  STA   $01
         STX   $03
         TDC
         CLC
         ADC   #$0012
         PEA   $0000
         PHA
         JSL   L0325D1
         TDC
         CLC
         ADC   #$0012
         PEA   $0000
         PHA
         JSL   L032589
         BRA   L0B0BDB
L0B0C16  LDA   $01
         LDX   $03
         STA   $16
         STX   $18
         LDA   $0C
         STA   $14
         LDA   $0B
         STA   $13
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$0012
         TCS
         RTL

L0B0C30  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         STZ   $01
         STZ   $03
L0B0C3C  PEI   $14
         PEI   $12
         LDA   $0E
         LDX   $10
         JSL   L033477
         BVS   L0B0C4D
         EOR   #$8000
L0B0C4D  BMI   L0B0C76
         LDA   $01
         LDX   $03
         INC
         BNE   L0B0C57
         INX
L0B0C57  STA   $01
         STX   $03
         TDC
         CLC
         ADC   #$0012
         PEA   $0000
         PHA
         JSL   L071B83
         LDA   $12
         LDX   $14
         INC
         BNE   L0B0C70
         INX
L0B0C70  STA   $12
         STX   $14
         BRA   L0B0C3C
L0B0C76  LDA   $01
         LDX   $03
         STA   $16
         STX   $18
         LDA   $0C
         STA   $14
         LDA   $0B
         STA   $13
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$0012
         TCS
         RTL

L0B0C90  ENT
         PHD
         TSC
         CLC
         ADC   #$FEF8
         TCS
         ADC   #$0019
         TCD
         STZ   $E7
         STZ   $E9
         TDC
         CLC
         ADC   #$00F8
         PEA   $0000
         PHA
         JSL   L032589
L0B0CAC  PEI   $FA
         PEI   $F8
         LDA   $F4
         LDX   $F6
         JSL   L033477
         BVS   L0B0CBD
         EOR   #$8000
L0B0CBD  BMI   L0B0CF0
         LDA   $E7
         LDX   $E9
         INC
         BNE   L0B0CC7
         INX
L0B0CC7  STA   $E7
         STX   $E9
         TDC
         CLC
         ADC   #$00F8
         PEA   $0000
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE7
         PHA
         JSL   L0B0361
         TDC
         CLC
         ADC   #$00F8
         PEA   $0000
         PHA
         JSL   L032589
         BRA   L0B0CAC
L0B0CF0  LDA   $E7
         LDX   $E9
         STA   $FC
         STX   $FE
         LDA   $F2
         STA   $FA
         LDA   $F1
         STA   $F9
         LDA   $EF
         TCD
         TSC
         CLC
         ADC   #$0112
         TCS
         RTL

L0B0D0A  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   $0E
         LDX   $10
         STA   $01
         STX   $03
         LDA   L055039
         LDX   L05503B
         LDY   #$0002
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         LDA   #$0002
         STA   [$01]
         LDA   L055027
         LDX   L055029
         LDY   #$000A
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         LDA   L05501F
         LDX   L055021
         LDY   #$0006
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         LDA   #$0000
         LDY   #$000E
         STA   [$01],Y
         LDA   #$0000
         TAX
         LDY   #$0010
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         LDA   L05525F
         LDY   #$0014
         STA   [$01],Y
         LDA   L05525D
         LDY   #$0016
         STA   [$01],Y
         LDA   $0C
         STA   $10
         LDA   $0B
         STA   $0F
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B0D87  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   $0E
         LDX   $10
         STA   $01
         STX   $03
         LDA   L055027
         LDX   L055029
         STA   [$01]
         TXA
         LDY   #$0002
         STA   [$01],Y
         LDA   L05501F
         LDX   L055021
         LDY   #$0004
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         LDA   L055039
         LDX   L05503B
         LDY   #$0008
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         LDA   $0C
         STA   $10
         LDA   $0B
         STA   $0F
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B0DD7  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         JSL   L0B392B
         LDA   L05535D
         DEC
         BEQ   L0B0DEB
         BRA   L0B0E16
L0B0DEB  PHY
         JSL   L150B6A
         PLA
         STA   $01
         LDA   L055353
         PHA
         JSL   L150B70
         PEA   $8024
         LDA   L055355
         LDX   L055357
         PHX
         PHA
         JSL   L150410
         PEI   $01
         JSL   L150B70
         LDA   #$0002
         STA   L05535D
L0B0E16  PLY
         PLY
         PLY
         PLD
         RTL

L0B0E1B  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PEI   $0C
         PEI   $0A
         PEA   $0001
         JSL   L0B0E3F
         LDA   $08
         STA   $0C
         LDA   $07
         STA   $0B
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         PLY
         RTL

L0B0E3F  PHD
         TSC
         CLC
         ADC   #$FFEE
         TCS
         TCD
         LDA   $1A
         LDX   $1C
         STA   $05
         STX   $07
         LDA   [$05]
         STA   $03
         LDA   $18
         STA   $01
         LDA   $01
         SEC
         SBC   $03
         BEQ   L0B0E65
         BVS   L0B0E63
         EOR   #$8000
L0B0E63  BMI   L0B0EB6
L0B0E65  LDA   $03
         STA   $0D
L0B0E69  LDY   #$000C
         LDA   [$05],Y
         TAX
         DEY
         DEY
         LDA   [$05],Y
         STA   $0F
         STX   $11
         LDY   #$0002
         LDA   [$0F],Y
         TAX
         LDA   [$0F]
         PHX
         PHA
         LDA   $0D
         DEC
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B0E95
         DEX
L0B0E95  JSL   L150F53
         STA   $09
         STX   $0B
         LDY   #$000C
         LDA   [$09],Y
         PHA
         DEY
         DEY
         LDA   [$09],Y
         PHA
         JSL   L07185A
         LDA   $0D
         CMP   $01
         BEQ   L0B0EB6
         DEC   $0D
         BRA   L0B0E69
L0B0EB6  LDA   $18
         SEC
         SBC   #$0001
         BEQ   L0B0EC7
         BVS   L0B0EC3
         EOR   #$8000
L0B0EC3  BPL   L0B0EC7
         BRA   L0B0EF3
L0B0EC7  LDY   #$0008
         LDA   [$05],Y
         PHA
         DEY
         DEY
         LDA   [$05],Y
         PHA
         JSL   L07185A
         LDY   #$000C
         LDA   [$05],Y
         PHA
         DEY
         DEY
         LDA   [$05],Y
         PHA
         JSL   L07185A
         PEI   $1C
         PEI   $1A
         PEA   $0000
         PEA   $000E
         JSL   L071EC5
L0B0EF3  LDA   $16
         STA   $1C
         LDA   $15
         STA   $1B
         LDA   $13
         TCD
         TSC
         CLC
         ADC   #$001A
         TCS
         RTL

L0B0F05  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF4
         TCS
         TCD
         LDA   L0553B5
         LDX   L0553B7
         CMP   $12
         BNE   L0B0F19
         CPX   $14
L0B0F19  BNE   L0B0F34
         STZ   L0553B5
         STZ   L0553B7
         PEA   ^L051BDE
         PEA   L051BDE
         PEA   ^L050C2A
         PEA   L050C2A
         PEA   $0008
         JSL   L0313BE
L0B0F34  LDX   #$0000
         LDY   #$000C
         LDA   [$12],Y
         BNE   L0B0F3F
         INX
L0B0F3F  PHX
         LDX   #$0000
         LDY   #$000E
         LDA   [$12],Y
         BNE   L0B0F4B
         INX
L0B0F4B  TXA
         AND   $01,S
         PLX
         LSR
         BCC   L0B0F78
         LDY   #$0010
         LDA   [$12],Y
         BEQ   L0B0F66
         LDY   #$0002
         LDA   [$12],Y
         PHA
         LDA   [$12]
         PHA
         JSL   L07185A
L0B0F66  LDY   #$0006
         LDA   [$12],Y
         PHA
         DEY
         DEY
         LDA   [$12],Y
         PHA
         JSL   L07185A
         BRL   L0B103A
L0B0F78  LDY   #$000C
         LDA   [$12],Y
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B0F91
         INX
L0B0F91  STA   $01
         STX   $03
         LDY   #$001C
         LDA   [$01],Y
         DEC
         LDY   #$001C
         STA   [$01],Y
         LDY   #$0020
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         STA   $09
         STX   $0B
         LDY   #$0002
         LDA   [$09],Y
         TAX
         LDA   [$09]
         STA   $05
         STX   $07
         PEI   $07
         PEI   $05
         LDY   #$000E
         LDA   [$12],Y
         DEC
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B0FD5
         DEX
L0B0FD5  JSL   L150F53
         STA   $05
         STX   $07
         LDY   #$000C
         LDA   [$05],Y
         DEC
         LDY   #$000C
         STA   [$05],Y
         LDY   #$000C
         LDA   [$05],Y
         BNE   L0B1001
         PEA   $0002
         LDY   #$000A
         LDA   [$05],Y
         PHA
         DEY
         DEY
         LDA   [$05],Y
         PHA
         JSL   L150D44
L0B1001  LDY   #$001C
         LDA   [$01],Y
         BNE   L0B103A
         LDY   #$0022
         LDA   [$01],Y
         BEQ   L0B101B
         LDY   #$000C
         LDA   [$12],Y
         PHA
         JSL   L0B1ADF
         BRA   L0B103A
L0B101B  PHY
         PEI   $03
         PEI   $01
         JSL   L0B33DE
         PLA
         LSR
         BCS   L0B103A
         PEA   $0002
         LDY   #$001A
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L150D44
L0B103A  LDA   $10
         STA   $14
         LDA   $0F
         STA   $13
         LDA   $0D
         TCD
         TSC
         CLC
         ADC   #$0012
         TCS
         RTL

L0B104C  ENT
         PHD
         TSC
         CLC
         ADC   #$FEC2
         TCS
         ADC   #$0051
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFB1
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         LDX   #$FFB1
         AND   $00,X
         LDX   #$FFAF
         STA   $00,X
         LDX   #$FFAF
         LDA   $00,X
         SEC
         SBC   #$0001
         BVS   L0B1086
         EOR   #$8000
L0B1086  BMI   L0B108B
         BRL   L0B112F
L0B108B  LDA   #$0001
         STA   $E7
L0B1090  PHY
         JSL   L07005C
         PLA
         LSR
         BCC   L0B109C
         BRL   L0B1121
L0B109C  LDA   $F6
         STA   $E3
         LDA   $F4
         STA   $E1
         LDA   $F2
         STA   $DF
         LDA   #$0003
         STA   $B1
         LDA   $E7
         CLC
         ADC   #$FFB1
         TAX
         LDA   #$00FF
         AND   $00,X
         JSL   L150488
         STA   $B3
         STX   $B5
         LDA   L054FB7
         LDX   L054FB9
         STA   $E9
         STX   $EB
         LDY   #$0002
         LDA   [$E9],Y
         TAX
         LDA   [$E9]
         STA   $B7
         STX   $B9
         STZ   $BD
         STZ   $BB
         STZ   $BF
         LDA   $E3
         BEQ   L0B10E9
         LDA   #$0200
         CLC
         ADC   $BF
         STA   $BF
L0B10E9  LDA   $E1
         BEQ   L0B10F5
         LDA   #$0800
         CLC
         ADC   $BF
         STA   $BF
L0B10F5  LDA   $DF
         BEQ   L0B1101
         LDA   #$0100
         CLC
         ADC   $BF
         STA   $BF
L0B1101  PEA   ^L052D64
         PEA   L052D64
         TDC
         CLC
         ADC   #$00B1
         PEA   $0000
         PHA
         PEA   $002E
         JSL   L0313BE
         LDA   #$0001
         STA   L05524B
         JSL   L0A2670
L0B1121  LDA   $E7
         LDX   #$FFAF
         CMP   $00,X
         BEQ   L0B112F
         INC   $E7
         BRL   L0B1090
L0B112F  STZ   L05524B
         LDA   $F0
         STA   $FA
         LDA   $EF
         STA   $F9
         LDA   $ED
         TCD
         TSC
         CLC
         ADC   #$014A
         TCS
         RTL

L0B1144  PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $01
         JSL   L03018B
         LDA   #$0001
         STA   L05535F
         PEI   $01
         JSL   L071AA4
         PLY
         PLY
         PLY
         PLD
         RTL

L0B1169  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         STZ   $12
         LDA   [$0A]
         CMP   [$0E]
         BEQ   L0B117C
         BRL   L0B1268
L0B117C  LDY   #$0004
         LDA   [$0E],Y
         PHA
         DEY
         DEY
         LDA   [$0E],Y
         PHA
         LDY   #$0004
         LDA   [$0A],Y
         TAX
         DEY
         DEY
         LDA   [$0A],Y
         JSL   L033477
         BEQ   L0B119A
         BRL   L0B1268
L0B119A  LDA   [$0E]
         DEC
         BPL   L0B11A2
         BRL   L0B1261
L0B11A2  CMP   #$0005
         BMI   L0B11AA
         BRL   L0B1261
L0B11AA  SEC
         SBC   #$0000
         BEQ   L0B11C5
         DEC
         BEQ   L0B1203
         DEC
         BEQ   L0B122A
         DEC
         BNE   L0B11BC
         BRL   L0B1251
L0B11BC  DEC
         BNE   L0B11C2
         BRL   L0B1258
L0B11C2  BRL   L0B1261
L0B11C5  LDY   #$0012
         LDA   [$0E],Y
         PHA
         DEY
         DEY
         LDA   [$0E],Y
         PHA
         LDY   #$0012
         LDA   [$0A],Y
         TAX
         DEY
         DEY
         LDA   [$0A],Y
         JSL   L033477
         BEQ   L0B11E5
         LDA   #$0000
         BRA   L0B11E8
L0B11E5  LDA   #$0001
L0B11E8  BEQ   L0B11FF
         PHA
         LDX   #$0000
         LDY   #$000E
         LDA   [$0E],Y
         LDY   #$000E
         CMP   [$0A],Y
         BNE   L0B11FB
         INX
L0B11FB  TXA
         AND   $01,S
         PLX
L0B11FF  STA   $12
         BRA   L0B1268
L0B1203  LDY   #$000C
         LDA   [$0E],Y
         PHA
         DEY
         DEY
         LDA   [$0E],Y
         PHA
         LDY   #$000C
         LDA   [$0A],Y
         TAX
         DEY
         DEY
         LDA   [$0A],Y
         JSL   L033477
         BEQ   L0B1223
         LDA   #$0000
         BRA   L0B1226
L0B1223  LDA   #$0001
L0B1226  STA   $12
         BRA   L0B1268
L0B122A  LDY   #$0008
         LDA   [$0E],Y
         PHA
         DEY
         DEY
         LDA   [$0E],Y
         PHA
         LDY   #$0008
         LDA   [$0A],Y
         TAX
         DEY
         DEY
         LDA   [$0A],Y
         JSL   L033477
         BEQ   L0B124A
         LDA   #$0000
         BRA   L0B124D
L0B124A  LDA   #$0001
L0B124D  STA   $12
         BRA   L0B1268
L0B1251  LDA   #$0001
         STA   $12
         BRA   L0B1268
L0B1258  PEA   $0493
         JSL   L07272E
         BRA   L0B1268
L0B1261  PEA   $1C45
         JSL   L07272E
L0B1268  LDA   $08
         STA   $10
         LDA   $07
         STA   $0F
         LDA   $05
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B127A  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PEI   $0E
         PEI   $0C
         PHY
         PHY
         LDA   #$0BB8
         CLC
         ADC   $0A
         PHA
         JSL   L0711EB
         PEA   $0100
         JSL   L0313BE
         LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B12AA  ENT
         PHD
         TSC
         CLC
         ADC   #$FFD6
         TCS
         TCD
         LDA   [$30]
         BEQ   L0B12B9
         BRL   L0B1376
L0B12B9  PEI   $32
         PEI   $30
         TDC
         CLC
         ADC   #$001B
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$001F
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$0023
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$0017
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$000F
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$0013
         PEA   $0000
         PHA
         JSL   L0D0A88
         LDX   #$0000
         LDA   $11
         BMI   L0B1303
         ORA   $0F
         BEQ   L0B1303
         INX
L0B1303  TXA
         PHA
         LDX   #$0000
         LDA   $15
         BMI   L0B1311
         ORA   $13
         BEQ   L0B1311
         INX
L0B1311  TXA
         ORA   $01,S
         PLX
         LSR
         BCC   L0B1322
         JSL   L0E0000
         JSL   L0E0C52
         BRA   L0B1376
L0B1322  PEI   $25
         PEI   $23
         LDA   $1F
         LDX   $21
         JSL   L1512A5
         STA   $03
         STX   $05
         PHY
         JSL   L0B1C0F
         PLA
         STA   $01
         PEI   $21
         PEI   $1F
         LDA   $03
         LDX   $05
         INC
         BNE   L0B1346
         INX
L0B1346  PHX
         PHA
         PEA   $0000
         JSL   L0E07C5
         PEI   $01
         JSL   L0B39C0
         PHY
         PHY
         PEA   $0000
         JSL   L031415
         LDA   $03
         LDX   $05
         JSL   L150F53
         STA   $17
         STX   $19
         SEP   #$20
         LDA   #$00
         STA   [$17]
         REP   #$20
         JSL   L0B31FF
L0B1376  LDA   $2E
         STA   $32
         LDA   $2D
         STA   $31
         LDA   $2B
         TCD
         TSC
         CLC
         ADC   #$0030
         TCS
         RTL

L0B1388  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF4
         TCS
         TCD
         LDA   $18
         BPL   L0B13D0
         LDA   L0553CD
         LDX   L0553CF
         STA   $09
         STX   $0B
         LDY   #$0002
         LDA   [$09],Y
         TAX
         LDA   [$09]
         PHX
         PHA
         LDA   $18
         JSL   L150488
         JSL   L1512A5
         STA   $01
         STX   $03
         PEI   $03
         PEI   $01
         PEI   $14
         PEI   $12
         LDA   #$00FF
         AND   [$01]
         INC
         JSL   L150488
         PHX
         PHA
         JSL   L070597
         BRA   L0B1414
L0B13D0  LDA   $18
         SEC
         SBC   #$00FF
         BEQ   L0B13E4
         BVS   L0B13DD
         EOR   #$8000
L0B13DD  BPL   L0B13E4
         LDA   #$00FF
         STA   $18
L0B13E4  LDA   $18
         SEP   #$20
         STA   [$12]
         REP   #$20
         PHY
         PHY
         PEI   $16
         JSL   L0B289E
         PLA
         STA   $05
         PLX
         STX   $07
         PEI   $07
         PEI   $05
         LDA   $12
         LDX   $14
         INC
         BNE   L0B1406
         INX
L0B1406  PHX
         PHA
         LDA   $18
         JSL   L150488
         PHX
         PHA
         JSL   L070597
L0B1414  LDA   $10
         STA   $18
         LDA   $0F
         STA   $17
         LDA   $0D
         TCD
         TSC
         CLC
         ADC   #$0016
         TCS
         RTL

L0B1426  ENT
         PHD
         TSC
         CLC
         ADC   #$FEAB
         TCS
         ADC   #$0066
         TCD
         TDC
         CLC
         ADC   #$00B2
         PEA   $0000
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $000A
         JSL   L0313BE
         STZ   $E1
         PEA   $0000
         TDC
         CLC
         ADC   #$FFA4
         PHA
         TDC
         CLC
         ADC   #$00B2
         PEA   $0000
         PHA
         PEA   $000A
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FF9A
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FF9A
         PHA
         PEA   ^L040649
         PEA   L040649
         PEA   $000A
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FFA4
         PHA
         PEA   $000A
         _SANEFP816
         BVS   L0B1499
         LDA   #$0000
         BRA   L0B149C
L0B1499  LDA   #$0001
L0B149C  BEQ   L0B14E8
         TDC
         CLC
         ADC   #$00B2
         PEA   $0000
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFA4
         PHA
         TDC
         CLC
         ADC   #$00B2
         PEA   $0000
         PHA
         PEA   $000A
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FFA4
         PHA
         PEA   $000D
         _SANEFP816
         PEA   $0000
         TDC
         CLC
         ADC   #$FFA4
         PHA
         PEA   $000A
         JSL   L0313BE
         LDA   #$0001
         STA   $E1
L0B14E8  LDA   #$0001
         STA   $DD
         LDA   L0553B1
         STA   $DF
         PEI   $DF
         PEI   $DD
         TDC
         CLC
         ADC   #$00B2
         PEA   $0000
         PHA
         PEI   $F6
         PEI   $F4
         JSL   L15072F
         PHY
         PEA   ^L040653
         PEA   L040653
         PEI   $F6
         PEI   $F4
         JSL   L150F73
         PLA
         STA   $E9
         LDA   $E9
         BNE   L0B1520
         BRL   L0B1697
L0B1520  LDA   #$00FF
         AND   [$F4]
         STA   $E7
L0B1527  LDA   $E7
         SEC
         SBC   $E9
         SEC
         SBC   L0553AF
         BEQ   L0B1539
         BVS   L0B1537
         EOR   #$8000
L0B1537  BMI   L0B153E
L0B1539  LDA   #$0000
         BRA   L0B1541
L0B153E  LDA   #$0001
L0B1541  PHA
         LDX   #$0000
         LDY   $E7
         LDA   #$00FF
         AND   [$F4],Y
         CMP   #$0030
         BNE   L0B1552
         INX
L0B1552  TXA
         AND   $01,S
         PLX
         LSR
         BCC   L0B1560
         LDA   $E7
         DEC
         STA   $E7
         BRA   L0B1527
L0B1560  LDX   #$0000
         LDA   $E9
         CMP   $E7
         BNE   L0B156A
         INX
L0B156A  PHX
         LDA   $E7
         SEC
         SBC   #$0001
         BEQ   L0B157A
         BVS   L0B1578
         EOR   #$8000
L0B1578  BMI   L0B157F
L0B157A  LDA   #$0000
         BRA   L0B1582
L0B157F  LDA   #$0001
L0B1582  AND   $01,S
         PLX
         LSR
         BCC   L0B158D
         LDA   $E7
         DEC
         STA   $E7
L0B158D  LDA   $E7
         SEP   #$20
         STA   [$F4]
         REP   #$20
         PHA
         PEI   $F6
         PEI   $F4
         PEA   ^L040655
         PEA   L040655
         JSL   L1503DD
         PLA
         LSR
         BCC   L0B15B1
         LDAL  L040656
         STA   [$F4]
         BRL   L0B1697
L0B15B1  PHY
         PEA   ^L040658
         PEA   L040658
         PEI   $F6
         PEI   $F4
         JSL   L150F73
         PLA
         STA   $E9
         LDA   $E9
         BNE   L0B15CF
         LDA   #$00FF
         AND   [$F4]
         INC
         STA   $E9
L0B15CF  LDA   $E9
         SEC
         SBC   L0553AD
         BEQ   L0B15DE
         BVS   L0B15DC
         EOR   #$8000
L0B15DC  BMI   L0B161F
L0B15DE  LDA   L0553AD
         SEC
         SBC   $E9
         INC
         LDX   #$FFB0
         STA   $00,X
         LDX   #$FFB0
         LDA   $00,X
         SEC
         SBC   #$0001
         BVS   L0B15F8
         EOR   #$8000
L0B15F8  BPL   L0B161D
         LDA   #$0001
         STA   $E5
L0B15FF  PEA   ^L04065A
         PEA   L04065A
         PEI   $F6
         PEI   $F4
         PEA   $0001
         JSL   L150C4C
         LDA   $E5
         LDX   #$FFB0
         CMP   $00,X
         BEQ   L0B161D
         INC   $E5
         BRA   L0B15FF
L0B161D  BRA   L0B1697
L0B161F  PHY
         PEA   ^L04065C
         PEA   L04065C
         PEI   $F6
         PEI   $F4
         JSL   L150F73
         PLA
         INC
         STA   $E3
         LDA   $E9
         SEC
         SBC   L0553AD
         DEC
         LDX   #$FFAE
         STA   $00,X
         LDX   #$FFAE
         LDA   $00,X
         SEC
         SBC   #$0001
         BVS   L0B164C
         EOR   #$8000
L0B164C  BPL   L0B1697
         LDA   #$0001
         STA   $E5
L0B1653  LDX   #$0000
         LDY   $E3
         LDA   #$00FF
         AND   [$F4],Y
         CMP   #$0030
         BNE   L0B1663
         INX
L0B1663  TXA
         BNE   L0B1679
         LDX   #$0000
         LDY   $E3
         LDA   #$00FF
         AND   [$F4],Y
         CMP   #$002E
         BNE   L0B1676
         INX
L0B1676  TXA
         BEQ   L0B1688
L0B1679  PEI   $F6
         PEI   $F4
         PEI   $E3
         PEA   $0001
         JSL   L150A64
         BRA   L0B168A
L0B1688  BRA   L0B1697
L0B168A  LDA   $E5
         LDX   #$FFAE
         CMP   $00,X
         BEQ   L0B1697
         INC   $E5
         BRA   L0B1653
L0B1697  PHY
         PEI   $F6
         PEI   $F4
         PEA   ^L04065E
         PEA   L04065E
         JSL   L071C56
         PLA
         LSR
         BCC   L0B16B2
         LDAL  L040660
         STA   [$F4]
         BRA   L0B16DB
L0B16B2  LDA   $E1
         BEQ   L0B16DB
         PEI   $F6
         PEI   $F4
         PEA   ^L040662
         PEA   L040662
         PEI   $F6
         PEI   $F4
         PEA   $0000
         TDC
         CLC
         ADC   #$FFB2
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B16DB  LDA   $F2
         STA   $FA
         LDA   $F1
         STA   $F9
         LDA   $EF
         TCD
         TSC
         CLC
         ADC   #$015F
         TCS
         RTL

L0B16ED  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF2
         TCS
         TCD
         STZ   $1C
         PHY
         PHY
         PEI   $1A
         PEI   $18
         JSL   L0735A8
         PLA
         STA   $05
         PLX
         STX   $07
         LDA   #$0001
         STA   $09
L0B170C  LDA   $09
         DEC
         PEA   $000A
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L05106C
         LDX   #^L05106C
         BCC   L0B1722
         INX
L0B1722  STA   $01
         STX   $03
         LDY   #$0004
         LDA   [$01],Y
         BEQ   L0B1762
         PHY
         LDY   #$0002
         LDA   [$01],Y
         PHA
         LDA   [$01]
         PHA
         PEI   $07
         PEI   $05
         JSL   L071330
         PLA
         LSR
         BCC   L0B1762
         LDA   $14
         BEQ   L0B174D
         LDA   $09
         STA   $1C
         BRA   L0B1754
L0B174D  LDY   #$0004
         LDA   [$01],Y
         STA   $1C
L0B1754  LDA   $16
         BEQ   L0B1760
         LDA   #$0001
         LDY   #$0006
         STA   [$01],Y
L0B1760  BRA   L0B1778
L0B1762  LDA   #$0008
         CMP   $09
         BEQ   L0B176D
         INC   $09
         BRA   L0B170C
L0B176D  PEA   $000C
         PEI   $1A
         PEI   $18
         JSL   L0B0841
L0B1778  PEI   $07
         PEI   $05
         JSL   L07185A
         LDA   $12
         STA   $1A
         LDA   $11
         STA   $19
         LDA   $0F
         TCD
         TSC
         CLC
         ADC   #$0018
         TCS
         RTL

L0B1792  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         STZ   $0A
         STZ   $0C
         PHY
         LDAL  L051058
         PHA
         LDAL  L051056
         PHA
         JSL   L0D109F
         PLA
         LSR
         BCC   L0B182D
         LDAL  L051054
         DEC
         BMI   L0B1829
         CMP   #$0004
         BPL   L0B1829
         SEC
         SBC   #$0000
         BEQ   L0B17CE
         DEC
         BEQ   L0B17EB
         DEC
         BEQ   L0B1803
         DEC
         BEQ   L0B181B
         BRA   L0B1829
L0B17CE  PHY
         PHY
         LDAL  L051066
         PHA
         LDAL  L051064
         PHA
         LDAL  L051062
         PHA
         JSL   L07AE68
         PLA
         STA   $0A
         PLX
         STX   $0C
         BRA   L0B1829
L0B17EB  PHY
         PHY
         LDAL  L051060
         PHA
         LDAL  L05105E
         PHA
         JSL   L07AACB
         PLA
         STA   $0A
         PLX
         STX   $0C
         BRA   L0B1829
L0B1803  PHY
         PHY
         LDAL  L05105C
         PHA
         LDAL  L05105A
         PHA
         JSL   L07AACB
         PLA
         STA   $0A
         PLX
         STX   $0C
         BRA   L0B1829
L0B181B  PHY
         PHY
         JSL   L076220
         PLA
         STA   $0A
         PLX
         STX   $0C
         BRA   L0B1829
L0B1829  JSL   L0B381C
L0B182D  PLY
         PLY
         PLD
         RTL

L0B1831  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PEI   $10
         PEI   $0E
         JSL   L151131
         PEI   $0C
         PEI   $0A
         LDA   #$0010
         CLC
         ADC   $0E
         LDX   $10
         BCC   L0B1850
         INX
L0B1850  PHX
         PHA
         PEA   $0008
         JSL   L0313BE
         PEI   $0C
         PEI   $0A
         JSL   L151412
         LDA   #$0004
         CLC
         ADC   $0A
         LDX   $0C
         BCC   L0B186C
         INX
L0B186C  PHX
         PHA
         JSL   L151412
         LDA   L0550ED
         LDX   L0550EF
         PHX
         PHA
         JSL   L151131
         LDA   $08
         STA   $10
         LDA   $07
         STA   $0F
         LDA   $05
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B1890  PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         STZ   $0E
         PHY
         PHY
         LDA   L0553C5
         LDX   L0553C7
         PHX
         PHA
         JSL   L151301
         LDA   $0C
         ASL
         ASL
         ASL
         ASL
         JSL   L150488
         JSL   L150F53
         STA   $01
         PHY
         LDA   L0553C5
         LDX   L0553C7
         PHX
         PHA
         LDA   $01
         JSL   L150488
         PHX
         PHA
         JSL   L078A05
         PLA
         LSR
         BCC   L0B18E1
         LDA   #$0001
         STA   $0E
         LDA   $0C
         CLC
         ADC   L0553C1
         STA   L0553C1
         BRA   L0B18E8
L0B18E1  PEA   $002D
         JSL   L0B0B7A
L0B18E8  LDA   $0A
         STA   $0C
         LDA   $09
         STA   $0B
         LDA   $07
         TCD
         PLY
         PLY
         PLY
         PLY
         PLY
         RTL

L0B18F9  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PHY
         PEA   $0010
         JSL   L0B1890
         PLA
         STA   $0A
         PLY
         PLY
         PLD
         RTL

L0B1910  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$0000
         STAL  L051BE6
         LDA   #$0000
         STAL  L051BE8
         LDA   #$0000
         STAL  L051BEA
         LDA   #$0000
         STAL  L051BEC
         LDA   #L051BE6
         STAL  L051BEE
         LDA   #^L051BE6
         STAL  L051BF0
         LDA   #L051C38
         STAL  L051BF2
         LDA   #^L051C38
         STAL  L051BF4
         LDA   #$FFFF
         STAL  L051BF6
         LDA   #$FFFF
         STAL  L051BF8
         LDA   #$FFFF
         STAL  L051BFA
         LDA   #$0000
         STAL  L051BFC
         STAL  L051BFE
         LDA   #$0000
         STAL  L051C00
         STAL  L051C02
         LDA   #$0000
         STAL  L051C04
         LDA   #$0005
         STAL  L051C06
         LDA   L055039
         LDX   L05503B
         STAL  L051C08
         TXA
         STAL  L051C0A
         PLY
         PLY
         PLD
         RTL

L0B199C  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PEI   $0C
         PEI   $0A
         PEA   $0000
         PEA   $000E
         JSL   L071EC5
         LDA   $08
         STA   $0C
         LDA   $07
         STA   $0B
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         PLY
         RTL

         PHD
         TSC
         CLC
         ADC   #$FFE4
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B0D0A
         LDA   $28
         STA   $01
         LDA   $28
         DEC
         BNE   L0B19ED
         LDA   $24
         LDX   $26
         STA   $11
         STX   $13
         LDA   $22
         STA   $0F
L0B19ED  TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B1A77
         LDA   $20
         STA   $28
         LDA   $1F
         STA   $27
         LDA   $1D
         TCD
         TSC
         CLC
         ADC   #$0026
         TCS
         RTL

L0B1A0C  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   $0A
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B1A2A
         INX
L0B1A2A  CLC
         ADC   #$001C
         BCC   L0B1A31
         INX
L0B1A31  STA   $01
         STX   $03
         LDA   [$01]
         BNE   L0B1A41
         PEI   $0A
         JSL   L0B1ADF
         BRA   L0B1A67
L0B1A41  LDA   $0A
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B1A57
         INX
L0B1A57  CLC
         ADC   #$0022
         BCC   L0B1A5E
         INX
L0B1A5E  STA   $01
         STX   $03
         LDA   #$0001
         STA   [$01]
L0B1A67  LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B1A77  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   L055387
         STA   $01
         LDA   $01
         SEC
         SBC   #$0001
         BVS   L0B1A8F
         EOR   #$8000
L0B1A8F  BPL   L0B1ACD
         LDA   #$0001
         STA   $03
L0B1A96  PHY
         LDA   $03
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B1AAD
         INX
L0B1AAD  PHX
         PHA
         PEI   $10
         PEI   $0E
         JSL   L0B1169
         PLA
         LSR
         BCC   L0B1AC3
         PEI   $03
         JSL   L0B1A0C
         BRA   L0B1ACD
L0B1AC3  LDA   $03
         CMP   $01
         BEQ   L0B1ACD
         INC   $03
         BRA   L0B1A96
L0B1ACD  LDA   $0C
         STA   $10
         LDA   $0B
         STA   $0F
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B1ADF  PHD
         TSC
         CLC
         ADC   #$FFF4
         TCS
         TCD
         LDA   $12
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B1AFD
         INX
L0B1AFD  STA   $01
         STX   $03
         LDY   #$001A
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L07185A
         LDY   #$0026
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L07185A
         LDY   #$002A
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L07185A
         LDY   #$001E
         LDA   [$01],Y
         INY
         INY
         ORA   [$01],Y
         BEQ   L0B1B95
         LDY   #$0020
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L0718BF
         LDY   #$0020
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         STA   $09
         STX   $0B
         LDY   #$0002
         LDA   [$09],Y
         TAX
         LDA   [$09]
         STA   $05
         STX   $07
L0B1B62  LDA   [$05]
         BEQ   L0B1B86
         LDY   #$000A
         LDA   [$05],Y
         PHA
         DEY
         DEY
         LDA   [$05],Y
         PHA
         JSL   L07185A
         LDA   $05
         LDX   $07
         CLC
         ADC   #$000E
         BCC   L0B1B80
         INX
L0B1B80  STA   $05
         STX   $07
         BRA   L0B1B62
L0B1B86  LDY   #$0020
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L07185A
L0B1B95  LDA   $12
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B1BAB
         INX
L0B1BAB  PHX
         PHA
         PEA   $0000
         PEA   $002C
         JSL   L071EC5
         LDA   #$0000
         STA   [$01]
         LDA   #$0000
         LDY   #$0022
         STA   [$01],Y
         LDA   $10
         STA   $12
         LDA   $0F
         STA   $11
         LDA   $0D
         TCD
         TSC
         CLC
         ADC   #$0010
         TCS
         RTL

L0B1BD6  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PEA   $0000
         PEA   $0002
         LDA   L05539F
         LDX   L0553A1
         PHX
         PHA
         JSL   L1512FB
         LDA   L05539F
         LDX   L0553A1
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         STA   $01
         STX   $03
         LDA   #$0000
         STA   [$01]
         PLY
         PLY
         PLD
         RTL

L0B1C0F  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PHY
         LDA   L0553C5
         LDX   L0553C7
         PHX
         PHA
         JSL   L0718FA
         PLA
         STA   $0A
         PLY
         PLY
         PLD
         RTL

L0B1C2B  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF2
         TCS
         TCD
         LDA   $16
         LDX   $18
         STA   $01
         STX   $03
         LDA   $14
         CLC
         ADC   [$01]
         STA   [$01]
         LDY   #$0002
         LDA   [$01],Y
         STA   $0B
         LDA   [$01]
         SEC
         SBC   $0B
         BNE   L0B1C53
         BRL   L0B1DDC
L0B1C53  BVS   L0B1C58
         EOR   #$8000
L0B1C58  BMI   L0B1C5D
         BRL   L0B1DDC
L0B1C5D  LDA   $14
         SEC
         SBC   #$0008
         BEQ   L0B1C72
         BVS   L0B1C6A
         EOR   #$8000
L0B1C6A  BPL   L0B1C72
         LDA   $14
         STA   $05
         BRA   L0B1C77
L0B1C72  LDA   #$0008
         STA   $05
L0B1C77  LDY   #$0002
         LDA   [$01],Y
         BEQ   L0B1C81
         BRL   L0B1D4E
L0B1C81  LDA   #$0006
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B1C8C
         INX
L0B1C8C  STA   $0B
         STX   $0D
         PHY
         PHY
         PEA   $0000
         PEA   $0002
         LDA   L0553D9
         PHA
         JSL   L0B249C
         PLA
         STA   [$0B]
         PLA
         LDY   #$0002
         STA   [$0B],Y
         LDY   #$0008
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         STA   $0B
         STX   $0D
         LDY   #$0002
         LDA   [$0B],Y
         TAX
         LDA   [$0B]
         STA   $0B
         STX   $0D
         LDA   #$0000
         STA   [$0B]
         LDA   $05
         LDY   #$0002
         STA   [$01],Y
         LDA   #$000A
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B1CDA
         INX
L0B1CDA  STA   $0B
         STX   $0D
         PHY
         PHY
         LDY   #$0002
         LDA   [$01],Y
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B1CF6
         DEX
L0B1CF6  PHX
         PHA
         LDA   L0553D9
         PHA
         JSL   L0B249C
         PLA
         STA   [$0B]
         PLA
         LDY   #$0002
         STA   [$0B],Y
         LDY   #$000A
         LDA   [$01],Y
         INY
         INY
         ORA   [$01],Y
         BNE   L0B1D4B
         PEA   $002D
         JSL   L0B0B7A
         LDA   #$0001
         LDY   #$0002
         STA   [$01],Y
         LDA   #$000A
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B1D2E
         INX
L0B1D2E  STA   $0B
         STX   $0D
         PHY
         PHY
         PEA   $0000
         PEA   $000E
         LDA   L0553D9
         PHA
         JSL   L0B249C
         PLA
         STA   [$0B]
         PLA
         LDY   #$0002
         STA   [$0B],Y
L0B1D4B  BRL   L0B1DDC
L0B1D4E  LDY   #$0002
         LDA   $05
         CLC
         ADC   [$01],Y
         LDY   #$0002
         STA   [$01],Y
         PHY
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0002
         LDA   [$01],Y
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B1D7D
         DEX
L0B1D7D  PHX
         PHA
         JSL   L078A05
         PLA
         LSR
         BCS   L0B1DDC
         PEA   $002D
         JSL   L0B0B7A
         LDY   #$0002
         LDA   [$01],Y
         SEC
         SBC   $05
         INC
         LDY   #$0002
         STA   [$01],Y
         LDA   [$01]
         SEC
         SBC   $14
         INC
         STA   [$01]
         LDA   #$0001
         STA   $14
         PHY
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0002
         LDA   [$01],Y
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B1DCB
         DEX
L0B1DCB  PHX
         PHA
         JSL   L078A05
         PLA
         LSR
         BCS   L0B1DDC
         PEA   $202A
         JSL   L07272E
L0B1DDC  LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         STA   $0B
         STX   $0D
         LDY   #$0002
         LDA   [$0B],Y
         TAX
         LDA   [$0B]
         PHX
         PHA
         LDA   [$01]
         SEC
         SBC   $14
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B1E0A
         DEX
L0B1E0A  JSL   L150F53
         STA   $07
         STX   $09
         PEI   $09
         PEI   $07
         LDA   $14
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B1E29
         DEX
L0B1E29  PHX
         PHA
         JSL   L071EC5
         LDA   $12
         STA   $18
         LDA   $11
         STA   $17
         LDA   $0F
         TCD
         TSC
         CLC
         ADC   #$0016
         TCS
         RTL

L0B1E41  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   $0E
         SEC
         SBC   #$0063
         BEQ   L0B1E60
         BVS   L0B1E56
         EOR   #$8000
L0B1E56  BPL   L0B1E60
         LDA   $0E
         SEC
         SBC   #$0064
         STA   $0E
L0B1E60  LDA   $0E
         STA   $10
         LDA   $08
         STA   $0E
         LDA   $07
         STA   $0D
         LDA   $05
         TCD
         TSC
         CLC
         ADC   #$000C
         TCS
         RTL

L0B1E76  ENT
         PHD
         TSC
         CLC
         ADC   #$F6C4
         TCS
         ADC   #$084F
         TCD
         PHY
         PHY
         PEA   $000A	; AV 202208 from seconds to HyperCard IIgs format
         PEI   $FA
         PEI   $F8
         TDC
         CLC
         ADC   #$00E1	; $E1 
         PEA   $0000	; $E2 
         PHA	; $E3 
         _ConvSeconds	; $E4 
         STAL  L05565D	; $E5 
         PLA	; $E6 
         STA   $D9	; $E7 
         PLX	; $E8 
         STX   $DB	; $E9 
         LDA   $F6
         BPL   L0B1EAB
         BRL   L0B21DF
L0B1EAB  CMP   #$0004
         BMI   L0B1EB3
         BRL   L0B21DF
L0B1EB3  SEC
         SBC   #$0000
         BNE   L0B1EBC
         BRL   L0B1FF4
L0B1EBC  DEC
         BNE   L0B1EC2
         BRL   L0B1F61
L0B1EC2  DEC
         BEQ   L0B1ECE
         DEC
         BNE   L0B1ECB
         BRL   L0B1FF4
L0B1ECB  BRL   L0B21DF
L0B1ECE  PEI   $F4
         PEI   $F2
         PEA   $0000
         TDC
         CLC
         ADC   #$F8D9
         PHA
         LDA   #$00FF
         AND   $E8
         CLC
         ADC   #$0AEF
         PHA
         JSL   L073002
         PEA   ^L04070A
         PEA   L04070A
         PEA   $0000
         TDC
         CLC
         ADC   #$F7D9
         PHA
         LDA   #$00FF
         AND   $E6
         CLC
         ADC   #$0AFE
         DEC
         PHA
         JSL   L073002
         PEA   ^L04070D
         PEA   L04070D
         PEA   $0000
         TDC
         CLC
         ADC   #$F7C5
         PHA
         LDA   #$00FF
         AND   $E5
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   ^L04070F
         PEA   L04070F
         PEA   $0000
         TDC
         CLC
         ADC   #$F7B1
         PHA
         LDA   #$00FF
         AND   $E4
         CLC
         ADC   #$076C	; AV 202208 - 1900
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$F9D9
         PHA
         PEA   $0007
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         BRL   L0B21DF
L0B1F61  PEI   $F4
         PEI   $F2
         PEA   $0000
         TDC
         CLC
         ADC   #$F8D9
         PHA
         LDA   #$00FF
         AND   $E8
         CLC
         ADC   #$0AF6
         PHA
         JSL   L073002
         PEA   ^L040712
         PEA   L040712
         PEA   $0000
         TDC
         CLC
         ADC   #$F7D9
         PHA
         LDA   #$00FF
         AND   $E6
         CLC
         ADC   #$0B0A
         DEC
         PHA
         JSL   L073002
         PEA   ^L040715
         PEA   L040715
         PEA   $0000
         TDC
         CLC
         ADC   #$F7C5
         PHA
         LDA   #$00FF
         AND   $E5
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   ^L040717
         PEA   L040717
         PEA   $0000
         TDC
         CLC
         ADC   #$F7B1
         PHA
         LDA   #$00FF
         AND   $E4
         CLC
         ADC   #$076C	; AV 202208 - 1900
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$F9D9
         PHA
         PEA   $0007
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         BRL   L0B21DF
L0B1FF4  PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$F8D9
         PHA
         PEA   $0B16
         JSL   L073002
         PEA   $0100
         JSL   L0313BE
         PHY
         PEA   $0034
         JSL   L151681
         PLA
         STA   $DF
         LDA   $DF
         BPL   L0B2026
         BRL   L0B21DA
L0B2026  CMP   #$0003
         BMI   L0B202E
         BRL   L0B21DA
L0B202E  SEC
         SBC   #$0000
         BEQ   L0B2043
         DEC
         BNE   L0B203A
         BRL   L0B2153
L0B203A  DEC
         BNE   L0B2040
         BRL   L0B20CB
L0B2040  BRL   L0B21DA
L0B2043  PEI   $F4
         PEI   $F2
         PEA   $0000
         TDC
         CLC
         ADC   #$F9C5
         PHA
         LDA   #$00FF
         AND   $E6
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$F9B1
         PHA
         LDA   #$00FF
         AND   $E5
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$F99D
         PHA
         PHY
         LDA   #$00FF
         AND   $E4
         PHA
         PEA   $0000
         PHD
         JSL   L0B1E41
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B20AB
         DEX
L0B20AB  PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$F9D9
         PHA
         PEA   $0005
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         BRL   L0B21DD
L0B20CB  PEI   $F4
         PEI   $F2
         PEA   $0000
         TDC
         CLC
         ADC   #$F9C5
         PHA
         PHY
         LDA   #$00FF
         AND   $E4
         PHA
         PEA   $0000
         PHD
         JSL   L0B1E41
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B20F1
         DEX
L0B20F1  PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$F9B1
         PHA
         LDA   #$00FF
         AND   $E6
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$F99D
         PHA
         LDA   #$00FF
         AND   $E5
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$F9D9
         PHA
         PEA   $0005
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         BRL   L0B21DD
L0B2153  PEI   $F4
         PEI   $F2
         PEA   $0000
         TDC
         CLC
         ADC   #$F9C5
         PHA
         LDA   #$00FF
         AND   $E5
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$F9B1
         PHA
         LDA   #$00FF
         AND   $E6
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$F99D
         PHA
         PHY
         LDA   #$00FF
         AND   $E4
         PHA
         PEA   $0000
         PHD
         JSL   L0B1E41
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B21BB
         DEX
L0B21BB  PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$F9D9
         PHA
         PEA   $0005
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         BRA   L0B21DD
L0B21DA  BRL   L0B2043
L0B21DD  BRA   L0B21DF
L0B21DF  LDA   $F0
         STA   $FA
         LDA   $EF
         STA   $F9
         LDA   $ED
         TCD
         TSC
         CLC
         ADC   #$0948
         TCS
         RTL

L0B21F1  ENT
         PHD
         TSC
         CLC
         ADC   #$F9E6
         TCS
         ADC   #$052D
         TCD
         PHY
         PHY
         PEA   $000A
         PEI   $FA
         PEI   $F8
         TDC
         CLC
         ADC   #$00E1
         PEA   $0000
         PHA
         _ConvSeconds
         STAL  L05565D
         PLA
         STA   $D3
         PLX
         STX   $D5
         STZ   $DD
         PHY
         PEA   $0035
         JSL   L151681
         PLA
         STA   $DF
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FAD3
         PHA
         PEA   $0B17
         JSL   L073002
         PEA   $0100
         JSL   L0313BE
         LDA   $DF
         BNE   L0B22BF
         LDA   #$00FF
         AND   $E3
         SEC
         SBC   #$000C
         BVS   L0B225E
         EOR   #$8000
L0B225E  BPL   L0B2291
         PEA   $0000
         TDC
         CLC
         ADC   #$FED3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FAD3
         PHA
         PEA   $0B18
         JSL   L073002
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         AND   $E3
         CMP   #$000C
         BEQ   L0B228F
         LDA   #$000C
         STA   $DD
L0B228F  BRA   L0B22BD
L0B2291  PEA   $0000
         TDC
         CLC
         ADC   #$FED3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FAD3
         PHA
         PEA   $0B19
         JSL   L073002
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         AND   $E3
         BNE   L0B22BD
         LDA   #$FFF4
         STA   $DD
L0B22BD  BRA   L0B22DF
L0B22BF  PEA   $0000
         TDC
         CLC
         ADC   #$FED3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FAD3
         PHA
         PEA   $0B1A
         JSL   L073002
         PEA   $0100
         JSL   L0313BE
L0B22DF  LDA   #$00FF
         AND   $E2
         SEC
         SBC   #$000A
         BVS   L0B22ED
         EOR   #$8000
L0B22ED  BMI   L0B232F
         PEA   $0000
         TDC
         CLC
         ADC   #$FDD3
         PHA
         PEA   ^L04071A
         PEA   L04071A
         PEA   $0000
         TDC
         CLC
         ADC   #$FBBF
         PHA
         LDA   #$00FF
         AND   $E2
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FCBD
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0015
         JSL   L0313BE
         BRA   L0B2357
L0B232F  PEA   $0000
         TDC
         CLC
         ADC   #$FDD3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FBBF
         PHA
         LDA   #$00FF
         AND   $E2
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0014
         JSL   L0313BE
L0B2357  LDA   #$00FF
         AND   $E3
         SEC
         SBC   $DD
         STA   $DB
         LDA   $F6
         BNE   L0B2368
         BRL   L0B243F
L0B2368  LDA   #$00FF
         AND   $E1
         SEC
         SBC   #$000A
         BVS   L0B2376
         EOR   #$8000
L0B2376  BMI   L0B23B8
         PEA   $0000
         TDC
         CLC
         ADC   #$FCD3
         PHA
         PEA   ^L04071C
         PEA   L04071C
         PEA   $0000
         TDC
         CLC
         ADC   #$FBBF
         PHA
         LDA   #$00FF
         AND   $E1
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FCBD
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0015
         JSL   L0313BE
         BRA   L0B23E0
L0B23B8  PEA   $0000
         TDC
         CLC
         ADC   #$FCD3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FBBF
         PHA
         LDA   #$00FF
         AND   $E1
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0014
         JSL   L0313BE
L0B23E0  PEI   $F4
         PEI   $F2
         PEA   $0000
         TDC
         CLC
         ADC   #$FBBF
         PHA
         LDA   $DB
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDD3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FCD3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FED3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FBD3
         PHA
         PEA   $0006
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         BRA   L0B248A
L0B243F  PEI   $F4
         PEI   $F2
         PEA   $0000
         TDC
         CLC
         ADC   #$FBBF
         PHA
         LDA   $DB
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDD3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FED3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FBD3
         PHA
         PEA   $0004
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B248A  LDA   $F0
         STA   $FA
         LDA   $EF
         STA   $F9
         LDA   $ED
         TCD
         TSC
         CLC
         ADC   #$0626
         TCS
         RTL

L0B249C  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PHY
         PHY
         PEI   $0E
         PEI   $0C
         PEI   $0A
         PEA   $0000
         PEA   $0000
         PEA   $0000
         JSL   L1513F4
         PLA
         STA   $10
         PLX
         STX   $12
         LDAL  L05565D
         BEQ   L0B24C9
         STZ   $10
         STZ   $12
L0B24C9  LDA   $08
         STA   $0E
         LDA   $07
         STA   $0D
         LDA   $05
         TCD
         TSC
         CLC
         ADC   #$000C
         TCS
         RTL

L0B24DB  ENT
         PHD
         TSC
         CLC
         ADC   #$FBFC
         TCS
         ADC   #$031D
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE3
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE3
         PHA
         PEI   $F6
         PEI   $F4
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FDE3
         PHA
         PEI   $F2
         PEI   $F0
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FCE3
         PHA
         PEI   $EE
         PEI   $EC
         PEA   $0100
         JSL   L0313BE
         JSL   L0B1BD6
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE3
         PHA
         LDA   L05539F
         LDX   L0553A1
         PHX
         PHA
         JSL   L03250F
         PLA
         LSR
         BCS   L0B255B
         PEA   $4488
         JSL   L07272E
L0B255B  PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE3
         PHA
         LDA   L05539F
         LDX   L0553A1
         PHX
         PHA
         JSL   L03250F
         PLA
         LSR
         BCS   L0B257C
         PEA   $7B4A
         JSL   L07272E
L0B257C  PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FDE3
         PHA
         LDA   L05539F
         LDX   L0553A1
         PHX
         PHA
         JSL   L03250F
         PLA
         LSR
         BCS   L0B259D
         PEA   $2087
         JSL   L07272E
L0B259D  PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FCE3
         PHA
         LDA   L05539F
         LDX   L0553A1
         PHX
         PHA
         JSL   L03250F
         PLA
         LSR
         BCS   L0B25BE
         PEA   $69FE
         JSL   L07272E
L0B25BE  PEA   $0000
         TDC
         CLC
         ADC   #$FFE3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDE3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FCE3
         PHA
         JSL   L073C22
         LDA   $EA
         STA   $FA
         LDA   $E9
         STA   $F9
         LDA   $E7
         TCD
         TSC
         CLC
         ADC   #$0416
         TCS
         RTL

L0B25F8  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         STZ   $16
         LDA   $0E
         LDX   $10
         STA   $01
         STX   $03
         PHY
         PHY
         PEI   $0C
         PEI   $0A
         LDA   L055019
         PHA
         JSL   L0B249C
         PLA
         STA   [$01]
         PLA
         LDY   #$0002
         STA   [$01],Y
         LDA   [$0E]
         LDY   #$0002
         ORA   [$0E],Y
         BNE   L0B262C
         BRA   L0B2646
L0B262C  PEI   $14
         PEI   $12
         LDY   #$0002
         LDA   [$0E],Y
         PHA
         LDA   [$0E]
         PHA
         PEI   $0C
         PEI   $0A
         JSL   L150120
         LDA   #$0001
         STA   $16
L0B2646  LDA   $08
         STA   $14
         LDA   $07
         STA   $13
         LDA   $05
         TCD
         TSC
         CLC
         ADC   #$0012
         TCS
         RTL

L0B2658  PHD
         TSC
         CLC
         ADC   #$FFE6
         TCS
         TCD
         TDC
         CLC
         ADC   #$000B
         PEA   $0000
         PHA
         JSL   L0E00CC
         LDA   $0B
         BEQ   L0B268C
         PEI   $0F
         PEI   $0D
         LDA   $03,S
         EOR   #$FFFF
         TAX
         PLA
         EOR   #$FFFF
         PLY
         INC
         BNE   L0B2684
         INX
L0B2684  PHX
         PHA
         JSL   L0E0DE2
         BRA   L0B26C5
L0B268C  PEA   $0000
         TDC
         CLC
         ADC   #$0001
         PHA
         TDC
         CLC
         ADC   #$000D
         PEA   $0000
         PHA
         PEA   $000A
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$0001
         PHA
         PEA   $000D
         _SANEFP816
         PEA   $0000
         TDC
         CLC
         ADC   #$0001
         PHA
         JSL   L0E0C71
L0B26C5  TSC
         CLC
         ADC   #$001A
         TCS
         PLD
         RTL

L0B26CD  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PHY
         JSL   L0E0678
         PLA
         EOR   #$0001
         PHA
         JSL   L0E0E4B
         PLY
         PLY
         PLD
         RTL

L0B26E7  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   L055387
         SEC
         SBC   #$0040
         BVS   L0B26FB
         EOR   #$8000
L0B26FB  BMI   L0B270C
         LDA   L055387
         INC
         STA   L055387
         LDA   L055387
         STA   $10
         BRL   L0B2812
L0B270C  LDA   #$0001
         STA   $05
L0B2711  LDA   $05
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         LDAL  L0510DE,X
         BNE   L0B2729
         LDA   $05
         STA   $10
         BRL   L0B2812
L0B2729  LDA   #$0040
         CMP   $05
         BEQ   L0B2734
         INC   $05
         BRA   L0B2711
L0B2734  PHY
         JSL   L150705
         PLA
         BPL   L0B2740
         EOR   #$FFFF
         INC
L0B2740  PHA
         PEA   $0040
         JSL   L150318
         PLX
         PLX
         INC
         STA   L055385
         LDA   #$0001
         STA   $05
L0B2753  LDA   L055385
         INC
         STA   L055385
         LDA   L055385
         SEC
         SBC   #$0040
         BEQ   L0B2770
         BVS   L0B2768
         EOR   #$8000
L0B2768  BPL   L0B2770
         LDA   #$0001
         STA   L055385
L0B2770  LDA   L055385
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B2787
         INX
L0B2787  STA   $01
         STX   $03
         LDX   #$0000
         LDY   #$001C
         LDA   [$01],Y
         BNE   L0B2796
         INX
L0B2796  TXA
         BEQ   L0B27FD
         LDX   #$0000
         LDA   #$0004
         CMP   [$01]
         BEQ   L0B27A4
         INX
L0B27A4  TXA
         BNE   L0B27E9
         PHA
         LDY   #$0004
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   L05502B
         BNE   L0B27BA
         CPX   L05502D
L0B27BA  BNE   L0B27C1
         LDA   #$0000
         BRA   L0B27C4
L0B27C1  LDA   #$0001
L0B27C4  BEQ   L0B27E6
         PHA
         LDY   #$0004
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   L055039
         BNE   L0B27D9
         CPX   L05503B

*

L0B27D9  BNE   L0B27E0
         LDA   #$0000
         BRA   L0B27E3
L0B27E0  LDA   #$0001
L0B27E3  AND   $01,S
         PLX
L0B27E6  ORA   $01,S
         PLX
L0B27E9  CMP   #$0000
         BEQ   L0B27FD
         LDA   L055385
         PHA
         JSL   L0B1ADF
         LDA   L055385
         STA   $10
         BRA   L0B2812
L0B27FD  LDA   #$0040
         CMP   $05
         BEQ   L0B2809
         INC   $05
         BRL   L0B2753
L0B2809  STZ   $10
         PEA   $004B
         JSL   L0B0B7A
L0B2812  PLY
         PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B2819  ENT
         PHD
         TSC
         CLC
         ADC   #$FFD6
         TCS
         TCD
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         PEI   $32
         PEI   $30
         PEA   $0020
         JSL   L0313BE
         LDA   $34
         LDX   $36
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         SEC
         SBC   #$0000
         BMI   L0B2869
         BEQ   L0B2869
         PHY
         PEI   $36
         PEI   $34
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         JSL   L0B01D3
         PLA
         STA   $25
         LDA   $25
         BEQ   L0B2869
         LDA   $25
         STA   $38
         BRA   L0B288C
L0B2869  PEI   $36
         PEI   $34
         PEA   $0001
         JSL   L0B1C2B
         LDA   [$01]
         STA   $38
         PEI   $36
         PEI   $34
         LDA   [$01]
         PHA
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         JSL   L0B3DB3
L0B288C  LDA   $2E
         STA   $36
         LDA   $2D
         STA   $35
         LDA   $2B
         TCD
         TSC
         CLC
         ADC   #$0034
         TCS
         RTL

L0B289E  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L0553B5
         LDX   L0553B7
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         PHX
         PHA
         LDA   $0A
         JSL   L150488
         JSL   L150F53
         STA   $0C
         STX   $0E
         LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B28E4  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   L0553B5
         LDX   L0553B7
         STA   $01
         STX   $03
         LDY   #$0008
         LDA   [$01],Y
         DEC
         LDY   #$0008
         STA   [$01],Y
         PEA   ^L051BDE
         PEA   L051BDE
         PHY
         PHY
         LDY   #$0006
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0008
         LDA   [$01],Y
         PHA
         JSL   L0B062C
         PEA   $0008
         JSL   L0313BE
         PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B292B  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   L0553B9
         LDX   L0553BB
         STA   $01
         STX   $03
         LDY   #$0004
         LDA   [$01],Y
         STA   L055391
         LDY   #$0006
         LDA   [$01],Y
         CMP   L055371
         BEQ   L0B2959
         LDY   #$0006
         LDA   [$01],Y
         PHA
         JSL   L0B2A91
L0B2959  LDA   #$8001
         STA   L055395
         PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B2965  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   $0E
         LDX   $10
         STA   $01
         STX   $03
         LDA   L0553B5
         LDX   L0553B7
         CLC
         ADC   #$0008
         BCC   L0B2982
         INX
L0B2982  STA   $05
         STX   $07
         LDA   [$01]
         CMP   [$05]
         BEQ   L0B2993
         LDA   [$01]
         PHA
         JSL   L0B2BBB
L0B2993  LDY   #$0002
         LDA   [$01],Y
         PHA
         JSL   L0B29AF
         LDA   $0C
         STA   $10
         LDA   $0B
         STA   $0F
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B29AF  PHD
         TSC
         CLC
         ADC   #$FFF4
         TCS
         TCD
         LDA   $12
         STA   $07
         LDA   $07
         SEC
         SBC   L0553C3
         BVS   L0B29C6
         EOR   #$8000
L0B29C6  BMI   L0B29F0
         LDA   $07
         INC
         STA   $03
         LDA   L0553C3
         STA   $01
         LDA   $01
         SEC
         SBC   $03
         BVS   L0B29DC
         EOR   #$8000
L0B29DC  BPL   L0B29F0
         LDA   $03
         STA   $05
L0B29E2  JSL   L0E0000
         LDA   $05
         CMP   $01
         BEQ   L0B29F0
         INC   $05
         BRA   L0B29E2
L0B29F0  LDA   $10
         STA   $12
         LDA   $0F
         STA   $11
         LDA   $0D
         TCD
         TSC
         CLC
         ADC   #$0010
         TCS
         RTL

L0B2A02  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   $0E
         LDX   $10
         STA   $01
         STX   $03
         LDA   L0553B5
         LDX   L0553B7
         CLC
         ADC   #$0008
         BCC   L0B2A1F
         INX
L0B2A1F  STA   $05
         STX   $07
         LDA   [$05]
         STA   [$01]
         LDA   #$0002
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B2A32
         INX
L0B2A32  PHX
         PHA
         JSL   L0B2A4A
         LDA   $0C
         STA   $10
         LDA   $0B
         STA   $0F
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B2A4A  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L0553C3
         STA   [$0A]
         LDA   $08
         STA   $0C
         LDA   $07
         STA   $0B
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         PLY
         RTL

L0B2A68  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L055371
         DEC
         ASL
         TAX
         LDA   $0A
         STAL  L050AEA,X
         LDA   $0A
         STA   L05536F
         LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B2A91  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   $0A
         STA   L055371
         LDA   $0A
         BMI   L0B2AB3
         BEQ   L0B2AB3
         LDA   L055371
         DEC
         ASL
         TAX
         LDAL  L050AEA,X
         STA   L05536F
         BRA   L0B2AB6
L0B2AB3  STZ   L05536F
L0B2AB6  LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B2AC6  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L0553A7
         LDX   L0553A9
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         STA   $01
         STX   $03
         LDA   #$00FF
         AND   [$01]
         BEQ   L0B2AF5
         PEA   ^L040760
         PEA   L040760
         JSL   L0B2D94
L0B2AF5  PLY
         PLY
         PLD
         RTL

L0B2AF9  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   $10
         ORA   $12
         BNE   L0B2B23
         STZ   L0553B5
         STZ   L0553B7
         PEA   ^L051BDE
         PEA   L051BDE
         PEA   ^L050BEA
         PEA   L050BEA
         PEA   $0008
         JSL   L0313BE
         BRL   L0B2BA9
L0B2B23  LDA   $0E
         BEQ   L0B2B71
         LDA   #$0000
         LDY   #$0014
         STA   [$10],Y
         LDA   L0553B5
         ORA   L0553B7
         BNE   L0B2B41
         LDA   #$0001
         LDY   #$0012
         STA   [$10],Y
         BRA   L0B2B6F
L0B2B41  LDA   L0553B5
         LDX   L0553B7
         CLC
         ADC   #$0012
         BCC   L0B2B4E
         INX
L0B2B4E  STA   $05
         STX   $07
         LDA   [$05]
         PHA
         LDA   L0553B5
         LDX   L0553B7
         CLC
         ADC   #$0014
         BCC   L0B2B62
         INX
L0B2B62  STA   $05
         STX   $07
         PLA
         CLC
         ADC   [$05]
         LDY   #$0012
         STA   [$10],Y
L0B2B6F  BRA   L0B2B71
L0B2B71  LDA   $10
         LDX   $12
         STA   L0553B5
         STX   L0553B7
         LDA   L0553B5
         LDX   L0553B7
         STA   $01
         STX   $03
         PEA   ^L051BDE
         PEA   L051BDE
         PHY
         PHY
         LDY   #$0006
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0008
         LDA   [$01],Y
         PHA
         JSL   L0B062C
         PEA   $0008
         JSL   L0313BE
L0B2BA9  LDA   $0C
         STA   $12
         LDA   $0B
         STA   $11
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$0010
         TCS
         RTL

L0B2BBB  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   L0553B5
         LDX   L0553B7
         STA   $01
         STX   $03
         LDA   $0E
         LDY   #$0008
         STA   [$01],Y
         PEA   ^L051BDE
         PEA   L051BDE
         PHY
         PHY
         LDY   #$0006
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0008
         LDA   [$01],Y
         PHA
         JSL   L0B062C
         PEA   $0008
         JSL   L0313BE
         LDA   $0C
         STA   $0E
         LDA   $0B
         STA   $0D
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000C
         TCS
         RTL

L0B2C0A  ENT
         PHD
         TSC
         CLC
         ADC   #$FFCE
         TCS
         TCD
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         PEI   $3A
         PEI   $38
         PEA   $0020
         JSL   L0313BE
         STZ   $27
         STZ   $29
         STZ   $2B
         STZ   $25
         LDA   #$00FF
         AND   $03
         STA   $01
         LDA   $01
         SEC
         SBC   #$0001
         BVS   L0B2C40
         EOR   #$8000
L0B2C40  BPL   L0B2CA4
         LDA   #$0001
         STA   $2D
L0B2C47  TDC
         CLC
         ADC   #$0003
         STA   $2F
         STZ   $31
         LDY   $2D
         LDA   #$00FF
         AND   [$2F],Y
         STA   $23
         LDA   #$002E
         CMP   $23
         BNE   L0B2C67
         LDA   #$0001
         STA   $25
         BRA   L0B2C9A
L0B2C67  LDX   #$0000
         LDA   #$0023
         CMP   $23
         BNE   L0B2C72
         INX
L0B2C72  TXA
         AND   $25
         BEQ   L0B2C7E
         LDA   $2B
         INC
         STA   $2B
         BRA   L0B2C9A
L0B2C7E  LDA   #$0030
         CMP   $23
         BNE   L0B2C9A
         LDA   $25
         BEQ   L0B2C95
         LDA   $29
         INC
         STA   $29
         LDA   $2B
         INC
         STA   $2B
         BRA   L0B2C9A
L0B2C95  LDA   $27
         INC
         STA   $27
L0B2C9A  LDA   $2D
         CMP   $01
         BEQ   L0B2CA4
         INC   $2D
         BRA   L0B2C47
L0B2CA4  LDA   $27
         STA   L0553AD
         LDA   $29
         STA   L0553AF
         LDA   $2B
         STA   L0553B1
         PEA   ^L050F74
         PEA   L050F74
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         PEA   $0020
         JSL   L0313BE
         LDA   $36
         STA   $3A
         LDA   $35
         STA   $39
         LDA   $33
         TCD
         TSC
         CLC
         ADC   #$0038
         TCS
         RTL

L0B2CDB  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF2
         TCS
         TCD
         STZ   $18
         STZ   $07
         STZ   $09
         STZ   $03
         STZ   $05
         PHY
         PEI   $16
         PEI   $14
         JSL   L0718FA
         PLA
         STA   $01
         LDA   L0551F3
         BEQ   L0B2D40
         LDA   L055111
         LDX   L055113
         STA   $03
         STX   $05
         LDA   $03
         ORA   $05
         BEQ   L0B2D3E
         PEI   $05
         PEI   $03
         JSL   L15058C
         LDY   #$0002
         LDA   [$14],Y
         PHA
         LDA   [$14]
         PHA
         PHY
         PHY
         LDY   #$0002
         LDA   [$14],Y
         PHA
         LDA   [$14]
         PHA
         JSL   L071C98
         PLA
         PLX
         PHA
         PEI   $05
         PEI   $03
         JSL   L15168D
         LDA   #$0001
         STA   $18
L0B2D3E  BRA   L0B2D78
L0B2D40  LDA   L05511F
         BEQ   L0B2D78
         LDA   L055121
         LDX   L055123
         STA   $07
         STX   $09
         LDA   $07
         ORA   $09
         BEQ   L0B2D78
         PEA   $0009
         PEI   $16
         PEI   $14
         PEA   $0000
         PEA   $0000
         PEA   $0000
         PEA   $0000
         PEA   $0000
         PEI   $09
         PEI   $07
         JSL   L150AEC
         LDA   #$0001
         STA   $18
L0B2D78  PEI   $16
         PEI   $14
         PEI   $01
         JSL   L0718DA
         LDA   $12
         STA   $16
         LDA   $11
         STA   $15
         LDA   $0F
         TCD
         TSC
         CLC
         ADC   #$0014
         TCS
         RTL

L0B2D94  ENT
         PHD
         TSC
         CLC
         ADC   #$FEF8
         TCS
         ADC   #$0015
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEB
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         LDX   #$FFEB
         AND   $00,X
         INC
         STA   $ED
         PHY
         LDA   L0553A7
         LDX   L0553A9
         PHX
         PHA
         LDA   $ED
         JSL   L150488
         PHX
         PHA
         JSL   L078A05
         PLA
         LSR
         BCS   L0B2DDE
         PEA   $2338
         JSL   L07272E
L0B2DDE  PHY
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEB
         PHA
         JSL   L071F3F
         LDA   L0553A7
         LDX   L0553A9
         STA   $EF
         STX   $F1
         LDY   #$0002
         LDA   [$EF],Y
         TAX
         LDA   [$EF]
         PHX
         PHA
         LDA   $ED
         JSL   L150488
         PHX
         PHA
         JSL   L070597
         LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$010E
         TCS
         RTL

L0B2E1F  ENT
         PHD
         TSC
         CLC
         ADC   #$FFBE
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEI   $4E
         PEI   $4C
         PEA   $0030
         JSL   L0313BE
         STZ   $50
         LDA   $01
         DEC
         DEC
         BEQ   L0B2E46
         BRL   L0B2F5E
L0B2E46  PHY
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0000
         JSL   L0D0F6E
         PLA
         STA   $3D
         LDA   $3D
         BNE   L0B2E61
         BRL   L0B2F5E
L0B2E61  LDAL  L05328D
         CMP   $3D
         BNE   L0B2E7E
         LDA   L055129
         LDX   L05512B
         CMP   $03
         BNE   L0B2E75
         CPX   $05
L0B2E75  BNE   L0B2E7E
         PEA   $0000
         JSL   L09091E
L0B2E7E  LDA   $3D
         STA   $3B
         LDA   $03
         LDX   $05
         CMP   $0B
         BNE   L0B2E8C
         CPX   $0D
L0B2E8C  BNE   L0B2E96
         LDA   $3B
         EOR   #$FFFF
         INC
         STA   $3B
L0B2E96  PHY
         PEI   $4A
         PEI   $48
         JSL   L0718FA
         PLA
         STA   $31
         PHY
         PEI   $09
         PEI   $07
         PEI   $0D
         PEI   $0B
         PEI   $3B
         LDY   #$0002
         LDA   [$48],Y
         PHA
         LDA   [$48]
         PHA
         TDC
         CLC
         ADC   #$0035
         PEA   $0000
         PHA
         JSL   L07D80F
         PLA
         STA   $33
         PEI   $4A
         PEI   $48
         PEI   $31
         JSL   L0718DA
         LDA   $33
         BEQ   L0B2F15
         LDA   $33
         DEC
         BMI   L0B2F13
         CMP   #$0004
         BPL   L0B2F13
         SEC
         SBC   #$0000
         BEQ   L0B2EEF
         DEC
         BEQ   L0B2EF8
         DEC
         BEQ   L0B2F01
         DEC
         BEQ   L0B2F0A
         BRA   L0B2F13
L0B2EEF  PEA   $0017
         JSL   L0B0B7A
         BRA   L0B2F13
L0B2EF8  PEA   $0028
         JSL   L0B0B7A
         BRA   L0B2F13
L0B2F01  PEA   $002D
         JSL   L0B0B7A
         BRA   L0B2F13
L0B2F0A  PEA   $0002
         JSL   L0B0B7A
         BRA   L0B2F13
L0B2F13  BRA   L0B2F5E
L0B2F15  LDA   $35
         BEQ   L0B2F59
         LDA   L05501F
         LDX   L055021
         CMP   $07
         BNE   L0B2F25
         CPX   $09
L0B2F25  BEQ   L0B2F2C
         LDA   #$0000
         BRA   L0B2F2F
L0B2F2C  LDA   #$0001
L0B2F2F  PHA
         LDA   L055027
         LDX   L055029
         CMP   $0B
         BNE   L0B2F3C
         CPX   $0D
L0B2F3C  BEQ   L0B2F43
         LDA   #$0000
         BRA   L0B2F46
L0B2F43  LDA   #$0001
L0B2F46  ORA   $01,S
         PLX
         LSR
         BCC   L0B2F59
         PEI   $05
         PEI   $03
         PEI   $3D
         PEA   $0000
         JSL   L0876F4
L0B2F59  LDA   #$0001
         STA   $50
L0B2F5E  LDA   $46
         STA   $4E
         LDA   $45
         STA   $4D
         LDA   $43
         TCD
         TSC
         CLC
         ADC   #$004C
         TCS
         RTL

L0B2F70  ENT
         PHD
         TSC
         CLC
         ADC   #$FEFC
         TCS
         ADC   #$000D
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF3
         PHA
         JSL   L0E06AC
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF3
         PHA
         JSL   L09873C
         TSC
         CLC
         ADC   #$0104
         TCS
         PLD
         RTL

L0B2F9D  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L0553C5
         LDX   L0553C7
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B2FC4
         DEX
L0B2FC4  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         CLC
         ADC   #$0005
         BCC   L0B2FDC
         INX
L0B2FDC  STA   $01
         STX   $03
         LDA   $0A
         SEP   #$20
         STA   [$01]
         REP   #$20
         LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L0553C5
         LDX   L0553C7
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B301F
         DEX
L0B301F  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         CLC
         ADC   #$0004
         BCC   L0B3037
         INX
L0B3037  STA   $01
         STX   $03
         LDA   $0A
         SEP   #$20
         STA   [$01]
         REP   #$20
         LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$0010
         CLC
         ADC   L0553C3
         STA   $01
         LDA   L0553C1
         SEC
         SBC   $01
         BEQ   L0B3096
         BVS   L0B3071
         EOR   #$8000
L0B3071  BPL   L0B3096
         LDA   #$0010
         CLC
         ADC   L0553C3
         STA   L0553C1
         LDA   L0553C1
         ASL
         ASL
         ASL
         ASL
         JSL   L150488
         PHX
         PHA
         LDA   L0553C5
         LDX   L0553C7
         PHX
         PHA
         JSL   L1512FB
L0B3096  PLY
         PLY
         PLD
         RTL

L0B309A  ENT
         PHD
         TSC
         CLC
         ADC   #$FF40
         TCS
         TCD
         STZ   $CE
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0940E5
         PHY
         PHY
         PEI   $CC
         PEI   $CA
         JSL   L0735A8
         PLA
         STA   $B9
         PLX
         STX   $BB
         LDA   $B9
         ORA   $BB
         BNE   L0B30C9
         BRA   L0B3133
L0B30C9  PHY
         PHY
         PEI   $BB
         PEI   $B9
         JSL   L078841
         PLA
         STA   $B5
         PLX
         STX   $B7
         PEI   $BB
         PEI   $B9
         JSL   L07185A
         LDA   #$0002
         STA   $5D
         LDA   #$0001
         LDX   #$0000
         STA   $63
         STX   $65
         LDA   #$0006
         STA   $89
         PHY
         TDC
         CLC
         ADC   #$005D
         PEA   $0000
         PHA
         JSL   L0953DD
         PLA
         LSR
         BCS   L0B3109
         BRA   L0B3133
L0B3109  PEI   $C8
         PEI   $C6
         JSL   L0B0D0A
         LDA   #$0004
         STA   [$C6]
         PHY
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0953DD
         PLA
         LSR
         BCC   L0B312F
         LDA   #$0001
         STA   $CE
         BRA   L0B3133
L0B312F  JSL   L072314
L0B3133  LDA   $C4
         STA   $CC
         LDA   $C3
         STA   $CB
         LDA   $C1
         TCD
         TSC
         CLC
         ADC   #$00CA
         TCS
         RTL

L0B3145  ENT
         PHD
         TSC
         CLC
         ADC   #$FFEC
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         LDA   L0553C5
         LDX   L0553C7
         STA   $11
         STX   $13
         LDY   #$0002
         LDA   [$11],Y
         TAX
         LDA   [$11]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B3175
         DEX
L0B3175  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         PHX
         PHA
         PEA   $0010
         JSL   L0313BE
         LDA   L0553C3
         DEC
         STA   L0553C3
         PEI   $24
         PEI   $22
         PEI   $20
         PEI   $1E
         PEI   $1C
         JSL   L0E0656
         LDA   L0553C3
         INC
         STA   L0553C3
         LDA   L0553C5
         LDX   L0553C7
         STA   $11
         STX   $13
         LDY   #$0002
         LDA   [$11],Y
         TAX
         LDA   [$11]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B31CA
         DEX
L0B31CA  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         PHX
         PHA
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0010
         JSL   L0313BE
         LDA   $18
         STA   $24
         LDA   $17
         STA   $23
         LDA   $15
         TCD
         TSC
         CLC
         ADC   #$0022
         TCS
         RTL

L0B31FF  PHD
         TSC
         CLC
         ADC   #$FFEC
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         LDA   L0553C5
         LDX   L0553C7
         STA   $11
         STX   $13
         LDY   #$0002
         LDA   [$11],Y
         TAX
         LDA   [$11]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B322F
         DEX
L0B322F  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         PHX
         PHA
         PEA   $0010
         JSL   L0313BE
         LDA   L0553C3
         DEC
         STA   L0553C3
         JSL   L0E0000
         LDA   L0553C3
         INC
         STA   L0553C3
         LDA   L0553C5
         LDX   L0553C7
         STA   $11
         STX   $13
         LDY   #$0002
         LDA   [$11],Y
         TAX
         LDA   [$11]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B327A
         DEX
L0B327A  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         PHX
         PHA
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0010
         JSL   L0313BE
         TSC
         CLC
         ADC   #$0014
         TCS
         PLD
         RTL

L0B32A5  ENT
         PHD
         TSC
         CLC
         ADC   #$FFEC
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         LDA   L0553C5
         LDX   L0553C7
         STA   $11
         STX   $13
         LDY   #$0002
         LDA   [$11],Y
         TAX
         LDA   [$11]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B32D5
         DEX
L0B32D5  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         PHX
         PHA
         PEA   $0010
         JSL   L0313BE
         LDA   L0553C5
         LDX   L0553C7
         STA   $11
         STX   $13
         LDY   #$0002
         LDA   [$11],Y
         TAX
         LDA   [$11]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B330E
         DEX
L0B330E  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         PHX
         PHA
         LDA   L0553C5
         LDX   L0553C7
         STA   $11
         STX   $13
         LDY   #$0002
         LDA   [$11],Y
         TAX
         LDA   [$11]
         PHX
         PHA
         LDA   L0553C3
         DEC
         JSL   L150488
         TAY
         BNE   L0B3341
         DEX
L0B3341  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         PHX
         PHA
         PEA   $0010
         JSL   L0313BE
         LDA   L0553C5
         LDX   L0553C7
         STA   $11
         STX   $13
         LDY   #$0002
         LDA   [$11],Y
         TAX
         LDA   [$11]
         PHX
         PHA
         LDA   L0553C3
         DEC
         JSL   L150488
         TAY
         BNE   L0B337B
         DEX
L0B337B  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         PHX
         PHA
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0010
         JSL   L0313BE
         TSC
         CLC
         ADC   #$0014
         TCS
         PLD
         RTL

         PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   #$0001
         STA   $10
         PHY
         JSL   L0314F6
         PLA
         STA   $01
         LDA   $01
         JSL   L150488
         STA   $03
         STX   $05
         JSL   L0E0000
         PEI   $05
         PEI   $03
         JSL   L0E0E79
         PEI   $01
         JSL   L0B2F9D
         PLY
         PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B33DE  ENT
         PHD
         TSC
         CLC
         ADC   #$FFE4
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEI   $24
         PEI   $22
         PEA   $0018
         JSL   L0313BE
         LDX   #$0000
         LDA   #$0004
         CMP   $01
         BNE   L0B3405
         INX
L0B3405  TXA
         BEQ   L0B3422
         PHA
         LDA   L05502B
         LDX   L05502D
         CMP   $03
         BNE   L0B3415
         CPX   $05
L0B3415  BEQ   L0B341C
         LDA   #$0000
         BRA   L0B341F
L0B341C  LDA   #$0001
L0B341F  AND   $01,S
         PLX
L0B3422  STA   $26
         LDA   $20
         STA   $24
         LDA   $1F
         STA   $23
         LDA   $1D
         TCD
         TSC
         CLC
         ADC   #$0022
         TCS
         RTL

L0B3436  PHD
         TSC
         CLC
         ADC   #$FDFC
         TCS
         ADC   #$010F
         TCD
         LDAL  L040761
         LDX   #$FFF1
         SEP   #$20
         STA   $00,X
         REP   #$20
         LDA   $FA
         BNE   L0B346B
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   ^L040762
         PEA   L040762
         PEA   $0006
         JSL   L0313BE
         BRL   L0B360E
L0B346B  LDA   #$0001
         AND   $FA
         BEQ   L0B34A1
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   ^L040768
         PEA   L040768
         PEA   $0000
         TDC
         CLC
         ADC   #$FEF1
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B34A1  LDA   #$0002
         AND   $FA
         BEQ   L0B34D7
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   ^L04076E
         PEA   L04076E
         PEA   $0000
         TDC
         CLC
         ADC   #$FEF1
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B34D7  LDA   #$0004
         AND   $FA
         BEQ   L0B350D
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   ^L040776
         PEA   L040776
         PEA   $0000
         TDC
         CLC
         ADC   #$FEF1
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B350D  LDA   #$0008
         AND   $FA
         BEQ   L0B3543
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   ^L040781
         PEA   L040781
         PEA   $0000
         TDC
         CLC
         ADC   #$FEF1
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B3543  LDA   #$0010
         AND   $FA
         BEQ   L0B3579
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   ^L04078A
         PEA   L04078A
         PEA   $0000
         TDC
         CLC
         ADC   #$FEF1
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B3579  LDA   #$0020
         AND   $FA
         BEQ   L0B35AF
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   ^L040792
         PEA   L040792
         PEA   $0000
         TDC
         CLC
         ADC   #$FEF1
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B35AF  LDA   #$0040
         AND   $FA
         BEQ   L0B35E5
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   ^L04079C
         PEA   L04079C
         PEA   $0000
         TDC
         CLC
         ADC   #$FEF1
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B35E5  LDA   #$00FF
         LDX   #$FFF1
         AND   $00,X
         CLC
         ADC   #$FFF1
         TAX
         LDA   #$00FF
         AND   $00,X
         CMP   #$002C
         BNE   L0B360E
         LDA   #$00FF
         LDX   #$FFF1
         AND   $00,X
         DEC
         LDX   #$FFF1
         SEP   #$20
         STA   $00,X
         REP   #$20
L0B360E  PEI   $FE
         PEI   $FC
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF1
         PHA
         PEA   $0100
         JSL   L0313BE
         LDA   $F8
         STA   $FA
         LDA   $F7
         STA   $F9
         LDA   $F5
         TCD
         TSC
         CLC
         ADC   #$0208
         TCS
         RTL

         PHD
         TSC
         CLC
         ADC   #$FEFC
         TCS
         ADC   #$000D
         TCD
         LDA   #L051BE6
         LDX   #^L051BE6
         CMP   L0553B9
         BNE   L0B364D
         CPX   L0553BB
L0B364D  BNE   L0B3662
         PEI   $FE
         PEI   $FC
         PEA   ^L0407A4
         PEA   L0407A4
         PEA   $0014
         JSL   L0313BE
         BRA   L0B3697
L0B3662  LDA   L0553B9
         LDX   L0553BB
         STA   $F3
         STX   $F5
         LDY   #$0002
         LDA   [$F3],Y
         TAX
         LDA   [$F3]
         PHX
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF3
         PHA
         JSL   L0B1388
         PEI   $FE
         PEI   $FC
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF3
         PHA
         PEA   $0100
         JSL   L0313BE
L0B3697  TSC
         CLC
         ADC   #$0104
         TCS
         PLD
         RTL

L0B369F  ENT
         PHD
         TSC
         CLC
         ADC   #$FDFC
         TCS
         ADC   #$010D
         TCD
         LDAL  L051BDE
         SEC
         SBC   #$0003
         BEQ   L0B36D4
         BVS   L0B36B9
         EOR   #$8000
L0B36B9  BPL   L0B36D4
         LDAL  L051BE4
         PHA
         LDAL  L051BE2
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF3
         PHA
         JSL   L0B1388
         BRA   L0B370B
L0B36D4  LDAL  L051BDE
         DEC
         DEC
         BNE   L0B36FE
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF3
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FEF3
         PHA
         PEA   $0056
         JSL   L0B127A
         PEA   $0100
         JSL   L0313BE
         BRA   L0B370B
L0B36FE  LDAL  L0407B8
         LDX   #$FFF3
         SEP   #$20
         STA   $00,X
         REP   #$20
L0B370B  PEI   $FE
         PEI   $FC
         PEA   $0000
         TDC
         CLC
         ADC   #$FFF3
         PHA
         PEA   $0100
         JSL   L0313BE
         TSC
         CLC
         ADC   #$0204
         TCS
         PLD
         RTL

L0B3727  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L0553C5
         LDX   L0553C7
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B374E
         DEX
L0B374E  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         STA   $0A
         STX   $0C
         PLY
         PLY
         PLD
         RTL

L0B3773  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L0553C5
         LDX   L0553C7
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         PHX
         PHA
         LDA   L0553C3
         JSL   L150488
         TAY
         BNE   L0B379A
         DEX
L0B379A  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         CLC
         ADC   #$0004
         BCC   L0B37B2
         INX
L0B37B2  STA   $01
         STX   $03
         LDA   #$00FF
         AND   [$01]
         BIT   #$0080
         BEQ   L0B37C3
         ORA   #$FF80
L0B37C3  JSL   L150488
         STA   $0A
         STX   $0C
         PLY
         PLY
         PLD
         RTL

L0B37CF  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L0553C5
         LDX   L0553C7
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         PHX
         PHA
         LDA   L0553C3
         DEC
         JSL   L150488
         TAY
         BNE   L0B37F7
         DEX
L0B37F7  DEC
         PEA   $0000
         PEA   $0010
         JSL   L150D50
         PLA
         PLX
         JSL   L150F53
         STA   $01
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         STA   $0A
         STX   $0C
         PLY
         PLY
         PLD
         RTL

L0B381C  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         LDA   L055363
         BEQ   L0B383A
         PHY
         PEA   ^L05098E
         PEA   L05098E
         PEA   $0000
         JSL   L095416
         PLA
         STA   $01
L0B383A  PLY
         PLY
         PLY
         PLD
         RTL

L0B383F  ENT
         PHD
         TSC
         CLC
         ADC   #$FEF2
         TCS
         ADC   #$001B
         TCD
         LDA   L0553D5
         LDX   L0553D7
         STA   $EF
         STX   $F1
         LDY   #$0002
         LDA   [$EF],Y
         TAX
         LDA   [$EF]
         STA   $EB
         STX   $ED
         LDA   #$0001
         STA   $E5
L0B3865  LDX   #$0000
         LDA   #$00FF
         AND   [$EB]
         BIT   #$0080
         BEQ   L0B3875
         ORA   #$FF80
L0B3875  CMP   $FA
         BNE   L0B387A
         INX
L0B387A  TXA
         BEQ   L0B38F0
         LDX   #$0000
         LDY   #$0001
         LDA   #$00FF
         AND   [$EB],Y
         BIT   #$0080
         BEQ   L0B3890
         ORA   #$FF80
L0B3890  CMP   $F8
         BNE   L0B3895
         INX
L0B3895  TXA
         BEQ   L0B38F0
         LDA   L0553CD
         LDX   L0553CF
         STA   $EF
         STX   $F1
         LDY   #$0002
         LDA   [$EF],Y
         TAX
         LDA   [$EF]
         PHX
         PHA
         LDY   #$0002
         LDA   [$EB],Y
         JSL   L150488
         JSL   L150F53
         STA   $E7
         STX   $E9
         PEI   $E9
         PEI   $E7
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE5
         PHA
         LDA   #$00FF
         AND   [$E7]
         INC
         JSL   L150488
         PHX
         PHA
         JSL   L070597
         PEI   $FE
         PEI   $FC
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE5
         PHA
         PEA   $0100
         JSL   L0313BE
         BRA   L0B3919
L0B38F0  LDA   $EB
         LDX   $ED
         CLC
         ADC   #$0004
         BCC   L0B38FB
         INX
L0B38FB  STA   $EB
         STX   $ED
         LDA   #$0400
         CMP   $E5
         BEQ   L0B390B
         INC   $E5
         BRL   L0B3865
L0B390B  LDAL  L0407B9
         SEP   #$20
         STA   [$FC]
         REP   #$20
         JSL   L072314
L0B3919  LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$0114
         TCS
         RTL

L0B392B  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         LDA   L05535D
         BNE   L0B393B
         BRL   L0B39BB
L0B393B  PHY
         JSL   L0301E4
         PLA
         BEQ   L0B3945
         BRA   L0B39BB
L0B3945  LDA   L05534F
         LDX   L055351
         PHX
         PHA
         JSL   L07185A
         STZ   L05534F
         STZ   L055351
         LDA   L05534B
         LDX   L05534D
         PHX
         PHA
         JSL   L07185A
         STZ   L05534B
         STZ   L05534D
         LDA   L05535D
         DEC
         BNE   L0B39A5
         PHY
         JSL   L150B6A
         PLA
         STA   $01
         LDA   L055353
         PHA
         JSL   L150B70
         PEA   $0003
         PEA   $8024
         LDA   L055355
         LDX   L055357
         PHX
         PHA
         JSL   L1510BF
         PEI   $01
         JSL   L150B70
         LDA   L055359
         LDX   L05535B
         PHX
         PHA
         JSL   L07191C
         BRA   L0B39B8
L0B39A5  LDA   L05535D
         DEC
         DEC
         BNE   L0B39B8
         LDA   L055359
         LDX   L05535B
         PHX
         PHA
         JSL   L07185A
L0B39B8  STZ   L05535D
L0B39BB  PLY
         PLY
         PLY
         PLD
         RTL

L0B39C0  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   L0553C5
         LDX   L0553C7
         PHX
         PHA
         PEI   $0A
         JSL   L0718DA
         LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B39E6  PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDY   #$0007
         LDA   [$0E],Y
         TAX
         DEY
         DEY
         LDA   [$0E],Y
         STA   $01
         STX   $03
         LDY   #$000A
         LDA   [$01],Y
         INY
         INY
         ORA   [$01],Y
         BNE   L0B3A0D
         JSL   L0E0C52
         BRA   L0B3A58
L0B3A0D  LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L0718BF
         LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         STA   $05
         STX   $07
         LDY   #$0002
         LDA   [$05],Y
         TAX
         LDA   [$05]
         PHX
         PHA
         LDY   #$0008
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0004
         LDA   [$01],Y
         PHA
         JSL   L0E07C5
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L07191C
L0B3A58  LDA   $0C
         STA   $10
         LDA   $0B
         STA   $0F
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B3A6A  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF4
         TCS
         TCD
         LDA   $14
         LDX   $16
         STA   $01
         STX   $03
         LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         STA   $09
         STX   $0B
         LDY   #$0002
         LDA   [$09],Y
         TAX
         LDA   [$09]
         PHX
         PHA
         LDA   $12
         DEC
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B3AA6
         DEX
L0B3AA6  JSL   L150F53
         STA   $05
         STX   $07
         LDY   #$0002
         LDA   [$05],Y
         BNE   L0B3ADD
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L0718BF
         PEA   $0000
         PHD
         JSL   L0B39E6
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L07191C
         BRA   L0B3B37
L0B3ADD  LDAL  L051C44
         TAX
         LDAL  L051C42
         STA   $09
         STX   $0B
         LDY   #$0002
         LDA   [$09],Y
         TAX
         LDA   [$09]
         PHX
         PHA
         LDY   #$0002
         LDA   [$05],Y
         DEC
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B3B0B
         DEX
L0B3B0B  JSL   L150F53
         STA   $05
         STX   $07
         LDAL  L051C44
         PHA
         LDAL  L051C42
         PHA
         JSL   L0718BF
         PEA   $0000
         PHD
         JSL   L0B39E6
         LDAL  L051C44
         PHA
         LDAL  L051C42
         PHA
         JSL   L07191C
L0B3B37  LDA   $10
         STA   $16
         LDA   $0F
         STA   $15
         LDA   $0D
         TCD
         TSC
         CLC
         ADC   #$0014
         TCS
         RTL

L0B3B49  PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDY   #$0007
         LDA   [$10],Y
         TAX
         DEY
         DEY
         LDA   [$10],Y
         STA   $01
         STX   $03
         LDA   #$0004
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B3B6A
         INX
L0B3B6A  STA   $07
         STX   $09
         PHY
         PHY
         JSL   L0B3773
         PLA
         PLX
         STA   [$07]
         LDA   #$0006
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B3B83
         INX
L0B3B83  STA   $07
         STX   $09
         PHY
         PHY
         JSL   L0314AA
         PLA
         STA   [$07]
         PLA
         LDY   #$0002
         STA   [$07],Y
         LDX   #$0000
         LDY   #$0004
         LDA   [$01],Y
         BNE   L0B3BA1
         INX
L0B3BA1  PHX
         LDY   #$0008
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDA   #$000A
         LDX   #$0000
         JSL   L033477
         BEQ   L0B3BC0
         BVS   L0B3BBE
         EOR   #$8000
L0B3BBE  BMI   L0B3BC5
L0B3BC0  LDA   #$0000
         BRA   L0B3BC8
L0B3BC5  LDA   #$0001
L0B3BC8  AND   $01,S
         PLX
         LSR
         BCC   L0B3BFE
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L07185A
         LDA   #$000A
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B3BE8
         INX
L0B3BE8  STA   $07
         STX   $09
         PHY
         PHY
         JSL   L0E04DE
         PLA
         STA   [$07]
         PLA
         LDY   #$0002
         STA   [$07],Y
         BRL   L0B3CC2
L0B3BFE  LDY   #$000A
         LDA   [$01],Y
         INY
         INY
         ORA   [$01],Y
         BNE   L0B3C38
         LDA   #$000A
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B3C14
         INX
L0B3C14  STA   $07
         STX   $09
         PHY
         PHY
         LDY   #$0008
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDA   L0553D9
         PHA
         JSL   L0B249C
         PLA
         STA   [$07]
         PLA
         LDY   #$0002
         STA   [$07],Y
         BRA   L0B3C77
L0B3C38  PHY
         PHY
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L151301
         LDY   #$0008
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         JSL   L033477
         BEQ   L0B3C77
         PHY
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0008
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L078A05
         PLA
         STA   $05
L0B3C77  LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L0718BF
         LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         STA   $07
         STX   $09
         LDY   #$0002
         LDA   [$07],Y
         TAX
         LDA   [$07]
         PHX
         PHA
         LDY   #$0008
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0004
         LDA   [$01],Y
         PHA
         JSL   L0E0656
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L07191C
L0B3CC2  LDA   $0E
         STA   $12
         LDA   $0D
         STA   $11
         LDA   $0B
         TCD
         TSC
         CLC
         ADC   #$0010
         TCS
         RTL

L0B3CD4  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF4
         TCS
         TCD
         LDA   $14
         LDX   $16
         STA   $01
         STX   $03
         LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         STA   $09
         STX   $0B
         LDY   #$0002
         LDA   [$09],Y
         TAX
         LDA   [$09]
         PHX
         PHA
         LDA   $12
         DEC
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B3D10
         DEX
L0B3D10  JSL   L150F53
         STA   $05
         STX   $07
         LDY   #$0002
         LDA   [$05],Y
         BNE   L0B3D47
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L0718BF
         PEA   $0000
         PHD
         JSL   L0B3B49
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L07191C
         BRA   L0B3DA1
L0B3D47  LDAL  L051C44
         TAX
         LDAL  L051C42
         STA   $09
         STX   $0B
         LDY   #$0002
         LDA   [$09],Y
         TAX
         LDA   [$09]
         PHX
         PHA
         LDY   #$0002
         LDA   [$05],Y
         DEC
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B3D75
         DEX
L0B3D75  JSL   L150F53
         STA   $05
         STX   $07
         LDAL  L051C44
         PHA
         LDAL  L051C42
         PHA
         JSL   L0718BF
         PEA   $0000
         PHD
         JSL   L0B3B49
         LDAL  L051C44
         PHA
         LDAL  L051C42
         PHA
         JSL   L07191C
L0B3DA1  LDA   $10
         STA   $16
         LDA   $0F
         STA   $15
         LDA   $0D
         TCD
         TSC
         CLC
         ADC   #$0014
         TCS
         RTL

L0B3DB3  ENT
         PHD
         TSC
         CLC
         ADC   #$FFD2
         TCS
         TCD
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         PEI   $36
         PEI   $34
         PEA   $0020
         JSL   L0313BE
         LDA   $3A
         LDX   $3C
         STA   $01
         STX   $03
         LDY   #$0006
         LDA   [$01],Y
         INY
         INY
         ORA   [$01],Y
         BNE   L0B3DE9
         PEA   $1B47
         JSL   L07272E
L0B3DE9  LDA   $38
         SEC
         SBC   #$0001
         BVS   L0B3DF4
         EOR   #$8000
L0B3DF4  BPL   L0B3DFB
         LDA   #$0000
         BRA   L0B3DFE
L0B3DFB  LDA   #$0001
L0B3DFE  PHA
         PEI   $38
         LDA   [$01]
         PHA
         PLA
         LDX   #$0001
         SEC
         SBC   $01,S
         BVS   L0B3E10
         EOR   #$8000
L0B3E10  BPL   L0B3E13
         DEX
L0B3E13  PLA
         TXA
         ORA   $01,S
         PLX
         LSR
         BCC   L0B3E22
         PEA   $2476
         JSL   L07272E
L0B3E22  PHY
         PHY
         LDY   #$0008
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L151301
         PLA
         PLX
         STA   $25
         PHY
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         LDY   #$0008
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L03250F
         PLA
         LSR
         BCS   L0B3E5B
         PEA   $1FB0
         JSL   L07272E
L0B3E5B  LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         STA   $2B
         STX   $2D
         LDY   #$0002
         LDA   [$2B],Y
         TAX
         LDA   [$2B]
         PHX
         PHA
         LDA   $38
         DEC
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B3E87
         DEX
L0B3E87  JSL   L150F53
         STA   $27
         STX   $29
         LDA   $25
         STA   [$27]
         PHY
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         PEA   ^L0407BA
         PEA   L0407BA
         JSL   L071C56
         PLA
         LSR
         BCC   L0B3EB2
         LDA   $38
         LDY   #$0004
         STA   [$01],Y
L0B3EB2  LDA   $32
         STA   $3C
         LDA   $31
         STA   $3B
         LDA   $2F
         TCD
         TSC
         CLC
         ADC   #$003A
         TCS
         RTL

L0B3EC4  ENT
         PHD
         PHY
         PHY
         PHY
         PHY
         TSC
         TCD
         LDA   #$0001
         STA   $0E
         LDA   L05540D
         STA   L05540B
         LDA   L0553E3
         STA   $05
         LDA   L0553E5
         STA   $07
         LDA   L0553ED
         BEQ   L0B3F2E
         LDX   #L04157F
         LDY   #^L04157F
         JSR   L0B4154
         BEQ   L0B3EFE
         LDX   #L041582
         LDY   #^L041582
         JSR   L0B4154
         BEQ   L0B3EFE
         BRL   L0B4130
L0B3EFE  PEA   ^L055407
         PEA   L055407
         LDA   L0553E1
         PHA
         LDA   L0553DF
         PHA
         JSL   L0B0361
         LDA   L0553E7
         PHA
         JSL   L0B2A91
         PEA   $0002
         JSL   L0E0838
         STZ   L0553ED
         STZ   L05540B
         LDA   #$0001
         STA   L05540D
         BRL   L0B4130
L0B3F2E  LDX   #L04158B
         LDY   #^L04158B
         JSR   L0B4154
         BNE   L0B3F52
         LDA   L05536F
         CMP   #$0004
         BNE   L0B3F46
         INC   L0553ED
         BEQ   L0B3F4F
L0B3F46  PEA   $0004
         JSL   L0E0838
         STZ   $0E
L0B3F4F  BRL   L0B4130
L0B3F52  LDX   #L04158E
         LDY   #^L04158E
         JSR   L0B4154
         BNE   L0B3FA7
L0B3F5D  LDA   L05536F
         CMP   #$0005
         BNE   L0B3F6B
         JSL   L0E0154
         BRA   L0B3F5D
L0B3F6B  CMP   #$0004
         BEQ   L0B3F75
         INC   L0553ED
         BRA   L0B3FA4
L0B3F75  JSR   L0B4176
         LDA   L050C32
         AND   #$00FF
         BEQ   L0B3F8B
         DEC
         BEQ   L0B3F9B
         LDA   L050C33
         CMP   #$2D2D
         BNE   L0B3F9B
L0B3F8B  PEA   $0006
         JSL   L0B2A68
         LDA   L05540B
         INC
         STA   L05540D
         BRA   L0B3FA4
L0B3F9B  PEA   $0005
         JSL   L0B2A68
         STZ   $0E
L0B3FA4  BRL   L0B4130
L0B3FA7  LDX   #L041593
         LDY   #^L041593
         JSR   L0B4154
         BNE   L0B3FFD
         LDA   L05536F
         CMP   #$0005
         BEQ   L0B3FCE
         CMP   #$0006
         BEQ   L0B3FC4
         INC   L0553ED
         BRA   L0B3FFA
L0B3FC4  LDA   L05540B
         DEC
         STA   L05540B
         STA   L05540D
L0B3FCE  JSR   L0B4176
         LDA   L050C32
         AND   #$00FF
         BEQ   L0B3FE4
         DEC
         BEQ   L0B3FF4
         LDA   L050C33
         CMP   #$2D2D
         BNE   L0B3FF4
L0B3FE4  PEA   $0008
         JSL   L0B2A68
         LDA   L05540B
         INC
         STA   L05540D
         BRA   L0B3FFA
L0B3FF4  JSL   L0E0154
         STZ   $0E
L0B3FFA  BRL   L0B4130
L0B3FFD  LDX   #L041598
         LDY   #^L041598
         JSR   L0B4154
         BNE   L0B4019
         PEA   $0003
         JSL   L0E0838
         LDA   L05540B
         INC
         STA   L05540D
         BRL   L0B4130
L0B4019  LDX   #L04159F
         LDY   #^L04159F
         JSR   L0B4154
         BEQ   L0B4027
         BRL   L0B40B5
L0B4027  JSR   L0B4145
         LDX   #L04158B
         LDY   #^L04158B
         JSR   L0B4154
         BNE   L0B4063
L0B4035  LDA   L05536F
         CMP   #$0005
         BNE   L0B4043
         JSL   L0E0154
         BRA   L0B4035
L0B4043  CMP   #$0006
         BEQ   L0B4052
         CMP   #$0008
         BEQ   L0B4052
         INC   L0553ED
         BRA   L0B4060
L0B4052  LDA   L05540B
         DEC
         STA   L05540B
         STA   L05540D
         JSL   L0E0154
L0B4060  BRL   L0B4130
L0B4063  LDX   #L041598
         LDY   #^L041598
         JSR   L0B4154
         BNE   L0B4087
L0B406E  LDA   L05536F
         CMP   #$0005
         BNE   L0B407C
         JSL   L0E0154
         BRA   L0B406E
L0B407C  CMP   #$0003
         BEQ   L0B4052
         INC   L0553ED
         BRL   L0B4130
L0B4087  LDX   L0553DF
         LDY   L0553E1
         JSR   L0B4154
         BNE   L0B40AF
L0B4092  LDA   L05536F
         CMP   #$0005
         BNE   L0B40A0
         JSL   L0E0154
         BRA   L0B4092
L0B40A0  CMP   #$0002
         BNE   L0B40AF
         LDA   L05540B
         DEC
         STA   L05540B
         STA   L05540D
L0B40AF  INC   L0553ED
         BRL   L0B4130
L0B40B5  LDX   #L0415A3
         LDY   #^L0415A3
         JSR   L0B4154
         BNE   L0B4103
         JSR   L0B4145
         INC   L0553ED
         LDX   L0553DF
         LDY   L0553E1
         JSR   L0B4154
         BEQ   L0B40DC
         LDX   #L041598
         LDY   #^L041598
         JSR   L0B4154
         BNE   L0B40DF
L0B40DC  DEC   L0553ED
L0B40DF  LDA   L0553ED
         BEQ   L0B4100
         LDX   #L0B4138
         LDY   #^L0B4138
         JSR   L0B4154
         BNE   L0B4100
         JSR   L0B4145
         LDX   #L0B413B
         LDY   #^L0B413B
         JSR   L0B4154
         BNE   L0B4100
         STZ   L0553ED
L0B4100  BRL   L0B4130
L0B4103  LDX   #L0415A8
         LDY   #^L0415A8
         JSR   L0B4154
         BNE   L0B4122
         JSR   L0B4145
         INC   L0553ED
         LDX   L0553DF
         LDY   L0553E1
         JSR   L0B4154
         STA   L0553ED
         BRA   L0B4130
L0B4122  LDX   #L0415AD
         LDY   #^L0415AD
         JSR   L0B4154
         BNE   L0B4130
         JSR   L0B4145
L0B4130  TDC
         TCS
         PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B4138  STR   'to'
L0B413B  STR   'hyperCard'

L0B4145  PEA   ^L055407
         PEA   L055407
         PEI   $07
         PEI   $05
         JSL   L0B0361
         RTS

L0B4154  STX   $01
         STY   $03
         LDA   [$05]
         EOR   [$01]
         AND   #$00FF
         BEQ   L0B4166
         LDA   #$0001
         BRA   L0B4175
L0B4166  PHA
         PEI   $07
         PEI   $05
         PHY
         PHX
         JSL   L071C56
         PLA
         EOR   #$0001
L0B4175  RTS

L0B4176  LDA   L055407
         STA   $01
         LDA   L055409
         STA   $03
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0B0361
         RTS

L0B4194  ENT
         PHD
         PHY
         PHY
         TSC
         TCD
         LDX   L05540B
         BEQ   L0B41C2
         LDA   L0553F3
         STA   $01
L0B41A3  LDA   L0553F5
         STA   $03
         LDA   #$2020
         LDY   #$0000
L0B41AE  STA   [$01],Y
         INY
         INY
         DEX
         BNE   L0B41AE
         TYA
         CLC
         ADC   L0553F3
         STA   L0553F3
         BCC   L0B41C2
         INC   L0553F5
L0B41C2  TDC
         TCS
         PLY
         PLY
         PLD
         RTL

L0B41C8  ENT
         PHD
         PHY
         PHY
         TSC
         TCD
         LDA   $0A
         STA   $01
         LDA   $0C
         STA   $03
         LDY   #$0000
         SEP   #$20
L0B41DA  LDA   [$0A]
         INC   $0A
         BNE   L0B41E6
         INC   $0B
         BNE   L0B41E6
         INC   $0C
L0B41E6  CMP   #$20
         BEQ   L0B41DA
L0B41EA  CMP   #$00
         BEQ   L0B4203
         CMP   #$0D
         BEQ   L0B4203
         STA   [$01],Y
         INY
         LDA   [$0A]
         INC   $0A
         BNE   L0B41EA
         INC   $0B
         BNE   L0B41EA
         INC   $0C
         BRA   L0B41EA
L0B4203  TAX
         LDA   #$20
L0B4206  CPY   #$0000
         BEQ   L0B4211
         DEY
         CMP   [$01],Y
         BEQ   L0B4206
         INY
L0B4211  TXA
         STA   [$01],Y
         INY
         CMP   #$00
         BNE   L0B41DA
         REP   #$20
         STY   $0E
         STZ   $10
         LDA   $08
         STA   $0C
         LDA   $07
         STA   $0B
         TDC
         TCS
         PLY
         PLY
         PLD
         PLY
         PLY
         RTL

L0B422F  ENT
         LDA   $04,S
         DEC
         TAX
         LDA   $06,S
         STA   $04,S
         LDA   $01,S
         STA   $05,S
         LDA   $02,S
         STA   $06,S
         TXA
         STA   $02,S
         PHB
         PLA
         RTL

L0B4245  ENT
         PHD
         TSC
         TCD
         LDA   $0A
         STAL  L0B425D+1
         LDA   $0B
         STAL  L0B425D+2
         PHB
         PHD
         PHA
         PLB
         PLB
         PEI   $08
         PEI   $06
L0B425D  JSL   $000000
         REP   #$30
         PLD
         PLB
         LDA   $04
         STA   $0C
         LDA   $03
         STA   $0B
         TDC
         TCS
         PLD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B4275  ENT
         PHD
         TSC
         SEC
         SBC   #$0026
         TCD
         TCS
         STZ   $0B
         LDY   #$001F
         LDA   [$34],Y
         BNE   L0B4289
         BRL   L0B4489
L0B4289  PHA
         LDY   #$001A
         LDA   [$34],Y
         PHA
         DEY
         DEY
         LDA   [$34],Y
         PHA
         JSL   L0E079C
         PLA
         BEQ   L0B42CB
         LDY   #$001A
         LDA   [$34],Y
         PHA
         DEY
         DEY
         LDA   [$34],Y
         PHA
         JSL   L07185A
         PHA
         PHA
         JSL   L0B1792
         LDY   #$0018
         PLA
         STA   [$34],Y
         INY
         INY
         PLA
         STA   [$34],Y
         DEY
         LDA   [$34],Y
         BNE   L0B42E0
         PEA   $002D
         JSL   L0B0B7A
         BRL   L0B4489
L0B42CB  PEA   $0000
         LDY   #$001A
         LDA   [$34],Y
         PHA
         DEY
         DEY
         LDA   [$34],Y
         PHA
         _SetPurge
L0B42E0  PHA
         LDY   #$0020
         LDA   [$34],Y
         STA   $03
         PHA
         DEY
         DEY
         LDA   [$34],Y
         STA   $01
         PHA
         JSL   L0718FA
         PLA
         STA   $1D
         LDY   #$0002
         LDA   [$01]
         STA   $0D
         LDA   [$01],Y
         STA   $0F
         LDY   #$0000
         TYX
L0B4306  LDA   [$0D],Y
         BEQ   L0B4318
         INX
         CMP   L055365
         BEQ   L0B431B
         TYA
L0B4311  CLC
         ADC   #$000E
         TAY
         BRA   L0B4306
L0B4318  BRL   L0B444A
L0B431B  STX   $0B
         STY   $05
         LDY   #$0018
         LDA   [$34],Y
         STA   $01
         INY
         INY
         LDA   [$34],Y
         STA   $03
         LDY   #$0002
         LDA   [$01]
         STA   $23
         LDA   [$01],Y
         STA   $25
         LDY   $05
         INY
         INY
         LDA   [$0D],Y
         CLC
         ADC   $23
         STA   $23
         BCC   L0B4346
         INC   $25
L0B4346  TDC
         CLC
         ADC   #$0023
         PEA   $0000
         PHA
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0B0361
         PHA
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L0509EA
         PEA   L0509EA
         JSL   L071C56
         PLA
         BNE   L0B4373
         LDX   $0B
         LDA   $05
         BRA   L0B4311
L0B4373  LDA   $05
         CLC
         ADC   #$0008
         TAY
         LDA   [$0D],Y
         STA   $07
         INY
         INY
         LDA   [$0D],Y
         STA   $09
         ORA   $07
         BEQ   L0B43B7
         PHA
         PEI   $09
         PEI   $07
         JSL   L0E079C
         PLA
         BNE   L0B43B7
         PEA   $0000
         PEI   $09
         PEI   $07
         _SetPurge
L0B43A2  LDA   $05
         CLC
         ADC   $0D
         STA   [$30]
         BCC   L0B43AD
         INC   $0F
L0B43AD  LDY   #$0002
         LDA   $0F
         STA   [$30],Y
         BRL   L0B444C
L0B43B7  PEI   $09
         PEI   $07
         JSL   L07185A
         PHA
         LDY   #$001A
         LDA   [$34],Y
         STA   $03
         PHA
         DEY
         DEY
         LDA   [$34],Y
         STA   $01
         PHA
         JSL   L0718FA
         PLA
         STA   $11
         LDY   #$0002
         LDA   [$01]
         STA   $13
         LDA   [$01],Y
         TAX
         LDA   #$0004
         CLC
         ADC   $05
         TAY
         LDA   [$0D],Y
         CLC
         ADC   $13
         STA   $13
         BCC   L0B43F1
         INX
L0B43F1  STX   $15
         LDA   #$0006
         CLC
         ADC   $05
         TAY
         LDA   [$0D],Y
         CLC
         ADC   $13
         STA   $17
         BCC   L0B4404
         INX
L0B4404  STX   $19
         SEP   #$20
         LDA   [$17]
         STA   $1B
         LDA   #$00
         STA   [$17]
         REP   #$20
         PHA
         PHA
         PEI   $15
         PEI   $13
         LDA   #$0004
         CLC
         ADC   $05
         TAY
         LDA   [$0D],Y
         PHA
         JSL   L0B44A0
         LDA   #$0008
         CLC
         ADC   $05
         TAY
         PLA
         STA   [$0D],Y
         PLA
         INY
         INY
         STA   [$0D],Y
         SEP   #$20
         LDA   $1B
         STA   [$17]
         REP   #$20
         PEI   $03
         PEI   $01
         PEI   $11
         JSL   L0718DA
         BRL   L0B43A2
L0B444A  STZ   $0B
L0B444C  LDY   #$0020
         LDA   [$34],Y
         PHA
         DEY
         DEY
         LDA   [$34],Y
         PHA
         PEI   $1D
         JSL   L0718DA
         LDA   $0B
         BNE   L0B4489
         LDY   #$001C
         LDA   [$34],Y
         BNE   L0B4489
         PHA
         PEI   $36
         PEI   $34
         JSL   L0B33DE
         PLA
         BNE   L0B4489
         PEA   $0002
         LDY   #$001A
         LDA   [$34],Y
         PHA
         DEY
         DEY
         LDA   [$34],Y
         PHA
         _SetPurge
L0B4489  LDA   $0B
         STA   [$2C]
         LDA   $2A
         STA   $36
         LDA   $29
         STA   $35
         LDX   $27
         TDC
         CLC
         ADC   #$0034
         TCS
         TXA
         TCD
         RTL

L0B44A0  PHD
         TSC
         SEC
         SBC   #$0028
         TCD
         TCS
         STZ   $03
         STZ   $07
         LDA   #$0040
         STA   $05
         PHA
         PHA
         PEA   $0000
         PEA   $0200
         LDA   L0553DD
         PHA
         PEA   $0000
         PEA   $0000
         PEA   $0000
         _NewHandle
         PLA
         STA   $34
         PLX
         STX   $36
         BCC   L0B4501
         PEA   $002D
         JSL   L0B0B7A
         PHA
         PHA
         PEA   $0000
         PEA   $0008
         LDA   L0553DD
         PHA
         PEA   $0000
         PEA   $0000
         PEA   $0000
         _NewHandle
         PLA
         STA   $34
         PLX
         STX   $36
         BRL   L0B463F
L0B4501  LDA   $30
         LDX   $32
         STA   $09
         STX   $0B
L0B4509  LDA   [$09]
         AND   #$00FF
         BNE   L0B4513
         BRL   L0B463F
L0B4513  JSR   L0B46E0
         LDA   $21
         CMP   #$0009
         BNE   L0B4535
         LDA   $23
         CMP   #$000C
         BEQ   L0B4529
         CMP   #$0002
         BNE   L0B4532
L0B4529  LDX   #^L050BF2
         LDA   #L050BF2
         JSR   L0B468B
L0B4532  BRL   L0B4631
L0B4535  CMP   #$0005
         BNE   L0B4532
         LDA   $23
         CMP   #$0007
         BNE   L0B4532
         LDA   $25
         STA   L050BFE
         LDA   $23
         STA   L050BFC
         CLC
         LDX   $32
         ADC   $30
         BCC   L0B4553
         INX
L0B4553  STA   $0D
         STX   $0F
         JSR   L0B46E0
         LDA   #$0016
         CMP   $21
         BEQ   L0B456D
         LDX   #^L050BFA
         LDA   #L050BFA
         JSR   L0B468B
         BRL   L0B4631
L0B456D  LDA   $23
         CMP   #$0006
         BNE   L0B4591
         LDA   L050BFE
         STA   L050C0E
         LDA   $09
         SEC
         SBC   $0D
         STA   L050C10
         JSR   L0B46E0
         LDX   #^L050C0A
         LDA   #L050C0A
         JSR   L0B468B
         BRL   L0B4631
L0B4591  CMP   #$0010
         BNE   L0B45B3
         LDA   L050BFE
         STA   L050C1E
         LDA   $09
         SEC
         SBC   $0D
         STA   L050C20
         JSR   L0B46E0
         LDX   #^L050C1A
         LDA   #L050C1A
         JSR   L0B468B
         BRL   L0B4631
L0B45B3  CMP   #$0009
         BNE   L0B4628
         LDA   L050BFE
         STA   L050C06
         LDA   $09
         SEC
         SBC   $0D
         STA   L050C08
         JSR   L0B46E0
         LDA   #$0016
         CMP   $21
         BNE   L0B45F3
         LDA   #$0006
         CMP   $23
         BNE   L0B45FA
         LDA   L050BFE
         STA   L050C16
         LDA   $09
         SEC
         SBC   $0D
         STA   L050C18
         JSR   L0B46E0
         LDX   #^L050C12
         LDA   #L050C12
         JSR   L0B468B
         BRA   L0B4631
L0B45F3  LDA   #$0016
         CMP   $21
         BNE   L0B461D
L0B45FA  LDA   #$0010
         CMP   $23
         BNE   L0B461D
         LDA   L050BFE
         STA   L050C26
         LDA   $09
         SEC
         SBC   $0D
         STA   L050C28
         JSR   L0B46E0
         LDX   #^L050C22
         LDA   #L050C22
         JSR   L0B468B
         BRA   L0B4631
L0B461D  LDX   #^L050C02
         LDA   #L050C02
         JSR   L0B468B
         BRA   L0B4631
L0B4628  LDX   #^L050BFA
         LDA   #L050BFA
         JSR   L0B468B
L0B4631  TDC
         CLC
         ADC   #$0021
         LDX   #$0000
         JSR   L0B468B
         BRL   L0B4509
L0B463F  LDX   #^L050C2A
         LDA   #L050C2A
         LDY   $07
         BEQ   L0B464E
         JSR   L0B4980
         BRA   L0B4651
L0B464E  JSR   L0B468B
L0B4651  LDX   #$0000
         LDA   $03
         ASL
         BCC   L0B465A
         INX
L0B465A  ASL
         BCC   L0B465E
         INX
L0B465E  ASL
         BCC   L0B4662
         INX
L0B4662  PHX
         PHA
         PEI   $36
         PEI   $34
         _SetHandleSize
         BCC   L0B4678
         PEA   $0EF3
         JSL   L07272E
L0B4678  LDA   $2C
         STA   $32
         LDA   $2B
         STA   $31
         LDX   $29
         TDC
         CLC
         ADC   #$0030
         TCS
         TXA
         TCD
         RTL

L0B468B  STX   $1F
         STA   $1D
         LDA   $07
         BEQ   L0B469A
         LDA   [$1D]
         DEC
         DEC
         BNE   L0B469A
         RTS

L0B469A  STZ   $07
         LDA   [$1D]
         DEC
         DEC
         BNE   L0B46A4
         INC   $07
L0B46A4  LDA   $03
         INC
         STA   $03
         CMP   $05
         BCC   L0B46DD
         LDA   $05
         CLC
         ADC   #$0040
         STA   $05
         PHA
         PEI   $36
         PEI   $34
         LDX   #$0000
         ASL
         BCC   L0B46C1
         INX
L0B46C1  ASL
         BCC   L0B46C5
         INX
L0B46C5  ASL
         BCC   L0B46C9
         INX
L0B46C9  PHX
         PHA
         JSL   L078A05
         PLA
         BNE   L0B46DD
         PEA   $002D
         JSL   L0B0B7A
         PLA
         BRL   L0B4678
L0B46DD  BRL   L0B4984
L0B46E0  TDC
         CLC
         ADC   #$0009
         PEA   $0000
         PHA
         JSL   L071C12
         LDA   $09
         STA   $15
         LDA   $0B
         STA   $17
         STZ   $23
         STZ   $27
         LDA   #$00FF
         AND   [$15]
         TAX
         LDA   #$00FF
         ANDL  L032858,X
         ASL
         TAX
         LDAL  L0B470E,X
         PHA
         RTS

L0B470E  DA    L0B495B-1
         DA    L0B47E5-1
         DA    L0B4911-1
         DA    L0B48AE-1
         DA    L0B479D-1
         DA    L0B479D-1
         DA    L0B471E-1
         DA    L0B4884-1

L0B471E  LDA   $15
         STA   $19
         LDA   $17
         STA   $1B
         LDA   #$0000
         TAY
         TAX
         SEP   #$20
L0B472D  LDA   [$19],Y
         TAX
         LDAL  L032858,X
         CMP   #$06
         BEQ   L0B473E
         CMP   #$04
         BEQ   L0B473E
         BRA   L0B4741
L0B473E  INY
         BRA   L0B472D
L0B4741  LDA   [$19],Y
         STA   $01
         LDA   #$00
         STA   [$19],Y
         REP   #$20
         TYA
         CLC
         ADC   $19
         STA   $19
         BCC   L0B4755
         INC   $1B
L0B4755  PEI   $17
         PEI   $15
         PEA   ^L050C32
         PEA   L050C32
         JSL   L071FF8
         SEP   #$20
         LDA   $01
         STA   [$19]
         REP   #$20
         PHA
         PEA   ^L050C32
         PEA   L050C32
         TDC
         CLC
         ADC   #$0021
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$0023
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$0027
         PEA   $0000
         PHA
         JSL   L0B027B
         PLA
         LDA   $19
         STA   $09
         LDA   $1B
         STA   $0B
         BRL   L0B4969
L0B479D  LDA   #$0007
         STA   $21
         LDA   $15
         STA   $19
         LDA   $17
         STA   $1B
         LDA   #$0000
         TAY
         TAX
         SEP   #$20
L0B47B1  LDA   [$19],Y
         TAX
         LDAL  L032858,X
         CMP   #$04
         BNE   L0B47BF
         INY
         BRA   L0B47B1
L0B47BF  CMP   #$05
         BNE   L0B47CF
L0B47C3  INY
         LDA   [$19],Y
         TAX
         LDAL  L032858,X
         CMP   #$04
         BEQ   L0B47C3
L0B47CF  REP   #$20
         LDX   $1B
         TYA
         CLC
         ADC   $19
         STA   $19
         STA   $09
         BCC   L0B47DE
         INX
L0B47DE  STX   $1B
         STX   $0B
         BRL   L0B4969
L0B47E5  LDA   #$0005
         STA   $21
         LDA   $15
         LDX   $17
         INC
         BNE   L0B47F2
         INX
L0B47F2  STA   $19
         STX   $1B
         LDA   #$00FF
         TAY
         AND   [$19]
         TAX
         TYA
         ANDL  L032950,X
         TAY
         LDA   #$00FF
         AND   [$15]
         TAX
         LDA   #$00FF
         ANDL  L032950,X
         STA   $23
         CMP   #$0010
         BEQ   L0B4826
         CMP   #$000A
         BEQ   L0B4845
         CMP   #$0011
         BEQ   L0B484F
         DEC
         BEQ   L0B4871
         BRA   L0B4879
L0B4826  CPY   #$0007
         BNE   L0B4830
         LDA   #$000F
         BRA   L0B4838
L0B4830  CPY   #$000A
         BNE   L0B4879
         LDA   #$0013
L0B4838  STA   $23
L0B483A  LDA   $19
         INC
         STA   $19
         BNE   L0B4843
         INC   $1B
L0B4843  BRA   L0B4879
L0B4845  CPY   #$0007
         BNE   L0B4879
         LDA   #$0009
         BRA   L0B4838
L0B484F  CPY   #$0011
         BNE   L0B4879
         STZ   $23
         LDA   #$0002
         STA   $21
         TDC
         CLC
         ADC   #$0019
         PEA   $0000
         PHA
         JSL   L071B83
         LDA   #$00FF
         AND   [$19]
         BNE   L0B483A
         BRA   L0B4879
L0B4871  DEY
         BNE   L0B4879
         LDA   #$0002
         BRA   L0B4838
L0B4879  LDA   $19
         STA   $09
         LDA   $1B
         STA   $0B
         BRL   L0B4969
L0B4884  LDA   #$0002
         STA   $21
         STZ   $23
         LDA   $15
         LDX   $17
         STA   $09
         STX   $0B
         INC
         BNE   L0B4897
         INX
L0B4897  STA   $19
         STX   $1B
         LDA   #$00FF
         AND   [$09]
         BEQ   L0B48AB
         LDA   $09
         INC
         BNE   L0B48A9
         INC   $0B
L0B48A9  STA   $09
L0B48AB  BRL   L0B4969
L0B48AE  LDA   #$0007
         STA   $21
         LDA   $15
         LDX   $17
         INC
         BNE   L0B48BD
         INX
         STX   $17
L0B48BD  STA   $15
         STA   $09
         STX   $0B
         LDA   #$0000
         TAY
         TAX
         SEP   #$20
L0B48CA  LDA   [$09],Y
         TAX
         LDAL  L032858,X
         CMP   #$03
         BEQ   L0B48DC
         CMP   #$07
         BEQ   L0B48DC
         INY
         BRA   L0B48CA
L0B48DC  TAX
         REP   #$20
         TYA
         CLC
         ADC   $09
         STA   $09
         BCC   L0B48E9
         INC   $0B
L0B48E9  LDA   $09
         STA   $19
         LDA   $0B
         STA   $1B
         CPX   #$0003
         BNE   L0B4901
         LDA   $09
         INC
         STA   $09
         BNE   L0B4969
         INC   $0B
         BRA   L0B4969
L0B4901  LDA   #$0004
         STA   $21
         LDA   $15
         BNE   L0B490C
         DEC   $17
L0B490C  DEC
         STA   $15
         BRA   L0B4969
L0B4911  LDA   #$0006
         STA   $21
         LDA   #$00FF
         TAY
         AND   [$15]
         TAX
         TYA
         ANDL  L032950,X
         STA   $23
         CMP   #$0004
         BNE   L0B4949
         TDC
         CLC
         ADC   #$0009
         PEA   $0000
         PHA
         JSL   L071B83
         LDA   #$00FF
         AND   [$09]
         BEQ   L0B4946
         LDA   $09
         INC
         STA   $09
         BNE   L0B4946
         INC   $0B
L0B4946  BRL   L0B46E0
L0B4949  LDA   $15
         LDX   $17
         INC
         BNE   L0B4951
         INX
L0B4951  STA   $19
         STX   $1B
         STA   $09
         STX   $0B
         BRA   L0B4969
L0B495B  LDA   #$0004
         STA   $21
         LDA   #$00FF
         AND   [$15]
         STA   $23
         BRA   L0B4949
L0B4969  SEC
         LDA   $15
         SBC   $30
         CLC
         ADC   $2E
         STA   $25
         LDA   $27
         BEQ   L0B4978
         RTS

L0B4978  LDA   $19
         SEC
         SBC   $15
         STA   $27
         RTS

L0B4980  STX   $1F
         STA   $1D
L0B4984  PHA
         PHA
         PEI   $36
         PEI   $34
         PEI   $03
         JSL   L0B062C
         PLA
         STA   $11
         PLA
         STA   $13
         LDY   #$0006
L0B4999  LDA   [$1D],Y
         STA   [$11],Y
         DEY
         DEY
         BPL   L0B4999
         RTS

L0B49A2  ENT
         PHD
         TSC
         SEC
         SBC   #$001A
         TCD
         TCS
         LDA   [$24]
         AND   #$00FF
         BNE   L0B49BB
         LDY   #$0002
         STA   [$20]
         STA   [$20],Y
         BRL   L0B4B18
L0B49BB  STZ   $01
         STZ   $0B
         LDA   #$0014
         STA   $03
         LDA   #$0118
         STA   $17
         STZ   $19
         PHA
         PHA
         LDX   #$0000
         PHX
         PEA   $0118
         LDA   L0553DD
         PHA
         PHX
         PHX
         PHX
         _NewHandle
         PLA
         STA   $0D
         PLA
         STA   $0F
         BCC   L0B49F4
         PEA   $002D
         JSL   L0B0B7A
         BRL   L0B4B18
L0B49F4  LDY   #$0002
         LDA   [$0D]
         STA   $11
         LDA   [$0D],Y
         STA   $13
         LDA   $24
         STA   $05
         LDA   $26
         STA   $07
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         TDC
         ADC   #$0009
         PEA   $0000
         PHA
         JSL   L071AE0
         LDY   #$0000
L0B4A1F  LDA   [$05]
         AND   #$00FF
         BNE   L0B4A29
         BRL   L0B4B06
L0B4A29  LDA   $05
         STA   $15
         SEC
         SBC   $24
         PHA
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0B0361
         LDA   $05
         SEC
         SBC   $24
         PHA
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0B0361
         PHA
         PEA   ^L050C32
         PEA   L050C32
         JSL   L032E6D
         PLA
         LDX   $09
         BEQ   L0B4A71
         EOR   #$FFFF
         INC
L0B4A71  LDY   $0B
         STA   [$11],Y
         INY
         INY
         PLA
         STA   [$11],Y
         INY
         INY
         PLA
         STA   [$11],Y
         INY
         INY
         PHY
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         TDC
         ADC   #$0009
         PEA   $0000
         PHA
         JSL   L071AE0
         LDA   $05
         SEC
         SBC   $15
         PLY
         STA   [$11],Y
         INY
         INY
         LDA   #$0000
         STA   [$11],Y
         INY
         INY
         STA   [$11],Y
         INY
         INY
         STA   [$11],Y
         INY
         INY
         STY   $0B
         LDA   $01
         INC
         STA   $01
         CMP   $03
         BCC   L0B4B03
         CLC
         ADC   #$0014
         STA   $03
         LDA   $17
         CLC
         ADC   #$0118
         STA   $17
         BCC   L0B4ACD
         INC   $19
L0B4ACD  PHA
         PEI   $0F
         PEI   $0D
         PEI   $19
         PEI   $17
         JSL   L078A05
         PLA
         BNE   L0B4AF8
         PEI   $0F
         PEI   $0D
         JSL   L07185A
         PEA   $002D
         JSL   L0B0B7A
         LDA   #$0000
         LDY   #$0002
         STA   [$20]
         STA   [$20],Y
         BRA   L0B4B18
L0B4AF8  LDY   #$0002
         LDA   [$0D]
         STA   $11
         LDA   [$0D],Y
         STA   $13
L0B4B03  BRL   L0B4A1F
L0B4B06  LDY   $0B
         LDA   #$0000
         STA   [$11],Y
         LDY   #$0002
         LDA   $0D
         STA   [$20]
         LDA   $0F
         STA   [$20],Y
L0B4B18  LDA   $1E
         STA   $26
         LDA   $1D
         STA   $25
         LDX   $1B
         TDC
         CLC
         ADC   #$0024
         TCS
         TXA
         TCD
         RTL

L0B4B2B  ENT
         PHD
         PHY
         TSC
         TCD
         STZ   $08
         TSC
         STA   $01
         LDA   L055367
         CLC
         ADC   #$1500
         SEC
         SBC   $01
         BMI   L0B4B42
         INC   $08
L0B4B42  TDC
         TCS
         PLY
         PLD
         RTL

L0B4B47  ENT
         TXA
         CMP   #$0039
         BCC   L0B4B5E
         PHA
         PHA
         PHA
         PEA   $004A
         JSL   L0711EB
         _SysFailMgr
L0B4B5E  DEC
         ASL
         ASL
         TAX
         LDAL  L0B4B76,X
         STAL  L0B4B72+1
         LDAL  L0B4B76+1,X
         STAL  L0B4B72+2
L0B4B72  JMPL  $000000

L0B4B76  ADRL  L0B91E2
         ADRL  L0B8E1B
         ADRL  L071C98
         ADRL  L071CCD
         ADRL  L0B923B
         ADRL  L071EC5
         ADRL  L0734F5
         ADRL  L071FF8
         ADRL  L071D81
         ADRL  L071DE3
         ADRL  L0B940B
         ADRL  L0B9468
         ADRL  L0715D9
         ADRL  L07346C
         ADRL  L07334A
         ADRL  L0B8CA7
         ADRL  L0B8E66
         ADRL  L0B9093
         ADRL  L0B93D7
         ADRL  L0B8F62
         ADRL  L0B8FE3
         ADRL  L0B903E
         ADRL  L0B92A9
         ADRL  L0B9329
         ADRL  L0B9383
         ADRL  L071C56
         ADRL  L073660
         ADRL  L071B83
         ADRL  L071BC3
         ADRL  L072CD4
         ADRL  L0735A8
         ADRL  L070525
         ADRL  L072B9F
         ADRL  L071330
         ADRL  L072D71
         ADRL  L071F67
         ADRL  L072EAE
         ADRL  L070A4D
         ADRL  L070BA8
         ADRL  L070F7D
         ADRL  L0315E2
         ADRL  L0B1144
         ADRL  L0B90CB
         ADRL  L0B8CE7
         ADRL  L0B919C
         ADRL  L0B9142
         ADRL  L0B94AC
         ADRL  L0B955F
         ADRL  L160616
         ADRL  L160624
         ADRL  L16049C
         ADRL  L160632
         ADRL  L160640
         ADRL  L16064E
         ADRL  L16065C
         ADRL  L16066A
         MX    %00
L0B4C56  PHD
         TSC
         CLC
         ADC   #$FFE0
         TCS
         TCD
         LDA   #$0000
         LDY   #$0015
         STA   [$26],Y
         LDA   L0553B5
         LDX   L0553B7
         STA   $19
         STX   $1B
         PHY
         PEA   $0064
         JSL   L0B5681
         PLA
         LSR
         BCS   L0B4C7F
         BRL   L0B4D3A
L0B4C7F  JSL   L031B09
         PHY
         JSL   L0B1C0F
         PLA
         STA   $17
         PHY
         PHY
         PEA   $0000
         JSL   L031415
         PHY
         PHY
         JSL   L0B3727
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B7932
         PEI   $17
         JSL   L0B39C0
         JSL   L0E0000
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0001
         JSL   L0B2AF9
         LDA   #$0015
         CLC
         ADC   $26
         LDX   $28
         BCC   L0B4CCC
         INX
L0B4CCC  PHX
         PHA
         PHY
         LDA   #$0001
         CLC
         ADC   $26
         LDX   $28
         BCC   L0B4CDA
         INX
L0B4CDA  CLC
         ADC   #$0008
         BCC   L0B4CE1
         INX
L0B4CE1  STA   $1D
         STX   $1F
         LDA   [$1D]
         PHA
         JSL   L0B4D5D
         PLA
         BEQ   L0B4D00
         PHA
         LDX   #$0000
         LDAL  L051BDE
         DEC
         DEC
         BNE   L0B4CFC
         INX
L0B4CFC  TXA
         AND   $01,S
         PLX
L0B4D00  PLX
         STX   $1D
         PLX
         STX   $1F
         STA   [$1D]
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B0F05
         PEI   $1B
         PEI   $19
         PEA   $0000
         JSL   L0B2AF9
         LDY   #$0015
         LDA   [$26],Y
         BNE   L0B4D38
         LDA   #$0017
         CLC
         ADC   $26
         LDX   $28
         BCC   L0B4D32
         INX
L0B4D32  PHX
         PHA
         JSL   L0B2965
L0B4D38  BRA   L0B4D4B
L0B4D3A  LDA   #$0017
         CLC
         ADC   $26
         LDX   $28
         BCC   L0B4D45
         INX
L0B4D45  PHX
         PHA
         JSL   L0B2965
L0B4D4B  LDA   $24
         STA   $28
         LDA   $23
         STA   $27
         LDA   $21
         TCD
         TSC
         CLC
         ADC   #$0026
         TCS
         RTL

L0B4D5D  ENT
         PHD
         TSC
         CLC
         ADC   #$FFE2
         TCS
         TCD
         LDA   L0553A5
         BEQ   L0B4D6F
         STZ   $26
         BRL   L0B4F91
L0B4D6F  LDA   #$0001
         STA   $26
         LDA   #$FFFF
         CMP   $24
         BNE   L0B4D7E
         BRL   L0B4F91
L0B4D7E  LDA   #$FFFF
         CMP   $24
         BNE   L0B4D88
         BRL   L0B4F8F
L0B4D88  TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         LDA   L0553C9
         LDX   L0553CB
         STA   $1B
         STX   $1D
         LDY   #$0002
         LDA   [$1B],Y
         TAX
         LDA   [$1B]
         PHX
         PHA
         LDA   $24
         DEC
         PEA   $000C
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B4DB9
         DEX
L0B4DB9  JSL   L150F53
         PHX
         PHA
         PEA   $000C
         JSL   L0313BE
         TDC
         CLC
         ADC   #$0017
         PEA   $0000
         PHA
         JSL   L0B2A02
         STZ   $15
         LDA   $07
         DEC
         BPL   L0B4DDD
         BRL   L0B4F58
L0B4DDD  CMP   #$0005
         BMI   L0B4DE5
         BRL   L0B4F58
L0B4DE5  SEC
         SBC   #$0000
         BEQ   L0B4E03
         DEC
         BEQ   L0B4E61
         DEC
         BNE   L0B4DF4
         BRL   L0B4F1C
L0B4DF4  DEC
         BNE   L0B4DFA
         BRL   L0B4F28
L0B4DFA  DEC
         BNE   L0B4E00
         BRL   L0B4F40
L0B4E00  BRL   L0B4F58
L0B4E03  LDX   #$0000
         LDAL  L051BDE
         CMP   $09
         BNE   L0B4E0F
         INX
L0B4E0F  TXA
         BEQ   L0B4E5E
         LDX   #$0000
         LDAL  L051BE0
         CMP   $0B
         BNE   L0B4E1E
         INX
L0B4E1E  TXA
         BEQ   L0B4E5E
         LDA   #$0001
         STA   $15
         LDA   L05539B
         BEQ   L0B4E47
         PEA   ^L051BE4
         PEA   L051BE4
         PEA   $0000
         PEA   $0002
         PEA   $0016
         JSL   L0E07C5
         PEA   $0000
         JSL   L0B2F9D
         BRA   L0B4E5A
L0B4E47  LDA   #$FF9C
         CMP   $05
         BEQ   L0B4E5A
         PEI   $05
         JSL   L0E0E11
         PEI   $05
         JSL   L0B2F9D
L0B4E5A  JSL   L0B0000
L0B4E5E  BRL   L0B4F5F
L0B4E61  LDA   L0553D1
         LDX   L0553D3
         STA   $1B
         STX   $1D
         LDY   #$0002
         LDA   [$1B],Y
         TAX
         LDA   [$1B]
         CLC
         ADC   #$0100
         BCC   L0B4E7A
         INX
L0B4E7A  PHX
         PHA
         LDA   $09
         JSL   L150488
         TAY
         BNE   L0B4E86
         DEX
L0B4E86  DEC
         PHX
         PHA
         PEA   $0000
         PEA   $0001
         JSL   L151137
         PLA
         PLX
         JSL   L150F53
         STA   $1B
         STX   $1D
         LDA   [$1B]
         STA   $13
         LDA   L05539B
         STA   $0D
         STZ   L05539B
         LDX   #$0000
         LDA   #$FFFF
         CMP   $13
         BNE   L0B4EB4
         INX
L0B4EB4  TXA
         BNE   L0B4EC1
         PHY
         PEI   $13
         JSL   L0B4D5D
         PLA
         BEQ   L0B4F15
L0B4EC1  LDA   $09
         DEC
         ASL
         ASL
         TAX
         LDAL  L032C5A+2,X
         PHA
         LDAL  L032C5A,X
         PLX
         STA   $0F
         STX   $11
         LDX   #$0000
         LDA   $0F
         ORA   $11
         BNE   L0B4EDF
         INX
L0B4EDF  TXA
         BNE   L0B4EEE
         PHY
         PEI   $11
         PEI   $0F
         JSL   L0B422F
         PLA
         BEQ   L0B4F08
L0B4EEE  LDA   #$0001
         STA   $15
         LDA   #$FF9C
         CMP   $05
         BNE   L0B4F00
         JSL   L0E0000
         BRA   L0B4F06
L0B4F00  PEI   $05
         JSL   L0B2F9D
L0B4F06  BRA   L0B4F15
L0B4F08  TDC
         CLC
         ADC   #$0017
         PEA   $0000
         PHA
         JSL   L0B2965
L0B4F15  LDA   $0D
         STA   L05539B
         BRA   L0B4F5F
L0B4F1C  PHY
         PEI   $09
         JSL   L0B4D5D
         PLA
         STA   $15
         BRA   L0B4F5F
L0B4F28  PEA   $0000
         PHD
         JSL   L0B4C56
         LDA   $15
         BNE   L0B4F3E
         PHY
         PEI   $09
         JSL   L0B4D5D
         PLA
         STA   $15
L0B4F3E  BRA   L0B4F5F
L0B4F40  PHY
         PEI   $09
         JSL   L0B4D5D
         PLA
         STA   $15
         LDA   $15
         BNE   L0B4F56
         PEA   $0000
         PHD
         JSL   L0B4C56
L0B4F56  BRA   L0B4F5F
L0B4F58  PEA   $63EA
         JSL   L07272E
L0B4F5F  LDA   $15
         BEQ   L0B4F88
         LDX   #$0000
         LDA   #$FFFF
         CMP   $01
         BNE   L0B4F6E
         INX
L0B4F6E  TXA
         BNE   L0B4F91
         PHY
         PEI   $01
         JSL   L0B4D5D
         PLA
         BNE   L0B4F91

*

         TDC
         CLC
         ADC   #$0017
         PEA   $0000
         PHA
         JSL   L0B2965
L0B4F88  LDA   $03
         STA   $24
         BRL   L0B4D7E
L0B4F8F  STZ   $26
L0B4F91  LDA   $22
         STA   $24
         LDA   $21
         STA   $23
         LDA   $1F
         TCD
         TSC
         CLC
         ADC   #$0022
         TCS
         RTL

L0B4FA3  ENT
         PHD
         TSC
         CLC
         ADC   #$FDFC
         TCS
         ADC   #$0111
         TCD
         PEI   $FA
         PEI   $F8
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         JSL   L0B1388
         PEA   $0040
         PEA   $0000
         TDC
         CLC
         ADC   #$FEEF
         PHA
         PEA   $0070
         JSL   L0B127A
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         JSL   L0B0897
         LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$020A
         TCS
         RTL

L0B4FF1  ENT
         PHD
         TSC
         CLC
         ADC   #$FDE8
         TCS
         ADC   #$0129
         TCD
         STZ   $E7
         STZ   $E9
         LDA   $F8
         BPL   L0B5007
         BRL   L0B50F1
L0B5007  BNE   L0B500C
         BRL   L0B50F1
L0B500C  LDA   $F6
         BNE   L0B5013
         BRL   L0B50F1
L0B5013  PHY
         PHY
         PEA   $0000
         PEA   $0002
         LDA   L0553DD
         PHA
         JSL   L0B249C
         PLA
         STA   $E7
         PLX
         STX   $E9
         LDY   #$0002
         LDA   [$E7],Y
         TAX
         LDA   [$E7]
         STA   $EB
         STX   $ED
         LDA   #$0000
         STA   [$EB]
         PHY
         JSL   L150B6A
         PLA
         STA   $E5
         PEI   $F6
         JSL   L150B70
         LDA   $F4
         BEQ   L0B5053
         LDA   #$0001
         STA   $E3
         BRA   L0B5058
L0B5053  LDA   #$FFFF
         STA   $E3
L0B5058  PHY
         PEI   $E3
         JSL   L1506E1
         PLA
         STA   $E1
         LDA   $F8
         LDX   #$FFD7
         STA   $00,X
         LDX   #$FFD7
         LDA   $00,X
         SEC
         SBC   #$0001
         BVS   L0B5077
         EOR   #$8000
L0B5077  BPL   L0B50E1
         LDA   #$0001
         STA   $DF
L0B507E  PHY
         PHY
         PEI   $FA
         LDA   $DF
         JSL   L150488
         PHX
         PHA
         JSL   L150416
         PLA
         STA   $DB
         PLX
         STX   $DD
         LDAL  L05565D
         BEQ   L0B509C
         BRA   L0B50D4
L0B509C  PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FED7
         PHA
         PEI   $FA
         PEI   $DD
         PEI   $DB
         JSL   L070F7D
         PEA   $0100
         JSL   L0313BE
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         PEI   $E9
         PEI   $E7
         JSL   L03250F
         PLA
         STA   $D9
L0B50D4  LDA   $DF
         LDX   #$FFD7
         CMP   $00,X
         BEQ   L0B50E1
         INC   $DF
         BRA   L0B507E
L0B50E1  PEI   $E5
         JSL   L150B70
         PHY
         PEI   $E1
         JSL   L1506E1
         PLA
         STA   $E1
L0B50F1  LDA   $E7
         LDX   $E9
         STA   $FC
         STX   $FE
         LDA   $F2
         STA   $FA
         LDA   $F1
         STA   $F9
         LDA   $EF
         TCD
         TSC
         CLC
         ADC   #$0222
         TCS
         RTL

L0B510B  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         LDA   $0E
         AND   #$8000
         BEQ   L0B511D
         LDA   #$0001
L0B511D  STA   $01
         LDA   $01
         BEQ   L0B513B
         PHY
         PEA   ^L040405
         PEA   L040405
         JSL   L0946A2
         PLA
         LSR
         BCS   L0B513B
         PEA   $002D
         JSL   L0B0B7A
         BRA   L0B514F
L0B513B  PEI   $0E
         PEI   $0C
         JSL   L0B422F
         LDA   $01
         BEQ   L0B514F
         PEI   $0E
         PEI   $0C
         JSL   L07187A
L0B514F  LDA   $0A
         STA   $0E
         LDA   $09
         STA   $0D
         LDA   $07
         TCD
         TSC
         CLC
         ADC   #$000C
         TCS
         RTL

L0B5161  ENT
         PHD
         TSC
         CLC
         ADC   #$FFEE
         TCS
         TCD
         STZ   $1C
         STZ   $1E
         PEI   $1A
         PEI   $18
         JSL   L0E0EA8
         PHY
         JSL   L0B7725
         PLA
         LSR
         BCC   L0B51C5
         TDC
         CLC
         ADC   #$0005
         PEA   $0000
         PHA
         PEA   $0000
         PEA   $000A
         PEA   $0006
         JSL   L0E0656
         LDA   $05
         BEQ   L0B51BD
         PHY
         PHY
         PEA   $000B
         PEI   $03
         PEI   $01
         TDC
         CLC
         ADC   #$0007
         PEA   $0000
         PHA
         _ConvSeconds
         STAL  L05565D
         PLA
         STA   $1C
         PLX
         STX   $1E
         BRA   L0B51C5
L0B51BD  LDA   $07
         LDX   $09
         STA   $1C
         STX   $1E
L0B51C5  LDA   $16
         STA   $1A
         LDA   $15
         STA   $19
         LDA   $13
         TCD
         TSC
         CLC
         ADC   #$0018
         TCS
         RTL

L0B51D7  PHD
         TSC
         CLC
         ADC   #$FFE2
         TCS
         TCD
         STZ   $28
         JSL   L0B0000
         LDX   #$0000
         LDA   #$0006
         CMPL  L051BDE
         BNE   L0B51F2
         INX
L0B51F2  PHX
         LDX   #$0000
         LDA   #$0007
         CMPL  L051BE0
         BNE   L0B5200
         INX
L0B5200  TXA
         AND   $01,S
         PLX
         STA   $19
         JSL   L0B28E4
         LDA   $19
         BNE   L0B5210
         BRA   L0B527F
L0B5210  TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   ^L051054
         PEA   L051054
         PEA   $0018
         JSL   L0313BE
         LDA   #L051BE6
         LDX   #^L051BE6
         CMP   L0553B9
         BNE   L0B5234
         CPX   L0553BB
L0B5234  BNE   L0B5242
         PEA   ^L051054
         PEA   L051054
         JSL   L0B0D0A
         BRA   L0B525E
L0B5242  PEA   ^L051054
         PEA   L051054
         LDA   L0553B9
         LDX   L0553BB
         CLC
         ADC   #$0020
         BCC   L0B5255
         INX
L0B5255  PHX
         PHA
         PEA   $0018
         JSL   L0313BE
L0B525E  PHY
         PEA   $0001
         JSL   L0E2DD3
         PLA
         STA   $28
         PEA   ^L051054
         PEA   L051054
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0018
         JSL   L0313BE
L0B527F  LDA   $22
         STA   $26
         LDA   $21
         STA   $25
         LDA   $1F
         TCD
         TSC
         CLC
         ADC   #$0024
         TCS
         RTL

L0B5291  PHD
         TSC
         CLC
         ADC   #$FFEE
         TCS
         TCD
         STZ   $1E
         LDA   #$0013
         CMPL  L051BDE
         BEQ   L0B52A7
         BRL   L0B53A6
L0B52A7  LDAL  L051BE0
         STA   $07
         LDAL  L051BE4
         TAX
         LDAL  L051BE2
         STA   $09
         STX   $0B
         LDA   L0553D1
         LDX   L0553D3
         STA   $0F
         STX   $11
         LDY   #$0002
         LDA   [$0F],Y
         TAX
         LDA   [$0F]
         CLC
         ADC   #$0080
         BCC   L0B52D3
         INX
L0B52D3  PHX
         PHA
         LDA   $07
         JSL   L150488
         TAY
         BNE   L0B52DF
         DEX
L0B52DF  DEC
         PHX
         PHA
         PEA   $0000
         PEA   $0001
         JSL   L151137
         PLA
         PLX
         JSL   L150F53
         STA   $0F
         STX   $11
         LDA   [$0F]
         STA   $05
         LDX   #$0000
         LDA   #$FFFF
         CMP   $05
         BNE   L0B5305
         INX
L0B5305  PHX
         LDX   #$0000
         LDA   $1C
         BNE   L0B530E
         INX
L0B530E  TXA
         AND   $01,S
         PLX
         LSR
         BCC   L0B5318
         BRL   L0B53A6
L0B5318  LDA   $07
         DEC
         ASL
         ASL
         TAX
*         LDAL  L032B52+2,X
*         PHA
*         LDAL  L032B52,X
*         PLX
*         STA   $01
*         STX   $03
*         LDA   $03
         ldal  L032B52,x
         sta   $01
         ldal  L032B52+2,x
         sta   $03
         AND   #$4000
         BNE   L0B53A6
         JSL   L0B0000
         LDA   #$FFFF
         CMP   $05
         BEQ   L0B5399
         LDX   #$0000
         LDA   #$0016
         CMPL  L051BDE
         BNE   L0B534B
         INX
L0B534B  PHX
         LDX   #$0000
         LDA   #$0006
         CMPL  L051BE0
         BNE   L0B5359
         INX
L0B5359  TXA
         AND   $01,S
         PLX
         LSR
         BCC   L0B5366
         JSL   L0B0000
         BRA   L0B536C
L0B5366  JSL   L0B28E4
         BRA   L0B53A6
L0B536C  LDA   L055399
         STA   $0D
         LDA   #$0064
         STA   L055399
         PHY
         PEI   $05
         JSL   L0B4D5D
         PLA
         LSR
         BCS   L0B5394
         JSL   L0B28E4
         PEI   $0B
         PEI   $09
         JSL   L0B4FA3
         JSL   L0B28E4
         BRA   L0B53A6
L0B5394  LDA   $0D
         STA   L055399
L0B5399  LDA   #$0001
         STA   $1E
         PEI   $03
         PEI   $01
         JSL   L0B510B
L0B53A6  LDA   $16
         STA   $1C
         LDA   $15
         STA   $1B
         LDA   $13
         TCD
         TSC
         CLC
         ADC   #$001A
         TCS
         RTL

L0B53B8  PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         STZ   $12
         LDA   L0553B3
         STA   $01
         LDA   #$0003
         STA   L0553B3
         LDA   #$000C
         CMPL  L051BDE
         BNE   L0B53E1
         LDAL  L051BE0
         STA   L0553B3
         JSL   L0B0000
L0B53E1  PHY
         PEI   $10
         PEA   $0000
         PEI   $0C
         JSL   L0B5291
         PLA
         LSR
         BCC   L0B53F8
         LDA   #$0001
         STA   $12
         BRA   L0B540A
L0B53F8  PHY
         PEI   $10
         JSL   L0B5B81
         PLA
         LSR
         BCC   L0B540A
         LDA   #$0001
         STA   $12
         BRA   L0B540A
L0B540A  LDA   $01
         STA   L0553B3
         LDA   $0A
         STA   $10
         LDA   $09
         STA   $0F
         LDA   $07
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B5421  PHD
         TSC
         CLC
         ADC   #$FEFC
         TCS
         ADC   #$0011
         TCD
         PEA   $0041
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         JSL   L0B369F
         JSL   L0B0841
         LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$010A
         TCS
         RTL

L0B5452  PHD
         TSC
         CLC
         ADC   #$FFD6
         TCS
         TCD
         LDA   #$0004
         CMPL  L051BDE
         BNE   L0B5466
         BRL   L0B5619
L0B5466  LDA   #$0001
         STA   $34
         LDA   #$0007
         CMPL  L051BDE
         BNE   L0B547B
         JSL   L0E1220
         BRL   L0B561B
L0B547B  LDA   #$0008
         CMPL  L051BDE
         BNE   L0B54A3
         LDAL  L051BE0
         DEC
         ASL
         ASL
         TAX
         LDAL  L032DA0+2,X
         PHA
         LDAL  L032DA0,X
         PLX
         PHX
         PHA
         JSL   L0E0F0F
         JSL   L0B0000
         BRL   L0B561B
L0B54A3  LDX   #$0000
         LDA   #$0009
         CMPL  L051BDE
         BNE   L0B54B0
         INX
L0B54B0  TXA
         BEQ   L0B54D4
         LDX   #$0000
         LDA   #$000A
         CMPL  L051BE0
         BNE   L0B54C0
         INX
L0B54C0  TXA
         BEQ   L0B54D4
         PEA   ^L032E6A
         PEA   L032E6A
         JSL   L0E0F0F
         JSL   L0B0000
         BRL   L0B561B
L0B54D4  LDX   #$0000
         LDA   #$0016
         CMPL  L051BDE
         BNE   L0B54E1
         INX
L0B54E1  PHX
         LDX   #$0000
         LDA   #$000C
         CMPL  L051BE0
         BNE   L0B54EF
         INX
L0B54EF  TXA
         AND   $01,S
         PLX
         LSR
         BCC   L0B552F
         TDC
         CLC
         ADC   #$0023
         PEA   $0000
         PHA
         JSL   L0B2A02
         JSL   L0B0000
         PHY
         PEA   $0001
         PEA   $0000
         PHD
         JSL   L0B53B8
         PLA
         LSR
         BCC   L0B551A
         BRL   L0B561B
L0B551A  LDA   L0553A5
         BEQ   L0B5522
         BRL   L0B5619
L0B5522  TDC
         CLC
         ADC   #$0023
         PEA   $0000
         PHA
         JSL   L0B2965
L0B552F  LDA   #$00E7
         CLC
         ADC   $30
         LDX   $32
         BCC   L0B553A
         INX
L0B553A  PHX
         PHA
         PHY
         LDA   L0553D1
         LDX   L0553D3
         STA   $27
         STX   $29
         LDY   #$0002
         LDA   [$27],Y
         TAX
         LDA   [$27]
         CLC
         ADC   #$01C2
         BCC   L0B5556
         INX
L0B5556  STA   $27
         STX   $29
         LDA   [$27]
         PHA
         JSL   L0B4D5D
         PLA
         BEQ   L0B5570
         PHA
         PHY
         JSL   L0D28FB
         PLA
         STA   $27
         PLA
         AND   $27
L0B5570  PLX
         STX   $27
         PLX
         STX   $29
         STA   [$27]
         LDY   #$00E7
         LDA   [$30],Y
         BEQ   L0B559E
         PEA   ^L050F94
         PEA   L050F94
         PEA   $0000
         PEA   $0054
         PEA   $0007
         JSL   L0E0656
         PEA   ^L050F94
         PEA   L050F94
         JSL   L0E0BFC
         BRA   L0B561B
L0B559E  PHY
         PEA   $0000
         PEA   $0000
         PHD
         JSL   L0B53B8
         PLA
         LSR
         BCS   L0B561B
         TDC
         CLC
         ADC   #$0023
         PEA   $0000
         PHA
         JSL   L0B2A02
         PHY
         JSL   L0D1732
         PLA
         LSR
         BCC   L0B55FF
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0000
         PEA   $0022
         PEA   $0004
         JSL   L0E0656
         PHY
         PEA   $0064
         JSL   L0B7A56
         PLA
         LSR
         BCS   L0B55F0
         PEA   $0000
         PHD
         JSL   L0B5421
         BRA   L0B5619
L0B55F0  TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B12AA
         BRA   L0B561B
L0B55FF  TDC
         CLC
         ADC   #$0023
         PEA   $0000
         PHA
         JSL   L0B2965
         PHY
         PEA   $0000
         PHD
         JSL   L0B51D7
         PLA
         LSR
         BCS   L0B561B
L0B5619  STZ   $34
L0B561B  LDA   $2E
         STA   $32
         LDA   $2D
         STA   $31
         LDA   $2B
         TCD
         TSC
         CLC
         ADC   #$0030
         TCS
         RTL

L0B562D  PHD
         TSC
         CLC
         ADC   #$FEFC
         TCS
         ADC   #$0011
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         JSL   L0B369F
         PLA
         PLX
         STA   $EF
         STX   $F1
         LDA   #$00FF
         AND   [$EF]
         BEQ   L0B5668
         PEA   $0032
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         JSL   L0B369F
         JSL   L0B0841
         BRA   L0B566F
L0B5668  PEA   $0033
         JSL   L0B0B7A
L0B566F  LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$010A
         TCS
         RTL

L0B5681  ENT
         PHD
         TSC
         CLC
         ADC   #$FEF2
         TCS
         ADC   #$0019
         TCD
         STZ   $FC
         LDAL  L051BDE
         DEC
         DEC
         BPL   L0B5699
         BRL   L0B576F
L0B5699  CMP   #$0005
         BMI   L0B56A1
         BRL   L0B576F
L0B56A1  SEC
         SBC   #$0000
         BNE   L0B56AA
         BRL   L0B5769
L0B56AA  DEC
         DEC
         DEC
         BEQ   L0B56B5
         DEC
         BEQ   L0B5709
         BRL   L0B576F
L0B56B5  LDA   #$0011
         CMPL  L051BE0
         BEQ   L0B56C1
         BRL   L0B5943
L0B56C1  JSL   L0B0000
         PHY
         PEA   $0064
         JSL   L0B5681
         PLA
         LSR
         BCC   L0B56F9
         PHY
         JSL   L03198D
         PLA
         LSR
         BCC   L0B56E0
         JSL   L0B2658
         BRA   L0B56F7
L0B56E0  PEA   ^L050C32
         PEA   L050C32
         JSL   L0E06AC
         PEA   $0034
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0B0841
L0B56F7  BRA   L0B5706
L0B56F9  PEA   $0035
         PEA   ^L040410
         PEA   L040410
         JSL   L0B0841
L0B5706  BRL   L0B57F0
L0B5709  LDA   #$0007
         CMPL  L051BE0
         BEQ   L0B5715
         BRL   L0B5943
L0B5715  JSL   L0B0000
         PHY
         PEA   $0000
         JSL   L0B5681
         PLA
         LSR
         BCC   L0B5759
         LDX   #$0000
         LDA   #$0006
         CMPL  L051BDE
         BNE   L0B5732
         INX
L0B5732  TXA
         BEQ   L0B574B
         LDX   #$0000
         LDA   #$000A
         CMPL  L051BE0
         BNE   L0B5742
         INX
L0B5742  TXA
         BEQ   L0B574B
         JSL   L0B0000
         BRA   L0B5757
L0B574B  JSL   L0E0000
         PEA   $0000
         PHD
         JSL   L0B562D
L0B5757  BRA   L0B5766
L0B5759  PEA   $0035
         PEA   ^L040412
         PEA   L040412
         JSL   L0B0841
L0B5766  BRL   L0B57F0
L0B5769  BRL   L0B5943
         BRL   L0B57F0
L0B576F  LDX   #$0000
         LDA   #$0016
         CMPL  L051BDE
         BNE   L0B577C
         INX
L0B577C  TXA
         BEQ   L0B57E0
         LDX   #$0000
         LDA   #$0009
         CMPL  L051BE0
         BNE   L0B578C
         INX
L0B578C  TXA
         BEQ   L0B57E0
         JSL   L0B0000
         PHY
         PEA   $0064
         JSL   L0B5681
         PLA
         LSR
         BCC   L0B57C7
         PHY
         JSL   L031A72
         PLA
         LSR
         BCC   L0B57AE
         JSL   L0B26CD
         BRA   L0B57C5
L0B57AE  PEA   ^L050C32
         PEA   L050C32
         JSL   L0E06AC
         PEA   $0037
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0B0841
L0B57C5  BRA   L0B57DE
L0B57C7  PEA   $0035
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE7
         PHA
         PEA   $0071
         JSL   L0B127A
         JSL   L0B0841
L0B57DE  BRA   L0B57F0
L0B57E0  PHY
         PEA   $0000
         PHD
         JSL   L0B5452
         PLA
         LSR
         BCS   L0B57F0
         BRL   L0B5943
L0B57F0  LDA   L0553A5
         BEQ   L0B57F8
         BRL   L0B5943
L0B57F8  LDA   #$0005
         CMPL  L051BDE
         BEQ   L0B5804
         BRL   L0B593E
L0B5804  LDAL  L051BE0
         STA   $EF
         LDA   $EF
         DEC
         ASL
         TAX
         LDAL  L03282C,X
         SEC
         SBC   $FA
         BNE   L0B581B
         BRL   L0B593E
L0B581B  BVS   L0B5820
         EOR   #$8000
L0B5820  BMI   L0B5825
         BRL   L0B593E
L0B5825  JSL   L0B0000
         LDA   $EF
         DEC
         ASL
         TAX
         LDAL  L03282C,X
         STA   $E9
         LDA   #$0008
         CMP   $EF
         BNE   L0B5840
         LDA   $E9
         DEC
         STA   $E9
L0B5840  LDA   $EF
         DEC
         ASL
         ASL
         TAX
         LDAL  L0327D4+2,X
         PHA
         LDAL  L0327D4,X
         PLX
         STA   $EB
         STX   $ED
         LDA   $EB
         ORA   $ED
         BEQ   L0B585D
         LDA   #$0001
L0B585D  BEQ   L0B5870
         PHA
         PHY
         PEI   $ED
         PEI   $EB
         JSL   L0B422F
         PLA
         EOR   #$0001
         AND   $01,S
         PLX
L0B5870  STA   $E7
         LDA   $E7
         BEQ   L0B58A2
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0E06AC
         PEA   $0039
         PEA   ^L050C32
         PEA   L050C32
         LDA   $EF
         DEC
         ASL
         ASL
         TAX
         LDAL  L0326C6+2,X
         PHA
         LDAL  L0326C6,X
         PLX
         PHX
         PHA
         JSL   L0B0897
         BRL   L0B5943
L0B58A2  PHY
         PEI   $E9
         JSL   L0B5681
         PLA
         LSR
         BCS   L0B58CC
         PEA   $0035
         LDA   $EF
         DEC
         ASL
         ASL
         TAX
         LDAL  L0326C6+2,X
         PHA
         LDAL  L0326C6,X
         PLX
         PHX
         PHA
         JSL   L0B0841
         JSL   L0E0000
         BRA   L0B5943
L0B58CC  LDA   $EB
         ORA   $ED
         BEQ   L0B58D5
         LDA   #$0001
L0B58D5  BEQ   L0B58E8
         PHA
         PHY
         PEI   $ED
         PEI   $EB
         JSL   L0B422F
         PLA
         EOR   #$0001
         AND   $01,S
         PLX
L0B58E8  STA   $E7
         LDA   $E7
         BEQ   L0B591D
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0E06AC
         PEA   $0039
         PEA   ^L050C32
         PEA   L050C32
         LDA   $EF
         DEC
         ASL
         ASL
         TAX
         LDAL  L0326C6+2,X
         PHA
         LDAL  L0326C6,X
         PLX
         PHX
         PHA
         JSL   L0B0897
         JSL   L0E0000
         BRA   L0B5943
L0B591D  LDA   $EF
         STA   L0553AB
         LDA   $EF
         DEC
         ASL
         ASL
         TAX
         LDAL  L03277C+2,X
         PHA
         LDAL  L03277C,X
         PHA
         JSL   L0B422F
         LDA   L0553A5
         BNE   L0B5943
         BRL   L0B57F8
L0B593E  LDA   #$0001
         STA   $FC
L0B5943  LDA   $F8
         STA   $FA
         LDA   $F7
         STA   $F9
         LDA   $F5
         TCD
         TSC
         CLC
         ADC   #$0112
         TCS
         RTL

L0B5955  ENT
         PHD
         TSC
         CLC
         ADC   #$FFE0
         TCS
         TCD
         LDA   L0553B5
         LDX   L0553B7
         STA   $19
         STX   $1B
         PHY
         JSL   L0B1C0F
         PLA
         STA   $17
         PHY
         PHY
         PEA   $0000
         JSL   L031415
         PHY
         PHY
         JSL   L0B3727
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B7932
         PEI   $17
         JSL   L0B39C0
         JSL   L0E0000
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0001
         JSL   L0B2AF9
         PHY
         PEA   $0000
         JSL   L0B7A9C
         PLA
         STA   $26
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B0F05
         PEI   $1B
         PEI   $19
         PEA   $0000
         JSL   L0B2AF9
         TSC
         CLC
         ADC   #$0020
         TCS
         PLD
         RTL

L0B59D0  PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   $14
         LDX   $16
         STA   $01
         STX   $03
         LDA   $10
         LDX   $12
         STA   [$01]
         TXA
         LDY   #$0002
         STA   [$01],Y
         LDY   #$0010
         LDA   [$01],Y
         BEQ   L0B59FF
         PHY
         PEI   $12
         PEI   $10
         JSL   L0718FA
         PLA
         STA   $05
L0B59FF  LDA   #$0004
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B5A0A
         INX
L0B5A0A  STA   $07
         STX   $09
         PHY
         PHY
         LDY   #$0002
         LDA   [$10],Y
         PHA
         LDA   [$10]
         PHA
         PEA   $0000
         JSL   L0B44A0
         PLA
         STA   [$07]
         PLA
         LDY   #$0002
         STA   [$07],Y
         LDY   #$0010
         LDA   [$01],Y
         BEQ   L0B5A3A
         PEI   $12
         PEI   $10
         PEI   $05
         JSL   L0718DA
L0B5A3A  LDA   #$0001
         LDY   #$0008
         STA   [$01],Y
         LDA   #$0000
         LDY   #$000A
         STA   [$01],Y
         LDA   #$0000
         LDY   #$000C
         STA   [$01],Y
         LDA   #$0000
         LDY   #$000E
         STA   [$01],Y
         LDA   $0E
         STA   $16
         LDA   $0D
         STA   $15
         LDA   $0B
         TCD
         TSC
         CLC
         ADC   #$0014
         TCS
         RTL

L0B5A6C  PHD
         TSC
         CLC
         ADC   #$FFD4
         TCS
         TCD
         LDY   #$0023
         LDA   [$32],Y
         SEC
         SBC   #$0004
         BPL   L0B5A82
         BRL   L0B5B68
L0B5A82  CMP   #$003F
         BMI   L0B5A8A
         BRL   L0B5B68
L0B5A8A  SEC
         SBC   #$0000
         BEQ   L0B5AEB
         SEC
         SBC   #$000B
         BNE   L0B5A99
         BRL   L0B5B57
L0B5A99  DEC
         DEC
         BEQ   L0B5B09
         DEC
         BEQ   L0B5B09
         SEC
         SBC   #$000F
         BEQ   L0B5AC4
         SEC
         SBC   #$001A
         BEQ   L0B5B09
         DEC
         BEQ   L0B5B09
         DEC
         BEQ   L0B5B09
         DEC
         BEQ   L0B5B09
         DEC
         BEQ   L0B5B09
         DEC
         BEQ   L0B5B09
         DEC
         BEQ   L0B5B09
         DEC
         BEQ   L0B5B09
         BRL   L0B5B68
L0B5AC4  LDY   #$0021
         LDA   [$32],Y
         TAX
         DEY
         DEY
         LDA   [$32],Y
         CLC
         ADC   #$00CE
         BCC   L0B5AD5
         INX
L0B5AD5  STA   $29
         STX   $2B
         LDA   #$0020
         AND   [$29]
         BEQ   L0B5AE3
         LDA   #$0001
L0B5AE3  PHA
         JSL   L0E0E4B
         BRL   L0B5B6F
L0B5AEB  PEA   $0000
         TDC
         CLC
         ADC   #$0001
         PHA
         LDY   #$0021
         LDA   [$32],Y
         PHA
         DEY
         DEY
         LDA   [$32],Y
         PHA
         JSL   L160678
         JSL   L0E0F0F
         BRA   L0B5B6F
L0B5B09  LDY   #$0021
         LDA   [$32],Y
         PHA
         DEY
         DEY
         LDA   [$32],Y
         PHA
         TDC
         CLC
         ADC   #$0021
         PEA   $0000
         PHA
         JSL   L0B1831
         PHY
         PEI   $23
         PLA
         CMP   #$8000
         ROR
         STA   $01,S
         PLA
         STA   $23
         PHY
         PEI   $27
         PLA
         CMP   #$8000
         ROR
         STA   $01,S
         PLA
         STA   $27
         LDA   $21
         STA   $21
         TDC
         CLC
         ADC   #$0021
         PEA   $0000
         PHA
         LDY   #$0023
         LDA   [$32],Y
         PHA
         PEA   $0001
         JSL   L0E0F65
         BRA   L0B5B6F
L0B5B57  LDY   #$0021
         LDA   [$32],Y
         PHA
         DEY
         DEY
         LDA   [$32],Y
         PHA
         JSL   L0E0E79
         BRA   L0B5B6F
L0B5B68  PEA   $003E
         JSL   L0B0B7A
L0B5B6F  LDA   $30
         STA   $34
         LDA   $2F
         STA   $33
         LDA   $2D
         TCD
         TSC
         CLC
         ADC   #$0032
         TCS
         RTL

L0B5B81  ENT
         PHD
         TSC
         CLC
         ADC   #$FFD8
         TCS
         TCD
         STZ   $30
         TDC
         CLC
         ADC   #$0019
         PEA   $0000
         PHA
         JSL   L0B2A02
         LDA   #$0014
         CMPL  L051BDE
         BEQ   L0B5BA4
         BRL   L0B5CA9
L0B5BA4  LDA   L055349
         STA   $1D
         LDAL  L051BE0
         STA   L055349
         PHY
         LDA   L0553D1
         LDX   L0553D3
         STA   $25
         STX   $27
         LDY   #$0002
         LDA   [$25],Y
         TAX
         LDA   [$25]
         CLC
         ADC   #$01C0
         BCC   L0B5BCA
         INX
L0B5BCA  STA   $25
         STX   $27
         LDA   [$25]
         PHA
         JSL   L0B4D5D
         PLA
         LSR
         BCS   L0B5BE1
         LDA   $1D
         STA   L055349
         BRL   L0B5CA9
L0B5BE1  LDA   $1D
         STA   L055349
         STZ   $1F
         STZ   $21
         PHY
         JSL   L0314F6
         PLA
         DEC
         DEC
         BMI   L0B5C39
         CMP   #$0002
         BPL   L0B5C39
         SEC
         SBC   #$0000
         BEQ   L0B5C04
         DEC
         BEQ   L0B5C21
         BRA   L0B5C39
L0B5C04  PHY
         PHY
         JSL   L0E061D
         PLA
         STA   $1F
         PLX
         STX   $21
         LDA   $1F
         ORA   $21
         BNE   L0B5C1F
         PEA   $0084
         JSL   L0B0B7A
         BRA   L0B5C90
L0B5C1F  BRA   L0B5C5B
L0B5C21  TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0000
         PEA   $0018
         PEA   $000F
         JSL   L0E0656
         BRA   L0B5C5B
L0B5C39  LDA   L055039
         LDX   L05503B
         STA   $03
         STX   $05
         LDA   #$0005
         STA   $01
         LDA   $2E
         BNE   L0B5C5B
         TDC
         CLC
         ADC   #$0019
         PEA   $0000
         PHA
         JSL   L0B2965
         BRA   L0B5CA9
L0B5C5B  TDC
         CLC
         ADC   #$0023
         PEA   $0000
         PHA
         PEA   $0000
         PEA   $0002
         PEA   $0015
         JSL   L0E0656
         LDA   $1F
         ORA   $21
         BEQ   L0B5C81
         PEA   $0000
         PHD
         JSL   L0B5A6C
         BRA   L0B5C90
L0B5C81  TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEI   $23
         JSL   L0B6DE3
L0B5C90  LDA   L0553A5
         BEQ   L0B5CA4
         TDC
         CLC
         ADC   #$0019
         PEA   $0000
         PHA
         JSL   L0B2965
         BRA   L0B5CA9
L0B5CA4  LDA   #$0001
         STA   $30
L0B5CA9  LDA   $2C
         STA   $2E
         LDA   $2B
         STA   $2D
         LDA   $29
         TCD
         TSC
         CLC
         ADC   #$002C
         TCS
         RTL

L0B5CBB  PHD
         TSC
         CLC
         ADC   #$FFD4
         TCS
         TCD
         LDA   $32
         SEC
         SBC   #$0002
         BPL   L0B5CCE
         BRL   L0B5EE7
L0B5CCE  CMP   #$0049
         BMI   L0B5CD6
         BRL   L0B5EE7
L0B5CD6  ASL
         TAX
         LDAL  L0B5CDE,X
         PHA
         RTS

L0B5CDE  DA    L0B5E0E-1
         DA    L0B5EE7-1
         DA    L0B5D70-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EAE-1
         DA    L0B5EC3-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5D97-1
         DA    L0B5DB8-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5E3F-1
         DA    L0B5DC3-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5D7D-1
         DA    L0B5DCE-1
         DA    L0B5DE2-1
         DA    L0B5EE7-1
         DA    L0B5DAD-1
         DA    L0B5D8A-1
         DA    L0B5DED-1
         DA    L0B5E03-1
         DA    L0B5DF8-1
         DA    L0B5EE7-1
         DA    L0B5DA2-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5E48-1
         DA    L0B5E57-1
         DA    L0B5E62-1
         DA    L0B5E97-1
         DA    L0B5EE7-1
         DA    L0B5EE7-1
         DA    L0B5E3F-1
         DA    L0B5ED1-1

L0B5D70  PEA   ^L040414
         PEA   L040414
         JSL   L0E0F0F
         BRL   L0B5EEE
L0B5D7D  PEA   ^L04041E
         PEA   L04041E
         JSL   L0E0F0F
         BRL   L0B5EEE
L0B5D8A  PEA   ^L050F74
         PEA   L050F74
         JSL   L0E0F0F
         BRL   L0B5EEE
L0B5D97  LDA   L0551FB
         PHA
         JSL   L0E0E11
         BRL   L0B5EEE
L0B5DA2  LDA   L055243
         PHA
         JSL   L0E0E4B
         BRL   L0B5EEE
L0B5DAD  LDA   L055215
         PHA
         JSL   L0E0E11
         BRL   L0B5EEE
L0B5DB8  LDA   L055219
         PHA
         JSL   L0E0E4B
         BRL   L0B5EEE
L0B5DC3  LDA   L055153
         PHA
         JSL   L0E0E4B
         BRL   L0B5EEE
L0B5DCE  LDA   L054FBB
         PHA
         LDX   #$0000
         PLA
         BPL   L0B5DD9
         INX
L0B5DD9  TXA
         PHA
         JSL   L0E0E4B
         BRL   L0B5EEE
L0B5DE2  LDA   L0551DD
         PHA
         JSL   L0E0E4B
         BRL   L0B5EEE
L0B5DED  LDA   L05521B
         PHA
         JSL   L0E0E4B
         BRL   L0B5EEE
L0B5DF8  LDA   L055217
         PHA
         JSL   L0E0E4B
         BRL   L0B5EEE
L0B5E03  LDA   L05524D
         PHA
         JSL   L0E0E4B
         BRL   L0B5EEE
L0B5E0E  LDA   L0553B3
         DEC
         BNE   L0B5E32
         PEA   $0000
         TDC
         CLC
         ADC   #$0001
         PHA
         LDA   L05501B
         LDX   L05501D
         PHX
         PHA
         PEA   $0008
         JSL   L07334A
         JSL   L0E0F0F
         BRA   L0B5E3C
L0B5E32  PEA   ^L052526
         PEA   L052526
         JSL   L0E0F0F
L0B5E3C  BRL   L0B5EEE
L0B5E3F  PEI   $32
         JSL   L0B6260
         BRL   L0B5EEE
L0B5E48  LDA   L054FA3
         LDX   L054FA5
         PHX
         PHA
         JSL   L0E0CB5
         BRL   L0B5EEE
L0B5E57  LDA   L054FA7
         PHA
         JSL   L0E0E4B
         BRL   L0B5EEE
L0B5E62  LDAL  L040426
         SEP   #$20
         STA   $15
         REP   #$20
         PHY
         TDC
         CLC
         ADC   #$0015
         PEA   $0000
         PHA
         JSL   L160686
         PLA
         LSR
         BCS   L0B5E88
         LDAL  L040427
         SEP   #$20
         STA   $15
         REP   #$20
L0B5E88  TDC
         CLC
         ADC   #$0015
         PEA   $0000
         PHA
         JSL   L0E0F0F
         BRA   L0B5EEE
L0B5E97
*         PHY
*         PEA   $00E0
*         PEA   $C034
*         JSL   L071A89
*         PLA
         ldal  $e0C034	; AV 202208
         AND   #$000F
         INC
         PHA
         JSL   L0E0E11
         BRA   L0B5EEE
L0B5EAE  PEA   ^L041CB3
         PEA   L041CB3
         PEA   $0000
         PEA   $0020
         PEA   $0018
         JSL   L0E07C5
         BRA   L0B5EEE
L0B5EC3  LDA   L055279
         LDX   L05527B
         PHX
         PHA
         JSL   L0E0E79
         BRA   L0B5EEE
L0B5ED1  LDA   L055277
         XBA
         INC
         STA   $15
         TDC
         CLC
         ADC   #$0015
         PEA   $0000
         PHA
         JSL   L0E0F0F
         BRA   L0B5EEE
L0B5EE7  PEA   $003E
         JSL   L0B0B7A
L0B5EEE  LDA   $30
         STA   $32
         LDA   $2F
         STA   $31
         LDA   $2D
         TCD
         TSC
         CLC
         ADC   #$0030
         TCS
         RTL

L0B5F00  PHD
         TSC
         CLC
         ADC   #$FDA4
         TCS
         ADC   #$016B
         TCD
         LDX   #$0000
         LDA   [$F8]
         DEC
         DEC
         BNE   L0B5F15
         INX
L0B5F15  TXA
         STA   $E3
         LDA   $E3
         BEQ   L0B5F4C
         LDY   #$000C
         LDA   [$F8],Y
         TAX
         DEY
         DEY
         LDA   [$F8],Y
         STA   $DB
         STX   $DD
         TDC
         CLC
         ADC   #$0095
         PEA   $0000
         PHA
         PEA   ^L040428
         PEA   L040428
         PEA   $0005
         JSL   L0313BE
         LDA   #$4143
         LDX   #$4452
         STA   $DF
         STX   $E1
         BRA   L0B5F7A
L0B5F4C  LDY   #$0008
         LDA   [$F8],Y
         TAX
         DEY
         DEY
         LDA   [$F8],Y
         STA   $DB
         STX   $DD
         TDC
         CLC
         ADC   #$0095
         PEA   $0000
         PHA
         PEA   ^L04042D
         PEA   L04042D
         PEA   $0006
         JSL   L0313BE
         LDA   #$4B42
         LDX   #$4447
         STA   $DF
         STX   $E1
L0B5F7A  LDA   $F6
         DEC
         DEC
         DEC
         BPL   L0B5F84
         BRL   L0B6247
L0B5F84  CMP   #$0037
         BMI   L0B5F8C
         BRL   L0B6247
L0B5F8C  SEC
         SBC   #$0000
         BEQ   L0B5FCB
         DEC
         BEQ   L0B5FDC
         DEC
         BNE   L0B5F9B
         BRL   L0B615C
L0B5F9B  DEC
         BNE   L0B5FA1
         BRL   L0B615C
L0B5FA1  DEC
         BNE   L0B5FA7
         BRL   L0B6206
L0B5FA7  DEC
         BNE   L0B5FAD
         BRL   L0B6206
L0B5FAD  SEC
         SBC   #$0007
         BNE   L0B5FB6
         BRL   L0B6084
L0B5FB6  SEC
         SBC   #$000C
         BNE   L0B5FBF
         BRL   L0B615C
L0B5FBF  SEC
         SBC   #$001E
         BNE   L0B5FC8
         BRL   L0B615C
L0B5FC8  BRL   L0B6247
L0B5FCB  PHY
         PHY
         PEI   $DD
         PEI   $DB
         JSL   L07AACB
         JSL   L0B79B1
         BRL   L0B624E
L0B5FDC  PEA   ^L050C32
         PEA   L050C32
         PEA   $0000
         TDC
         CLC
         ADC   #$FE95
         PHA
         PEI   $DD
         PEI   $DB
         JSL   L07AA4B
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         ANDL  L050C32
         BNE   L0B6042
         PEA   ^L050C32
         PEA   L050C32
         TDC
         CLC
         ADC   #$0095
         PEA   $0000
         PHA
         PEA   ^L040433
         PEA   L040433
         PEA   $0000
         TDC
         CLC
         ADC   #$FF81
         PHA
         PEI   $DD
         PEI   $DB
         JSL   L0715D9
         TDC
         CLC
         ADC   #$005D
         PEA   $0000
         PHA
         PEA   $0003
         JSL   L1509CE
         PEA   $0037
         JSL   L0313BE
         BRA   L0B607F
L0B6042  LDA   L0553B3
         BEQ   L0B607F
         PEA   ^L050C32
         PEA   L050C32
         TDC
         CLC
         ADC   #$0095
         PEA   $0000
         PHA
         PEA   ^L040438
         PEA   L040438
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L04043B
         PEA   L04043B
         PEA   $0000
         TDC
         CLC
         ADC   #$FF95
         PHA
         PEA   $0004
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B607F  BRA   L0B60E0
         BRL   L0B624E
L0B6084  LDA   $E3
         BNE   L0B608B
         BRL   L0B6151
L0B608B  PEA   ^L050C32
         PEA   L050C32
         PEA   $0000
         TDC
         CLC
         ADC   #$FF81
         PHA
         PEI   $DD
         PEI   $DB
         JSL   L0715D9
         PEA   $0014
         JSL   L0313BE
         LDA   L0553B3
         BEQ   L0B60E0
         PEA   ^L050C32
         PEA   L050C32
         TDC
         CLC
         ADC   #$0095
         PEA   $0000
         PHA
         PEA   ^L04043D
         PEA   L04043D
         PEA   ^L050C32
         PEA   L050C32
         PEA   $0000
         TDC
         CLC
         ADC   #$FF95
         PHA
         PEA   $0003
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B60E0  LDA   L0553B3
         DEC
         BNE   L0B6145
         PHY
         PHY
         LDY   #$0004
         LDA   [$F8],Y
         PHA
         DEY
         DEY
         LDA   [$F8],Y
         PHA
         JSL   L07899F
         PLA
         STA   $E5
         PLX
         STX   $E7
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L040442
         PEA   L040442
         PEA   $0000
         TDC
         CLC
         ADC   #$FE95
         PHA
         PEI   $E7
         PEI   $E5
         JSL   L072CD4
         PEA   ^L04044E
         PEA   L04044E
         PEA   $0000
         TDC
         CLC
         ADC   #$FF95
         PHA
         PEA   $0004
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         PEI   $E7
         PEI   $E5
         JSL   L07185A
L0B6145  PEA   ^L050C32
         PEA   L050C32
         JSL   L0E0EA8
         BRA   L0B6159
L0B6151  PEI   $DD
         PEI   $DB
         JSL   L0E0E79
L0B6159  BRL   L0B624E
L0B615C  PHY
         PHY
         PEI   $DD
         PEI   $DB
         PEI   $E1
         PEI   $DF
         PEA   $0000
         JSL   L077624
         PLA
         STA   $E9
         PLX
         STX   $EB
         LDA   $E9
         ORA   $EB
         BNE   L0B6183
         PEA   $0000
         JSL   L0E0E4B
         BRL   L0B6204
L0B6183  LDA   $F6
         SEC
         SBC   #$0005
         BMI   L0B61C3
         CMP   #$0035
         BPL   L0B61C3
         SEC
         SBC   #$0000
         BEQ   L0B61AE
         DEC
         BEQ   L0B61B5
         SEC
         SBC   #$0015
         BEQ   L0B61BC
         SEC
         SBC   #$001E
         BEQ   L0B61A7
         BRA   L0B61C3
L0B61A7  LDA   #$2000
         STA   $D9
         BRA   L0B61C3
L0B61AE  LDA   #$8000
         STA   $D9
         BRA   L0B61C3
L0B61B5  LDA   #$4000
         STA   $D9
         BRA   L0B61C3
L0B61BC  LDA   #$0800
         STA   $D9
         BRA   L0B61C3
L0B61C3  LDY   #$0002
         LDA   [$E9],Y
         TAX
         LDA   [$E9]
         CLC
         ADC   #$0010
         BCC   L0B61D2
         INX
L0B61D2  STA   $ED
         STX   $EF
         LDA   $D9
         AND   [$ED]
         BEQ   L0B61DF
         LDA   #$0001
L0B61DF  STA   $D7
         LDA   #$0039
         CMP   $F6
         BNE   L0B61EF
         LDA   $D7
         EOR   #$0001
         STA   $D7
L0B61EF  PEI   $D7
         JSL   L0E0E4B
         PEI   $DD
         PEI   $DB
         PEI   $E1
         PEI   $DF
         PEA   $0000
         JSL   L074B81
L0B6204  BRA   L0B624E
L0B6206  PEI   $DD
         PEI   $DB
         TDC
         CLC
         ADC   #$00D5
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$00B5
         PEA   $0000
         PHA
         JSL   L07A972
         LDA   #$0008
         CMP   $F6
         BNE   L0B623F
         TDC
         CLC
         ADC   #$00B5
         PEA   $0000
         PHA
         PEA   $0000
         PEA   $0020
         PEA   $0018
         JSL   L0E07C5
         BRA   L0B6245
L0B623F  PEI   $D5
         JSL   L0E0E4B
L0B6245  BRA   L0B624E
L0B6247  PEA   $003E
         JSL   L0B0B7A
L0B624E  LDA   $F4
         STA   $FA
         LDA   $F3
         STA   $F9
         LDA   $F1
         TCD
         TSC
         CLC
         ADC   #$0264
         TCS
         RTL

L0B6260  PHD
         TSC
         CLC
         ADC   #$FEFA
         TCS
         ADC   #$0011
         TCD
         LDA   $FA
         SEC
         SBC   #$0013
         BPL   L0B6276
         BRL   L0B639E
L0B6276  CMP   #$0037
         BMI   L0B627E
         BRL   L0B639E
L0B627E  SEC
         SBC   #$0000
         BNE   L0B6287
         BRL   L0B632A
L0B6287  DEC
         BNE   L0B628D
         BRL   L0B6335
L0B628D  DEC
         BNE   L0B6293
         BRL   L0B6366
L0B6293  DEC
         BNE   L0B6299
         BRL   L0B6371
L0B6299  DEC
         BNE   L0B629F
         BRL   L0B6389
L0B629F  SEC
         SBC   #$000D
         BEQ   L0B62C9
         DEC
         BEQ   L0B62D4
         DEC
         BEQ   L0B62DF
         DEC
         BEQ   L0B62EA
         DEC
         BEQ   L0B62F5
         DEC
         BEQ   L0B6300
         DEC
         BEQ   L0B630B
         DEC
         BEQ   L0B6316
         DEC
         BEQ   L0B6320
         SEC
         SBC   #$001D
         BNE   L0B62C6
         BRL   L0B6394
L0B62C6  BRL   L0B639E
L0B62C9  LDA   L055313
         PHA
         JSL   L0E0E4B
         BRL   L0B639E
L0B62D4  LDA   L055303
         PHA
         JSL   L0E0E11
         BRL   L0B639E
L0B62DF  LDA   L0550B7
         PHA
         JSL   L0E0E4B
         BRL   L0B639E
L0B62EA  LDA   L05530B
         PHA
         JSL   L0E0E4B
         BRL   L0B639E
L0B62F5  LDA   L055311
         PHA
         JSL   L0E0E4B
         BRL   L0B639E
L0B6300  LDA   L05530F
         PHA
         JSL   L0E0E11
         BRL   L0B639E
L0B630B  LDA   L0550B5
         PHA
         JSL   L0E0E11
         BRL   L0B639E
L0B6316  LDA   L055305
         PHA
         JSL   L0E0E11
         BRA   L0B639E
L0B6320  LDA   L055307
         PHA
         JSL   L0E0E11
         BRA   L0B639E
L0B632A  LDAL  L051ED6
         PHA
         JSL   L0B6D7D
         BRA   L0B639E
L0B6335  PHY
         LDAL  L051ED8
         PHA
         PEA   ^L050C32
         PEA   L050C32
         JSL   L1514AE
         PLA
         STA   $EF
         LDA   #$8000
         AND   $EF
         BNE   L0B635B
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0E0EA8
         BRA   L0B6364
L0B635B  LDAL  L051ED8
         PHA
         JSL   L0E0E11
L0B6364  BRA   L0B639E
L0B6366  LDAL  L051EDA
         PHA
         JSL   L0E0E11
         BRA   L0B639E
L0B6371  PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         LDAL  L051EDC
         PHA
         JSL   L0B3436
         JSL   L0E0F0F
         BRA   L0B639E
L0B6389  LDAL  L051EDE
         PHA
         JSL   L0E0E11
         BRA   L0B639E
L0B6394  LDA   L055309
         PHA
         JSL   L0E0E4B
         BRA   L0B639E
L0B639E  LDA   $F8
         STA   $FA
         LDA   $F7
         STA   $F9
         LDA   $F5
         TCD
         TSC
         CLC
         ADC   #$010A
         TCS
         RTL

L0B63B0  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$0001
         STA   $10
         LDA   #$00B9
         CLC
         ADC   $0A
         LDX   $0C
         BCC   L0B63C8
         INX
L0B63C8  CLC
         ADC   #$0004
         BCC   L0B63CF
         INX
L0B63CF  STA   $01
         STX   $03
         LDA   #$000F
         AND   [$01]
         CMP   $0E
         BEQ   L0B63E5
         STZ   $10
         PEA   $003E
         JSL   L0B0B7A
L0B63E5  LDA   $08
         STA   $0E
         LDA   $07
         STA   $0D
         LDA   $05
         TCD
         TSC
         CLC
         ADC   #$000C
         TCS
         RTL

L0B63F7  PHD
         TSC
         CLC
         ADC   #$FBCA
         TCS
         ADC   #$0343
         TCD
         LDY   #$00FA
         LDA   [$F8],Y
         TAX
         DEY
         DEY
         LDA   [$F8],Y
         CLC
         ADC   #$0010
         BCC   L0B6413
         INX
L0B6413  STA   $EF
         STX   $F1
         LDY   #$0002
         LDA   [$EF],Y
         TAX
         LDA   [$EF]
         STA   $EB
         STX   $ED
         LDY   #$00FA
         LDA   [$F8],Y
         TAX
         DEY
         DEY
         LDA   [$F8],Y
         CLC
         ADC   #$000A
         BCC   L0B6434
         INX
L0B6434  STA   $EF
         STX   $F1
         LDY   #$0002
         LDA   [$EF],Y
         TAX
         LDA   [$EF]
         STA   $E7
         STX   $E9
         LDA   #$00B9
         CLC
         ADC   $F8
         LDX   $FA
         BCC   L0B644F
         INX
L0B644F  CLC
         ADC   #$0002
         BCC   L0B6456
         INX
L0B6456  STA   $EF
         STX   $F1
         LDA   [$EF]
         STA   $E5
         LDA   #$00B9
         CLC
         ADC   $F8
         LDX   $FA
         BCC   L0B6469
         INX
L0B6469  CLC
         ADC   #$0004
         BCC   L0B6470
         INX
L0B6470  STA   $EF
         STX   $F1
         LDA   #$000F
         AND   [$EF]
         DEC
         DEC
         BNE   L0B6495
         TDC
         CLC
         ADC   #$00D1
         PEA   $0000
         PHA
         PEA   ^L040450
         PEA   L040450
         PEA   $0007
         JSL   L0313BE
         BRA   L0B64AB
L0B6495  TDC
         CLC
         ADC   #$00D1
         PEA   $0000
         PHA
         PEA   ^L040457
         PEA   L040457
         PEA   $0008
         JSL   L0313BE
L0B64AB  LDA   $E7
         LDX   $E9
         CMP   $EB
         BNE   L0B64B5
         CPX   $ED
L0B64B5  BNE   L0B64CF
         TDC
         CLC
         ADC   #$00BD
         PEA   $0000
         PHA
         PEA   ^L04045F
         PEA   L04045F
         PEA   $0006
         JSL   L0313BE
         BRA   L0B64E5
L0B64CF  TDC
         CLC
         ADC   #$00BD
         PEA   $0000
         PHA
         PEA   ^L040465
         PEA   L040465
         PEA   $0007
         JSL   L0313BE
L0B64E5  PEA   ^L050C32
         PEA   L050C32
         PEA   $0000
         TDC
         CLC
         ADC   #$FDBD
         PHA
         PEI   $ED
         PEI   $EB
         PEI   $E5
         JSL   L07ACF0
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         ANDL  L050C32
         BNE   L0B655A
         PEA   ^L050C32
         PEA   L050C32
         TDC
         CLC
         ADC   #$00BD
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$00D1
         PEA   $0000
         PHA
         PEA   ^L04046C
         PEA   L04046C
         PEA   $0000
         TDC
         CLC
         ADC   #$FEA9
         PHA
         LDA   $E5
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FF7F
         PHA
         PEA   $0004
         JSL   L1509CE
         PEA   $003D
         JSL   L0313BE
         BRA   L0B65A0
L0B655A  LDA   L0553B3
         BEQ   L0B65A0
         PEA   ^L050C32
         PEA   L050C32
         TDC
         CLC
         ADC   #$00BD
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$00D1
         PEA   $0000
         PHA
         PEA   ^L040470
         PEA   L040470
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L040472
         PEA   L040472
         PEA   $0000
         TDC
         CLC
         ADC   #$FEBD
         PHA
         PEA   $0005
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B65A0  LDA   L0553B3
         DEC
         BEQ   L0B65A9
         BRL   L0B66CA
L0B65A9  PEA   ^L050C32
         PEA   L050C32
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L040474
         PEA   L040474
         PEA   $0000
         TDC
         CLC
         ADC   #$FEBD
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FFBD
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDBD
         PHA
         PEI   $E9
         PEI   $E7
         JSL   L07AA4B
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         LDX   #$FFBD
         AND   $00,X
         BNE   L0B6639
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L04047E
         PEA   L04047E
         PEA   $0000
         TDC
         CLC
         ADC   #$FEA9
         PHA
         PEI   $E9
         PEI   $E7
         JSL   L0715D9
         PEA   $0000
         TDC
         CLC
         ADC   #$FEBD
         PHA
         PEA   $0003
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         BRA   L0B6671
L0B6639  PEA   ^L050C32
         PEA   L050C32
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L040482
         PEA   L040482
         PEA   $0000
         TDC
         CLC
         ADC   #$FFBD
         PHA
         PEA   ^L040484
         PEA   L040484
         PEA   $0000
         TDC
         CLC
         ADC   #$FEBD
         PHA
         PEA   $0004
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B6671  PEA   ^L050C32
         PEA   L050C32
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L040486
         PEA   L040486
         PEA   $0000
         TDC
         CLC
         ADC   #$FDBD
         PHA
         LDA   L05503F
         LDX   L055041
         PHX
         PHA
         JSL   L072CD4
         PEA   $0000
         TDC
         CLC
         ADC   #$FCBD
         PHA
         LDA   L055043
         LDX   L055045
         PHX
         PHA
         JSL   L072CD4
         PEA   ^L040492
         PEA   L040492
         PEA   $0000
         TDC
         CLC
         ADC   #$FEBD
         PHA
         PEA   $0005
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B66CA  PEA   ^L050C32
         PEA   L050C32
         JSL   L0E0F0F
         LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$043C
         TCS
         RTL

L0B66E6  PHD
         TSC
         CLC
         ADC   #$FEC8
         TCS
         ADC   #$0047
         TCD
         PHY
         LDY   #$0012
         LDA   [$F8],Y
         PHA
         DEY
         DEY
         LDA   [$F8],Y
         PHA
         LDY   #$000E
         LDA   [$F8],Y
         PHA
         TDC
         CLC
         ADC   #$00B9
         PEA   $0000
         PHA
         JSL   L07ABAE
         PLA
         LSR
         BCS   L0B6717
         BRL   L0B6B2D
L0B6717  LDA   $F6
         SEC
         SBC   #$0003
         BPL   L0B6722
         BRL   L0B6B24
L0B6722  CMP   #$0046
         BMI   L0B672A
         BRL   L0B6B24
L0B672A  ASL
         TAX
         LDAL  L0B6732,X
         PHA
         RTS

L0B6732  DA    L0B67BC+1
         DA    L0B67D5+2
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6AB9+1
         DA    L0B6AC6+1
         DA    L0B6AE8+1
         DA    L0B6B05+1
         DA    L0B6AD3+1
         DA    L0B67E0+2
         DA    L0B67E9+2
         DA    L0B687E+2
         DA    L0B687E+2
         DA    L0B6A5D+2
         DA    L0B6A66+2
         DA    L0B6A92+2
         DA    L0B6A9B+2
         DA    L0B6AB1+1
         DA    L0B6893+2
         DA    L0B68AE+2
         DA    L0B6932+2
         DA    L0B6908+2
         DA    L0B68F9+2
         DA    L0B68EA+2
         DA    L0B68DB+2
         DA    L0B68CC+2
         DA    L0B69B1+2
         DA    L0B6A15+2
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6956+2
         DA    L0B68BD+2
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B687E+2
         DA    L0B687E+2
         DA    L0B687E+2
         DA    L0B687E+2
         DA    L0B687E+2
         DA    L0B687E+2
         DA    L0B687E+2
         DA    L0B687E+2
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6B22+1
         DA    L0B6A28+2
L0B67BC  DA    L0B6A3B+2
         MX    %00
         PHY
         PHY
         LDY   #$0012
         LDA   [$F8],Y
         PHA
         DEY
         DEY
         LDA   [$F8],Y
         PHA
         PEI   $BB
         JSL   L07AE68
         JSL   L0B79B1
L0B67D5  BRL   L0B6B2B
         PEA   $0000
         PHD
         JSL   L0B63F7
L0B67E0  BRL   L0B6B2B
         PEI   $BB
         JSL   L0E0E11
L0B67E9  BRL   L0B6B2B
         LDA   #$000F
         AND   $C7
         SEC
         SBC   #$0000
         BMI   L0B6874
         CMP   #$0008
         BPL   L0B6874
         ASL
         TAX
         LDAL  L0B6804,X
         PHA
         RTS

L0B6804  DA    L0B6812+1
         DA    L0B681E+1
         DA    L0B682A+1
         DA    L0B6836+1
         DA    L0B6842+1
         DA    L0B684E+1
         DA    L0B685A+1
L0B6812  DA    L0B6866+1
         PEA   ^L040494
         PEA   L040494
         JSL   L0E0F0F
L0B681E  BRA   L0B687E
         PEA   ^L0404A0
         PEA   L0404A0
         JSL   L0E0F0F
L0B682A  BRA   L0B687E
         PEA   ^L0404A7
         PEA   L0404A7
         JSL   L0E0F0F
L0B6836  BRA   L0B687E
         PEA   ^L0404B1
         PEA   L0404B1
         JSL   L0E0F0F
L0B6842  BRA   L0B687E
         PEA   ^L0404BB
         PEA   L0404BB
         JSL   L0E0F0F
L0B684E  BRA   L0B687E
         PEA   ^L0404C2
         PEA   L0404C2
         JSL   L0E0F0F
L0B685A  BRA   L0B687E
         PEA   ^L0404CB
         PEA   L0404CB
         JSL   L0E0F0F
L0B6866  BRA   L0B687E
         PEA   ^L0404D7
         PEA   L0404D7
         JSL   L0E0F0F
         BRA   L0B687E
L0B6874  LDA   #$000F
         AND   $C7
         PHA
         JSL   L0E0E11
L0B687E  BRL   L0B6B2B
         TDC
         CLC
         ADC   #$00BF
         PEA   $0000
         PHA
         PEI   $F6
         PEA   $0000
         JSL   L0E0F65
L0B6893  BRL   L0B6B2B
         PHY
         PEA   $0001
         PEA   $0000
         PHD
         JSL   L0B63B0
         PLA
         LSR
         BCC   L0B68AE
         PEI   $CB
         PEI   $C9
         JSL   L0E0E79
L0B68AE  BRL   L0B6B2B
         LDA   #$0001
         STA   $E5
         LDA   #$8000
         STA   $E7
         BRA   L0B6915
L0B68BD  BRL   L0B6B2B
         LDA   #$0001
         STA   $E5
         LDA   #$2000
         STA   $E7
         BRA   L0B6915
L0B68CC  BRL   L0B6B2B
         LDA   #$0002
         STA   $E5
         LDA   #$8000
         STA   $E7
         BRA   L0B6915
L0B68DB  BRL   L0B6B2B
         LDA   #$0002
         STA   $E5
         LDA   #$4000
         STA   $E7
         BRA   L0B6915
L0B68EA  BRL   L0B6B2B
         LDA   #$0002
         STA   $E5
         LDA   #$2000
         STA   $E7
         BRA   L0B6915
L0B68F9  BRL   L0B6B2B
         LDA   #$0002
         STA   $E5
         LDA   #$1000
         STA   $E7
         BRA   L0B6915
L0B6908  BRL   L0B6B2B
         LDA   #$0002
         STA   $E5
         LDA   #$0800
         STA   $E7
L0B6915  PHY
         PEI   $E5
         PEA   $0000
         PHD
         JSL   L0B63B0
         PLA
         LSR
         BCC   L0B6932
         LDA   $E7
         AND   $C7
         BEQ   L0B692D
         LDA   #$0001
L0B692D  PHA
         JSL   L0E0E4B
L0B6932  BRL   L0B6B2B
         PHY
         PEA   $0001
         PEA   $0000
         PHD
         JSL   L0B63B0
         PLA
         LSR
         BCC   L0B6956
         LDA   #$00F0
         AND   $BD
         PHA
         PEA   $0004
         JSL   L1510EF
         JSL   L0E0E11
L0B6956  BRL   L0B6B2B
         PHY
         PEA   $0001
         PEA   $0000
         PHD
         JSL   L0B63B0
         PLA
         LSR
         BCC   L0B69B1
         LDA   $BB
         STA   $EB
         LDY   #$0012
         LDA   [$F8],Y
         PHA
         DEY
         DEY
         LDA   [$F8],Y
         PHA
         LDY   #$000C
         LDA   [$F8],Y
         TAX
         DEY
         DEY
         LDA   [$F8],Y
         JSL   L033477
         BNE   L0B6990
         LDA   $EB
         EOR   #$FFFF
         INC
         STA   $EB
L0B6990  PHY
         LDY   #$0008
         LDA   [$F8],Y
         PHA
         DEY
         DEY
         LDA   [$F8],Y
         PHA
         LDY   #$000C
         LDA   [$F8],Y
         PHA
         DEY
         DEY
         LDA   [$F8],Y
         PHA
         PEI   $EB
         JSL   L07A609
         JSL   L0E0E4B
L0B69B1  BRL   L0B6B2B
         PHY
         PEA   $0002
         PEA   $0000
         PHD
         JSL   L0B63B0
         PLA
         LSR
         BCC   L0B6A15
         LDA   $BB
         STA   $E9
         LDY   #$0012
         LDA   [$F8],Y
         PHA
         DEY
         DEY
         LDA   [$F8],Y
         PHA
         LDY   #$000C
         LDA   [$F8],Y
         TAX
         DEY
         DEY
         LDA   [$F8],Y
         JSL   L033477
         BNE   L0B69EB
         LDA   $E9
         EOR   #$FFFF
         INC
         STA   $E9
L0B69EB  LDA   #$000F
         AND   $C7
         CMP   #$0007
         BEQ   L0B69FE
         PEA   $0021
         JSL   L0B0B7A
         BRA   L0B6A15
L0B69FE  PHY
         PEI   $E9
         JSL   L086029
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B6A0F
         DEX
L0B6A0F  PHX
         PHA
         JSL   L0E0DE2
L0B6A15  BRL   L0B6B2B
         LDX   #$0000
         LDA   #$8000
         AND   $BD
         BNE   L0B6A23
         INX
L0B6A23  PHX
         JSL   L0E0E4B
L0B6A28  BRL   L0B6B2B
         PHY
         PEA   $0001
         PEA   $0000
         PHD
         JSL   L0B63B0
         PLA
         LSR
         BCS   L0B6A4E
L0B6A3B  BRL   L0B6B2B
         PHY
         PEA   $0002
         PEA   $0000
         PHD
         JSL   L0B63B0
         PLA
         LSR
         BCC   L0B6A5D
L0B6A4E  LDA   #$4000
         AND   $BD
         BEQ   L0B6A58
         LDA   #$0001
L0B6A58  PHA
         JSL   L0E0E4B
L0B6A5D  BRL   L0B6B2B
         PEI   $D1
         JSL   L0B6D7D
L0B6A66  BRL   L0B6B2B
         PHY
         PEI   $D3
         PEA   ^L050C32
         PEA   L050C32
         JSL   L1514AE
         PLA
         STA   $E3
         LDA   #$8000
         AND   $E3
         BNE   L0B6A8C
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0E0EA8
         BRA   L0B6A92
L0B6A8C  PEI   $D3
         JSL   L0E0E11
L0B6A92  BRL   L0B6B2B
         PEI   $D5
         JSL   L0E0E11
L0B6A9B  BRL   L0B6B2B
         PEA   $0000
         TDC
         CLC
         ADC   #$FFB9
         PHA
         PEI   $D7
         JSL   L0B3436
         JSL   L0E0F0F
L0B6AB1  BRA   L0B6B2B
         PEI   $D9
         JSL   L0E0E11
L0B6AB9  BRA   L0B6B2B
         LDA   #$00FF
         AND   $DB
         INC
         PHA
         JSL   L0E0E11
L0B6AC6  BRA   L0B6B2B
         LDA   #$00FF
         AND   $DC
         INC
         PHA
         JSL   L0E0E11
L0B6AD3  BRA   L0B6B2B
         PEA   $0010
         LDA   #$00FF
         AND   $CD
         STA   $ED
         PLA
         SEC
         SBC   $ED
         PHA
         JSL   L0E0E11
L0B6AE8  BRA   L0B6B2B
         PHY
         PEA   $0001
         PEA   $0000
         PHD
         JSL   L0B63B0
         PLA
         LSR
         BCC   L0B6B05
         LDA   #$00FF
         AND   $DD
         INC
         PHA
         JSL   L0E0E11
L0B6B05  BRA   L0B6B2B
         PHY
         PEA   $0001
         PEA   $0000
         PHD
         JSL   L0B63B0
         PLA
         LSR
         BCC   L0B6B22
         LDA   #$00FF
         AND   $DE
         INC
         PHA
         JSL   L0E0E11
L0B6B22  BRA   L0B6B2B
L0B6B24  PEA   $003E
         JSL   L0B0B7A
L0B6B2B  BRA   L0B6B34
L0B6B2D  PEA   $003F
         JSL   L0B0B7A
L0B6B34  LDA   $F4
         STA   $FA
         LDA   $F3
         STA   $F9
         LDA   $F1
         TCD
         TSC
         CLC
         ADC   #$0140
         TCS
         RTL

L0B6B46  PHD
         TSC
         CLC
         ADC   #$FDF8
         TCS
         ADC   #$0113
         TCD
         LDA   $FA
         BPL   L0B6B58
         BRL   L0B6D64
L0B6B58  CMP   #$0009
         BMI   L0B6B60
         BRL   L0B6D64
L0B6B60  ASL
         TAX
         LDAL  L0B6B68,X
         PHA
         RTS

L0B6B68  DA    L0B6C25+2
         DA    L0B6C5D+2
         DA    L0B6CA1+2
         DA    L0B6B78+1
         DA    L0B6B84+2
         DA    L0B6C6E+2
         DA    L0B6C79+2
         DA    L0B6C8D+2
L0B6B78  DA    L0B6D4D+1
         PHY
         PHY
         JSL   L076220
         JSL   L0B79B1
L0B6B84  BRL   L0B6D6B
         PEA   ^L050C32
         PEA   L050C32
         PEA   $0000
         TDC
         CLC
         ADC   #$FEED
         PHA
         LDA   L055043
         LDX   L055045
         PHX
         PHA
         JSL   L072CD4
         PEA   $0100
         JSL   L0313BE
         LDA   L0553B3
         DEC
         BNE   L0B6BE7
         PEA   ^L050C32
         PEA   L050C32
         PEA   $0000
         TDC
         CLC
         ADC   #$FEED
         PHA
         LDA   L05503F
         LDX   L055041
         PHX
         PHA
         JSL   L072CD4
         PEA   ^L050C32
         PEA   L050C32
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B6BE7  LDA   L0553B3
         BEQ   L0B6C1B
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L0404E1
         PEA   L0404E1
         PEA   ^L050C32
         PEA   L050C32
         PEA   ^L0404E9
         PEA   L0404E9
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         PEA   $0003
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B6C1B  PEA   ^L050C32
         PEA   L050C32
         JSL   L0E0EA8
L0B6C25  BRL   L0B6D6B
         STZ   $ED
         STZ   $EF
         LDA   L05503D
         BEQ   L0B6C46
         PHY
         PHY
         PHY
         LDA   L05503D
         PHA
         JSL   L151065
         JSL   L075B7B
         PLA
         STA   $ED
         PLX
         STX   $EF
L0B6C46  LDAL  L053AB3
         TAX
         LDAL  L053AB1
         PEI   $EF
         PEI   $ED
         JSL   L150F53
         PHX
         PHA
         JSL   L0E0E79
L0B6C5D  BRL   L0B6D6B
         LDAL  L053AD7
         PHA
         LDAL  L053AD5
         PHA
         JSL   L0E0E79
L0B6C6E  BRL   L0B6D6B
         LDA   L055051
         PHA
         JSL   L0E0E4B
L0B6C79  BRL   L0B6D6B
         LDA   #$4000
         ANDL  L053AE9
         BEQ   L0B6C88
         LDA   #$0001
L0B6C88  PHA
         JSL   L0E0E4B
L0B6C8D  BRL   L0B6D6B
         LDA   #$1000
         ANDL  L053AE9
         BEQ   L0B6C9C
         LDA   #$0001
L0B6C9C  PHA
         JSL   L0E0E4B
L0B6CA1  BRL   L0B6D6B
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD9
         PHA
         LDAL  L053B1F
         PHA
         LDAL  L053B1D
         PHA
         PEA   $0008
         JSL   L07334A
         PEA   ^L0404EB
         PEA   L0404EB
         PEA   $0000
         TDC
         CLC
         ADC   #$FFC5
         PHA
         LDAL  L053B23
         PHA
         LDAL  L053B21
         PHA
         PEA   $0008
         JSL   L07334A
         PEA   ^L0404ED
         PEA   L0404ED
         PEA   $0000
         TDC
         CLC
         ADC   #$FFB1
         PHA
         LDAL  L053B27
         PHA
         LDAL  L053B25
         PHA
         PEA   $0008
         JSL   L07334A
         PEA   ^L0404EF
         PEA   L0404EF
         PEA   $0000
         TDC
         CLC
         ADC   #$FF9D
         PHA
         LDAL  L053B2B
         PHA
         LDAL  L053B29
         PHA
         PEA   $0008
         JSL   L07334A
         PEA   ^L0404F1
         PEA   L0404F1
         PEA   $0000
         TDC
         CLC
         ADC   #$FF89
         PHA
         LDA   L055251
         LDX   L055253
         PHX
         PHA
         JSL   L0715D9
         TDC
         CLC
         ADC   #$0089
         PEA   $0000
         PHA
         PEA   $0009
         JSL   L1509CE
         JSL   L0E0F0F
L0B6D4D  BRA   L0B6D6B
         PEA   ^L053AFD
         PEA   L053AFD
         PEA   $0000
         PEA   $0020
         PEA   $0018
         JSL   L0E07C5
         BRA   L0B6D6B
L0B6D64  PEA   $003E
         JSL   L0B0B7A
L0B6D6B  LDA   $F8
         STA   $FA
         LDA   $F7
         STA   $F9
         LDA   $F5
         TCD
         TSC
         CLC
         ADC   #$020C
         TCS
         RTL

L0B6D7D  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   $0A
         SEC
         SBC   #$FFFF
         BVS   L0B6D91
         BMI   L0B6DCD
         BRA   L0B6D93
L0B6D91  BPL   L0B6DCD
L0B6D93  CMP   #$0003
         BPL   L0B6DCD
         SEC
         SBC   #$0000
         BEQ   L0B6DC1
         SEC
         SBC   #$0001
         BEQ   L0B6DA9
         DEC
         BEQ   L0B6DB5
         BRA   L0B6DCD
L0B6DA9  PEA   ^L0404F3
         PEA   L0404F3
         JSL   L0E0F0F
         BRA   L0B6DD3
L0B6DB5  PEA   ^L0404F8
         PEA   L0404F8
         JSL   L0E0F0F
         BRA   L0B6DD3
L0B6DC1  PEA   ^L0404FF
         PEA   L0404FF
         JSL   L0E0F0F
         BRA   L0B6DD3
L0B6DCD  PEI   $0A
         JSL   L0E0E11
L0B6DD3  LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B6DE3  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   L0553C3
         JSL   L150488
         STA   $01
         STX   $03
         PHY
         LDY   #$0004
         LDA   [$10],Y
         PHA
         DEY
         DEY
         LDA   [$10],Y
         PHA
         JSL   L0D109F
         PLA
         LSR
         BCC   L0B6E5D
         LDA   [$10]
         DEC
         BMI   L0B6E50
         CMP   #$0005
         BPL   L0B6E50
         SEC
         SBC   #$0000
         BEQ   L0B6E28
         DEC
         BEQ   L0B6E34
         DEC
         BEQ   L0B6E34
         DEC
         BEQ   L0B6E40
         DEC
         BEQ   L0B6E48
         BRA   L0B6E50
L0B6E28  PEI   $12
         PEI   $10
         PEI   $0E
         JSL   L0B66E6
         BRA   L0B6E57
L0B6E34  PEI   $12
         PEI   $10
         PEI   $0E
         JSL   L0B5F00
         BRA   L0B6E57
L0B6E40  PEI   $0E
         JSL   L0B6B46
         BRA   L0B6E57
L0B6E48  PEI   $0E
         JSL   L0B5CBB
         BRA   L0B6E57
L0B6E50  PEA   $003E
         JSL   L0B0B7A
L0B6E57  JSL   L0B381C
         BRA   L0B6E64
L0B6E5D  PEA   $003E
         JSL   L0B0B7A
L0B6E64  PEI   $03
         PEI   $01
         LDA   L0553C3
         JSL   L150488
         JSL   L033477
         BNE   L0B6E79
         JSL   L0E0C52
L0B6E79  LDA   $0C
         STA   $12
         LDA   $0B
         STA   $11
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$0010
         TCS
         RTL

L0B6E8B  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$0000
         LDY   #$0010
         STA   [$0A],Y
         PEI   $0C
         PEI   $0A
         PEI   $10
         PEI   $0E
         JSL   L0B59D0
         LDA   $08
         STA   $10
         LDA   $07
         STA   $0F
         LDA   $05
         TCD
         TSC
         CLC
         ADC   #$000E
         TCS
         RTL

L0B6EB9  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$8001
         CMP   L055395
         BEQ   L0B6ECB
         BRA   L0B6EDA
L0B6ECB  PHY
         JSL   L0B7877
         PLA
         LSR
         BCS   L0B6ED6
         BRA   L0B6EDA
L0B6ED6  JSL   L0B7BC2
L0B6EDA  PLY
         PLY
         PLD
         RTL

L0B6EDE  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDX   #$0000
         LDA   #$0005
         CMP   L05536F
         BEQ   L0B6EF2
         INX
L0B6EF2  PHX
         LDX   #$0000
         LDA   #$0006
         CMP   L05536F
         BEQ   L0B6EFF
         INX
L0B6EFF  TXA
         AND   $01,S
         PLX
         LSR
         BCC   L0B6F0F
         PEA   $0042
         JSL   L0B0B7A
         BRA   L0B6F51
L0B6F0F  LDA   L055371
         DEC
         CMP   L055395
         BNE   L0B6F20
         LDA   #$8001
         STA   L055395
         BRA   L0B6F2F
L0B6F20  LDA   #$8001
         CMP   L055395
         BNE   L0B6F2F
         LDA   L055371
         DEC
         STA   L055395
L0B6F2F  JSL   L0B0000
         LDAL  L051BDE
         DEC
         DEC
         BNE   L0B6F44
         PEA   $0008
         JSL   L0B2A68
         BRA   L0B6F51
L0B6F44  PEA   $0007
         JSL   L0B2A68
         LDA   #$0001
         STA   L055393
L0B6F51  PLY
         PLY
         PLD
         RTL

L0B6F55  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         PHY
         JSL   L0B7877
         PLA
         LSR
         BCS   L0B6F69
         BRL   L0B704F
L0B6F69  PHY
         JSL   L0314F6
         PLA
         DEC
         BPL   L0B6F75
         BRL   L0B704B
L0B6F75  CMP   #$0003
         BMI   L0B6F7D
         BRL   L0B704B
L0B6F7D  SEC
         SBC   #$0000
         BEQ   L0B6F8F
         DEC
         BEQ   L0B6FBF
         DEC
         BNE   L0B6F8C
         BRL   L0B702B
L0B6F8C  BRL   L0B704B
L0B6F8F  LDX   #$0000
         LDA   #$0006
         CMP   L05536F
         BEQ   L0B6F9B
         INX
L0B6F9B  PHX
         LDX   #$0000
         LDA   #$0008
         CMP   L05536F
         BEQ   L0B6FA8
         INX
L0B6FA8  TXA
         AND   $01,S
         PLX
         LSR
         BCC   L0B6FB8
         PEA   $0043
         JSL   L0B0B7A
         BRA   L0B6FBC
L0B6FB8  JSL   L0E0154
L0B6FBC  BRL   L0B704B
L0B6FBF  LDA   #$0003
         CMP   L05536F
         BEQ   L0B6FD0
         PEA   $0044
         JSL   L0B0B7A
         BRA   L0B7029
L0B6FD0  LDX   #$0000
         LDA   #$8001
         CMP   L055395
         BEQ   L0B6FDC
         INX
L0B6FDC  TXA
         BNE   L0B6FED
         PHY
         JSL   L0B7C10
         PLA
         EOR   #$0001
         CMP   #$0000
         BEQ   L0B6FFA
L0B6FED  JSL   L0E0154
         LDA   L055391
         DEC
         STA   L055391
         BRA   L0B7029
L0B6FFA  LDA   #$0001
         STA   L055393
         LDA   L055391
         DEC
         PEA   $0012
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L050D34
         LDX   #^L050D34
         BCC   L0B7017
         INX
L0B7017  CLC
         ADC   #$0002
         BCC   L0B701E
         INX
L0B701E  STA   $01
         STX   $03
         LDA   [$01]
         PHA
         JSL   L0B2BBB
L0B7029  BRA   L0B704B
L0B702B  LDA   L05536F
         DEC
         DEC
         BEQ   L0B703B
         PEA   $0045
         JSL   L0B0B7A
         BRA   L0B7049
L0B703B  JSL   L0E0154
         LDA   #$0001
         STA   L055397
         JSL   L0B2AC6
L0B7049  BRA   L0B704B
L0B704B  JSL   L0E0000
L0B704F  PLY
         PLY
         PLD
         RTL

L0B7053  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$8001
         CMP   L055395
         BEQ   L0B7065
         BRA   L0B70E1
L0B7065  PHY
         JSL   L0B7877
         PLA
         LSR
         BCS   L0B7070
         BRA   L0B70E1
L0B7070  PHY
         JSL   L0314F6
         PLA
         CMP   #$0002
         BNE   L0B708B
         JSL   L0B292B
         LDA   #$0001
         STA   L055397
         JSL   L0B2AC6
         BRA   L0B70DD
L0B708B  PHY
         JSL   L0314F6
         PLA
         CMP   #$0003
         BNE   L0B709C
         JSL   L073A49
         BRA   L0B70DD
L0B709C  LDA   L0553B9
         LDX   L0553BB
         CLC
         ADC   #$0004
         BCC   L0B70A9
         INX
L0B70A9  STA   $01
         STX   $03
         LDA   [$01]
         STA   $01
         LDA   L055391
         SEC
         SBC   $01
         BEQ   L0B70C0
         BVS   L0B70BE
         EOR   #$8000
L0B70BE  BMI   L0B70C9
L0B70C0  PEA   $0046
         JSL   L0B0B7A
         BRA   L0B70DD
L0B70C9  LDA   L055391
         DEC
         PEA   $0012
         JSL   L150BEE
         PLX
         LDAL  L050D34,X
         DEC
         STA   L055395
L0B70DD  JSL   L0E0000
L0B70E1  PLY
         PLY
         PLD
         RTL

L0B70E5  ENT
         PHD
         TSC
         CLC
         ADC   #$FEEA
         TCS
         ADC   #$001F
         TCD
         LDA   #$8001
         CMP   L055395
         BEQ   L0B70FB
         BRL   L0B726C
L0B70FB  PHY
         JSL   L0B7877
         PLA
         LSR
         BCS   L0B7107
         BRL   L0B726C
L0B7107  PHY
         PHY
         JSL   L0E05AF
         PLA
         PLX
         STA   $F1
         LDA   $F1
         LDX   #$FFE1
         STA   $00,X
         LDX   #$FFE1
         LDA   $00,X
         SEC
         SBC   #$0001
         BVS   L0B7126
         EOR   #$8000
L0B7126  BMI   L0B712B
         BRL   L0B726C
L0B712B  LDA   #$0001
         STA   $EF
L0B7130  TDC
         CLC
         ADC   #$00EB
         PEA   $0000
         PHA
         PEA   $0000
         PEA   $0004
         PEA   $0009
         JSL   L0E0656
         PEI   $ED
         PEI   $EB
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE3
         PHA
         JSL   L0B1388
         PHY
         LDA   L0553BD
         LDX   L0553BF
         PHX
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE3
         PHA
         JSL   L0B01D3
         PLA
         STA   $E9
         LDA   $E9
         BEQ   L0B71D4
         LDA   L0553BD
         LDX   L0553BF
         CLC
         ADC   #$000A
         BCC   L0B7181
         INX
L0B7181  STA   $F3
         STX   $F5
         LDY   #$0002
         LDA   [$F3],Y
         TAX
         LDA   [$F3]
         STA   $F3
         STX   $F5
         LDY   #$0002
         LDA   [$F3],Y
         TAX
         LDA   [$F3]
         PHX
         PHA
         LDA   $E9
         DEC
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B71AF
         DEX
L0B71AF  JSL   L150F53
         STA   $E3
         STX   $E5
         LDY   #$0002
         LDA   [$E3],Y
         BNE   L0B71D1
         PEA   $0047
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE3
         PHA
         JSL   L0B0841
         BRL   L0B726C
L0B71D1  BRL   L0B725E
L0B71D4  PHY
         LDA   L0553BD
         LDX   L0553BF
         PHX
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE3
         PHA
         JSL   L0B2819
         PLA
         STA   $E9
         LDA   #L051C38
         LDX   #^L051C38
         CMP   L0553BD
         BNE   L0B71FB
         CPX   L0553BF
L0B71FB  BEQ   L0B725E
         PHY
         PEA   ^L051C38
         PEA   L051C38
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE3
         PHA
         JSL   L0B2819
         PLA
         STA   $E7
         LDA   L0553BD
         LDX   L0553BF
         CLC
         ADC   #$000A
         BCC   L0B7221
         INX
L0B7221  STA   $F3
         STX   $F5
         LDY   #$0002
         LDA   [$F3],Y
         TAX
         LDA   [$F3]
         STA   $F3
         STX   $F5
         LDY   #$0002
         LDA   [$F3],Y
         TAX
         LDA   [$F3]
         PHX
         PHA
         LDA   $E9
         DEC
         PEA   $000E
         JSL   L150BEE
         PLA
         LDX   #$0000
         BIT   #$8000
         BEQ   L0B724F
         DEX
L0B724F  JSL   L150F53
         STA   $E3
         STX   $E5
         LDA   $E7
         LDY   #$0002
         STA   [$E3],Y
L0B725E  LDA   $EF
         LDX   #$FFE1
         CMP   $00,X
         BEQ   L0B726C
         INC   $EF
         BRL   L0B7130
L0B726C  TSC
         CLC
         ADC   #$0116
         TCS
         PLD
         RTL

L0B7274  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$0004
         CMP   L05536F
         BNE   L0B728D
         PEA   $0048
         JSL   L0B0B7A
         BRA   L0B72C6
L0B728D  PEA   $0004
         JSL   L0E0838
         LDX   #$0000
         LDA   #$8001
         CMP   L055395
         BNE   L0B72A0
         INX
L0B72A0  TXA
         BEQ   L0B72AF
         PHA
         PHY
         JSL   L0B7877
         PLA
         STA   $01
         PLA
         AND   $01
L0B72AF  BEQ   L0B72C6
         PHY
         JSL   L0E0678
         PLA
         EOR   #$0001
         CMP   #$0000
         BEQ   L0B72C6
         LDA   L055371
         DEC
         STA   L055395
L0B72C6  PLY
         PLY
         PLD
         RTL

L0B72CA  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$8001
         CMP   L055395
         BEQ   L0B72DD
         BRL   L0B7379
L0B72DD  PHY
         JSL   L0B7877
         PLA
         LSR
         BCS   L0B72E9
         BRL   L0B7379
L0B72E9  LDA   L0553B9
         LDX   L0553BB
         CLC
         ADC   #$0004
         BCC   L0B72F6
         INX
L0B72F6  STA   $01
         STX   $03
         LDA   [$01]
         STA   $01
         LDA   L055391
         SEC
         SBC   $01
         BEQ   L0B730D
         BVS   L0B730B
         EOR   #$8000
L0B730B  BMI   L0B7316
L0B730D  PEA   $0057
         JSL   L0B0B7A
         BRA   L0B7379
L0B7316  PHY
         JSL   L0B7C10
         PLA
         LSR
         BCC   L0B7365
         LDA   L055391
         DEC
         PEA   $0012
         JSL   L150BEE
         PLX
         LDAL  L050D34,X
         PHA
         JSL   L0B2A91
         LDA   L055391
         DEC
         PEA   $0012
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L050D34
         LDX   #^L050D34
         BCC   L0B734B
         INX
L0B734B  CLC
         ADC   #$0002
         BCC   L0B7352
         INX
L0B7352  STA   $01
         STX   $03
         LDA   [$01]
         PHA
         JSL   L0B2BBB
         LDA   #$0001
         STA   L055393
         BRA   L0B7379
L0B7365  LDA   L055391
         DEC
         PEA   $0012
         JSL   L150BEE
         PLX
         LDAL  L050D34,X
         DEC
         STA   L055395
L0B7379  PLY
         PLY
         PLD
         RTL

L0B737D  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDX   #$0000
         LDA   #$8001
         CMP   L055395
         BNE   L0B7391
         INX
L0B7391  TXA
         BEQ   L0B73AA
         PHY
         JSL   L0B7877
         PLA
         BEQ   L0B73AA
         JSL   L0B292B
         LDA   #$0002
         STA   L055397
         JSL   L0B2AC6
L0B73AA  PLY
         PLY
         PLD
         RTL

L0B73AE  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         PEA   $0003
         JSL   L0E0838
         LDA   L055391
         SEC
         SBC   #$0020
         BVS   L0B73C9
         EOR   #$8000
L0B73C9  BMI   L0B73D4
         LDA   L055391
         INC
         STA   L055391
         BRA   L0B73DE
L0B73D4  PEA   $0049
         JSL   L0B0B7A
         BRL   L0B75F7
L0B73DE  LDA   #$8001
         CMP   L055395
         BEQ   L0B73E9
         BRL   L0B75F7
L0B73E9  LDA   L055391
         DEC
         PEA   $0012
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L050D34
         LDX   #^L050D34
         BCC   L0B7400
         INX
L0B7400  STA   $01
         STX   $03
         LDA   L055371
         STA   [$01]
         LDA   L0553B5
         LDX   L0553B7
         CLC
         ADC   #$0008
         BCC   L0B7416
         INX
L0B7416  STA   $05
         STX   $07
         LDA   [$05]
         LDY   #$0006
         STA   [$01],Y
         PHY
         JSL   L0B7877
         PLA
         LSR
         BCS   L0B742D
         BRL   L0B75F7
L0B742D  LDA   L0553B5
         LDX   L0553B7
         CLC
         ADC   #$0008
         BCC   L0B743A
         INX
L0B743A  STA   $05
         STX   $07
         LDA   [$05]
         LDY   #$0002
         STA   [$01],Y
         LDX   #$0000
         LDAL  L051BDE
         DEC
         DEC
         BNE   L0B7451
         INX
L0B7451  PHX
         LDX   #$0000
         LDAL  L051BE0
         BNE   L0B745C
         INX
L0B745C  TXA
         AND   $01,S
         PLX
         LSR
         BCC   L0B746E
         LDY   #$0002
         LDA   [$01],Y
         INC
         LDY   #$0002
         STA   [$01],Y
L0B746E  PHY
         JSL   L0314F6
         PLA
         BPL   L0B7479
         BRL   L0B75F7
L0B7479  CMP   #$0005
         BMI   L0B7481
         BRL   L0B75F7
L0B7481  SEC
         SBC   #$0000
         BEQ   L0B7497
         DEC
         BEQ   L0B74A6
         DEC
         BEQ   L0B74C1
         DEC
         DEC
         BNE   L0B7494
         BRL   L0B7523
L0B7494  BRL   L0B75F7
L0B7497  LDA   #$0003
         LDY   #$0004
         STA   [$01],Y
         JSL   L0E0000
         BRL   L0B75F7
L0B74A6  LDA   #$0002
         LDY   #$0004
         STA   [$01],Y
         PHY
         JSL   L0E0678
         PLA
         LSR
         BCS   L0B74BE
         LDA   L055371
         DEC
         STA   L055395
L0B74BE  BRL   L0B75F7
L0B74C1  LDA   #$0000
         LDY   #$0004
         STA   [$01],Y
         LDA   #$0001
         LDX   #$0000
         LDY   #$0006
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         LDA   #$000A
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B74E4
         INX
L0B74E4  STA   $05
         STX   $07
         PHY
         PHY
         JSL   L0E05AF
         PLA
         STA   [$05]
         PLA
         LDY   #$0002
         STA   [$05],Y
         LDY   #$0008
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         JSL   L033477
         BEQ   L0B7520
         BVS   L0B7517
         EOR   #$8000
L0B7517  BPL   L0B7520
         LDA   L055371
         DEC
         STA   L055395
L0B7520  BRL   L0B75F7
L0B7523  LDA   #$0001
         LDY   #$0004
         STA   [$01],Y
         LDA   #$000E
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B7536
         INX
L0B7536  STA   $05
         STX   $07
         PHY
         PHY
         JSL   L0E05AF
         PLA
         STA   [$05]
         PLA
         LDY   #$0002
         STA   [$05],Y
         LDA   #$0008
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B7554
         INX
L0B7554  STA   $05
         STX   $07
         PHY
         PHY
         JSL   L0E05AF
         PLA
         PLX
         STA   [$05]
         LDA   #$000A
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B756D
         INX
L0B756D  STA   $05
         STX   $07
         PHY
         PHY
         JSL   L0E05AF
         PLA
         STA   [$05]
         PLA
         LDY   #$0002
         STA   [$05],Y
         LDA   #$0006
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B758B
         INX
L0B758B  STA   $05
         STX   $07
         PHY
         PHY
         JSL   L0E05AF
         PLA
         PLX
         STA   [$05]
         LDY   #$0010
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         JSL   L1512A5
         PHX
         PHA
         LDY   #$0008
         LDA   [$01],Y
         JSL   L150488
         JSL   L150D50
         LDA   #$0000
         TAX
         JSL   L033477
         BPL   L0B75D4
         LDA   L055371
         DEC
         STA   L055395
         BRA   L0B75F5
L0B75D4  LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L0E0DE2
         LDA   L0553BD
         LDX   L0553BF
         PHX
         PHA
         LDY   #$0006
         LDA   [$01],Y
         PHA
         JSL   L0B3CD4
L0B75F5  BRA   L0B75F7
L0B75F7  PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B75FD  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$8001
         CMP   L055395
         BEQ   L0B760F
         BRA   L0B763E
L0B760F  PHY
         JSL   L0B7877
         PLA
         LSR
         BCS   L0B761A
         BRA   L0B763E
L0B761A  LDA   L0553A7
         LDX   L0553A9
         PHX
         PHA
         JSL   L07185A
         PHY
         PHY
         JSL   L0E04DE
         PLA
         STA   L0553A7
         PLA
         STA   L0553A9
         JSL   L0B292B
         LDA   #$0001
         STA   L055397
L0B763E  PLY
         PLY
         PLD
         RTL

L0B7642  ENT
         PHD
         TSC
         CLC
         ADC   #$FFE2
         TCS
         TCD
         LDA   #$8001
         CMP   L055395
         BEQ   L0B7655
         BRL   L0B76DE
L0B7655  PHY
         JSL   L0B7877
         PLA
         LSR
         BCS   L0B7660
         BRA   L0B76DE
L0B7660  PHY
         JSL   L0314F6
         PLA
         CMP   #$0001
         BNE   L0B7671
         JSL   L0B7BC2
         BRA   L0B76DE
L0B7671  TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   ^L05103C
         PEA   L05103C
         PEA   $0018
         JSL   L0313BE
         PEA   ^L051054
         PEA   L051054
         PEA   $0000
         PEA   $0018
         PEA   $000F
         JSL   L0E0656
         PEA   ^L052406
         PEA   L052406
         JSL   L0E06AC
         PHY
         JSL   L0B7AF6
         PLA
         STA   $19
         PEA   ^L051054
         PEA   L051054
         LDA   L0553B9
         LDX   L0553BB
         CLC
         ADC   #$0020
         BCC   L0B76BF
         INX
L0B76BF  PHX
         PHA
         PEA   $0018
         JSL   L0313BE
         PEA   ^L05103C
         PEA   L05103C
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0018
         JSL   L0313BE
L0B76DE  TSC
         CLC
         ADC   #$001E
         TCS
         PLD
         RTL

L0B76E6  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   #$0004
         CMP   L05536F

*

         BEQ   L0B76FF
         PEA   $004A
         JSL   L0B0B7A
         BRA   L0B7721
L0B76FF  JSL   L0B0000
         LDAL  L051BDE
         DEC
         DEC
         BNE   L0B7714
         PEA   $0006
         JSL   L0B2A68
         BRA   L0B7721
L0B7714  PEA   $0005
         JSL   L0B2A68
         LDA   #$0001
         STA   L055393
L0B7721  PLY
         PLY
         PLD
         RTL

L0B7725  ENT
         PHD
         TSC
         CLC
         ADC   #$FFDE
         TCS
         TCD
         STZ   $28
         LDA   L0553B5
         LDX   L0553B7
         STA   $1B
         STX   $1D
         JSL   L031B09
         PHY
         JSL   L0B1C0F
         PLA
         STA   $17
         PHY
         PHY
         PEA   $0000
         JSL   L031415
         PHY
         PHY
         JSL   L0B3727
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B7932
         PEI   $17
         JSL   L0B39C0
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0001
         JSL   L0B2AF9
         JSL   L0E0000
         LDA   L055383
         BEQ   L0B77AA
         PHY
         LDA   L0553D1
         LDX   L0553D3
         STA   $1F
         STX   $21
         LDY   #$0002
         LDA   [$1F],Y
         TAX
         LDA   [$1F]
         CLC
         ADC   #$01BE
         BCC   L0B779A
         INX
L0B779A  STA   $1F
         STX   $21
         LDA   [$1F]
         PHA
         JSL   L0B4D5D
         PLA
         STA   $19
         BRA   L0B77D2
L0B77AA  PHY
         LDA   L0553D1
         LDX   L0553D3
         STA   $1F
         STX   $21
         LDY   #$0002
         LDA   [$1F],Y
         TAX
         LDA   [$1F]
         CLC
         ADC   #$01BC
         BCC   L0B77C4
         INX
L0B77C4  STA   $1F
         STX   $21
         LDA   [$1F]
         PHA
         JSL   L0B4D5D
         PLA
         STA   $19
L0B77D2  LDA   $19
         BEQ   L0B77E9
         LDAL  L051BDE
         DEC
         DEC
         BNE   L0B77E5
         LDA   #$0001
         STA   $28
         BRA   L0B77E9
L0B77E5  JSL   L0E0000
L0B77E9  TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B0F05
         PEI   $1D
         PEI   $1B
         PEA   $0000
         JSL   L0B2AF9
         TSC
         CLC
         ADC   #$0022
         TCS
         PLD
         RTL

L0B7809  PHD
         TSC
         CLC
         ADC   #$FDFC
         TCS
         ADC   #$0113
         TCD
         LDY   #$0001
         LDA   [$F6],Y
         PHA
         JSL   L0B2BBB
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FEED
         PHA
         JSL   L0B369F
         PEA   $0100
         JSL   L0313BE
         JSL   L0B0000
         LDA   $FA
         BEQ   L0B7855
         PEA   $004E
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         JSL   L0B0841
         BRA   L0B7865
L0B7855  PEA   $0035
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         JSL   L0B0841
L0B7865  LDA   $F4
         STA   $FA
         LDA   $F3
         STA   $F9
         LDA   $F1
         TCD
         TSC
         CLC
         ADC   #$020C
         TCS
         RTL

L0B7877  PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         STZ   $10
         LDAL  L051BE0
         STA   $05
         LDA   L0553B5
         LDX   L0553B7
         CLC
         ADC   #$0008
         BCC   L0B7894
         INX
L0B7894  STA   $07
         STX   $09
         LDA   [$07]
         STA   $01
         LDA   L0553B5
         LDX   L0553B7
         CLC
         ADC   #$000A
         BCC   L0B78A9
         INX
L0B78A9  STA   $07
         STX   $09
         LDA   #$0000
         STA   [$07]
         JSL   L0B0000
         LDA   L0553D1
         LDX   L0553D3
         STA   $07
         STX   $09
         LDY   #$0002
         LDA   [$07],Y
         TAX
         LDA   [$07]
         PHX
         PHA
         LDA   $05
         JSL   L150488
         TAY
         BNE   L0B78D4
         DEX
L0B78D4  DEC
         PHX
         PHA
         PEA   $0000
         PEA   $0001
         JSL   L151137
         PLA
         PLX
         JSL   L150F53
         STA   $07
         STX   $09
         LDA   [$07]
         STA   $03
         PHY
         PEI   $03
         JSL   L0B4D5D
         PLA
         BEQ   L0B7920
         LDA   L0553A5
         EOR   #$0001
         CMP   #$0000
         BEQ   L0B7920
         LDAL  L051BDE
         DEC
         DEC
         BNE   L0B7913
         LDA   #$0001
         STA   $10
         BRA   L0B791E
L0B7913  PEA   $0001
         PEA   $0000
         PHD
         JSL   L0B7809
L0B791E  BRA   L0B792B
L0B7920  PEA   $0000
         PEA   $0000
         PHD
         JSL   L0B7809
L0B792B  PLY
         PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B7932  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         LDA   #$0001
         LDY   #$0010
         STA   [$0E],Y
         PHY
         PEI   $18
         PEI   $16
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         LDA   $12
         LDX   $14
         INC
         BNE   L0B7958
         INX
L0B7958  PHX
         PHA
         JSL   L0B25F8
         PLA
         LSR
         BCS   L0B7993
         PEA   $002D
         JSL   L0B0B7A
         PHY
         PHY
         PEA   $0000
         PEA   $0001
         LDA   L0553DD
         PHA
         JSL   L0B249C
         PLA
         STA   $01
         PLX
         STX   $03
         LDY   #$0002
         LDA   [$01],Y
         TAX
         LDA   [$01]
         STA   $05
         STX   $07
         SEP   #$20
         LDA   #$00
         STA   [$05]
         REP   #$20
L0B7993  PEI   $10
         PEI   $0E
         PEI   $03
         PEI   $01
         JSL   L0B59D0
         LDA   $0C
         STA   $18
         LDA   $0B
         STA   $17
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$0016
         TCS
         RTL

L0B79B1  PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   $10
         ORA   $12
         BNE   L0B79C5
         JSL   L0E0C52
         BRA   L0B7A44
L0B79C5  STZ   $01
         LDA   L0550F3
         BEQ   L0B7A03
         PHY
         PHY
         PEI   $12
         PEI   $10
         PEA   $0000
         PEA   $0000
         PEA   $0000
         PEA   $0000
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0F12F1
         PLA
         STA   $03
         PLX
         STX   $05
         PEI   $12
         PEI   $10
         JSL   L07185A
         PEI   $05
         PEI   $03
         JSL   L0E0CFE
         BRA   L0B7A44
L0B7A03  PHY
         PHY
         PEI   $12
         PEI   $10
         LDA   L0550F5
         LDX   L0550F7
         PHX
         PHA
         PEA   $0000
         PEA   $FFFF
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0F12F1
         PLA
         STA   $03
         PLX
         STX   $05
         PEI   $12
         PEI   $10
         JSL   L07185A
         LDA   L0550F5
         LDX   L0550F7
         PHX
         PHA
         JSL   L0E10BE
         LDA   #$0001
         STA   L0550F1
L0B7A44  LDA   $0E
         STA   $12
         LDA   $0D
         STA   $11
         LDA   $0B
         TCD
         TSC
         CLC
         ADC   #$0010
         TCS
         RTL

L0B7A56  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B2A02
         LDA   #$0001
         STA   $10
         PHY
         PEI   $0E
         JSL   L0B5681
         PLA
         LSR
         BCS   L0B7A8A
         STZ   $10
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B2965
L0B7A8A  LDA   $0C
         STA   $0E
         LDA   $0B
         STA   $0D
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000C
         TCS
         RTL

L0B7A9C  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B2A02
         LDA   #$0001
         STA   $10
         PHY
         PEI   $0E
         JSL   L0B5681
         PLA
         EOR   #$0001
         CMP   #$0000
         BNE   L0B7AD5
         LDX   #$0000
         LDAL  L051BDE
         DEC
         DEC
         BEQ   L0B7AD2
         INX
L0B7AD2  TXA
         BEQ   L0B7AE4
L0B7AD5  STZ   $10
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B2965
L0B7AE4  LDA   $0C
         STA   $0E
         LDA   $0B
         STA   $0D
         LDA   $09
         TCD
         TSC
         CLC
         ADC   #$000C
         TCS
         RTL

L0B7AF6  PHD
         TSC
         CLC
         ADC   #$FFC6
         TCS
         TCD
         LDA   L055241
         ORA   L05523F
         PHA
         LDA   L055243
         EOR   #$0001
         AND   $01,S
         PLX
         STA   L055245
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   ^L05103C
         PEA   L05103C
         PEA   $0018
         JSL   L0313BE
         PEA   ^L05103C
         PEA   L05103C
         PEA   ^L051054
         PEA   L051054
         PEA   $0018
         JSL   L0313BE
         STZ   L0553A5
         LDA   L0553B5
         LDX   L0553B7
         STA   $33
         STX   $35
         PHY
         PHY
         PEA   ^L052406
         PEA   L052406
         JSL   L071F3F
         PLA
         STA   $2F
         PLX
         STX   $31
         STZ   $29
         TDC
         CLC
         ADC   #$0019
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$002F
         PEA   $0000
         PHA
         JSL   L0B59D0
         TDC
         CLC
         ADC   #$0019
         PEA   $0000
         PHA
         PEA   $0001
         JSL   L0B2AF9
         PHY
         PEA   $0000
         JSL   L0E2DD3
         PLA
         STA   $40
         TDC
         CLC
         ADC   #$0019
         PEA   $0000
         PHA
         JSL   L0B0F05
         PEI   $35
         PEI   $33
         PEA   $0000
         JSL   L0B2AF9
         PEA   ^L05103C
         PEA   L05103C
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0018
         JSL   L0313BE
         TSC
         CLC
         ADC   #$003A
         TCS
         PLD
         RTL

L0B7BC2  PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         PEA   ^L052406
         PEA   L052406
         JSL   L0E06AC
         LDA   #$0005
         CMPL  L051054
         BNE   L0B7BE7
         PEA   ^L051054
         PEA   L051054
         JSL   L0B0D0A
L0B7BE7  PHY
         JSL   L0B7AF6
         PLA
         STA   $01
         PEA   ^L051054
         PEA   L051054
         LDA   L0553B9
         LDX   L0553BB
         CLC
         ADC   #$0020
         BCC   L0B7C02
         INX
L0B7C02  PHX
         PHA
         PEA   $0018
         JSL   L0313BE
         PLY
         PLY
         PLY
         PLD
         RTL

L0B7C10  PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         STZ   $10
         LDA   L055391
         DEC
         PEA   $0012
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L050D34
         LDX   #^L050D34
         BCC   L0B7C31
         INX
L0B7C31  STA   $01
         STX   $03
         LDY   #$0004
         LDA   [$01],Y
         SEC
         SBC   #$0000
         BPL   L0B7C43
         BRL   L0B7D56
L0B7C43  CMP   #$0004
         BMI   L0B7C4B
         BRL   L0B7D56
L0B7C4B  SEC
         SBC   #$0000
         BNE   L0B7C54
         BRL   L0B7CD8
L0B7C54  DEC
         BEQ   L0B7C66
         DEC
         BNE   L0B7C5D
         BRL   L0B7D1E
L0B7C5D  DEC
         BNE   L0B7C63
         BRL   L0B7D17
L0B7C63  BRL   L0B7D56
L0B7C66  LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0010
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         JSL   L033477
         BEQ   L0B7CD6
         LDA   #$0001
         STA   $10
         LDA   #$000A
         CLC
         ADC   $01
         LDX   $03
         BCC   L0B7C91
         INX
L0B7C91  STA   $07
         STX   $09
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$0008
         LDA   [$01],Y
         JSL   L150488
         JSL   L150F53
         STA   [$07]
         TXA
         LDY   #$0002
         STA   [$07],Y
         LDY   #$000C
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         JSL   L0E0DE2
         LDA   L0553BD
         LDX   L0553BF
         PHX
         PHA
         LDY   #$0006
         LDA   [$01],Y
         PHA
         JSL   L0B3CD4
L0B7CD6  BRA   L0B7D56
L0B7CD8  LDY   #$0008
         LDA   [$01],Y
         PHA
         DEY
         DEY
         LDA   [$01],Y
         PHA
         LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         JSL   L033477
         BVS   L0B7CF6
         EOR   #$8000
L0B7CF6  BMI   L0B7D15
         LDA   #$0001
         STA   $10
         LDY   #$0008
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         INC
         BNE   L0B7D0B
         INX
L0B7D0B  LDY   #$0006
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
L0B7D15  BRA   L0B7D56
L0B7D17  LDA   #$0001
         STA   $10
         BRA   L0B7D56
L0B7D1E  LDA   L0553B5
         LDX   L0553B7
         CLC
         ADC   #$0008
         BCC   L0B7D2B
         INX
L0B7D2B  STA   $07
         STX   $09
         LDA   [$07]
         STA   $05
         LDY   #$0006
         LDA   [$01],Y
         PHA
         JSL   L0B2BBB
         PHY
         JSL   L0B7877
         PLA
         LSR
         BCC   L0B7D4E
         PHY
         JSL   L0E0678
         PLA
         STA   $10
L0B7D4E  PEI   $05
         JSL   L0B2BBB
         BRA   L0B7D56
L0B7D56  PLY
         PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B7D5D  ENT
         PHD
         TSC
         SEC
         SBC   #$001E
         TCD
         TCS
         STZ   $24
         LDA   L0553B5
         STA   $07
         LDA   L0553B7
         STA   $09
         LDY   #$0012
         LDA   [$07],Y
         STA   $05
         LDY   #$0008
         LDA   [$07],Y
         STA   $01
         LDY   #$0014
         LDA   [$07],Y
         STA   $03
         BEQ   L0B7DAC
         LDA   $05
         DEC
         ASL
         ASL
         TAY
         LDX   #$0000
         LDA   $01
L0B7D93  CMP   L05008E,Y
         BEQ   L0B7DA3
         INY
         INY
         INY
         INY
         INX
         CPX   $03
         BCC   L0B7D93
         BRA   L0B7DAC
L0B7DA3  INY
         INY
         LDA   L05008E,Y
         TAX
         BRL   L0B7E39
L0B7DAC  LDA   L0553BD
         STA   $0B
         LDA   L0553BF
         STA   $0D
         LDY   #$0006
         LDA   [$0B],Y
         STA   $0F
         INY
         INY
         LDA   [$0B],Y
         STA   $11
         ORA   $0F
         BNE   L0B7DCA
         BRL   L0B7E44
L0B7DCA  PHA
         PEA   ^L050C32
         PEA   L050C32
         JSL   L0B369F
         PEI   $11
         PEI   $0F
         JSL   L03261F
         PLA
         BEQ   L0B7E44
         STA   $13
         LDY   #$000A
         LDA   [$0B],Y
         STA   $15
         INY
         INY
         LDA   [$0B],Y
         STA   $17
         LDA   [$15]
         STA   $19
         LDY   #$0002
         LDA   [$15],Y
         STA   $1B
         DEY
         TYX
         DEY
         LDA   [$0B]
         STA   $1D
L0B7E01  LDA   [$19],Y
         CMP   $13
         BEQ   L0B7E18
         CPX   $1D
         BCS   L0B7E44
         INX
         TYA
         CLC
         ADC   #$000E
         TAY
         BCC   L0B7E01
         INC   $1B
         BRA   L0B7E01
L0B7E18  CLC
         LDA   $05
         ADC   $03
         CMP   #$0200
         BCS   L0B7E39
         DEC
         ASL
         ASL
         TAY
         LDA   $01
         STA   L05008E,Y
         INY
         INY
         TXA
         STA   L05008E,Y
         LDA   $03
         INC
         LDY   #$0014
         STA   [$07],Y
L0B7E39  INC   $24
         PHX
         JSL   L0E0E11
         JSL   L0B0000
L0B7E44  LDX   $1F
         TDC
         CLC
         ADC   #$0020
         TCS
         TXA
         TCD
         RTL

L0B7E4F  ENT
         PHD
         PHY
         PHY
         TSC
         TCD
         LDA   $0A
         BEQ   L0B7E8B
         DEC
         BEQ   L0B7E8B
         STA   $01
         AND   #$FF00
         BEQ   L0B7E67
         LDA   #$FE00
         BRA   L0B7E6A
L0B7E67  LDA   #$FFFE
L0B7E6A  BIT   $01
         BEQ   L0B7E71
         ASL
         BRA   L0B7E6A
L0B7E71  EOR   #$FFFF
         STA   $03
L0B7E76  PHA
         _Random
         PLA
         AND   $03
         SEC
         SBC   $01
         BEQ   L0B7E88
         BPL   L0B7E76
L0B7E88  CLC
         ADC   $01
L0B7E8B  INC
         STA   $0C
         LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         TDC
         TCS
         PLY
         PLY
         PLD
         PLY
         RTL

L0B7E9D  ENT
         PHD
         TSC
         SEC
         SBC   #$001C
         TCD
         TCS
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0E00CC
         TDC
         CLC
         ADC   #$000D
         PEA   $0000
         PHA
         JSL   L0E00CC
         LDX   #$FFFF
         LDY   #$3FFF
         LDA   $22
         CMP   #$0004
         BNE   L0B7ED2
         LDX   #$7FFF
         LDY   #$0000
L0B7ED2  STX   $19
         STY   $1B
         LDA   $01
         AND   $0D
         BEQ   L0B7F1A
         LDX   $03
         LDA   $05
         BPL   L0B7EF0
         EOR   #$FFFF
         TAY
         TXA
         EOR   #$FFFF
         INC
         BNE   L0B7EEE
         INY
L0B7EEE  TAX
         TYA
L0B7EF0  CMP   $1B
         BCC   L0B7EFB
         BNE   L0B7F1A
         TXA
         CMP   $19
         BCS   L0B7F1A
L0B7EFB  LDX   $0F
         LDA   $11
         BPL   L0B7F0F
         EOR   #$FFFF
         TAY
         TXA
         EOR   #$FFFF
         INC
         BNE   L0B7F0D
         INY
L0B7F0D  TAX
         TYA
L0B7F0F  CMP   $1B
         BCC   L0B7F1C
         BNE   L0B7F1A
         TXA
         CMP   $19
         BCC   L0B7F1C
L0B7F1A  BRA   L0B7F53
L0B7F1C  LDA   $22
         BNE   L0B7F2E
         CLC
         LDA   $03
         ADC   $0F
         TAX
         LDA   $05
         ADC   $11
         PHA
         PHX
         BRA   L0B7F4C
L0B7F2E  LSR
         DEC
         BNE   L0B7F40
         SEC
         LDA   $0F
         SBC   $03
         TAX
         LDA   $11
         SBC   $05
         PHA
         PHX
         BRA   L0B7F4C
L0B7F40  LDA   $03
         LDX   $05
         PEI   $11
         PEI   $0F
         JSL   L150D50
L0B7F4C  JSL   L0E0E79
         BRL   L0B7FB1
L0B7F53  LDA   $01
         BEQ   L0B7F6E
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         PEA   $0000
         PHA
         PEA   $030E
         _SANEFP816
L0B7F6E  LDA   $0D
         BEQ   L0B7F89
         TDC
         CLC
         ADC   #$000F
         PEA   $0000
         PHA
         PEA   $0000
         PHA
         PEA   $030E
         _SANEFP816
L0B7F89  TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$000F
         PEA   $0000
         PHA
         PEI   $22
         _SANEFP816
         TDC
         CLC
         ADC   #$000F
         PEA   $0000
         PHA
         JSL   L0E0C71
L0B7FB1  LDA   $20
         STA   $22
         LDA   $1F
         STA   $21
         LDX   $1D
         TDC
         CLC
         ADC   #$0020
         TCS
         TXA
         TCD
         RTL

L0B7FC4  ENT
         PHD
         PHY
         PHY
         PHY
         PHY
         TSC
         TCD
         LDA   #$0000
         TAX
         SEP   #$20
         LDA   [$12]
         STA   $01
         LDA   [$0E]
         STA   $03
         CMP   $01
         BCC   L0B7FDF
         LDA   $01
L0B7FDF  STA   $05
         LDY   #$0000
L0B7FE4  LDA   $05
         BEQ   L0B800B
         DEC   $05
         INY
         LDA   [$12],Y
         TAX
         LDAL  L0714D9,X
         STA   $07
         LDA   [$0E],Y
         TAX
         LDA   $07
         CMPL  L0714D9,X
         BCS   L0B8004
L0B7FFF  LDX   #$FFFF
         BRA   L0B8016
L0B8004  BEQ   L0B7FE4
L0B8006  LDX   #$0001
         BRA   L0B8016
L0B800B  LDX   #$0000
         LDA   $01
         CMP   $03
         BCC   L0B7FFF
         BNE   L0B8006
L0B8016  STX   $16
         REP   #$20
         LDA   $0C
         STA   $14
         LDA   $0B
         STA   $13
         LDX   $09
         TDC
         CLC
         ADC   #$0012
         TCS
         TXA
         TCD
         RTL

L0B802D  ENT
         PHD
         TSC
         TCD
         PEI   $0C
         PEI   $0A
         PEI   $08
         PEI   $06
         PEA   $0008
         _SANEFP816
         STZ   $0E
         BEQ   L0B8050
         BVC   L0B804C
         INC   $0E
         BRA   L0B8050
L0B804C  BPL   L0B8050
         DEC   $0E
L0B8050  LDA   $04
         STA   $0C
         LDA   $03
         STA   $0B
         TDC
         TCS
         PLD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B8060  ENT
         PHD
         TSC
         TCD
         LDX   #$0000
         LDA   $0C
         CMP   $08
         BCC   L0B8079
         BNE   L0B8076
         LDA   $0A
         CMP   $06
         BCC   L0B8079
         BEQ   L0B807A
L0B8076  INX
         BRA   L0B807A
L0B8079  DEX
L0B807A  STX   $0E
         LDA   $04
         STA   $0C
         LDA   $03
         STA   $0B
         TDC
         TCS
         PLD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B808C  ENT
         PHD
         TSC
         SEC
         SBC   #$000A
         TCD
         TCS
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0000
         PHA
         PEA   $0000
         PHA
         JSL   L0E04A7
         PEI   $12
         LDX   $10
         JSL   $E10000
         JSL   L0E0C71
         LDA   $0E
         STA   $12
         LDA   $0D
         STA   $11
         LDX   $0B
         TDC
         CLC
         ADC   #$0010
         TCS
         TXA
         TCD
         RTL

L0B80C8  ENT
         PHD
         TSC
         SEC
         SBC   #$001E
         TCD
         TCS
         TDC
         CLC
         ADC   #$0001
         TAY
         TDC
         CLC
         ADC   #$000B
         TAX
         TDC
         CLC
         ADC   #$0015
         PEA   $0000
         PHA
         PEA   $0000
         PHY
         PEA   $0000
         PHX
         PEA   $0000
         PHA
         PEA   $0000
         PHY
         PEA   $0000
         PHX
         JSL   L0E04A7
         JSL   L0E04A7
         PEI   $24
         _SANEElems816
         JSL   L0E0C71
         LDA   $22
         STA   $24
         LDA   $21
         STA   $23
         LDX   $1F
         TDC
         CLC
         ADC   #$0022
         TCS
         TXA
         TCD
         RTL

L0B8121  ENT
         PHD
         TSC
         TCD
         PEI   $0C
         PEI   $0A
         PEI   $08
         PEI   $06
         PEA   $0510
         _SANEFP816
         LDA   $04
         STA   $0C
         LDA   $03
         STA   $0B
         TDC
         TCS
         PLD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B8146  ENT
         PHB
         PHD
         TSC
         TCD
         PEA   >L0714D9
         PLB
         PLB
         STZ   $0F
         LDA   #$0000
         TAX
         TAY
         SEP   #$20
         DEY
L0B8159  INY
         LDA   [$0B],Y
         BNE   L0B8164
         LDA   [$07],Y
         BEQ   L0B8176
         BRA   L0B8174
L0B8164  TAX
         LDA   L0714D9,X
         PHA
         LDA   [$07],Y
         BEQ   L0B8174
         TAX
         PLA
         CMP   L0714D9,X
         BEQ   L0B8159
L0B8174  INC   $0F
L0B8176  REP   #$20
         LDA   $05
         STA   $0D
         LDA   $03
         STA   $0B
         TDC
         TCS
         PLD
         PLY
         PLY
         PLY
         PLY
         PLB
         RTL

L0B8189  ENT
         PHD
         PHY
         TSC
         TCD
         STZ   $10
         LDA   #$0000
         TAX
         TAY
         SEP   #$20
         DEY
L0B8197  INY
         LDA   [$0C],Y
         BNE   L0B81A2
         LDA   [$08],Y
         BEQ   L0B81B6
         BRA   L0B81AE
L0B81A2  STA   $01
         LDA   [$08],Y
         BEQ   L0B81B4
         CMP   $01
         BEQ   L0B8197
         BCC   L0B81B4
L0B81AE  DEC   $10
         DEC   $11
         BRA   L0B81B6
L0B81B4  INC   $10
L0B81B6  REP   #$20
         LDA   $06
         STA   $0E
         LDA   $05
         STA   $0D
         TDC
         TCS
         PLY
         PLD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B81C9  ENT
         PHD
         PHY
         TSC
         TCD
         PHP
         SEI
         SEP   #$20
         LDAL  $E0C034
         AND   #$F0
         STA   $01
         LDA   $08
         AND   #$0F
         ORA   $01
         STAL  $E0C034
         REP   #$20
         PLP
         LDA   $06
         STA   $08
         LDA   $05
         STA   $07
         TDC
         TCS
         PLY
         PLD
         PLY
         RTL

         PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         LDAL  L0402F1
         STA   $01
         PLY
         PLY
         PLY
         PLD
         RTL

L0B8207  ENT
         PHD
         TSC
         CLC
         ADC   #$FBE4
         TCS
         ADC   #$032B
         TCD
         PHY
         PHY
         PEI   $FA
         PEI   $F8
         JSL   L07AACB
         PLA
         STA   $E9
         PLX
         STX   $EB
         LDA   $E9
         ORA   $EB
         BNE   L0B8232
         PEA   $003D
         JSL   L0727E0
         BRL   L0B837D
L0B8232  PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDE9
         PHA
         PEI   $FA
         PEI   $F8
         JSL   L07AA4B
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         LDX   #$FFE9
         AND   $00,X
         SEC
         SBC   #$0000
         BMI   L0B8298
         BEQ   L0B8298
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   ^L0402CD
         PEA   L0402CD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   ^L0402D2
         PEA   L0402D2
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE9
         PHA
         PEA   $0003
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B8298  LDA   $F6
         BEQ   L0B82FC
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDE9
         PHA
         PEA   $0011
         JSL   L073002
         PEA   $0000
         TDC
         CLC
         ADC   #$FCE9
         PHA
         PEA   $0010
         JSL   L073002
         PEA   $0000
         TDC
         CLC
         ADC   #$FCD5
         PHA
         LDA   L055027
         LDX   L055029
         PHX
         PHA
         JSL   L0715D9
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE9
         PHA
         PEA   $0004
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         BRA   L0B835A
L0B82FC  PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDE9
         PHA
         PEA   $0011
         JSL   L073002
         PEA   $0000
         TDC
         CLC
         ADC   #$FCE9
         PHA
         PEA   $000F
         JSL   L073002
         PEA   $0000
         TDC
         CLC
         ADC   #$FCD5
         PHA
         LDA   L05501F
         LDX   L055021
         PHX
         PHA
         JSL   L0715D9
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE9
         PHA
         PEA   $0004
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B835A  PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEI   $EB
         PEI   $E9
         PEI   $FA
         PEI   $F8
         LDA   L055039
         LDX   L05503B
         PHX
         PHA
         PEA   $0000
         PEA   $FFFF
         JSL   L0F0000
L0B837D  LDA   $F4
         STA   $FA
         LDA   $F3
         STA   $F9
         LDA   $F1
         TCD
         TSC
         CLC
         ADC   #$0424
         TCS
         RTL

L0B838F  ENT
         PHD
         TSC
         CLC
         ADC   #$FBA4
         TCS
         ADC   #$036D
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFA7
         PHA
         PEI   $F6
         PEI   $F4
         PEA   $002A
         JSL   L0313BE
         LDA   L05501F
         LDX   L055021
         CMP   $F8
         BNE   L0B83BA
         CPX   $FA
L0B83BA  BNE   L0B83DE
         TDC
         CLC
         ADC   #$00D1
         PEA   $0000
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDA7
         PHA
         PEA   $001D
         JSL   L073002
         PEA   $0014
         JSL   L0313BE
         BRA   L0B83FE
L0B83DE  TDC
         CLC
         ADC   #$00D1
         PEA   $0000
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDA7
         PHA
         PEA   $001C
         JSL   L073002
         PEA   $0014
         JSL   L0313BE
L0B83FE  LDA   #$000F
         LDX   #$FFAB
         AND   $00,X
         DEC
         DEC
         BNE   L0B8411
         LDA   #$0012
         STA   $E5
         BRA   L0B8416
L0B8411  LDA   #$0013
         STA   $E5
L0B8416  PHY
         PHY
         PEI   $FA
         PEI   $F8
         LDX   #$FFA9
         LDA   $00,X
         PHA
         JSL   L07AE68
         PLA
         STA   $E7
         PLX
         STX   $E9
         LDA   $E7
         ORA   $E9
         BNE   L0B843C
         PEA   $003D
         JSL   L0727E0
         BRL   L0B8537
L0B843C  PEA   $0000
         TDC
         CLC
         ADC   #$FFD1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDA7
         PHA
         PEI   $FA
         PEI   $F8
         LDX   #$FFA9
         LDA   $00,X
         PHA
         JSL   L07ACF0
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         LDX   #$FFD1
         AND   $00,X
         SEC
         SBC   #$0000
         BMI   L0B84A8
         BEQ   L0B84A8
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD1
         PHA
         PEA   ^L0402D4
         PEA   L0402D4
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD1
         PHA
         PEA   ^L0402D9
         PEA   L0402D9
         PEA   $0000
         TDC
         CLC
         ADC   #$FEA7
         PHA
         PEA   $0003
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
L0B84A8  PEA   $0000
         TDC
         CLC
         ADC   #$FFD1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDA7
         PHA
         PEA   $0011
         JSL   L073002
         TDC
         CLC
         ADC   #$00D1
         PEA   $0000
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FCA7
         PHA
         PEI   $E5
         JSL   L073002
         PEA   $0000
         TDC
         CLC
         ADC   #$FC93
         PHA
         LDX   #$FFA9
         LDA   $00,X
         JSL   L150488
         PHX
         PHA
         JSL   L07346C
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD1
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FEA7
         PHA
         PEA   $0005
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FFD1
         PHA
         PEI   $E9
         PEI   $E7
         PEI   $FA
         PEI   $F8
         LDA   L055039
         LDX   L05503B
         PHX
         PHA
         LDX   #$FFA9
         LDA   $00,X
         PHA
         PEA   $FFFF
         JSL   L0F0000
L0B8537  LDA   $F2
         STA   $FA
         LDA   $F1
         STA   $F9
         LDA   $EF
         TCD
         TSC
         CLC
         ADC   #$0466
         TCS
         RTL

L0B8549  ENT
         PHD
         TSC
         CLC
         ADC   #$F9F8
         TCS
         ADC   #$0511
         TCD
         PHY
         PHY
         JSL   L076220
         PLA
         STA   $EF
         PLX
         STX   $F1
         LDA   $EF
         ORA   $F1
         BNE   L0B8570
         PEA   $003D
         JSL   L0727E0
         BRL   L0B85FF
L0B8570  PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDEF
         PHA
         PEA   $0011
         JSL   L073002
         PEA   $0000
         TDC
         CLC
         ADC   #$FCEF
         PHA
         PEA   $000E
         JSL   L073002
         PEA   $0000
         TDC
         CLC
         ADC   #$FBEF
         PHA
         LDA   L05503F
         LDX   L055041
         PHX
         PHA
         JSL   L072CD4
         PEA   $0000
         TDC
         CLC
         ADC   #$FAEF
         PHA
         LDA   L055043
         LDX   L055045
         PHX
         PHA
         JSL   L072CD4
         PEA   $0000
         TDC
         CLC
         ADC   #$FEEF
         PHA
         PEA   $0004
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEF
         PHA
         PEI   $F1
         PEI   $EF
         PEA   $0000
         PEA   $0000
         LDA   L055039
         LDX   L05503B
         PHX
         PHA
         PEA   $0000
         PEA   $FFFF
         JSL   L0F0000
L0B85FF  TSC
         CLC
         ADC   #$0608
         TCS
         PLD
         RTL

L0B8607  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   #$0001
         STA   $05
L0B8614  LDA   $05
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B862A
         INX
L0B862A  STA   $01
         STX   $03
         LDY   #$0004
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   L055039
         BNE   L0B8640
         CPX   L05503B
L0B8640  BEQ   L0B8647
         LDA   #$0000
         BRA   L0B864A
L0B8647  LDA   #$0001
L0B864A  BEQ   L0B867F
         PHA
         LDX   #$0000
         LDA   #$0003
         CMP   [$01]
         BNE   L0B8658
         INX
L0B8658  TXA
         BNE   L0B866A
         PHA
         LDX   #$0000
         LDA   [$01]
         DEC
         DEC
         BNE   L0B8666
         INX
L0B8666  TXA
         ORA   $01,S
         PLX
L0B866A  PHA
         PLA
         BNE   L0B867C
         PHA
         LDX   #$0000
         LDA   [$01]
         DEC
         BNE   L0B8678
         INX
L0B8678  TXA
         ORA   $01,S
         PLX
L0B867C  AND   $01,S
         PLX
L0B867F  CMP   #$0000
         BEQ   L0B86A6
         LDY   #$0008
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   $12
         BNE   L0B8694
         CPX   $14
L0B8694  BEQ   L0B869B
         LDA   #$0000
         BRA   L0B869E
L0B869B  LDA   #$0001
L0B869E  BEQ   L0B86A6
         PEI   $05
         JSL   L0B1A0C
L0B86A6  LDA   #$0040
         CMP   $05
         BEQ   L0B86B2
         INC   $05
         BRL   L0B8614
L0B86B2  LDA   $0E
         STA   $14
         LDA   $0D
         STA   $13
         LDA   $0B
         TCD
         TSC
         CLC
         ADC   #$0012
         TCS
         RTL

L0B86C4  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   #$0001
         STA   $05
L0B86D1  LDA   $05
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B86E7
         INX
L0B86E7  STA   $01
         STX   $03
         LDY   #$0004
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   L055039
         BNE   L0B86FD
         CPX   L05503B
L0B86FD  BEQ   L0B8704
         LDA   #$0000
         BRA   L0B8707
L0B8704  LDA   #$0001
L0B8707  BEQ   L0B8771
         LDX   #$0000
         LDA   [$01]
         DEC
         DEC
         BNE   L0B8713
         INX
L0B8713  TXA
         BEQ   L0B8734
         PHA
         LDY   #$000C
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   $12
         BNE   L0B8727
         CPX   $14
L0B8727  BEQ   L0B872E
         LDA   #$0000
         BRA   L0B8731
L0B872E  LDA   #$0001
L0B8731  AND   $01,S
         PLX
L0B8734  PHA
         PLA
         BNE   L0B8766
         PHA
         LDX   #$0000
         LDA   [$01]
         DEC
         BNE   L0B8742
         INX
L0B8742  TXA
         BEQ   L0B8763
         PHA
         LDY   #$0012
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   $12
         BNE   L0B8756
         CPX   $14
L0B8756  BEQ   L0B875D
         LDA   #$0000
         BRA   L0B8760
L0B875D  LDA   #$0001
L0B8760  AND   $01,S
         PLX
L0B8763  ORA   $01,S
         PLX
L0B8766  CMP   #$0000
         BEQ   L0B8771
         PEI   $05
         JSL   L0B1A0C
L0B8771  LDA   #$0040
         CMP   $05
         BEQ   L0B877D
         INC   $05
         BRL   L0B86D1
L0B877D  LDA   $0E
         STA   $14
         LDA   $0D
         STA   $13
         LDA   $0B
         TCD
         TSC
         CLC
         ADC   #$0012
         TCS
         RTL

L0B878F  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   #$0001
         STA   $05
L0B879C  LDA   $05
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B87B2
         INX
L0B87B2  STA   $01
         STX   $03
         LDX   #$0000
         LDA   [$01]
         DEC
         BNE   L0B87BF
         INX
L0B87BF  TXA
         BEQ   L0B87E2
         PHA
         LDY   #$0004
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   L055039
         BNE   L0B87D5
         CPX   L05503B
L0B87D5  BEQ   L0B87DC
         LDA   #$0000
         BRA   L0B87DF
L0B87DC  LDA   #$0001
L0B87DF  AND   $01,S
         PLX
L0B87E2  PHA
         PLA
         BEQ   L0B8804
         PHA
         LDY   #$0012
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   $12
         BNE   L0B87F7
         CPX   $14
L0B87F7  BEQ   L0B87FE
         LDA   #$0000
         BRA   L0B8801
L0B87FE  LDA   #$0001
L0B8801  AND   $01,S
         PLX
L0B8804  CMP   #$0000
         BEQ   L0B881F
         LDX   #$0000
         LDY   #$000E
         LDA   $10
         CMP   [$01],Y
         BNE   L0B8816
         INX
L0B8816  TXA
         BEQ   L0B881F
         PEI   $05
         JSL   L0B1A0C
L0B881F  LDA   #$0040
         CMP   $05
         BEQ   L0B882B
         INC   $05
         BRL   L0B879C
L0B882B  LDA   $0E
         STA   $14
         LDA   $0D
         STA   $13
         LDA   $0B
         TCD
         TSC
         CLC
         ADC   #$0012
         TCS
         RTL

L0B883D  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   #$0001
         STA   $05
L0B884A  LDA   $05
         DEC
         PEA   $002C
         JSL   L150BEE
         PLX
         TXA
         CLC
         ADC   #L0510DE
         LDX   #^L0510DE
         BCC   L0B8860
         INX
L0B8860  STA   $01
         STX   $03
         LDA   [$01]
         BEQ   L0B886B
         LDA   #$0001
L0B886B  BEQ   L0B888F
         LDY   #$0004
         LDA   [$01],Y
         TAX
         DEY
         DEY
         LDA   [$01],Y
         CMP   $12
         BNE   L0B887D
         CPX   $14
L0B887D  BEQ   L0B8884
         LDA   #$0000
         BRA   L0B8887
L0B8884  LDA   #$0001
L0B8887  BEQ   L0B888F
         PEI   $05
         JSL   L0B1A0C
L0B888F  LDA   #$0040
         CMP   $05
         BEQ   L0B889A
         INC   $05
         BRA   L0B884A
L0B889A  LDA   $0E
         STA   $14
         LDA   $0D
         STA   $13
         LDA   $0B
         TCD
         TSC
         CLC
         ADC   #$0012
         TCS
         RTL

L0B88AC  ENT
         PHD
         TSC
         CLC
         ADC   #$FFD6
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEI   $32
         PEI   $30
         PEA   $0020
         JSL   L0313BE
         PHY
         PEA   ^L051C38
         PEA   L051C38
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B01D3
         PLA
         STA   $21
         LDA   $21
         BEQ   L0B88FD
         PEA   ^L051C38
         PEA   L051C38
         PEI   $21
         JSL   L0B3A6A
         PHY
         PHY
         JSL   L0E04DE
         PLA
         STA   $23
         PLX
         STX   $25
         BRA   L0B8927
L0B88FD  PHY
         PHY
         PEA   $0000
         PEA   $0001
         LDA   L055019
         PHA
         JSL   L0B249C
         PLA
         STA   $23
         PLX
         STX   $25
         LDY   #$0002
         LDA   [$23],Y
         TAX
         LDA   [$23]
         STA   $27
         STX   $29
         SEP   #$20
         LDA   #$00
         STA   [$27]
         REP   #$20
L0B8927  LDA   $23
         LDX   $25
         STA   $34
         STX   $36
         LDA   $2E
         STA   $32
         LDA   $2D
         STA   $31
         LDA   $2B
         TCD
         TSC
         CLC
         ADC   #$0030
         TCS
         RTL

L0B8941  PHD
         TSC
         CLC
         ADC   #$FCEE
         TCS
         ADC   #$0221
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE5
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $0100
         JSL   L0313BE
         LDA   #$00FF
         LDX   #$FEE5
         AND   $00,X
         STA   $E7
         LDAL  L0402DB
         SEP   #$20
         STA   [$FC]
         REP   #$20
         LDA   $E7
         BNE   L0B897B
         BRL   L0B8AA4
L0B897B  LDA   #$0001
         STA   $EB
L0B8980  LDA   $F6
         SEC
         SBC   #$0001
         BEQ   L0B89B5
         BVS   L0B898D
         EOR   #$8000
L0B898D  BPL   L0B89B5
         LDA   $E7
         CMP   $EB
         BNE   L0B8998
         BRL   L0B8AA4
L0B8998  LDA   $EB
         CLC
         ADC   #$FEE5
         TAX
         LDA   #$00FF
         AND   $00,X
         CMP   #$002C
         BNE   L0B89AE
         LDA   $F6
         DEC
         STA   $F6
L0B89AE  LDA   $EB
         INC
         STA   $EB
         BRA   L0B8980
L0B89B5  LDA   $EB
         STA   $E9
L0B89B9  LDA   $E9
         CLC
         ADC   #$FEE5
         TAX
         LDA   #$00FF
         AND   $00,X
         CMP   #$002C
         BNE   L0B89CF
         LDA   #$0000
         BRA   L0B89D2
L0B89CF  LDA   #$0001
L0B89D2  PHA
         LDA   $E9
         SEC
         SBC   $E7
         BVS   L0B89DD
         EOR   #$8000
L0B89DD  BPL   L0B89E4
         LDA   #$0000
         BRA   L0B89E7
L0B89E4  LDA   #$0001
L0B89E7  AND   $01,S
         PLX
         LSR
         BCC   L0B89F4
         LDA   $E9
         INC
         STA   $E9
         BRA   L0B89B9
L0B89F4  LDA   $E9
         CLC
         ADC   #$FEE5
         TAX
         LDA   #$00FF
         AND   $00,X
         CMP   #$002C
         BNE   L0B8A0A
         LDA   $E9
         DEC
         STA   $E9
L0B8A0A  LDAL  L0402DC
         LDX   #$FFE5
         SEP   #$20
         STA   $00,X
         REP   #$20
         LDA   $EB
         LDX   #$FDE3
         STA   $00,X
         LDA   $E9
         LDX   #$FDE1
         STA   $00,X
         LDX   #$FDE1
         LDA   $00,X
         LDX   #$FDE3
         SEC
         SBC   $00,X
         BVS   L0B8A35
         EOR   #$8000
L0B8A35  BPL   L0B8A90
         LDX   #$FDE3
         LDA   $00,X
         STA   $E5
L0B8A3E  PEA   $0000
         TDC
         CLC
         ADC   #$FFE5
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE5
         PHA
         LDA   $E5
         CLC
         ADC   #$FEE5
         TAX
         LDA   #$00FF
         AND   $00,X
         XBA
         INC
         LDX   #$FDDF
         STA   $00,X
         PEA   $0000
         TDC
         CLC
         ADC   #$FDDF
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FDE5
         PHA
         PEA   $0002
         JSL   L1509CE
         PEA   $0100
         JSL   L0313BE
         LDA   $E5
         LDX   #$FDE1
         CMP   $00,X
         BEQ   L0B8A90
         INC   $E5
         BRA   L0B8A3E
L0B8A90  PEI   $FE
         PEI   $FC
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE5
         PHA
         PEA   $0100
         JSL   L0313BE
L0B8AA4  LDA   $F4
         STA   $FA
         LDA   $F3
         STA   $F9
         LDA   $F1
         TCD
         TSC
         CLC
         ADC   #$031A
         TCS
         RTL

L0B8AB6  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF8
         TCS
         TCD
         PEA   ^L0402DD
         PEA   L0402DD
         JSL   L0B2C0A
         LDA   #$0001
         STA   L05539D
         STZ   L0553A5
         LDA   L0553C3
         SEC
         SBC   #$0000
         BPL   L0B8ADD
         STZ   L0553C3
L0B8ADD  LDA   L0553C3
         SEC
         SBC   #$0000
         BMI   L0B8B0D
         BEQ   L0B8B0D
         LDA   L0553C3
         STA   $01
         LDA   $01
         SEC
         SBC   #$0001
         BVS   L0B8AF8
         EOR   #$8000
L0B8AF8  BPL   L0B8B0D
         LDA   #$0001
         STA   $03
L0B8AFF  JSL   L0E0000
         LDA   $03
         CMP   $01
         BEQ   L0B8B0D
         INC   $03
         BRA   L0B8AFF
L0B8B0D  LDA   L0553B5
         ORA   L0553B7
         BEQ   L0B8B1B
         STZ   L0553B5
         STZ   L0553B7
L0B8B1B  LDA   L055391
         BEQ   L0B8B23
         STZ   L055391
L0B8B23  LDA   L055371
         BEQ   L0B8B2B
         STZ   L055371
L0B8B2B  LDA   L05539B
         BEQ   L0B8B33
         STZ   L05539B
L0B8B33  PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B8B39  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         STZ   L05535F
         JSL   L160694
         JSL   L1606A2
         PLY
         PLY
         PLD
         RTL

L0B8B50  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   L0553B9
         LDX   L0553BB
         STA   $01
         STX   $03
         LDA   #L051BE6
         LDX   #^L051BE6
         STA   L0553B9
         STX   L0553BB
         PEA   ^L051054
         PEA   L051054
         JSL   L0B0D0A
         PHY
         JSL   L0B7AF6
         PLA
         STA   $05
         LDA   $01
         LDX   $03
         STA   L0553B9
         STX   L0553BB
         PLY
         PLY
         PLY
         PLY
         PLY
         PLD
         RTL

L0B8B91  ENT
         PHD
         TSC
         CLC
         ADC   #$FFF6
         TCS
         TCD
         LDA   $18
         BNE   L0B8B9F
         BRA   L0B8C05
L0B8B9F  LDA   L0553B9
         LDX   L0553BB
         STA   $01
         STX   $03
         LDA   #L051BE6
         LDX   #^L051BE6
         STA   L0553B9
         STX   L0553BB
         PEA   ^L051054
         PEA   L051054
         JSL   L0B0D0A
         LDA   #$0001
         STAL  L051054
         LDA   $10
         LDX   $12
         STAL  L05105A
         TXA
         STAL  L05105C
         LDA   $14
         LDX   $16
         STAL  L05105E
         TXA
         STAL  L051060
         LDA   $1A
         LDX   $1C
         STAL  L051064
         TXA
         STAL  L051066
         LDA   $18
         STAL  L051062
         PHY
         JSL   L0B7AF6
         PLA
         STA   $05
         LDA   $01
         LDX   $03
         STA   L0553B9
         STX   L0553BB
L0B8C05  LDA   $0E
         STA   $1C
         LDA   $0D
         STA   $1B
         LDA   $0B
         TCD
         TSC
         CLC
         ADC   #$001A
         TCS
         RTL

L0B8C17  ENT
         PHD
         TSC
         CLC
         ADC   #$FFD6
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEI   $36
         PEI   $34
         PEA   $0020
         JSL   L0313BE
         PHY
         PEA   ^L051C38
         PEA   L051C38
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B01D3
         PLA
         STA   $25
         LDA   $25
         BNE   L0B8C65
         PHY
         PEA   ^L051C38
         PEA   L051C38
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L0B2819
         PLA
         STA   $25
L0B8C65  PEI   $32
         PEI   $30
         JSL   L0E0CB5
         PEA   ^L051C38
         PEA   L051C38
         PEI   $25
         JSL   L0B3CD4
         LDA   $2E
         STA   $36
         LDA   $2D
         STA   $35
         LDA   $2B
         TCD
         TSC
         CLC
         ADC   #$0034
         TCS
         RTL

L0B8C8B  ENT
         PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         JSL   L0301CE
         JSL   L0B392B
L0B8C9B  PHY
         JSL   L0301E4
         PLA
         BNE   L0B8C9B
         PLY
         PLY
         PLD
         RTL

L0B8CA7  PHD
         TSC
         CLC
         ADC   #$FFFC
         TCS
         TCD
         LDA   $0A
         BEQ   L0B8CC6
         PEI   $0E
         PEI   $0C
         PEA   ^L0402E6
         PEA   L0402E6
         PEA   $0005
         JSL   L0313BE
         BRA   L0B8CD7
L0B8CC6  PEI   $0E
         PEI   $0C
         PEA   ^L0402EB
         PEA   L0402EB
         PEA   $0006
         JSL   L0313BE
L0B8CD7  LDA   $08
         STA   $0A
         LDA   $07
         STA   $09
         LDA   $05
         TCD
         PLY
         PLY
         PLY
         PLY
         RTL

L0B8CE7  PHD
         TSC
         CLC
         ADC   #$FFEA
         TCS
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $11
         PEA   ^L0532BD
         PEA   L0532BD
         JSL   L082712
         LDA   $1C
         DEC
         BMI   L0B8D76
         CMP   #$0005
         BPL   L0B8D76
         SEC
         SBC   #$0000
         BEQ   L0B8D1D
         DEC
         DEC
         BEQ   L0B8D2C
         DEC
         BEQ   L0B8D43
         DEC
         BEQ   L0B8D5A
         BRA   L0B8D76
L0B8D1D  STZ   L055139
         PEA   ^L05310F
         PEA   L05310F
         JSL   L082712
         BRA   L0B8D76
L0B8D2C  LDA   L055101
         LDX   L055103
         PHX
         PHA
         PEA   $0000
         PEA   ^L053259
         PEA   L053259
         JSL   L085B3C
         BRA   L0B8D76
L0B8D43  LDA   L055101
         LDX   L055103
         PHX
         PHA
         PEA   $FFFF
         PEA   ^L053259
         PEA   L053259
         JSL   L085B3C
         BRA   L0B8D76
L0B8D5A  PEA   ^L053259
         PEA   L053259
         LDA   L055105
         LDX   L055107
         PHX
         PHA
         LDA   L055101
         LDX   L055103
         PHX
         PHA
         JSL   L1606B0
         BRA   L0B8D76
L0B8D76  LDA   $1C
         SEC
         SBC   #$0001
         BEQ   L0B8DFB
         BVS   L0B8D83
         EOR   #$8000
L0B8D83  BPL   L0B8DFB
         TDC
         CLC
         ADC   #$0009
         PEA   $0000
         PHA
         JSL   L082712
         LDA   L055101
         LDX   L055103
         PHX
         PHA
         TDC
         CLC
         ADC   #$0009
         PEA   $0000
         PHA
         JSL   L08295E
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L082712
         LDA   L055105
         LDX   L055107
         PHX
         PHA
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         JSL   L082766
         TDC
         CLC
         ADC   #$0009
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   ^L05310F
         PEA   L05310F
         JSL   L081E5F
         LDA   #$0001
         STA   L055137
         LDA   #$0001
         STA   L055133
         PEA   ^L0532B5
         PEA   L0532B5
         JSL   L082712
L0B8DFB  JSL   L096029
         JSL   L09AED3
         PEI   $11
         JSL   L071AA4
         LDA   $1A
         STA   $1C
         LDA   $19
         STA   $1B
         LDA   $17
         TCD
         TSC
         CLC
         ADC   #$001A
         TCS
         RTL

L0B8E1B  PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $01
         PEI   $0E
         PEI   $0C
         JSL   L0E0EA8
         PHY
         JSL   L0B5955
         PLA
         LSR
         BCC   L0B8E4A
         PHY
         PHY
         JSL   L0E04DE
         PLA
         STA   $10
         PLX
         STX   $12
         BRA   L0B8E4E
L0B8E4A  STZ   $10
         STZ   $12
L0B8E4E  PEI   $01
         JSL   L071AA4
         LDA   $0A
         STA   $0E
         LDA   $09
         STA   $0D
         LDA   $07
         TCD
         TSC
         CLC
         ADC   #$000C
         TCS
         RTL

L0B8E66  PHD
         TSC
         CLC
         ADC   #$FEFA
         TCS
         ADC   #$0013
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $ED
         PEI   $FA
         PEI   $F8
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         JSL   L0B1426
         PHY
         LDA   #$00FF
         LDX   #$FFED
         AND   $00,X
         PHA
         PEA   $001F
         JSL   L072FD5
         PLA
         LDX   #$FFED
         SEP   #$20
         STA   $00,X
         REP   #$20
         PEI   $FE
         PEI   $FC
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         PEA   $0020
         JSL   L0313BE
         PEI   $ED
         JSL   L071AA4
         LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$010C
         TCS
         RTL

L0B8ED1  PHD
         TSC
         CLC
         ADC   #$FFF4
         TCS
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $18
         LDA   $14
         LDX   $16
         STA   $05
         STX   $07
         LDA   #$0001
         STA   [$05]
         LDA   #$0000
         LDY   #$0022
         STA   [$05],Y
         LDA   #$0024
         CLC
         ADC   $05
         LDX   $07
         BCC   L0B8F01
         INX
L0B8F01  STA   $01
         STX   $03
         LDA   #$0002
         STA   [$01]
         LDA   $12
         BEQ   L0B8F20
         LDA   L055027
         LDX   L055029
         LDY   #$0002
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         BRA   L0B8F30
L0B8F20  LDA   L05501F
         LDX   L055021
         LDY   #$0002
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
L0B8F30  LDA   L055027
         LDX   L055029
         LDY   #$000A
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         LDA   L05501F
         LDX   L055021
         LDY   #$0006
         STA   [$01],Y
         INY
         INY
         TXA
         STA   [$01],Y
         LDA   $10
         STA   $16
         LDA   $0F
         STA   $15
         LDA   $0D
         TCD
         TSC
         CLC
         ADC   #$0014
         TCS
         RTL

L0B8F62  PHD
         TSC
         CLC
         ADC   #$FEA6
         TCS
         ADC   #$0069
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FF97
         PHA
         PEI   $F8
         PEI   $F6
         PEA   $0100
         JSL   L0313BE
         PHY
         TDC
         CLC
         ADC   #$0099
         PEA   $0000
         PHA
         PEI   $FA
         JSL   L0B8ED1
         PLA
         STA   $97
         LDA   #$0001
         STA   $CB
         TDC
         CLC
         ADC   #$00CD
         PEA   $0000
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FF97
         PHA
         PEA   $0020
         JSL   L0313BE
         TDC
         CLC
         ADC   #$0099
         PEA   $0000
         PHA
         JSL   L0E0BFC
         PHY
         PHY
         JSL   L0E04DE
         PLA
         STA   $FC
         PLX
         STX   $FE
         PEI   $97
         JSL   L071AA4
         LDA   $F4
         STA   $FA
         LDA   $F3
         STA   $F9
         LDA   $F1
         TCD
         TSC
         CLC
         ADC   #$0162
         TCS
         RTL

L0B8FE3  PHD
         TSC
         CLC
         ADC   #$FFA6
         TCS
         TCD
         PHY
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         PEI   $62
         JSL   L0B8ED1
         PLA
         STA   $01
         LDA   #$0002
         STA   $35
         LDA   $60
         JSL   L150488
         STA   $37
         STX   $39
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         JSL   L0E0BFC
         PHY
         PHY
         JSL   L0E04DE
         PLA
         STA   $64
         PLX
         STX   $66
         PEI   $01
         JSL   L071AA4
         LDA   $5E
         STA   $62
         LDA   $5D
         STA   $61
         LDA   $5B
         TCD
         TSC
         CLC
         ADC   #$0060
         TCS
         RTL

L0B903E  PHD
         TSC
         CLC
         ADC   #$FFA6
         TCS
         TCD
         PHY
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         PEI   $62
         JSL   L0B8ED1
         PLA
         STA   $01
         LDA   #$0003
         STA   $35
         LDA   $60
         STA   $37
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         JSL   L0E0BFC
         PHY
         PHY
         JSL   L0E04DE
         PLA
         STA   $64
         PLX
         STX   $66
         PEI   $01
         JSL   L071AA4
         LDA   $5E
         STA   $62
         LDA   $5D
         STA   $61
         LDA   $5B
         TCD
         TSC
         CLC
         ADC   #$0060
         TCS
         RTL

L0B9093  PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $01
         PHY
         PHY
         PEI   $0E
         PEI   $0C
         JSL   L0B88AC
         PLA
         STA   $10
         PLX
         STX   $12
         PEI   $01
         JSL   L071AA4
         LDA   $0A
         STA   $0E
         LDA   $09
         STA   $0D
         LDA   $07
         TCD
         TSC
         CLC
         ADC   #$000C
         TCS
         RTL

L0B90CB  PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $01
         LDA   L055139
         BNE   L0B9108
         LDA   L055119
         LDX   L05511B
         PHX
         PHA
         LDA   L055101
         LDX   L055103
         PHX
         PHA
         LDA   L055105
         LDX   L055107
         PHX
         PHA
         PEA   ^L05310F
         PEA   L05310F
         JSL   L083523
         LDA   #$0001
         STA   L055139
L0B9108  PEI   $12
         PEI   $10
         PEA   ^L053219
         PEA   L053219
         PEA   $0010
         JSL   L0313BE
         PEI   $0E
         PEI   $0C
         PEA   ^L053209
         PEA   L053209
         PEA   $0010
         JSL   L0313BE
         PEI   $01
         JSL   L071AA4
         LDA   $0A
         STA   $12
         LDA   $09
         STA   $11
         LDA   $07
         TCD
         TSC
         CLC
         ADC   #$0010
         TCS
         RTL

L0B9142  PHD
         TSC
         CLC
         ADC   #$FFF2
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEI   $1A
         PEI   $18
         PEA   $0008
         JSL   L0313BE
         PHY
         JSL   L071BFF
         PLA
         STA   $09
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEA   $0000
         PEA   $0008
         PEA   $000C
         JSL   L0E07C5
         PEI   $16
         PEI   $14
         JSL   L0E06AC
         PEI   $09
         JSL   L071AA4
         LDA   $12
         STA   $1A
         LDA   $11
         STA   $19
         LDA   $0F
         TCD
         TSC
         CLC
         ADC   #$0018
         TCS
         RTL

L0B919C  PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $01
         TDC
         CLC
         ADC   #$0010
         PEA   $0000
         PHA
         PEA   $0000
         PEA   $0004
         PEA   $000B
         JSL   L0E07C5
         PEI   $0E
         PEI   $0C
         JSL   L0E06AC
         PEI   $01
         JSL   L071AA4
         LDA   $0A
         STA   $12
         LDA   $09
         STA   $11
         LDA   $07
         TCD
         TSC
         CLC
         ADC   #$0010
         TCS
         RTL

L0B91E2  PHD
         TSC
         CLC
         ADC   #$FEFA
         TCS
         ADC   #$0013
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $0100
         JSL   L0313BE
         PHY
         JSL   L071BFF
         PLA
         STA   $ED
         PEA   ^L052406
         PEA   L052406
         PEA   $0000
         TDC
         CLC
         ADC   #$FFED
         PHA
         PEA   $0100
         JSL   L0313BE
         JSL   L0B8B50
         PEI   $ED
         JSL   L071AA4
         LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$010C
         TCS
         RTL

L0B923B  PHD
         TSC
         CLC
         ADC   #$FEF8
         TCS
         ADC   #$0015
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEB
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $0100
         JSL   L0313BE
         PHY
         JSL   L071BFF
         PLA
         STA   $ED
         PEA   ^L051054
         PEA   L051054
         JSL   L0B0D0A
         LDA   #$0005
         STAL  L051054
         PEA   ^L052406
         PEA   L052406
         PEA   $0000
         TDC
         CLC
         ADC   #$FFEB
         PHA
         PEA   $0100
         JSL   L0313BE
         PHY
         JSL   L0B7AF6
         PLA
         STA   $EB
         PEI   $ED
         JSL   L071AA4
         LDA   $F6
         STA   $FA
         LDA   $F5
         STA   $F9
         LDA   $F3
         TCD
         TSC
         CLC
         ADC   #$010E
         TCS
         RTL

L0B92A9  PHD
         TSC
         CLC
         ADC   #$FEA6
         TCS
         ADC   #$006D
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FF93
         PHA
         PEI   $F8
         PEI   $F6
         PEA   $0100
         JSL   L0313BE
         PHY
         TDC
         CLC
         ADC   #$0095
         PEA   $0000
         PHA
         PEI   $FA
         JSL   L0B8ED1
         PLA
         STA   $93
         LDA   #$0001
         STA   $C7
         TDC
         CLC
         ADC   #$00C9
         PEA   $0000
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FF93
         PHA
         PEA   $0020
         JSL   L0313BE
         PEI   $F4
         PEI   $F2
         JSL   L0E0CB5
         TDC
         CLC
         ADC   #$0095
         PEA   $0000
         PHA
         PEA   $0002
         JSL   L0E0184
         PEI   $93
         JSL   L071AA4
         LDA   $F0
         STA   $FA
         LDA   $EF
         STA   $F9
         LDA   $ED
         TCD
         TSC
         CLC
         ADC   #$0166
         TCS
         RTL

L0B9329  PHD
         TSC
         CLC
         ADC   #$FFA6
         TCS
         TCD
         PHY
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         PEI   $66
         JSL   L0B8ED1
         PLA
         STA   $01
         LDA   #$0002
         STA   $35
         LDA   $64
         JSL   L150488
         STA   $37
         STX   $39
         PEI   $62
         PEI   $60
         JSL   L0E0CB5
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         PEA   $0002
         JSL   L0E0184
         PEI   $01
         JSL   L071AA4
         LDA   $5E
         STA   $66
         LDA   $5D
         STA   $65
         LDA   $5B
         TCD
         TSC
         CLC
         ADC   #$0064
         TCS
         RTL

L0B9383  PHD
         TSC
         CLC
         ADC   #$FFA6
         TCS
         TCD
         PHY
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         PEI   $66
         JSL   L0B8ED1
         PLA
         STA   $01
         LDA   #$0003
         STA   $35
         LDA   $64
         STA   $37
         PEI   $62
         PEI   $60
         JSL   L0E0CB5
         TDC
         CLC
         ADC   #$0003
         PEA   $0000
         PHA
         PEA   $0002
         JSL   L0E0184
         PEI   $01
         JSL   L071AA4
         LDA   $5E
         STA   $66
         LDA   $5D
         STA   $65
         LDA   $5B
         TCD
         TSC
         CLC
         ADC   #$0064
         TCS
         RTL

L0B93D7  PHD
         TSC
         CLC
         ADC   #$FFFA
         TCS
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $01
         PEI   $12
         PEI   $10
         PEI   $0E
         PEI   $0C
         JSL   L0B8C17
         PEI   $01
         JSL   L071AA4
         LDA   $0A
         STA   $12
         LDA   $09
         STA   $11
         LDA   $07
         TCD
         TSC
         CLC
         ADC   #$0010
         TCS
         RTL

L0B940B  PHD
         TSC
         CLC
         ADC   #$FFD8
         TCS
         TCD
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         PEI   $30
         PEI   $2E
         PEA   $0020
         JSL   L0313BE
         PHY
         JSL   L071BFF
         PLA
         STA   $21
         PHY
         TDC
         CLC
         ADC   #$0001
         PEA   $0000
         PHA
         TDC
         CLC
         ADC   #$0023
         PEA   $0000
         PHA
         JSL   L0B05B4
         PLA
         LSR
         BCS   L0B944C
         STZ   $23
L0B944C  LDA   $23
         STA   $32
         PEI   $21
         JSL   L071AA4
         LDA   $2C
         STA   $30
         LDA   $2B
         STA   $2F
         LDA   $29
         TCD
         TSC
         CLC
         ADC   #$002E
         TCS
         RTL

L0B9468  PHD
         TSC
         CLC
         ADC   #$FFE6
         TCS
         TCD
         PHY
         JSL   L071BFF
         PLA
         STA   $0B
         PEI   $26
         PEI   $24
         PEA   $0000
         TDC
         CLC
         ADC   #$0001
         PHA
         PEI   $22
         PEI   $20
         JSL   L1501C1
         PEA   $000A
         JSL   L0313BE
         PEI   $0B
         JSL   L071AA4
         LDA   $1E
         STA   $22
         LDA   $1D
         STA   $21
         LDA   $1B
         TCD
         TSC
         CLC
         ADC   #$0020
         TCS
         RTL

L0B94AC  PHD
         TSC
         CLC
         ADC   #$FDF6
         TCS
         ADC   #$011B
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $0100
         JSL   L0313BE
         PHY
         JSL   L071BFF
         PLA
         STA   $E9
         LDA   $F4
         LDX   $F6
         TXY
         LDX   #$FFE5
         STA   $00,X
         TYA
         STA   $02,X
         LDX   #$FFE5
         LDA   $02,X
         TAY
         LDA   $00,X
         TYX
         CLC
         ADC   #$0002
         BCC   L0B94F0
         INX
L0B94F0  STA   $EB
         STX   $ED
         PHY
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE5
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0001
         JSL   L0B8941
         JSL   L071DE3
         PLA
         PLX
         STA   [$EB]
         LDX   #$FFE5
         LDA   $02,X
         TAY
         LDA   $00,X
         TYX
         STA   $EB
         STX   $ED
         PHY
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE5
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0002
         JSL   L0B8941
         JSL   L071DE3
         PLA
         PLX
         STA   [$EB]
         PEI   $E9
         JSL   L071AA4
         LDA   $F2
         STA   $FA
         LDA   $F1
         STA   $F9
         LDA   $EF
         TCD
         TSC
         CLC
         ADC   #$0214
         TCS
         RTL

L0B955F  PHD
         TSC
         CLC
         ADC   #$FDF6
         TCS
         ADC   #$011B
         TCD
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEI   $FA
         PEI   $F8
         PEA   $0100
         JSL   L0313BE
         PHY
         JSL   L071BFF
         PLA
         STA   $E9
         LDA   $F4
         LDX   $F6
         TXY
         LDX   #$FFE5
         STA   $00,X
         TYA
         STA   $02,X
         LDX   #$FFE5
         LDA   $02,X
         TAY
         LDA   $00,X
         TYX
         CLC
         ADC   #$0002
         BCC   L0B95A3
         INX
L0B95A3  STA   $EB
         STX   $ED
         PHY
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE5
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0001
         JSL   L0B8941
         JSL   L071DE3
         PLA
         PLX
         STA   [$EB]
         LDX   #$FFE5
         LDA   $02,X
         TAY
         LDA   $00,X
         TYX
         STA   $EB
         STX   $ED
         PHY
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE5
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0002
         JSL   L0B8941
         JSL   L071DE3
         PLA
         PLX
         STA   [$EB]
         LDX   #$FFE5
         LDA   $02,X
         TAY
         LDA   $00,X
         TYX
         CLC
         ADC   #$0006
         BCC   L0B960A
         INX
L0B960A  STA   $EB
         STX   $ED
         PHY
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE5
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0003
         JSL   L0B8941
         JSL   L071DE3
         PLA
         PLX
         STA   [$EB]
         LDX   #$FFE5
         LDA   $02,X
         TAY
         LDA   $00,X
         TYX
         CLC
         ADC   #$0004
         BCC   L0B9641
         INX
L0B9641  STA   $EB
         STX   $ED
         PHY
         PHY
         PEA   $0000
         TDC
         CLC
         ADC   #$FEE5
         PHA
         PEA   $0000
         TDC
         CLC
         ADC   #$FFE9
         PHA
         PEA   $0004
         JSL   L0B8941
         JSL   L071DE3
         PLA
         PLX
         STA   [$EB]
         PEI   $E9
         JSL   L071AA4
         LDA   $F2
         STA   $FA
         LDA   $F1
         STA   $F9
         LDA   $EF
         TCD
         TSC
         CLC
         ADC   #$0214
         TCS
         RTL

