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

         REL
	 mx	%00

	 use	ENESEG2.X.S

L060000  PHP
L060001  SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         STA   $5C
         CMP   #$09
         BCC   L060012
         PLP
         RTL

L060012  LDA   L024438
         DEC
         STA   $60
         STZ   $61
         REP   #$20
         LDA   $60
         CLC
         ADC   $64
         STA   $60
         SEP   #$20
         LDA   ($60)
         STA   $60
         LDA   L024436
         CLC
         ADC   $60
         BCC   L060033
         PLP
         RTL

L060033  STA   L024436
         LDA   $5C
         STA   L024432
         REP   #$20
         LDA   #L024E00
         STA   $6C
         LDA   #$0008
         STA   $64
L060047  LDA   $64
         PHA
         SEP   #$20
         LDA   ($6C)
         BNE   L060054
         JSL   L06006D
L060054  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         PLA
         DEC
         STA   $64
         BNE   L060047
         SEP   #$20
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06006D  SEP   #$20
         LDA   L024438
         BNE   L060075
         RTL

L060075  DEC
         STA   L024438
         STA   $64
         LDA   #$08
         SEC
         SBC   $64
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDX   L024DB8
         STX   $60
         LDA   L0201B8
         BEQ   L06009F
         LDA   #$75
         SEC
         SBC   $60
         STA   $60
L06009F  REP   #$20
         LDA   $60
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$0100
         LDY   #$0006
         STA   ($6C),Y
         LDA   $68
         STA   $60
         SEP   #$20
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         LDA   ($60)
         LSR
         LSR
         LSR
         LSR
         INC
         LDY   #$0011
         STA   ($6C),Y
         LDA   L0201B8
         LDY   #$0012
         STA   ($6C),Y
         RTL

L0600D2  SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         STA   $5C
         CMP   #$09
         BCC   L0600E3
         PLP
         RTL

L0600E3  LDA   L024438
         DEC
         STA   $60
         STZ   $61
         REP   #$20
         LDA   $60
         CLC
         ADC   $64
         STA   $60
         SEP   #$20
         LDA   ($60)
         STA   $60
         LDA   L024436
         CLC
         ADC   $60
         BCC   L060104
         PLP
         RTL

L060104  STA   L024436
         LDA   $5C
         STA   L024432
         REP   #$20
         LDA   #L024E00
         STA   $6C
         LDA   #$0008
         STA   $64
L060118  LDA   $64
         PHA
         SEP   #$20
         LDA   ($6C)
         BNE   L060125
         JSL   L06013E
L060125  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         PLA
         DEC
         STA   $64
         BNE   L060118
         SEP   #$20
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06013E  SEP   #$20
         LDA   L024438
         BNE   L060146
         RTL

L060146  DEC
         STA   L024438
         ASL
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         REP   #$20
         LDA   L024DB8
         STA   $60
         SEP   #$20
         LDA   L0201B8
         BEQ   L06016F
         LDA   #$75
         SEC
         SBC   $60
         STA   $60
L06016F  REP   #$20
         LDA   $60
         LDY   #$0004
         STA   ($6C),Y
         LDY   #$0006
         LDA   #$3000
         STA   ($6C),Y
         SEP   #$20
         LDY   #$0010
         LDA   #$00
         STA   ($6C),Y
         REP   #$20
         LDA   $68
         STA   $60
         SEP   #$20
         LDA   ($60)
         LSR
         LSR
         LSR
         LSR
         INC
         LDY   #$0011
         STA   ($6C),Y
         LDA   L0201B8
         LDY   #$0012
         STA   ($6C),Y
         RTL

L0601A6  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CMP   #$08
         BCC   L0601B2
         PLP
         RTL

L0601B2  LDA   #$FF
         STA   L024438
         REP   #$20
         LDA   #L024E00
         STA   $6C
         LDA   #$0008
         STA   $64
L0601C3  SEP   #$20
         LDA   ($6C)
         BEQ   L0601D9
         REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         BNE   L0601C3
         PLP
         RTL

L0601D9  SEP   #$20
         LDY   #$000C
         LDA   #$00
         STA   ($6C),Y
         LDA   #$11
         STA   ($6C)
         JSL   L180C67
         AND   #$3F
         CLC
         ADC   #$1C
         LDY   #$0004
         STA   ($6C),Y
         LDY   #$0005
         LDA   #$00
         STA   ($6C),Y
         LDA   L024430
         CMP   #$08
         BEQ   L060210
         LDY   #$0006
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$0A
         STA   ($6C),Y
         PLP
         RTL

L060210  LDY   #$0006
         LDA   #$08
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$01
         STA   ($6C),Y
         PLP
         RTL

L060220  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060230
         PLP
         RTL

L060230  STA   L024432
         LDX   #L024E00
         STX   $6C
         LDX   #$0008
         STX   $64
L06023D  LDA   ($6C)
         REP   #$20
         BNE   L06024D
         LDA   $64
         PHA
         JSL   L060262
         PLA
         STA   $64
L06024D  LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         SEP   #$20
         BNE   L06023D
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060262  PHP
         SEP   #$20
         LDA   L024438
         BNE   L06026C
         PLP
         RTL

L06026C  DEC
         STA   L024438
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L06027F  JSL   L180C51
         AND   #$7F
         CMP   #$76
         BCS   L06027F
         LDY   #$0004
         STA   ($6C),Y
         STA   $64
         LDY   #$0005
         LDA   #$0D
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$01
         STA   ($6C),Y
L06029E  JSL   L180C51
         AND   #$3F
         CMP   #$30
         BCS   L06029E
         LDY   #$0006
         STA   ($6C),Y
         LDA   $64
         CLC
         ADC   #$05
         STA   $64
         LDA   L024442
         STA   $68
         JSL   L180C51
         AND   #$1F
         SEC
         SBC   #$0F
         CLC
         ADC   $68
         SEC
         SBC   $64
         STA   $5C
         BCC   L0602D6
         LDY   #$0013
         LDA   #$01
         STA   ($6C),Y
         JMP   L0602E4

L0602D6  LDY   #$0013
         LDA   #$FF
         STA   ($6C),Y
         LDA   $5C
         EOR   #$FF
         INC
         STA   $5C
L0602E4  LDY   #$0014
         LDA   #$01
         STA   ($6C),Y
         LDY   #$0010
         LDA   $5C
         STA   ($6C),Y
         LDA   L024443
         SEC
         SBC   #$0C
         LDY   #$0011
         STA   ($6C),Y
         LDY   #$0012
         LDA   #$00
         STA   ($6C),Y
         LDY   #$000B
         LDA   #$04
         STA   ($6C),Y
         PLP
         RTL

L06030D  ENT
         PHP
         SEP   #$20
         LDA   L024438
         CMP   #$08
         BNE   L06031A
         JMP   L060358

L06031A  CMP   #$04
         BEQ   L060325
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060325  LDX   #L024E00
         STX   $6C
         LDA   L024E00
         ORA   L024E60
         ORA   L024EC0
         ORA   L024F20
         BEQ   L06034F
         LDX   #L024F80
         STX   $6C
         LDA   L024F80
         ORA   L024FE0
         ORA   L025040
         ORA   L0250A0
         STA   $5C
         BEQ   L06034F
         PLP
         RTL

L06034F  LDA   #$FF
         STA   L024438
         PLP
         JMP   L060391

L060358  LDX   #L024E00
         STX   $6C
         LDA   L024E00
         ORA   L024E60
         ORA   L024EC0
         ORA   L024F20
         ORA   L024F80
         ORA   L024FE0
         ORA   L025040
         ORA   L0250A0
         STA   $5C
         BEQ   L06037B
         PLP
         RTL

L06037B  SEP   #$20
         LDA   #$FF
         STA   L024438
         LDX   #L024E00
         STX   $6C
         JSL   L060391
         LDX   #L024F80
         STX   $6C
         PLP
L060391  PHP
         SEP   #$20
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         STA   $64
L06039E  JSL   L180C51
         AND   #$3F
         CMP   #$30
         BCS   L06039E
         LDY   #$0006
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$01
         STA   ($6C),Y
L0603B4  JSL   L180C51
         AND   #$7F
         CMP   #$76
         BCS   L0603B4
         STA   $68
         LDA   L024442
         SEC
         SBC   #$11
         CMP   $68
         BCS   L0603D1
         CLC
         ADC   #$17
         CMP   $68
         BCS   L0603B4
L0603D1  LDA   $68
         LDY   #$0004
         STA   ($6C),Y
         LDY   #$0005
         LDA   #$90
         STA   ($6C),Y
         LDY   #$000B
         LDA   #$04
         STA   ($6C),Y
         LDY   #$000C
         LDA   #$00
         STA   ($6C),Y
         JSL   L180C51
         AND   #$0F
         CLC
         ADC   #$28
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$03
         STA   $65
L0603FF  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         LDA   $64
         STA   ($6C)
L06040F  JSL   L180C51
         AND   #$3F
         CMP   #$30
         BCS   L06040F
         LDY   #$0006
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$01
         STA   ($6C),Y
         LDY   #$000B
         LDA   #$04
         STA   ($6C),Y
         LDY   #$000C
         LDA   #$00
         STA   ($6C),Y
         DEC   $65
         BNE   L0603FF
         PLP
         RTL

L060439  ENT
         PHP
         SEP   #$20
         LDA   L024438
         CMP   #$08
         BEQ   L060483
         CMP   #$04
         BEQ   L06044E
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06044E  LDX   #L024E00
         STX   $6C
         LDA   L024E00
         ORA   L024E60
         ORA   L024EC0
         ORA   L024F20
         STA   $5C
         BEQ   L06047A
         LDX   #L024F80
         STX   $6C
         LDA   L024F80
         ORA   L024FE0
         ORA   L025040
         ORA   L0250A0
         STA   $5C
         BEQ   L06047A
         PLP
         RTL

L06047A  LDA   #$FF
         STA   L024438
         PLP
         JMP   L0604B3

L060483  LDX   #L024E00
         STX   $6C
         LDA   L024E00
         ORA   L024E60
         ORA   L024EC0
         ORA   L024F20
         ORA   L024F80
         ORA   L024FE0
         ORA   L025040
         ORA   L0250A0
         BEQ   L0604A4
         PLP
         RTL

L0604A4  LDA   #$FF
         STA   L024438
         JSL   L0604B3
         LDX   #L024F80
         STX   $6C
         PLP
L0604B3  PHP
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         STA   $64
L0604BE  JSL   L180C51
         AND   #$3F
         CMP   #$30
         BCS   L0604BE
         LDY   #$0006
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$01
         STA   ($6C),Y
L0604D4  JSL   L180C51
         AND   #$7F
         CMP   #$76
         BCS   L0604D4
         STA   $68
         LDA   L024442
         SEC
         SBC   #$11
         CMP   $68
         BCS   L0604F1
         CLC
         ADC   #$17
         CMP   $68
         BCS   L0604D4
L0604F1  LDA   $68
         LDY   #$0004
         STA   ($6C),Y
         LDY   #$0005
         LDA   #$0A
         STA   ($6C),Y
         LDY   #$000B
         LDA   #$04
         STA   ($6C),Y
         LDY   #$000C
         LDA   #$00
         STA   ($6C),Y
         JSL   L180C51
         AND   #$07
         CLC
         ADC   #$0E
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$03
         STA   $65
L06051F  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         LDA   $64
         STA   ($6C)
L06052F  JSL   L180C51
         AND   #$3F
         CMP   #$30
         BCS   L06052F
         LDY   #$0006
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$01
         STA   ($6C),Y
         LDY   #$000B
         LDA   #$04
         STA   ($6C),Y
         LDY   #$000C
         LDA   #$00
         STA   ($6C),Y
         DEC   $65
         BNE   L06051F
         PLP
         RTL

L060559  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060569
         PLP
         RTL

L060569  STA   L024432
         REP   #$20
         LDA   #L024E00
         STA   $6C
         LDA   #$0008
         STA   $64
L060578  SEP   #$20
         LDA   ($6C)
         BNE   L060588
         LDX   $64
         PHX
         JSL   L06059F
         PLX
         STX   $64
L060588  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         BNE   L060578
         SEP   #$20
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06059F  LDA   L024438
         BNE   L0605A5
         RTL

L0605A5  DEC
         STA   L024438
         ASL
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L0605BA  JSL   L180C51
         AND   #$7F
         CMP   #$6E
         BCS   L0605BA
         CLC
         ADC   #$04
         LDY   #$0004
         STA   ($6C),Y
         LDY   #$0005
         LDA   #$00
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$0A
         STA   ($6C),Y
         RTL

L0605DB  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         CMP   #$09
         BCC   L0605EF
         PLP
         RTL

L0605EF  STA   $65
         LDA   #$00
         XBA
         LDA   L024438
         DEC
         TAX
         LDA   L020188,X
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         BCC   L060608
         PLP
         RTL

L060608  STA   L024436
         LDA   $65
         STA   L024432
         REP   #$20
         LDA   #L024E00
         STA   $6C
         LDA   #$0008
         STA   $64
L06061C  SEP   #$20
         LDA   ($6C)
         BNE   L060626
         JSL   L06063D
L060626  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         BNE   L06061C
         SEP   #$20
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06063D  SEP   #$20
         LDA   L024438
         BNE   L060645
         RTL

L060645  DEC
         STA   L024438
         JSL   L180C51
         AND   #$03
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         JSL   L180C51
         BIT   #$80
         BNE   L0606A7
         AND   #$3F
         CLC
         ADC   #$10
         LDY   #$0005
         STA   ($6C),Y
         LDY   #$0004
         LDA   #$00
         STA   ($6C),Y
         LDY   #$0006
         REP   #$20
         LDA   #$0308
         STA   ($6C),Y
         LDY   #$0010
         LDA   #$0080
         STA   ($6C),Y
         SEP   #$20
         LDY   #$000B
         LDA   #$04
         STA   ($6C),Y
         JSL   L180C51
         AND   #$03
         CLC
         ADC   #$09
         LDY   #$0012
         STA   ($6C),Y
         LDY   #$0013
         LDA   #$00
         STA   ($6C),Y
         RTL

L0606A7  SEP   #$20
         AND   #$3F
         CLC
         ADC   #$10
         LDY   #$0005
         STA   ($6C),Y
         LDY   #$0004
         LDA   #$75
         STA   ($6C),Y
         LDY   #$000B
         LDA   #$04
         STA   ($6C),Y
         REP   #$20
         LDY   #$0006
         LDA   #$0300
         STA   ($6C),Y
         LDY   #$0010
         LDA   #$0080
         STA   ($6C),Y
         SEP   #$20
         JSL   L180C51
         AND   #$03
         CLC
         ADC   #$F4
         LDY   #$0012
         STA   ($6C),Y
         LDY   #$0013
         LDA   #$00
         STA   ($6C),Y
         RTL

L0606EB  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L0606FB
         PLP
         RTL

L0606FB  STA   $65
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         REP   #$20
         LDA   $60
         CLC
         ADC   #L020190
         STA   $60
         SEP   #$20
         LDA   ($60)
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         BCC   L06071F
         PLP
         RTL

L06071F  STA   L024436
         LDA   $65
         STA   L024432
         REP   #$20
         LDA   #L024E00
         STA   $6C
         LDA   #$0008
         STA   $64
L060733  SEP   #$20
         LDA   ($6C)
         BNE   L060743
         LDX   $64
         PHX
         JSL   L06075A
         PLX
         STX   $64
L060743  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         BNE   L060733
         SEP   #$20
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06075A  LDA   L024438
         BNE   L060760
         RTL

L060760  DEC
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   L024442
         SEC
         SBC   #$05
         STA   $64
L06077C  JSL   L180C51
         AND   #$7F
         CMP   #$76
         BCS   L06077C
         CMP   $64
         BCS   L0607CE
         LDY   #$0004
         STA   ($6C),Y
         SEC
         SBC   $64
         EOR   #$FF
         INC
         LSR
         LSR
         STA   $64
         JSL   L180C51
         AND   #$07
         CLC
         ADC   $64
         LDY   #$0013
         STA   ($6C),Y
         LDY   #$0005
         LDA   #$0A
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$01
         STA   ($6C),Y
         LDY   #$000B
         LDA   #$01
         STA   ($6C),Y
         LDY   #$0012
         LDA   #$00
         STA   ($6C),Y
         REP   #$20
         LDY   #$0010
         LDA   #$0080
         STA   ($6C),Y
         RTL

         MX    %10
L0607CE  LDY   #$0004
         STA   ($6C),Y
         SEC
         SBC   $64
         LSR
         LSR
         STA   $64
         JSL   L180C51
         AND   #$07
         CLC
         ADC   $64
         EOR   #$FF
         INC
         LDY   #$0013
         STA   ($6C),Y
         LDY   #$0005
         LDA   #$0A
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$01
         STA   ($6C),Y
         LDY   #$000B
         STA   ($6C),Y
         LDY   #$0012
         LDA   #$FF
         STA   ($6C),Y
         REP   #$20
         LDY   #$0010
         LDA   #$FF80
         STA   ($6C),Y
         RTL

L060810  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060820
         PLP
         RTL

L060820  STA   $65
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         REP   #$20
         LDA   $60
         CLC
         ADC   #L020190
         STA   $60
         SEP   #$20
         LDA   ($60)
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         BCC   L060844
         PLP
         RTL

L060844  STA   L024436
         LDA   $64
         STA   L024432
         REP   #$20
         LDA   #L024E00
         STA   $6C
         LDA   #$0008
         STA   $64
L060858  SEP   #$20
         LDA   ($6C)
         BNE   L060868
         LDX   $64
         PHX
         JSL   L06087F
         PLX
         STX   $64
L060868  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         BNE   L060858
         SEP   #$20
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06087F  LDA   L024438
         BNE   L060885
         RTL

L060885  DEC
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L060899  JSL   L180C51
         AND   #$7F
         CMP   #$76
         BCS   L060899
         LDY   #$0004
         STA   ($6C),Y
         LDY   #$0005
         LDA   #$0A
         STA   ($6C),Y
         LDY   #$000B
         LDA   #$05
         STA   ($6C),Y
         LDY   #$0015
         LDA   #$00
         STA   ($6C),Y
         LDY   #$0013
         LDA   $64
         STA   ($6C),Y
         REP   #$20
         LDY   #$0006
         LDA   #$0302
         STA   ($6C),Y
         RTL

L0608CF  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L026ED4
         STA   $60
         STA   L024DB8
         LDA   #L0201A0
         STA   $64
         LDA   #L026EF6
         STA   $68
         JMP   L060001

L0608F2  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L026F28
         STA   $60
         STA   L024DB8
         LDA   #L0201A0
         STA   $64
         LDA   #L026F4A
         STA   $68
         JMP   L060001

L060915  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L026F51
         STA   $60
         STA   L024DB8
         LDA   #L0201A0
         STA   $64
         LDA   #L026F73
         STA   $68
         JMP   L060001

L060938  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L026F89
         STA   $60
         STA   L024DB8
         LDA   #L0201A0
         STA   $64
         LDA   #L026FAB
         JMP   L060001

L060959  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L0201F4
         STA   $60
         STA   L024DB8
         LDA   #L0201A0
         STA   $64
         LDA   #L0201F3
         CLC
         ADC   #$0023
         STA   $68
         JMP   L060001

L060980  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L02022D
         STA   $60
         STA   L024DB8
         LDA   #L0201A0
         STA   $64
         LDA   #L02022C
         CLC
         ADC   #$0023
         STA   $68
         JMP   L060001

L0609A7  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L020269
         STA   $60
         STA   L024DB8
         LDA   #L0201A0
         STA   $64
         LDA   #L020268
         CLC
         ADC   #$0023
         STA   $68
         JMP   L060001

L0609CE  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         LDA   #$00
         STA   L0201B8
         REP   #$20
         LDA   L0202A1
         STA   L024DB8
         LDA   #L0201A0
         STA   $64
         LDA   #L0202A0
         CLC
         ADC   #$0023
         STA   $68
         JMP   L060001

L0609F5  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060A05
         PLP
         RTL

L060A05  STA   $65
         LDA   #$00
         XBA
         LDA   L024438
         DEC
         TAX
         LDA   L0201A0,X
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         BCC   L060A1E
         PLP
         RTL

L060A1E  STA   L024436
         LDA   $65
         STA   L024432
         REP   #$20
         LDA   #L024E00
         STA   $6C
         LDA   #$0008
         STA   $64
L060A32  SEP   #$20
         LDA   ($6C)
         BNE   L060A42
         LDX   $64
         PHX
         JSL   L060A59
         PLX
         STX   $64
L060A42  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         BNE   L060A32
         SEP   #$20
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060A59  LDA   L024438
         BNE   L060A5F
         RTL

L060A5F  DEC
         STA   L024438
         STA   $64
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   $64
         BIT   #$01
         BEQ   L060A8C
         LDY   #$0004
         LDA   #$14
         STA   ($6C),Y
         LDY   #$0010
         LDA   #$03
         STA   ($6C),Y
         JMP   L060A9A

L060A8C  LDY   #$0004
         LDA   #$61
         STA   ($6C),Y
         LDY   #$0010
         LDA   #$01
         STA   ($6C),Y
L060A9A  LDY   #$0007
         LDA   #$01
         STA   ($6C),Y
         REP   #$20
         LDY   #$0005
         LDA   #$0090
         STA   ($6C),Y
         LDY   #$0011
         LDA   #$0006
         STA   ($6C),Y
         LDY   #$0013
         LDA   #$00F9
         STA   ($6C),Y
         RTL

L060ABC  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         STA   $5C
         CMP   #$09
         BCC   L060ACE
         PLP
         RTL

L060ACE  LDA   L024438
         DEC
         STA   $60
         STZ   $61
         REP   #$20
         LDA   $60
         CLC
         ADC   #L020190
         STA   $60
         SEP   #$20
         LDA   ($60)
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         BCC   L060AF0
         PLP
         RTL

L060AF0  STA   L024436
         LDA   $5C
         STA   L024432
L060AF8  JSL   L180C51
         AND   #$7F
         CMP   #$76
         BCS   L060AF8
         STA   L024DB8
         LDX   #L024E00
         STX   $6C
         LDX   #$0008
         STX   $64
L060B0F  SEP   #$20
         LDA   ($6C)
         BNE   L060B1F
         LDX   $64
         PHX
         JSL   L060B36
         PLX
         STX   $64
L060B1F  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         BNE   L060B0F
         SEP   #$20
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060B36  LDA   L024438
         BNE   L060B3C
         RTL

L060B3C  DEC
         STA   L024438
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   L024DB8
         LDY   #$0004
         STA   ($6C),Y
         LDY   #$0005
         LDA   #$0A
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$02
         STA   ($6C),Y
         LDY   #$0010
         LDA   #$00
         STA   ($6C),Y
         RTL

L060B6D  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060B7D
         PLP
         RTL

L060B7D  STA   $65
         LDA   #$00
         XBA
         LDA   L024438
         DEC
         TAX
         LDA   L020188,X
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         BCC   L060B96
         PLP
         RTL

L060B96  STA   L024436
         LDA   $65
         STA   L024432
         REP   #$20
         LDA   #L024E00
         STA   $6C
         LDA   #$0008
         STA   $64
L060BAA  SEP   #$20
         LDA   ($6C)
         BNE   L060BBA
         LDX   $64
         PHX
         JSL   L060BD1
         PLX
         STX   $64
L060BBA  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         BNE   L060BAA
         SEP   #$20
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060BD1  LDA   L024438
         BNE   L060BD7
         RTL

L060BD7  DEC
         STA   L024438
         STA   $64
         LDY   #$000C
         LDA   #$00
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   L024428
         CLC
         ADC   $64
         AND   #$01
         BNE   L060C07
         LDY   #$0010
         LDA   #$02
         STA   ($6C),Y
         LDY   #$0004
         LDA   #$00
         STA   ($6C),Y
         JMP   L060C15

L060C07  LDY   #$0010
         LDA   #$FE
         STA   ($6C),Y
         LDY   #$0004
         LDA   #$75
         STA   ($6C),Y
L060C15  ASL   $64
         ASL   $64
         LDA   #$1E
         SEC
         SBC   $64
         LDY   #$0005
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$04
         STA   ($6C),Y
         REP   #$20
         LDY   #$0011
         LDA   #$8000
         STA   ($6C),Y
         LDY   #$0013
         LDA   #$0000
         STA   ($6C),Y
         RTL

L060C3D  ENT
         PHP
         SEP   #$20
         JSL   L180C67
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L026FC9
         STA   L024DB8
         LDA   #L020188
         STA   $64
         LDA   #L026FC8
         CLC
         ADC   #$0023
         STA   $68
         JMP   L0600D2

L060C62  ENT
         PHP
         SEP   #$20
         JSL   L180C67
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L026FF7
         STA   L024DB8
         LDA   #L020188
         STA   $64
         LDA   #L026FF6
         CLC
         ADC   #$0023
         STA   $68
         JMP   L0600D2

L060C87  ENT
         PHP
         SEP   #$20
         JSL   L180C67
         AND   #$01
         STA   L0201B8
         REP   #$20
         LDA   L027025
         STA   L024DB8
         LDA   #L020188
         STA   $64
         LDA   #L027024
         CLC
         ADC   #$0023
         STA   $68
         JMP   L0600D2

L060CAC  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060CBC
         PLP
         RTL

L060CBC  STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L060CC8  LDA   ($6C)
         STA   $5C
         BNE   L060CD8
         LDX   $64
         PHX
         JSL   L060CEF
         PLX
         STX   $64
L060CD8  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L060CC8
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060CEF  LDA   L024438
         STA   $5C
         BNE   L060CF7
         RTL

L060CF7  LDA   $5C
         DEC
         STA   L024438
         AND   #$FE
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   L024438
         AND   #$01
         BEQ   L060D47
         JSL   L180C51
         AND   #$0F
         CLC
         ADC   #$14
         STA   $69
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$96
         INY
         STA   ($6C),Y
         LDA   #$00
         INY
         STA   ($6C),Y
         LDA   #$04
         INY
         STA   ($6C),Y
         LDA   #$03
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         LDA   $5C
         STA   $69
         RTL

L060D47  LDA   #$76
         SEC
         SBC   $69
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$96
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$00
         INY
         STA   ($6C),Y
         LDA   #$04
         INY
         STA   ($6C),Y
         LDA   #$03
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         RTL

L060D71  ENT
         PHP
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060D7F
         PLP
         RTL

L060D7F  STA   $65
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDY   $60
         LDA   L026EBA,Y
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L060D9C
         PLP
         RTL

L060D9C  LDA   $5C
         STA   L024436
         LDA   $65
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L060DAF  LDA   ($6C)
         STA   $5C
         BNE   L060DBF
         LDX   $64
         PHX
         JSL   L060DD6
         PLX
         STX   $64
L060DBF  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L060DAF
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060DD6  LDA   L024438
         STA   $5C
         BNE   L060DDE
         RTL

L060DDE  LDA   $5C
         DEC
         STA   L024438
         ASL
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L060DF4  JSL   L180C51
         AND   #$7F
         STA   $5C
         CMP   #$76
         BCS   L060DF4
         LDA   $5C
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$0E
         INY
         STA   ($6C),Y
         LDA   #$05
         LDY   #$0007
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$90
         LDY   #$0012
         STA   ($6C),Y
         RTL

L060E22  ENT
         PHP
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060E30
         PLP
         RTL

L060E30  STA   $65
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDY   $60
         LDA   L026EBA,Y
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L060E4D
         PLP
         RTL

L060E4D  LDA   $5C
         STA   L024436
         LDA   $65
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L060E60  LDA   ($6C)
         STA   $5C
         BNE   L060E70
         LDX   $64
         PHX
         JSL   L060E87
         PLX
         STX   $64
L060E70  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L060E60
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060E87  LDA   L024438
         STA   $5C
         BNE   L060E8F
         RTL

L060E8F  LDA   $5C
         DEC
         STA   L024438
         ASL
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L060EA5  JSL   L180C51
         AND   #$7F
         STA   $5C
         CMP   #$76
         BCS   L060EA5
         LDA   $5C
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$0E
         INY
         STA   ($6C),Y
         LDA   #$05
         LDY   #$0007
         STA   ($6C),Y
         RTL

L060EC5  ENT
         PHP
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060ED3
         PLP
         RTL

L060ED3  STA   $65
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDY   $60
         LDA   L026EAA,Y
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L060EF0
         PLP
         RTL

L060EF0  LDA   $5C
         STA   L024436
         LDA   $65
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L060F03  LDA   ($6C)
         STA   $5C
         BNE   L060F13
         LDX   $64
         PHX
         JSL   L060F2A
         PLX
         STX   $64
L060F13  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L060F03
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060F2A  LDA   L024438
         STA   $5C
         BNE   L060F32
         RTL

L060F32  LDA   $5C
         DEC
         STA   L024438
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   #$02
         LDY   #$000B
         STA   ($6C),Y
         JSL   L180C51
         AND   #$01
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$75
         STA   $64
         BNE   L060F61
         STZ   $64
L060F61  LDA   $64
         LDY   #$0004
         STA   ($6C),Y
         JSL   L180C51
         AND   #$1F
         CLC
         ADC   #$10
         LDY   #$0005
         STA   ($6C),Y
         JSL   L180C51
         LDY   #$0011
         STA   ($6C),Y
         JSL   L180C51
         AND   #$03
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$80
         LDY   #$0013
         STA   ($6C),Y
         LDA   #$04
         LDY   #$0007
         STA   ($6C),Y
         RTL

L060F99  ENT
         PHP
         LDA   L024432
         CLC
         ADC   L024438
         CMP   #$09
         BCC   L060FA7
         PLP
         RTL

L060FA7  STA   $65
         LDA   L024438
         DEC
         STA   $60
         STX   $61
         LDY   $60
         LDA   L026EAA,Y
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L060FC4
         PLP
         RTL

L060FC4  LDA   $5C
         STA   L024436
         LDA   $65
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L060FD7  LDA   ($6C)
         STA   $5C
         BNE   L060FE7
         LDX   $64
         PHX
         JSL   L060FFE
         PLX
         STX   $64
L060FE7  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L060FD7
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L060FFE  LDA   L024438
         STA   $5C
         BNE   L061006
         RTL

L061006  LDA   $5C
         DEC
         STA   L024438
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   #$03
         LDY   #$000B
         STA   ($6C),Y
         JSL   L180C51
         AND   #$01
         STA   $5C
         LDA   #$FD
         STA   $68
         LDA   #$75
         STA   $64
         LDA   $5C
         BNE   L06103C
         STZ   $64
         LDA   #$03
         STA   $68
L06103C  LDA   $64
         LDY   #$0004
         STA   ($6C),Y
         LDA   $68
         LDY   #$0010
         STA   ($6C),Y
         JSL   L180C51
         AND   #$1F
         CLC
         ADC   #$10
         LDY   #$0005
         STA   ($6C),Y
         JSL   L180C51
         LDY   #$0011
         STA   ($6C),Y
         JSL   L180C51
         AND   #$03
         SEC
         SBC   #$02
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$80
         LDY   #$0013
         STA   ($6C),Y
         LDA   #$04
         LDY   #$0007
         STA   ($6C),Y
         RTL

L06107E  PHP
         SEP   #$20
         LDA   $5C
         STA   $64
         LDA   L024307
         STA   $5C
         CMP   #$02
         BEQ   L061099
         BCS   L0610A8
         LDA   $64
         LDY   #$0007
         STA   ($6C),Y
         PLP
         RTL

L061099  LDA   $64
         LSR
         CLC
         ADC   $64
         STA   $5C
         LDY   #$0007
         STA   ($6C),Y
         PLP
         RTL

L0610A8  ASL   $64
         LDA   $64
         LDY   #$0007
         STA   ($6C),Y
         PLP
         RTL

L0610B3  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         STA   L026E77
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L0610CC
         PLP
         RTL

L0610CC  LDA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L0610DA  LDA   ($6C)
         STA   $5C
         BNE   L0610EA
         LDX   $64
         PHX
         JSL   L061101
         PLX
         STX   $64
L0610EA  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L0610DA
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061101  LDA   L024438
         STA   $5C
         BNE   L061109
         RTL

L061109  DEC   $5C
         LDA   $5C
         STA   L024438
         INC
         STA   $64
         LDA   L026E77
         SEC
         SBC   $64
         ASL
         ASL
         ASL
         ASL
         STA   $5C
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         SEC
         SBC   #$28
         STA   $64
         ASL
         CLC
         ADC   $64
         STA   $5C
         STZ   $61
         STA   $60
         LDY   $60
         LDA   L026E78,Y
         STA   $5C
         INY
         STY   $60
         LDA   L026E78,Y
         STA   $64
         INY
         STY   $60
         LDA   #$04
         STA   $65
         LDA   L026E78,Y
         BIT   #$01
         BEQ   L061161
         LDA   L024428
         AND   #$01
         STA   $65
         STA   $5D
L061161  LDA   $64
         LDY   #$0010
         STA   ($6C),Y
         LDA   $65
         LDY   #$0006
         STA   ($6C),Y
         JSL   L06107E
         LDA   L024430
         STA   $5C
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0005
         STA   ($6C),Y
         JSL   L180C51
         AND   #$0F
         CLC
         ADC   #$19
         STA   $5C
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$03
         LDY   #$000B
         STA   ($6C),Y
         RTL

L06119C  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         STA   $5C
         CMP   #$09
         BCC   L0611AE
         PLP
         RTL

L0611AE  LDA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L0611BC  LDA   ($6C)
         STA   $5C
         BNE   L0611C6
         JSL   L0611DD
L0611C6  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L0611BC
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L0611DD  LDA   L024438
         BNE   L0611E3
         RTL

L0611E3  DEC
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L0611F7  JSL   L180C51
         AND   #$7F
         CMP   #$76
         BCS   L0611F7
         LDY   #$0004
         STA   ($6C),Y
         CMP   #$3C
         BCS   L061214
         LDY   #$0010
         LDA   #$01
         STA   ($6C),Y
         JMP   L06121B

L061214  LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
L06121B  JSL   L180C51
         AND   #$07
         CLC
         ADC   #$03
         LDY   #$0005
         STA   ($6C),Y
         LDY   #$0006
         LDA   #$00
         STA   ($6C),Y
         LDY   #$0007
         LDA   #$19
         STA   ($6C),Y
         LDY   #$000B
         LDA   #$07
         STA   ($6C),Y
         LDY   #$0011
         LDA   #$04
         STA   ($6C),Y
         INY
         LDA   #$00
         STA   ($6C),Y
         RTL

L06124B  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $5C
         CMP   #$08
         BCC   L061259
         PLP
         RTL

L061259  INC   $5C
         LDA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L061269  LDA   ($6C)
         STA   $5C
         BEQ   L061281
         REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061269
         PLP
         RTL

L061281  LDA   #$00
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   L024430
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0005
         STA   ($6C),Y
         LDA   L024438
         STA   $64
         AND   #$04
         LSR
         LSR
         LDY   #$0010
         STA   ($6C),Y
         LDA   $64
         AND   #$03
         INC
         ASL
         LDY   #$0011
         STA   ($6C),Y
         LDA   $64
         AND   #$08
         LSR
         LSR
         LSR
         LDY   #$0013
         STA   ($6C),Y
         LDA   #$FF
         STA   L024438
         JSL   L180C51
         AND   #$0F
         CLC
         ADC   #$14
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$0C
         STA   $5C
         PLP
         JMP   L06107E

L0612DF  ENT
         PHP
         LDA   L024432
         CMP   #$08
         BCC   L0612E9
         PLP
         RTL

L0612E9  INC
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L0612F6  LDA   ($6C)
         BEQ   L06130C
         REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L0612F6
         PLP
         RTL

L06130C  LDA   #$00
         LDY   #$000C
         STA   ($6C),Y
         LDA   #$11
         STA   ($6C)
         LDA   L024438
         LDY   #$0006
         STA   ($6C),Y
         LDA   #$FF
         STA   L024438
         LDA   L024430
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0005
         STA   ($6C),Y
         LDA   L026E7C
         LDY   #$0010
         STA   ($6C),Y
         LDY   #$0011
         STA   ($6C),Y
         LDA   L026E7B
         STA   $5C
         PLP
         JMP   L06107E

L061349  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $5C
         CMP   #$08
         BCC   L061357
         PLP
         RTL

L061357  LDA   $5C
         INC
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L061366  LDA   ($6C)
         STA   $5C
         BEQ   L06137E
         REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061366
         PLP
         RTL

L06137E  LDA   L02443A
         SEC
         SBC   #$04
         STA   $64
         BEQ   L06138D
         LDA   #$FF
         STA   L024438
L06138D  LDY   #$000C
         LDA   #$00
         STA   ($6C),Y
         LDA   #$14
         STA   ($6C)
         LDA   L024430
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0005
         STA   ($6C),Y
         LDA   L024438
         LDY   #$0007
         STA   ($6C),Y
         LSR
         LSR
         STA   L024348
         LDA   #$11
         STA   L024350
         LDA   #$FF
         STA   L024438
         JSL   L180C51
         AND   #$02
         ORA   $64
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0011
         STA   ($6C),Y
         LDY   #$0012
         STA   ($6C),Y
         LDY   #$0014
         STA   ($6C),Y
         LDA   #$01
         LDY   #$0013
         STA   ($6C),Y
         PLP
         RTL

L0613E5  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L0613FB
         PLP
         RTL

L0613FB  LDA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L061409  LDA   ($6C)
         STA   $5C
         BNE   L061419
         LDX   $64
         PHX
         JSL   L061430
         PLX
         STX   $64
L061419  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061409
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061430  LDA   L024438
         STA   $5C
         BNE   L061438
         RTL

L061438  LDA   $5C
         DEC
         STA   L024438
         ASL
         ASL
         ASL
         ASL
         STA   $64
         LDA   #$00
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   L024430
         CLC
         ADC   $64
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$1A
         STA   $5C
         JMP   L06107E

L06146C  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         STA   L026E77
         CLC
         ADC   $64
         CMP   #$09
         BCC   L061483
         PLP
         RTL

L061483  STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L06148F  LDA   ($6C)
         STA   $5C
         BNE   L06149F
         LDX   $64
         PHX
         JSL   L0614B6
         PLX
         STX   $64
L06149F  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L06148F
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L0614B6  LDA   L024438
         BNE   L0614BC
         RTL

L0614BC  DEC
         STA   L024438
         INC
         STA   $64
         LDA   L026E77
         SEC
         SBC   $64
         ASL
         ASL
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   L024430
         LDY   #$0004
         STA   ($6C),Y
         STA   $5C
         CMP   #$3B
         BCS   L0614F2
         LDA   #$02
         LDY   #$0010
         STA   ($6C),Y
         JMP   L0614F9

L0614F2  LDA   #$FE
         LDY   #$0010
         STA   ($6C),Y
L0614F9  LDA   #$06
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$04
         INY
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0011
         STA   ($6C),Y
         LDY   #$0013
         STA   ($6C),Y
         INY
         STA   ($6C),Y
         INY
         STA   ($6C),Y
         LDA   #$80
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$06
         STA   $5C
         JMP   L06107E

L061525  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         STA   L026E77
         CLC
         ADC   $64
         CMP   #$09
         BCC   L06153C
         PLP
         RTL

L06153C  STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L061548  LDA   ($6C)
         STA   $5C
         BNE   L061558
         LDX   $64
         PHX
         JSL   L06156F
         PLX
         STX   $64
L061558  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061548
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06156F  LDA   L024438
         BNE   L061575
         RTL

L061575  DEC
         STA   L024438
         INC
         STA   $64
         LDA   L026E77
         SEC
         SBC   $64
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   #$03
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$FE
         STA   $5C
         LDA   L024430
         LDY   #$0004
         STA   ($6C),Y
         CMP   #$3B
         BCS   L0615AC
         LDA   #$02
         STA   $5C
L0615AC  LDA   $5C
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0005
         STA   ($6C),Y
         JSL   L180C51
         LDY   #$0011
         STA   ($6C),Y
         JSL   L180C51
         AND   #$01
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$80
         LDY   #$0013
         STA   ($6C),Y
         JSL   L180C51
         AND   #$07
         CLC
         ADC   #$10
         LDY   #$0014
         STA   ($6C),Y
         LDA   #$06
         STA   $5C
         JMP   L06107E

L0615EA  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         STA   L026E77
         CLC
         ADC   $64
         CMP   #$09
         BCC   L061601
         PLP
         RTL

L061601  STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L06160D  LDA   ($6C)
         STA   $5C
         BNE   L06161D
         LDX   $64
         PHX
         JSL   L061634
         PLX
         STX   $64
L06161D  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L06160D
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061634  LDA   L024438
         BNE   L06163A
         RTL

L06163A  DEC
         STA   L024438
         INC
         STA   $64
         LDA   L026E77
         SEC
         SBC   $64
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   #$02
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$01
         STA   $5C
         LDA   L024430
         LDY   #$0004
         STA   ($6C),Y
         CMP   #$3B
         BCS   L06166F
         DEC   $5C
L06166F  LDA   $5C
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0005
         STA   ($6C),Y
         JSL   L180C51
         AND   #$01
         LDY   #$0011
         STA   ($6C),Y
         LDA   #$00
         INY
         STA   ($6C),Y
         LDA   #$80
         INY
         STA   ($6C),Y
         JSL   L180C51
         AND   #$07
         CLC
         ADC   #$12
         LDY   #$0014
         STA   ($6C),Y
         LDA   #$06
         STA   $5C
         JMP   L06107E

L0616A7  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         STA   L026E77
         CLC
         ADC   $64
         CMP   #$09
         BCC   L0616BE
         PLP
         RTL

L0616BE  STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L0616CA  LDA   ($6C)
         STA   $5C
         BNE   L0616DA
         LDX   $64
         PHX
         JSL   L0616F1
         PLX
         STX   $64
L0616DA  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L0616CA
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L0616F1  LDA   L024438
         BNE   L0616F7
         RTL

L0616F7  DEC
         STA   L024438
         INC
         STA   $64
         LDA   L026E77
         SEC
         SBC   $64
         ASL
         ASL
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   L024430
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$15
         STA   $5C
         JMP   L06107E

L061732  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         CMP   #$09
         BCC   L061746
         PLP
         RTL

L061746  STA   $65
         LDA   L024438
         DEC
         STZ   $61
         STA   $60
         LDY   $60
         LDA   L020190,Y
         CLC
         ADC   L024436
         BCC   L06175D
         PLP
         RTL

L06175D  STA   L024436
         LDA   $65
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L06176E  LDA   ($6C)
         STA   $5C
         BNE   L06177E
         LDX   $64
         PHX
         JSL   L061795
         PLX
         STX   $64
L06177E  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L06176E
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061795  LDA   L024438
         BNE   L06179B
         RTL

L06179B  DEC
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L0617AF  JSL   L180C51
         AND   #$7F
         STA   $5C
         CMP   #$76
         BCS   L0617AF
         LDY   #$0004
         STA   ($6C),Y
         CMP   #$3B
         STZ   $5C
         BCS   L0617C8
         INC   $5C
L0617C8  ASL   $5C
         DEC   $5C
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         LDY   #$0012
         STA   ($6C),Y
         LDY   #$0014
         STA   ($6C),Y
         LDA   #$05
         LDY   #$0013
         STA   ($6C),Y
         LDA   $5C
         LDY   #$0011
         STA   ($6C),Y
         JSL   L180C51
         AND   #$0F
         CLC
         ADC   #$05
         LDY   #$0015
         STA   ($6C),Y
         LDA   #$00
         INY
         STA   ($6C),Y
         INY
         STA   ($6C),Y
         LDA   #$0A
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$03
         LDY   #$0007
         STA   ($6C),Y
         RTL

L061810  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L061826
         PLP
         RTL

L061826  LDA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDX   #$0008
         STX   $64
L061835  LDA   ($6C)
         STA   $5C
         BNE   L061845
         LDX   $64
         PHX
         JSL   L06185C
         PLX
         STX   $64
L061845  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         SEP   #$20
         BNE   L061835
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06185C  LDA   L024438
         STA   $5C
         BNE   L061864
         RTL

L061864  DEC   $5C
         LDA   $5C
         STA   L024438
         AND   #$FE
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   L024438
         AND   #$01
         STA   $5C
         BEQ   L0618BD
         JSL   L180C51
         AND   #$0F
         CLC
         ADC   #$14
         STA   $5C
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$0C
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0006
         STA   ($6C),Y
         LDA   #$09
         LDY   #$0007
         STA   ($6C),Y
         LDA   #$02
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         LDA   $5C
         STA   $69
         RTL

L0618BD  LDA   #$76
         SEC
         SBC   $69
         STA   $5C
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$0C
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0006
         STA   ($6C),Y
         LDA   #$09
         LDY   #$0007
         STA   ($6C),Y
         LDA   #$02
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         RTL

L0618ED  ENT
         PHP
         SEP   #$20
         LDA   L024438
         LSR
         STA   $5C
         STA   $64
         LDX   #L024E00
         STX   $70
         LDX   #L024F80
         STX   $60
         LDA   #$04
         STA   $65
L061906  LDA   ($70)
         ORA   ($60)
         STA   $5C
         BEQ   L061928
L06190E  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         LDA   $60
         CLC
         ADC   #$0060
         STA   $60
         SEP   #$20
         DEC   $65
         BNE   L061906
         PLP
         RTL

L061928  DEC   $64
         BNE   L06190E
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDX   $60
         LDA   L026E9A,X
         STA   $60
         LDA   L024436
         CLC
         ADC   $60
         STA   $5C
         BCC   L061947
         PLP
         RTL

L061947  LDA   $5C
         STA   L024436
         LDA   L024432
         STA   $60
         LDA   L024438
         CLC
         ADC   $60
         STA   L024432
         LDX   #L024E00
         STX   $70
         LDX   #L024F80
         STX   $60
         LDA   #$04
         STA   $5C
L061968  REP   #$20
         LDA   $5C
         XBA
         STA   $5C
         SEP   #$20
         LDA   ($70)
         ORA   ($60)
         STA   $5C
         BNE   L06197D
         JSL   L0619A1
L06197D  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         LDA   $60
         CLC
         ADC   #$0060
         STA   $60
         LDA   $5C
         XBA
         STA   $5C
         SEP   #$20
         DEC   $5C
         BNE   L061968
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L0619A1  LDA   L024438
         STA   $5C
         BNE   L0619A9
         RTL

L0619A9  LDA   $5C
         SEC
         SBC   #$02
         STA   L024438
         ASL
         ASL
         LDY   #$000C
         STA   ($70),Y
         STA   ($60),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($70)
         INC
         STA   $5C
         STA   ($60)
         JSL   L180C51
         LDA   $5C
         AND   #$3F
         CLC
         ADC   #$1B
         LDY   #$0004
         STA   ($70),Y
         LDA   #$0E
         LDY   #$0005
         STA   ($70),Y
         LDA   #$01
         LDY   #$0005
         STA   ($60),Y
         LDA   #$03
         LDY   #$0007
         STA   ($70),Y
         STA   ($60),Y
         STZ   $5C
         LDA   $5C
         LDY   #$0006
         STA   ($70),Y
         STA   ($60),Y
         JSL   L180C51
         AND   #$02
         LDY   #$0010
         STA   ($70),Y
         LDA   #$02
         STA   $5C
         LDY   #$000B
         STA   ($70),Y
         STA   ($60),Y
         RTL

L061A10  ENT
         PHP
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L061A24
         PLP
         RTL

L061A24  LDA   $5C
         STA   $65
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDY   $60
         LDA   L026E9A,Y
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L061A43
         PLP
         RTL

L061A43  LDX   #L024E00
         STX   $6C
         LDX   #$0008
         STX   $64
L061A4D  LDA   ($6C)
         STA   $5C
         BNE   L061A5D
         LDX   $64
         PHX
         JSL   L061A74
         PLX
         STX   $64
L061A5D  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         DEC   $64
         SEP   #$20
         BNE   L061A4D
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061A74  LDA   L024438
         STA   $5C
         BNE   L061A7C
         RTL

L061A7C  DEC   $5C
         LDA   $5C
         STA   L024438
         LDA   #$00
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L061A92  JSL   L180C51
         AND   #$7F
         STA   $5C
         CMP   #$6E
         BCS   L061A92
         LDY   #$0004
         STA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         JSL   L180C51
         AND   #$7F
         CLC
         ADC   #$10
         LDY   #$0005
         STA   ($6C),Y
         CLC
         ADC   #$02
         STA   $69
         LDX   L024442
         STX   $60
         LDA   $60
         SEC
         SBC   $68
         STA   $5C
         LDA   #$02
         STA   $64
         BCS   L061AD8
         LDA   $5C
         EOR   #$FF
         INC
         STA   $5C
         LDA   #$FE
         STA   $64
L061AD8  LDA   $5C
         STA   $68
         LDA   $61
         SEC
         SBC   #$03
         SEC
         SBC   $69
         STA   $5C
         LDA   #$02
         STA   $65
         BCS   L061AF7
         LDA   $5C
         EOR   #$FF
         INC
         STA   $5C
         LDA   #$FE
         STA   $65
L061AF7  LDA   $5C
         STA   $69
         CMP   #$18
         BCS   L061A92
         LDA   $5C
         CMP   #$32
         BCS   L061A92
         LDA   $68
         STA   $5C
         CMP   #$18
         BCS   L061B10
         JMP   L061A92

L061B10  LDA   $5C
         CMP   #$32
         BCC   L061B19
         JMP   L061A92

L061B19  LDA   #$03
         LDY   #$0007
         STA   ($6C),Y
         LDA   $68
         LDY   #$0010
         STA   ($6C),Y
         LDA   $69
         INY
         STA   ($6C),Y
         LDA   #$00
         INY
         STA   ($6C),Y
         LDA   $64
         INY
         STA   ($6C),Y
         LDA   $65
         INY
         STA   ($6C),Y
         RTL

L061B3C  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $60
         LDA   L024438
         CLC
         ADC   $60
         STA   $5C
         CMP   #$09
         BCC   L061B52
         PLP
         RTL

L061B52  LDA   $5C
         XBA
         LDA   $5D
         STA   $5C
         XBA
         STA   $5D
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDX   $60
         LDA   L026E9A,X
         STA   $60
         CLC
         ADC   L024436
         STA   $5C
         BCC   L061B75
         PLP
         RTL

L061B75  LDA   $5C
         STA   L024436
         LDA   $5D
         XBA
         LDA   $5C
         STA   $5D
         XBA
         STA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDX   #$0008
         STX   $64
L061B91  LDA   ($6C)
         STA   $5C
         BNE   L061BA1
         LDX   $64
         PHX
         JSL   L061BB8
         PLX
         STX   $64
L061BA1  REP   #$20
         LDA   #$0060
         CLC
         ADC   $6C
         STA   $6C
         DEC   $64
         SEP   #$20
         BNE   L061B91
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061BB8  LDA   L024438
         STA   $5C
         BNE   L061BC0
         RTL

L061BC0  LDA   $5C
         DEC
         STA   L024438
         INC
         ASL
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         JSL   L180C51
         AND   #$3F
         CLC
         ADC   #$1B
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$0C
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$28
         LDY   #$0007
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$50
         LDY   #$0011
         STA   ($6C),Y
         RTL

L061C02  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L061C18
         PLP
         RTL

L061C18  LDA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L061C26  LDA   ($6C)
         STA   $5C
         BNE   L061C30
         JSL   L061C47
L061C30  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061C26
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061C47  LDA   L024438
         STA   $5C
         BNE   L061C4F
         RTL

L061C4F  LDA   $5C
         DEC
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L061C65  JSL   L180C51
         AND   #$7F
         STA   $5C
         CMP   #$76
         BCC   L061C74
         JMP   L061C65

L061C74  LDA   $5C
         LDY   #$0004
         STA   ($6C),Y
         CMP   #$3C
         BCC   L061C82
         JMP   L061C8C

L061C82  LDA   #$01
         LDY   #$0010
         STA   ($6C),Y
         JMP   L061C93

L061C8C  LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
L061C93  JSL   L180C51
         AND   #$07
         CLC
         ADC   #$03
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0006
         STA   ($6C),Y
         LDA   #$19
         LDY   #$0007
         STA   ($6C),Y
         JSL   L180C51
         AND   #$03
         CLC
         ADC   #$02
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$04
         LDY   #$0011
         STA   ($6C),Y
         RTL

L061CC5  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L061CDB
         PLP
         RTL

L061CDB  LDA   $5C
         STA   $65
         LDA   L024438
         DEC
         STA   $5C
         STZ   $61
         STA   $60
         LDX   $60
         LDA   L026E92,X
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L061CFC
         PLP
         RTL

L061CFC  LDA   $5C
         STA   L024436
         LDA   $65
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L061D0F  LDA   ($6C)
         STA   $5C
         BNE   L061D19
         JSL   L061D30
L061D19  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061D0F
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061D30  LDA   L024438
         STA   $5C
         BNE   L061D38
         RTL

L061D38  DEC   $5C
         LDA   $5C
         STA   L024438
         JSL   L180C51
         AND   #$03
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
         JSL   L180C51
         BIT   #$80
         BNE   L061DA0
         AND   #$3F
         CLC
         ADC   #$10
         STA   $5C
         LDA   #$00
         LDY   #$0004
         STA   ($6C),Y
         LDA   $5C
         LDY   #$0005
         STA   ($6C),Y
         REP   #$20
         LDA   #$0508
         LDY   #$0006
         STA   ($6C),Y
         SEP   #$20
         LDA   #$06
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$80
         LDY   #$0010
         STA   ($6C),Y
         JSL   L180C51
         AND   #$03
         CLC
         ADC   #$09
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0013
         STA   ($6C),Y
         RTL

L061DA0  LDA   $5C
         AND   #$3F
         CLC
         ADC   #$10
         STA   $5C
         LDA   #$75
         LDY   #$0004
         STA   ($6C),Y
         LDA   $5C
         LDY   #$0005
         STA   ($6C),Y
         REP   #$20
         LDA   #$0500
         LDY   #$0006
         STA   ($6C),Y
         LDA   #$0800
         LDY   #$0010
         STA   ($6C),Y
         SEP   #$20
         LDA   #$06
         LDY   #$000B
         STA   ($6C),Y
         JSL   L180C51
         AND   #$03
         CLC
         ADC   #$F4
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0013
         STA   ($6C),Y
         RTL

L061DE8  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         STA   L0201B8
         LDX   L02708B
         STX   $60
         STX   L024DB8
         LDX   #L026EAA
         STX   $64
         REP   #$20
         LDA   #L02708A
         CLC
         ADC   #$0023
         STA   $68
         SEP   #$20
         JSL   L060000
         LDA   L024438
         CMP   #$FF
         BEQ   L061E1B
         PLP
         RTL

L061E1B  LDA   L02443A
         CLC
         ADC   #$10
         STA   $64
         STZ   $68
         LDA   #$08
         STA   $65
         LDX   #L024E00
         STX   $6C
L061E2E  LDA   ($6C)
         STA   $5C
         CMP   $64
         BNE   L061E3A
         JSL   L061E4C
L061E3A  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061E2E
         PLP
         RTL

L061E4C  INC   $68
         LDA   $68
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         ASL
         LDY   #$0011
         STA   ($6C),Y
         RTL

L061E5E  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L061E74
         PLP
         RTL

L061E74  LDA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L061E82  LDA   ($6C)
         STA   $5C
         BNE   L061E92
         LDX   $64
         PHX
         JSL   L061EA9
         PLX
         STX   $64
L061E92  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061E82
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061EA9  LDA   L024438
         STA   $5C
         BNE   L061EB1
         RTL

L061EB1  DEC   $5C
         LDA   $5C
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L061EC8  JSL   L180C67
         AND   #$7F
         STA   $5C
         CMP   #$6E
         BCS   L061EC8
         CLC
         ADC   #$04
         STA   $5C
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$30
         LDY   #$0007
         STA   ($6C),Y
         RTL

L061EED  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L061F03
         PLP
         RTL

L061F03  LDA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L061F11  LDA   ($6C)
         STA   $5C
         BNE   L061F21
         LDX   $64
         PHX
         JSL   L061F38
         PLX
         STX   $64
L061F21  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061F11
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061F38  LDA   L024438
         STA   $5C
         BNE   L061F40
         RTL

L061F40  DEC   $5C
         LDA   $5C
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L061F57  JSL   L180C67
         AND   #$7F
         STA   $5C
         CMP   #$50
         BCS   L061F57
         CLC
         ADC   #$04
         STA   $5C
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$30
         LDY   #$0007
         STA   ($6C),Y
         RTL

L061F7C  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L061F92
         PLP
         RTL

L061F92  LDA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L061FA0  LDA   ($6C)
         STA   $5C
         BNE   L061FB0
         LDX   $64
         PHX
         JSL   L061FC7
         PLX
         STX   $64
L061FB0  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L061FA0
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L061FC7  LDA   L024438
         STA   $5C
         BNE   L061FCF
         RTL

L061FCF  DEC   $5C
         LDA   $5C
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L061FE6  JSL   L180C67
         LDA   $5C
         AND   #$7F
         STA   $5C
         CMP   #$50
         BCS   L061FE6
         CLC
         ADC   #$22
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$30
         LDY   #$0007
         STA   ($6C),Y
         RTL

L06200B  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L062021
         PLP
         RTL

L062021  LDA   $5C
         STA   $65
         LDA   L024438
         DEC
         STA   $5C
         STZ   $61
         STA   $60
         LDX   $60
         LDA   L026E9A,X
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L062042
         PLP
         RTL

L062042  LDA   $5C
         STA   L024436
         LDA   $65
         STA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L062057  LDA   ($6C)
         STA   $5C
         BNE   L062067
         LDX   $64
         PHX
         JSL   L06207E
         PLX
         STX   $64
L062067  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L062057
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06207E  LDA   L024438
         STA   $5C
         BNE   L062086
         RTL

L062086  DEC   $5C
         LDA   $5C
         STA   L024438
         ASL
         ASL
         ASL
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L06209D  JSL   L180C51
         LDA   $5C
         AND   #$7F
         STA   $5C
         CMP   #$76
         BCS   L06209D
         LDA   $5C
         STA   $64
         LDA   L024442
         SEC
         SBC   $64
         STA   $5C
         CMP   #$10
         BCC   L06209D
         CMP   #$F0
         BCS   L06209D
         LDA   $64
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$0E
         LDY   #$0005
         STA   ($6C),Y
         LDA   $64
         CLC
         ADC   #$05
         STA   $64
         LDX   L024442
         STX   $60
         LDA   $60
         SEC
         SBC   $64
         STA   $5C
         LDA   #$01
         STA   $65
         BCS   L0620EF
         LDA   $5C
         EOR   #$FF
         INC
         STA   $5C
         STZ   $65
L0620EF  REP   #$20
         LDA   #$0303
         LDY   #$0006
         STA   ($6C),Y
         SEP   #$20
         LDA   $5C
         LDY   #$0010
         STA   ($6C),Y
         LDA   $65
         LDY   #$0011
         STA   ($6C),Y
         LDA   $61
         SEC
         SBC   #$19
         LDY   #$0013
         STA   ($6C),Y
         SEC
         SBC   #$0E
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0014
         STA   ($6C),Y
         RTL

L062123  ENT
         PHP
         LDA   L024438
         LSR
         STA   $5C
         STA   $64
         LDX   #L024E00
         STX   $70
         LDX   #L024F80
         STX   $60
         LDA   #$04
         STA   $65
L06213A  LDA   ($70)
         ORA   ($60)
         BEQ   L06215A
L062140  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         LDA   $60
         CLC
         ADC   #$0060
         STA   $60
         SEP   #$20
         DEC   $65
         BNE   L06213A
         PLP
         RTL

L06215A  DEC   $64
         BNE   L062140
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDY   $60
         LDA   L026E9A,Y
         STA   $60
         LDA   L024436
         CLC
         ADC   $60
         STA   $5C
         BCC   L062179
         PLP
         RTL

L062179  LDA   $5C
         STA   L024436
         LDA   L024432
         STA   $60
         LDA   L024438
         CLC
         ADC   $60
         STA   L024432
         LDX   #L024E00
         STX   $70
         LDX   #L024F80
         STX   $60
         LDA   #$04
         STA   $5C
L06219A  LDA   ($70)
         ORA   ($60)
         STA   $5D
         BNE   L0621AC
         LDX   $5C
         PHX
         JSL   L0621CB
         PLX
         STX   $5C
L0621AC  REP   #$20
         LDA   $70
         CLC
         ADC   #$0060
         STA   $70
         LDA   $60
         CLC
         ADC   #$0060
         STA   $60
         SEP   #$20
         DEC   $5C
         BNE   L06219A
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L0621CB  LDA   L024438
         STA   $5C
         BNE   L0621D3
         RTL

L0621D3  LDA   $5C
         SEC
         SBC   #$02
         STA   $5C
         STA   L024438
         ASL
         ASL
         LDY   #$000C
         STA   ($70),Y
         STA   ($60),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($70)
         INC
         STA   ($60)
         JSL   L180C51
         AND   #$3F
         CLC
         ADC   #$1B
         LDY   #$0004
         STA   ($70),Y
         LDA   #$0E
         LDY   #$0005
         STA   ($70),Y
         LDA   #$01
         STA   ($60),Y
         LDA   #$03
         LDY   #$0007
         STA   ($70),Y
         STA   ($60),Y
         STZ   $5C
         LDA   $5C
         LDY   #$0006
         STA   ($70),Y
         STA   ($60),Y
         JSL   L180C51
         AND   #$01
         STA   $5C
         LDY   #$0010
         STA   ($70),Y
         RTL

L06222C  ENT
         PHP
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L062240
         PLP
         RTL

L062240  LDA   $5C
         STA   $65
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDY   $60
         LDA   L026E92,Y
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L06225F
         PLP
         RTL

L06225F  LDA   $5C
         STA   L024436
         LDA   $65
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L062272  LDA   ($6C)
         STA   $5C
         BNE   L062282
         LDX   $64
         PHX
         JSL   L062299
         PLX
         STX   $64
L062282  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L062272
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L062299  LDA   L024438
         STA   $5C
         BNE   L0622A1
         RTL

L0622A1  DEC   $5C
         LDA   $5C
         STA   L024438
         JSL   L180C51
         AND   #$03
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         STA   $5C
         LDX   #$0203
         STX   $64
         CMP   #$04
         BEQ   L0622C7
         LDX   #$0305
         STX   $64
L0622C7  LDA   $5C
         CLC
         ADC   #$10
         STA   ($6C)
         LDA   $65
         LDY   #$000B
         STA   ($6C),Y
         LDA   $64
         LDY   #$0007
         STA   ($6C),Y
         JSL   L180C51
         BIT   #$80
         BNE   L062326
         AND   #$3F
         CLC
         ADC   #$10
         STA   $5C
         LDA   #$00
         LDY   #$0004
         STA   ($6C),Y
         LDA   $5C
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$08
         LDY   #$0006
         STA   ($6C),Y
         LDA   #$80
         LDY   #$0010
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0011
         STA   ($6C),Y
         JSL   L180C51
         AND   #$03
         CLC
         ADC   #$09
         STA   $5C
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0013
         STA   ($6C),Y
         RTL

L062326  LDA   $5C
         AND   #$3F
         CLC
         ADC   #$10
         STA   $5C
         LDA   #$75
         LDY   #$0004
         STA   ($6C),Y
         LDA   $5C
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0006
         STA   ($6C),Y
         LDY   #$0011
         STA   ($6C),Y
         LDY   #$0010
         LDA   #$80
         STA   ($6C),Y
         JSL   L180C51
         AND   #$03
         CLC
         ADC   #$F4
         STA   $5C
         LDY   #$0012
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0013
         STA   ($6C),Y
         RTL

L062368  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         AND   #$01
         STA   $5C
         STA   L0201B8
         REP   #$20
         LDA   L0270B2
         STA   $60
         STA   L024DB8
         LDX   #L026EAA
         STX   $64
         LDX   #L0270B1
         CLC
         ADC   #$0023
         STA   $68
         SEP   #$20
         JMPL  L060001

L062394  ENT
         PHP
         SEP   #$20
         JSL   L180C51
         LDA   #$01
         STA   L0201B8
         REP   #$20
         LDA   L0270FB
         STA   $60
         STA   L024DB8
         LDA   #L026EAA
         STA   $64
         LDA   #L0270FA
         CLC
         ADC   #$0023
         STA   $68
         JMPL  L060001

L0623BC  ENT
         PHP
         SEP   #$20
         LDA   L024432
         STA   $64
         LDA   L024438
         CLC
         ADC   $64
         STA   $5C
         CMP   #$09
         BCC   L0623D2
         PLP
         RTL

L0623D2  LDA   $5C
         STA   $65
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDY   $60
         LDA   L026E92,Y
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L0623F1
         PLP
         RTL

L0623F1  LDA   $5C
         STA   L024436
         LDA   $65
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L062404  LDA   ($6C)
         STA   $5C
         BNE   L062414
         LDX   $64
         PHX
         JSL   L06242B
         PLX
         STX   $64
L062414  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L062404
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L06242B  LDA   L024438
         STA   $5C
         BNE   L062433
         RTL

L062433  DEC   $5C
         LDA   $5C
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L06244A  JSL   L180C51
         AND   #$7F
         STA   $5C
         CMP   #$76
         BCS   L06244A
         LDA   $5C
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$0D
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0006
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0007
         STA   ($6C),Y
         LDA   #$01
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         RTL

L062481  ENT
         PHP
         SEP   #$20
         LDA   L024432
         CLC
         ADC   L024438
         STA   $5C
         CMP   #$09
         BCC   L062493
         PLP
         RTL

L062493  LDA   $5C
         STA   $65
         LDA   L024438
         DEC
         STA   $60
         STZ   $61
         LDY   $60
         LDA   L026E92,Y
         STA   $64
         LDA   L024436
         CLC
         ADC   $64
         STA   $5C
         BCC   L0624B2
         PLP
         RTL

L0624B2  LDA   $5C
         STA   L024436
         LDA   $65
         STA   $5C
         STA   L024432
         LDX   #L024E00
         STX   $6C
         LDA   #$08
         STA   $65
L0624C7  LDA   ($6C)
         STA   $5C
         BNE   L0624D7
         LDX   $64
         PHX
         JSL   L0624EE
         PLX
         STX   $64
L0624D7  REP   #$20
         LDA   $6C
         CLC
         ADC   #$0060
         STA   $6C
         SEP   #$20
         DEC   $65
         BNE   L0624C7
         LDA   #$FF
         STA   L024438
         PLP
         RTL

L0624EE  LDA   L024438
         STA   $5C
         BNE   L0624F6
         RTL

L0624F6  LDA   $5C
         DEC
         STA   L024438
         ASL
         ASL
         INC
         LDY   #$000C
         STA   ($6C),Y
         LDA   L02443A
         CLC
         ADC   #$10
         STA   ($6C)
L06250C  JSL   L180C51
         AND   #$7F
         STA   $5C
         CMP   #$76
         BCS   L06250C
         CLC
         ADC   #$05
         STA   $64
         LDA   L024442
         SEC
         SBC   $64
         STA   $5C
         CMP   #$14
         BCC   L06250C
         CMP   #$EC
         BCS   L06250C
         LDA   $64
         SEC
         SBC   #$05
         LDY   #$0004
         STA   ($6C),Y
         LDA   #$92
         LDY   #$0005
         STA   ($6C),Y
         LDA   #$08
         LDY   #$0006
         STA   ($6C),Y
         LDA   #$06
         LDY   #$0007
         STA   ($6C),Y
         LDA   #$01
         LDY   #$000B
         STA   ($6C),Y
         LDA   #$00
         LDY   #$0010
         STA   ($6C),Y
         RTL

L06255B  ENT
         PHP
         SEP   #$20
         LDY   #$000C
         LDA   ($6C),Y
         STA   $5C
         BEQ   L06256E
         DEC
         STA   ($6C),Y
         BEQ   L06256E
         PLP
         RTL

L06256E  LDY   #$0010
         LDA   ($6C),Y
         DEC
         STA   $5C
         BEQ   L0625B2
         BPL   L0625BF
         LDY   #$0005
         LDA   ($6C),Y
         SEC
         SBC   #$04
         STA   ($6C),Y
         CLC
         ADC   #$05
         STA   $64
         LDA   L024443
         STA   $5C
         CMP   $64
         BCC   L0625C9
         LDY   #$0004
         LDA   ($6C),Y
         STA   $5C
         CMP   #$40
         BCS   L0625A8
         LDY   #$0010
         LDA   ($6C),Y
         INC
         STA   ($6C),Y
         JMP   L0625C9

L0625A8  LDA   #$02
         LDY   #$0010
         STA   ($6C),Y
         JMP   L0625C9

L0625B2  LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   ($6C),Y
         JMP   L0625C9

L0625BF  LDY   #$0004
         LDA   ($6C),Y
         SEC
         SBC   #$05
         STA   ($6C),Y
L0625C9  LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$04
         LDY   #$000A
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         STA   $5C
         CMP   #$76
         BCC   L0625E5
         JMPL  L062B38

L0625E5  LDA   $5C
         CLC
         ADC   #$03
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$05
         LDY   #$0009
         STA   ($6C),Y
         PLP
         RTL

L0625F9  ENT
         PHP
         LDY   #$000C
         LDA   ($6C),Y
         STA   $5C
         BEQ   L06260A
         DEC
         STA   ($6C),Y
         BEQ   L06260A
         PLP
         RTL

L06260A  LDY   #$0012
         LDA   ($6C),Y
         DEC
         STA   ($6C),Y
         BNE   L062618
         JMPL  L080C60

L062618  STZ   $65
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$02
         STA   $69
         LDX   L024442
         STX   $60
         DEC   $61
         LDA   $60
         SEC
         SBC   $68
         STA   $5C
         BCS   L062647
         INC   $65
         LDA   $5C
         EOR   #$FF
         INC
         STA   $5C
L062647  LDA   $5C
         STA   $68
         ASL   $65
         LDA   $61
         SEC
         SBC   $69
         STA   $5C
         BCS   L06265D
         INC   $65
         EOR   #$FF
         INC
         STA   $5C
L06265D  LDA   $5C
         STA   $69
         ASL   $65
         CMP   $68
         BCS   L062671
         LDA   $68
         STA   $69
         LDA   $5C
         STA   $68
         INC   $65
L062671  LDA   $69
         STA   $5C
         CMP   #$28
         BCC   L0626BA
         LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$03
         STA   ($6C),Y
L062683  LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$03
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$02
         STA   $68
         CLC
         ADC   #$02
         LDY   #$0009
         STA   ($6C),Y
         LDY   #$0005
         LDA   ($6C),Y
         STA   $5C
         CMP   #$92
         BCC   L0626AC
         JMPL  L062B38

L0626AC  INC   $5C
         LDA   $5C
         STA   $69
         INC
         LDY   #$000A
         STA   ($6C),Y
         PLP
         RTL

L0626BA  LDA   $65
         ASL
         STA   $60
         STZ   $61
         LDX   $60
         JMP   (L0626C6,X)

L0626C6  DA    L0626D6
         DA    L062709
         DA    L06273C
         DA    L06276D
         DA    L0627A0
         DA    L0627D3
         DA    L062806
         DA    L062839
L0626D6  LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$02
         STA   ($6C),Y
         STA   $5C
         JSL   L062898
         LDY   #$0004
         LDA   ($6C),Y
         STA   $61
         LDY   #$0010
         LDA   ($6C),Y
         STA   $60
         JSL   L06286C
         LDA   $61
         LDY   #$0004
         STA   ($6C),Y
         LDA   $60
         LDY   #$0010
         STA   ($6C),Y
         JMP   L062683

L062709  LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$02
         STA   ($6C),Y
         STA   $5C
         JSL   L062898
         LDY   #$0005
         LDA   ($6C),Y
         STA   $61
         LDY   #$0011
         LDA   ($6C),Y
         STA   $60
         JSL   L06286C
         LDA   $61
         LDY   #$0005
         STA   ($6C),Y
         LDA   $60
         LDY   #$0011
         STA   ($6C),Y
         JMP   L062683

L06273C  LDY   #$0005
         LDA   ($6C),Y
         SEC
         SBC   #$02
         STA   ($6C),Y
         JSL   L062898
         LDY   #$0004
         LDA   ($6C),Y
         STA   $61
         LDY   #$0010
         LDA   ($6C),Y
         STA   $60
         JSL   L06286C
         LDA   $61
         LDY   #$0004
         STA   ($6C),Y
         LDA   $60
         LDY   #$0010
         STA   ($6C),Y
         JMP   L062683

L06276D  LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$02
         STA   ($6C),Y
         STA   $5C
         JSL   L062898
         LDY   #$0005
         LDA   ($6C),Y
         STA   $61
         LDY   #$0011
         LDA   ($6C),Y
         STA   $60
         JSL   L062882
         LDA   $61
         LDY   #$0005
         STA   ($6C),Y
         LDA   $60
         LDY   #$0011
         STA   ($6C),Y
         JMP   L062683

L0627A0  LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$02
         STA   ($6C),Y
         STA   $5C
         JSL   L062898
         LDY   #$0004
         LDA   ($6C),Y
         STA   $61
         LDY   #$0010
         LDA   ($6C),Y
         STA   $60
         JSL   L062882
         LDA   $61
         LDY   #$0004
         STA   ($6C),Y
         LDA   $60
         LDY   #$0010
         STA   ($6C),Y
         JMP   L062683

L0627D3  LDY   #$0004
         LDA   ($6C),Y
         SEC
         SBC   #$02
         STA   ($6C),Y
         STA   $5C
         JSL   L062898
         LDY   #$0005
         LDA   ($6C),Y
         STA   $61
         LDY   #$0011
         LDA   ($6C),Y
         STA   $60
         JSL   L06286C
         LDA   $61
         LDY   #$0005
         STA   ($6C),Y
         LDA   $60
         LDY   #$0011
         STA   ($6C),Y
         JMP   L062683

L062806  LDY   #$0005
         LDA   ($6C),Y
         SEC
         SBC   #$02
         STA   ($6C),Y
         STA   $5C
         JSL   L062898
         LDY   #$0004
         LDA   ($6C),Y
         STA   $61
         LDY   #$0010
         LDA   ($6C),Y
         STA   $60
         JSL   L062882
         LDA   $61
         LDY   #$0004
         STA   ($6C),Y
         LDA   $60
         LDY   #$0010
         STA   ($6C),Y
         JMP   L062683

L062839  LDY   #$0004
         LDA   ($6C),Y
         SEC
         SBC   #$02
         STA   ($6C),Y
         STA   $5C
         JSL   L062898
         LDY   #$0005
         LDA   ($6C),Y
         STA   $61
         LDY   #$0011
         LDA   ($6C),Y
         STA   $60
         JSL   L062882
         LDA   $61
         LDY   #$0005
         STA   ($6C),Y
         LDA   $60
         LDY   #$0011
         STA   ($6C),Y
         JMP   L062683

L06286C  LDA   $64
         STA   $65
         STZ   $64
         LSR   $65
         ROR   $64
         REP   #$20
         LDA   $60
         CLC
         ADC   $64
         STA   $60
         SEP   #$20
         RTL

L062882  LDA   $64
         STA   $65
         STZ   $64
         LSR   $65
         ROR   $64
         REP   #$20
         LDA   $60
         SEC
         SBC   $64
         STA   $60
         SEP   #$20
         RTL

L062898  LDA   $69
         ROR
         STZ   $65
         SEC
         SBC   $68
         BCS   L0628A7
         CLC
         ADC   $69
         INC   $64
L0628A7  SEC
         SBC   $68
         BCS   L0628B1
         CLC
         ADC   $69
         INC   $64
L0628B1  SEC
         SBC   $68
         BCS   L0628BB
         CLC
         ADC   $69
         INC   $64
L0628BB  SEC
         SBC   $68
         STA   $5C
         BCC   L0628C3
         RTL

L0628C3  INC   $64
         RTL

L0628C6  ENT
         PHP
         LDY   #$000C
         LDA   ($6C),Y
         STA   $5C
         BEQ   L0628D7
         DEC
         STA   ($6C),Y
         BEQ   L0628D7
         PLP
         RTL

L0628D7  STZ   $65
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$02
         STA   $69
         LDY   L024442
         STY   $60
         DEC   $61
         LDA   $60
         SEC
         SBC   $68
         STA   $5C
         BCS   L062906
         INC   $65
         LDA   $5C
         EOR   #$FF
         INC
         STA   $5C
L062906  STA   $68
         ASL   $65
         LDA   $61
         SEC
         SBC   $69
         STA   $5C
         BCS   L06291C
         INC   $65
         LDA   $5C
         EOR   #$FF
         INC
         STA   $5C
L06291C  STA   $69
         ASL   $65
         CMP   $68
         BCS   L06292E
         LDA   $68
         STA   $69
         LDA   $5C
         STA   $68
         INC   $65
L06292E  LDA   $69
         STA   $5C
         CMP   #$28
         BCC   L06296F
         LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$03
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$03
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$04
         LDY   #$0009
         STA   ($6C),Y
         LDY   #$0005
         LDA   ($6C),Y
         STA   $5C
         CMP   #$92
         BCC   L062964
         JMPL  L062B38

L062964  LDA   $5C
         INC
         INC
         LDY   #$000A
         STA   ($6C),Y
         PLP
         RTL

L06296F  LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDY   #$0005
         LDA   ($6C),Y
         INC   $69
         STA   $69
         LDX   $68
         PHX
         JSL   L03159E
         PLX
         STX   $68
         PHX
         JSL   L03159E
         PLX
         STX   $68
         JSL   L03159E
         JMPL  L080C60

L06299C  ENT
         PHP
         LDY   #$000C
         LDA   ($6C),Y
         STA   $5C
         BEQ   L0629AD
         DEC
         STA   ($6C),Y
         BEQ   L0629AD
         PLP
         RTL

L0629AD  LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $5C
         CMP   #$92
         BCC   L0629BF
         JMPL  L062B38

L0629BF  LDA   $5C
         LDY   #$0005
         STA   ($6C),Y
         CLC
         ADC   #$03
         LDY   #$000A
         STA   ($6C),Y
         REP   #$20
         LDY   #$0011
         LDA   ($6C),Y
         STA   $68
         SEP   #$20
         LDY   #$0013
         LDA   ($6C),Y
         STA   $60
         LDY   #$0004
         LDA   ($6C),Y
         STA   $61
         LDY   #$0010
         LDA   ($6C),Y
         BIT   #$01
         BNE   L0629FC
         REP   #$20
         LDA   $60
         CLC
         ADC   $68
         STA   $60
         JMP   L062A05

L0629FC  REP   #$20
         LDA   $60
         SEC
         SBC   $68
         STA   $60
L062A05  SEP   #$20
         LDA   $60
         LDY   #$0013
         STA   ($6C),Y
         LDA   $61
         LDY   #$0004
         STA   ($6C),Y
         STA   $5C
         CMP   #$76
         BCC   L062A1F
         JMPL  L062B38

L062A1F  LDA   $5C
         CLC
         ADC   #$02
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$06
         LDY   #$0009
         STA   ($6C),Y
         STA   $5C
         REP   #$20
         LDA   #$0064
         CLC
         ADC   $68
         STA   $60
         LDY   #$0011
         STA   ($6C),Y
         SEP   #$20
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDY   #$0005
         LDA   ($6C),Y
         INC
         INC
         STA   $69
         LDX   $68
         PHX
         JSL   L031582
         PLX
         STX   $68
         PHX
         JSL   L031582
         PLX
         STX   $68
         JSL   L031582
         PLP
         RTL

L062A6F  ENT
         PHP
         LDY   #$000C
         LDA   ($6C),Y
         STA   $5C
         BEQ   L062A80
         DEC
         STA   ($6C),Y
         BEQ   L062A80
         PLP
         RTL

L062A80  LDY   #$0004
         LDA   ($6C),Y
         LDY   #$0010
         CLC
         ADC   ($6C),Y
         STA   $5C
         CMP   #$76
         BCC   L062A95
         JMPL  L062B38

L062A95  LDA   $5C
         LDY   #$0004
         STA   ($6C),Y
         CLC
         ADC   #$02
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$06
         LDY   #$0009
         STA   ($6C),Y
         LDY   #$0013
         LDA   ($6C),Y
         STA   $60
         LDY   #$0005
         LDA   ($6C),Y
         STA   $61
         REP   #$20
         LDY   #$0011
         LDA   ($6C),Y
         STA   $68
         CLC
         ADC   $60
         STA   $60
         SEP   #$20
         LDA   $60
         LDY   #$0013
         STA   ($6C),Y
         LDA   $61
         LDY   #$0005
         STA   ($6C),Y
         STA   $5C
         CMP   #$92
         BCC   L062AE2
         JMPL  L062B38

L062AE2  LDA   $5C
         LDY   #$0005
         STA   ($6C),Y
         CLC
         ADC   #$03
         LDY   #$000A
         STA   ($6C),Y
         STA   $5C
         REP   #$20
         LDA   #$0064
         CLC
         ADC   $68
         STA   $60
         SEP   #$20
         LDA   $60
         LDY   #$0011
         STA   ($6C),Y
         LDA   $61
         LDY   #$0012
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDY   #$0005
         LDA   ($6C),Y
         INC
         INC
         STA   $69
         LDX   $68
         PHX
         JSL   L031582
         PLX
         STX   $68
         PHX
         JSL   L031582
         PLX
         STX   $68
         JSL   L031582
         PLP
         RTL

L062B38  ENT
         LDA   ($6C)
         AND   #$80
         CLC
         ADC   #$0F
         STA   ($6C)
         PLP
         RTL

L062B43  ENT
         PHP
         SEP   #$20
         LDA   L024428
         AND   #$01
         BNE   L062B55
         LDY   #$0005
         LDA   ($6C),Y
         INC
         STA   ($6C),Y
L062B55  LDY   #$0005
         LDA   ($6C),Y
         CMP   #$8C
         BCS   L062B38
         CLC
         ADC   #$04
         LDY   #$000A
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         STA   $68
         LDA   #$00
         XBA
         LDY   #$0010
         LDA   ($6C),Y
         ASL
         TAX
         JMP   (L062B7A,X)

L062B7A  DA    L062B82
         DA    L062BBF
         DA    L062BA2
         DA    L062BEA
L062B82  LDA   $68
         CLC
         ADC   #$05
         STA   $68
         CMP   #$58
         BCS   L062B90
         JMP   L062C11

L062B90  LDY   #$0010
         LDA   ($6C),Y
         INC
         STA   ($6C),Y
         LDY   #$0011
         LDA   #$00
         STA   ($6C),Y
         JMP   L062C11

L062BA2  LDA   $68
         SEC
         SBC   #$05
         STA   $68
         CMP   #$1E
         BCS   L062C11
         LDY   #$0010
         LDA   ($6C),Y
         INC
         STA   ($6C),Y
         LDY   #$0011
         LDA   #$00
         STA   ($6C),Y
         JMP   L062C11

L062BBF  LDA   #$00
         XBA
         LDY   #$0011
         LDA   ($6C),Y
         TAX
         STX   $60
         LDA   L026EC2,X
         CLC
         ADC   $68
         STA   $68
         INC   $60
         LDA   $60
         LDY   #$0011
         STA   ($6C),Y
         CMP   #$11
         BCC   L062C11
         LDY   #$0010
         LDA   ($6C),Y
         INC
         STA   ($6C),Y
         JMP   L062C11

L062BEA  LDA   #$00
         XBA
         LDY   #$0011
         LDA   ($6C),Y
         TAX
         STX   $60
         LDA   $68
         SEC
         SBC   L026EC2,X
         STA   $68
         INC   $60
         LDY   #$0011
         LDA   $60
         STA   ($6C),Y
         CMP   #$11
         BCC   L062C11
         LDY   #$0010
         LDA   #$00
         STA   ($6C),Y
L062C11  LDA   $68
         LDY   #$0004
         STA   ($6C),Y
         CLC
         ADC   #$03
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$04
         LDY   #$0009
         STA   ($6C),Y
         PLP
         RTL

L062C2A  ENT
         PHP
         SEP   #$20
         LDY   #$000C
         LDA   ($6C),Y
         BEQ   L062C3B
         DEC
         STA   ($6C),Y
         BEQ   L062C3B
         PLP
         RTL

L062C3B  LDY   #$0010
         LDA   ($6C),Y
         STA   $64
         INY
         LDA   ($6C),Y
         STA   $65
         CMP   $64
         BCS   L062C4E
         JMP   L062CE9

L062C4E  LDY   #$0012
         LDA   ($6C),Y
         STZ   $68
         SEC
         SBC   $64
         BCS   L062C5F
         CLC
         ADC   $65
         INC   $68
L062C5F  SEC
         SBC   $64
         BCS   L062C69
         CLC
         ADC   $65
         INC   $68
L062C69  SEC
         SBC   $64
         BCS   L062C73
         CLC
         ADC   $65
         INC   $68
L062C73  SEC
         SBC   $64
         BCS   L062C7D
         CLC
         ADC   $65
         INC   $68
L062C7D  SEC
         SBC   $64
         BCS   L062C87
         CLC
         ADC   $65
         INC   $68
L062C87  SEC
         SBC   $64
         BCS   L062C91
         CLC
         ADC   $65
         INC   $68
L062C91  LDY   #$0012
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         STA   $5C
         LDY   #$0013
         LDA   ($6C),Y
         BIT   #$80
         BNE   L062CB0
         LDA   $5C
         CLC
         ADC   $68
         STA   $5C
         JMP   L062CB7

L062CB0  LDA   $5C
         SEC
         SBC   $68
         STA   $5C
L062CB7  LDY   #$0004
         LDA   $5C
         STA   ($6C),Y
         LDY   #$0005
         LDA   ($6C),Y
         STA   $5C
         LDY   #$0014
         LDA   ($6C),Y
         BIT   #$80
         BNE   L062CD8
         LDA   $5C
         CLC
         ADC   #$06
         STA   $5C
         JMP   L062CDF

L062CD8  LDA   $5C
         SEC
         SBC   #$06
         STA   $5C
L062CDF  LDY   #$0005
         LDA   $5C
         STA   ($6C),Y
         JMP   L062D81

L062CE9  LDY   #$0012
         LDA   ($6C),Y
         STZ   $69
         SEC
         SBC   $65
         BCS   L062CFA
         CLC
         ADC   $64
         INC   $69
L062CFA  SEC
         SBC   $65
         BCS   L062D04
         CLC
         ADC   $64
         INC   $69
L062D04  SEC
         SBC   $65
         BCS   L062D0E
         CLC
         ADC   $64
         INC   $69
L062D0E  SEC
         SBC   $65
         BCS   L062D18
         CLC
         ADC   $64
         INC   $69
L062D18  SEC
         SBC   $65
         BCS   L062D22
         CLC
         ADC   $64
         INC   $69
L062D22  SEC
         SBC   $65
         BCS   L062D2C
         CLC
         ADC   $64
         INC   $69
L062D2C  LDY   #$0012
         STA   ($6C),Y
         LDY   #$0005
         LDA   ($6C),Y
         STA   $5C
         LDY   #$0014
         LDA   ($6C),Y
         BIT   #$80
         BNE   L062D4B
         LDA   $5C
         CLC
         ADC   $69
         STA   $5C
         JMP   L062D52

L062D4B  LDA   $5C
         SEC
         SBC   $69
         STA   $5C
L062D52  LDY   #$0005
         LDA   $5C
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         STA   $5C
         LDY   #$0013
         LDA   ($6C),Y
         BIT   #$80
         BNE   L062D73
         LDA   $5C
         CLC
         ADC   #$06
         STA   $5C
         JMP   L062D7A

L062D73  LDA   $5C
         SEC
         SBC   #$06
         STA   $5C
L062D7A  LDY   #$0004
         LDA   $5C
         STA   ($6C),Y
L062D81  LDY   #$0005
         LDA   ($6C),Y
         STA   $69
         CMP   #$90
         BCC   L062D8F
         JMP   L062B38

L062D8F  LDY   #$0004
         LDA   ($6C),Y
         STA   $68
         CMP   #$76
         BCC   L062D9D
         JMP   L062B38

L062D9D  LDA   $68
         CLC
         ADC   #$03
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$04
         LDY   #$0009
         STA   ($6C),Y
         LDA   $69
         CLC
         ADC   #$02
         LDY   #$000A
         STA   ($6C),Y
         PLP
         RTL

L062DBB  ENT
         PHP
         SEP   #$20
         LDY   #$000C
         LDA   ($6C),Y
         BEQ   L062DD1
         LDY   #$000C
         LDA   ($6C),Y
         DEC
         STA   ($6C),Y
         BEQ   L062DD1
         PLP
         RTL

L062DD1  LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$02
         STA   ($6C),Y
         CMP   #$90
         BCC   L062DE2
         JMP   L062B38

L062DE2  CLC
         ADC   #$04
         LDY   #$000A
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$02
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$06
         LDY   #$0009
         STA   ($6C),Y
         PLP
         RTL

L062E01  ENT
         PHP
         SEP   #$20
         LDY   #$000C
         LDA   ($6C),Y
         BEQ   L062E12
         DEC
         STA   ($6C),Y
         BEQ   L062E12
         PLP
         RTL

L062E12  LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$03
         LDY   #$0005
         STA   ($6C),Y
         CMP   #$96
         BCC   L062E26
         JMP   L062B38

L062E26  CLC
         ADC   #$04
         LDY   #$000A
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         STA   $61
         LDY   #$0010
         LDA   ($6C),Y
         STA   $60
         REP   #$20
         LDY   #$0011
         LDA   ($6C),Y
         STA   $68
         CLC
         ADC   $60
         STA   $60
         SEP   #$20
         LDY   #$0010
         STA   ($6C),Y
         XBA
         LDY   #$0004
         STA   ($6C),Y
         CLC
         ADC   #$02
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$06
         LDY   #$0009
         STA   $5C
         STA   ($6C),Y
         LDA   $61
         CMP   #$76
         BCC   L062E72
         JMP   L062B38

L062E72  LDY   #$0013
         LDA   ($6C),Y
         DEC
         BNE   L062E7D
         JMP   L062F04

L062E7D  BMI   L062E82
         JMP   L062F3F

L062E82  REP   #$20
         LDY   #$0011
         LDA   ($6C),Y
         STA   $60
         SEP   #$20
         XBA
         BIT   #$80
         BNE   L062EC9
         LDY   #$0006
         LDA   ($6C),Y
         DEC
         STA   ($6C),Y
         BPL   L062EA1
         LDA   ($6C),Y
         INC
         STA   ($6C),Y
L062EA1  REP   #$20
         LDA   $60
         CLC
         ADC   #$FF10
         STA   $60
         LDY   #$0011
         STA   ($6C),Y
         BCC   L062EB4
         PLP
         RTL

L062EB4  SEP   #$20
         LDY   #$0013
         LDA   #$01
         STA   ($6C),Y
         LDY   #$0011
         REP   #$20
         LDA   #$0000
         STA   ($6C),Y
         PLP
         RTL

L062EC9  SEP   #$20
         LDY   #$0006
         LDA   ($6C),Y
         BIT   #$08
         BNE   L062EDC
         LDY   #$0006
         LDA   ($6C),Y
         INC
         STA   ($6C),Y
L062EDC  REP   #$20
         LDA   $60
         CLC
         ADC   #$00F0
         STA   $60
         LDY   #$0011
         STA   ($6C),Y
         BCS   L062EEF
         PLP
         RTL

L062EEF  SEP   #$20
         LDY   #$0013
         LDA   #$01
         STA   ($6C),Y
         REP   #$20
         LDY   #$0011
         LDA   #$0000
         STA   ($6C),Y
         PLP
         RTL

L062F04  SEP   #$20
         LDA   L024443
         LDY   #$0005
         SEC
         SBC   ($6C),Y
         STA   $5C
         BCC   L062F19
         CMP   #$28
         BCC   L062F19
         PLP
         RTL

L062F19  LDY   #$0013
         LDA   #$02
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDA   L024442
         CMP   $68
         BCS   L062F33
         PLP
         RTL

L062F33  REP   #$20
         LDY   #$0011
         LDA   #$FFFF
         STA   ($6C),Y
         PLP
         RTL

L062F3F  REP   #$20
         LDY   #$0011
         LDA   ($6C),Y
         STA   $60
         SEP   #$20
         XBA
         BIT   #$80
         BNE   L062F6B
         LDY   #$0006
         LDA   ($6C),Y
         INC
         STA   ($6C),Y
         REP   #$20
         LDA   $60
         CLC
         ADC   #$00F0
         STA   $60
         LDY   #$0011
         STA   ($6C),Y
         SEP   #$20
         JMP   L062F84

L062F6B  LDY   #$0006
         LDA   ($6C),Y
         DEC
         STA   ($6C),Y
         REP   #$20
         LDA   $60
         CLC
         ADC   #$FF10
         STA   $60
         LDY   #$0011
         STA   ($6C),Y
         SEP   #$20
L062F84  LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDY   #$0005
         LDA   ($6C),Y
         INC
         INC
         STA   $69
         REP   #$20
         LDA   $68
         PHA
         JSL   L031582
         PLA
         STA   $68
         JSL   L031582
         PLP
         RTL

L062FA9  ENT
         PHP
         SEP   #$20
         LDY   #$000C
         LDA   ($6C),Y
         BEQ   L062FBA
         DEC
         STA   ($6C),Y
         BEQ   L062FBA
         PLP
         RTL

L062FBA  LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$03
         STA   ($6C),Y
         CMP   #$96
         BCC   L062FCB
         JMP   L062B38

L062FCB  CLC
         ADC   #$04
         LDY   #$000A
         STA   ($6C),Y
L062FD3  ENT
         LDY   #$0004
         LDA   ($6C),Y
         STA   $61
         LDY   #$0010
         LDA   ($6C),Y
         STA   $60
         LDY   #$0011
         REP   #$20
         LDA   ($6C),Y
         STA   $68
         CLC
         ADC   $60
         STA   $60
         SEP   #$20
         LDY   #$0010
         STA   ($6C),Y
         LDY   #$0004
         XBA
         STA   ($6C),Y
         CLC
         ADC   #$02
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$06
         LDY   #$0009
         STA   ($6C),Y
         LDA   $61
         CMP   #$76
         BCC   L063015
         JMP   L062B38

L063015  REP   #$20
         LDY   #$0011
         LDA   ($6C),Y
         STA   $60
         SEP   #$20
         LDY   #$0013
         LDA   ($6C),Y
         STA   $68
         LDA   $61
         BIT   #$80
         BNE   L063052
         STZ   $69
         REP   #$20
         LDA   $60
         CLC
         ADC   $68
         STA   $60
         LDY   #$0011
         STA   ($6C),Y
         SEP   #$20
         LDA   $61
         CMP   #$03
         BCC   L063047
         LDA   #$02
L063047  CLC
         ADC   #$02
         LDY   #$0006
         STA   ($6C),Y
         JMP   L063076

L063052  LDA   #$FF
         STA   $69
         REP   #$20
         LDA   $60
         CLC
         ADC   $68
         STA   $60
         LDY   #$0011
         STA   ($6C),Y
         SEP   #$20
         LDA   $61
         CMP   #$FD
         BCS   L06306E
         LDA   #$FD
L06306E  CLC
         ADC   #$03
         LDY   #$0006
         STA   ($6C),Y
L063076  JSL   L180C51
         AND   #$07
         BEQ   L063080
         PLP
         RTL

L063080  LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDY   #$0005
         LDA   ($6C),Y
         INC
         INC
         STA   $69
         JSL   L031582
         PLP
         RTL

L063099  ENT
         PHP
         SEP   #$20
         LDY   #$000C
         LDA   ($6C),Y
         STA   $5C
         BEQ   L0630AC
         DEC
         STA   ($6C),Y
         BEQ   L0630AC
         PLP
         RTL

L0630AC  LDY   #$0004
         LDA   ($6C),Y
         LDY   #$0010
         CLC
         ADC   ($6C),Y
         CMP   #$76
         BCC   L0630BE
         JMP   L062B38

L0630BE  LDY   #$0004
         STA   ($6C),Y
         CLC
         ADC   #$02
         LDY   #$0008
         STA   ($6C),Y
         CLC
         ADC   #$06
         LDY   #$0009
         STA   ($6C),Y
         LDY   #$0011
         LDA   ($6C),Y
         STA   $60
         LDY   #$0005
         LDA   ($6C),Y
         STA   $61
         REP   #$20
         LDY   #$0012
         LDA   ($6C),Y
         STA   $68
         CLC
         ADC   $60
         STA   $60
         SEP   #$20
         LDY   #$0011
         STA   ($6C),Y
         XBA
         LDY   #$0005
         STA   ($6C),Y
         CMP   #$94
         BCC   L063103
         JMP   L062B38

L063103  CLC
         ADC   #$03
         LDY   #$000A
         STA   ($6C),Y
         LDY   #$0014
         LDA   ($6C),Y
         BIT   #$01
         BNE   L06316C
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $64
         LDA   L024442
         SEC
         SBC   $64
         BCS   L063129
         EOR   #$FF
         INC
L063129  CMP   #$1E
         BCC   L06312F
         PLP
         RTL

L06312F  LDY   #$0014
         LDA   ($6C),Y
         ORA   #$01
         STA   ($6C),Y
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDY   #$0005
         LDA   ($6C),Y
         INC
         STA   $69
         REP   #$20
         LDA   $68
         PHA
         JSL   L031582
         PLA
         STA   $68
         PHA
         JSL   L031582
         PLA
         STA   $68
         PHA
         JSL   L031582
         PLA
         STA   $68
         JSL   L031582
         PLP
         RTL

L06316C  REP   #$20
         LDA   #$00C0
         CLC
         ADC   $68
         STA   $60
         LDY   #$0012
         STA   ($6C),Y
         SEP   #$20
         LDY   #$0004
         LDA   ($6C),Y
         CLC
         ADC   #$05
         STA   $68
         LDY   #$0005
         LDA   ($6C),Y
         INC
         STA   $69
         JSL   L031582
         PLP
         RTL

         LDY   #$0009
         LDA   #$06
         STA   ($6C),Y
         LDY   #$0005
         LDA   ($6C),Y
         CLC
         ADC   #$04
         LDY   #$000A
         STA   ($6C),Y
         PLP
         RTL

