        JSR $5ECC
        LDA #$00
        STA $AB
        RTS

        LDA #$00
        LDX #$07
        STA AUDF1,X
        DEX
        DEX
        BPL $1E0C
        LDX #$10
        LDA ICHID,X
        CMP #$FF
        BEQ $1E1F
        JSR $5FD2
        TXA
        CLC
        ADC #$10
        TAX
        BPL $1E15
        RTS

        JMP $48CE

        JSR $6007
        JMP $3DE4

        CMP #$23
        BNE $1DB8
        JSR $48D3
        CPX #$08
        BCS $1E27
        TXA
        ASL
        ASL
        ASL
        ASL
        TAX
        STX $AB
        JMP $00B4

        LDA #$08
        JSR $5F0A
        LDA #$0B
        BIT $07A9
        STA ICCMD,X
        STX $AB
        RTS

        JSR $6007
        BNE $1E32
        LDA #$00
        STA ICAX3,X
        STA ICAX4,X
        STA $AB
        KIL
        CPX #$A9
        CMP $00A0,X
        JMP $2987

        14 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
        00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
        00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
        00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
        00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
        00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
        00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
        00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
        00 00 00 00 00 00 0F 00 00 02 88 00 00 00 00 00 |................|
        10 A0 4E 45 53 4E 41 C8 31 50 5D 43 4E 45 58 54 |..NESNA.1P]CNEXT|
        20 57 49 54 48 4F 55 54 20 46 4F D2 53 59 4E 54 | WITHOUT FO.SYNT|
        41 D8 52 45 54 55 52 4E 20 57 49 54 48 4F 55 54 |A.RETURN WITHOUT|
        20 47 4F 53 55 C2 4F 55 54 20 4F 46 20 44 41 54 | GOSU.OUT OF DAT|
        C1 46 55 4E 43 54 49 4F 4E 20 43 41 4C CC C1 4F |.FUNCTION CAL..O|
        55 54 20 4F 46 20 4D 45 4D 4F 52 D9 55 4E 44 45 |UT OF MEMOR.UNDE|
        46 27 44 20 4C 49 4E C5 53 55 42 53 43 52 49 50 |F'D LIN.SUBSCRIP|
        D4 52 45 44 45 46 27 CE C2 49 4C 4C 45 47 41 4C |.REDEF'..ILLEGAL|
        20 44 49 52 45 43 D4 54 59 50 45 20 4D 49 53 4D | DIREC.TYPE MISM|
        41 54 43 C8 46 49 4C 45 20 49 2F CF 51 55 41 4E |ATC.FILE I/.QUAN|
        54 49 54 59 20 54 4F 4F 20 42 49 C7 46 4F 52 4D |TITY TOO BI.FORM|
        55 4C 41 20 54 4F 4F 20 43 4F 4D 50 4C 45 D8 43 |ULA TOO COMPLE.C|
        41 4E 27 54 20 43 4F 4E 54 49 4E 55 C5 55 4E 44 |AN'T CONTINU.UND|
        45 46 27 44 20 46 55 4E 43 54 49 4F CE 4E 4F 20 |EF'D FUNCTIO.NO |
        52 45 53 55 4D C5 52 45 53 55 4D 45 20 57 49 54 |RESUM.RESUME WIT|
        48 4F 55 D4 46 4F 52 20 57 49 54 48 4F 55 54 20 |HOU.FOR WITHOUT |
        4E 45 58 D4 4C 4F 43 CB 54 49 4D C5 20 45 52 52 |NEX.LOC.TIM. ERR|
        4F 52 00 20 49 4E 20 7C 9B 3E 9B 00 9B 42 52 45 |OR. IN |.>...BRE|
        41 4B 00                                        |AK.

        TSX
        INX
        INX
        INX
        INX
        LDA $0101,X
        CMP #$81
        BNE $2058
        LDA $C8
        BNE $203B
        LDA $0102,X
        STA $C7
        LDA $0103,X
        STA $C8
        CMP $0103,X
        BNE $2047
        LDA $C7
        CMP $0102,X
        BEQ $2058
        TXA
        CLC
        ADC #$12
        ROL $0106,X
        BPL $2052
        ADC #$FC
        LSR $0106,X
        TAX
        BNE $2026
        RTS

        JSR $20C0
        STA $88
        STY $89
        JSR $2090
        INX
        BCS $2073
        BCC $206C
        LDA ($DF),Y
        STA ($DD),Y
        DEY
        BNE $2068
        LDA ($DF),Y
        STA ($DD),Y
        DEC FR1
        DEC $DE
        DEX
        BNE $206C
        RTS

        JSR $2090
        TXA
        BCS $208D
        LDA ($DF),Y
        STA ($DD),Y
        INY
        BNE $2081
        INC FR1
        INC $DE
        INX
        BNE $2081
        RTS

        SEC
        LDA $DF
        SBC $E3
        TAY
        LDA FR1
        BCS $209C
        DEC FR1
        SBC $E4
        TAX
        SEC
        TYA
        BEQ $20B2
        EOR #$FF
        ADC $DD
        STA $DD
        BCS $20AD
        DEC $DE
        LDA $E3
        STA $DF
        CLC
        RTS

        ASL
        ADC #$2E
        BCS $20F4
        STA $D5
        TSX
        CPX $D5
        BCC $20F4
        RTS

        CPY $8B
        BCC $20EC
        BNE $20CA
        CMP $8A
        BCC $20EC
        PHA
        LDX #$08
        TYA
        PHA
        LDA $DC,X
        DEX
        BPL $20CE
        JSR $46C3
        LDX #$F8
        PLA
        STA $E5,X
        INX
        BMI $20D9
        PLA
        TAY
        PLA
        CPY $8B
        BCC $20EC
        BNE $20F4
        CMP $8A
        BCS $20F4
        RTS

        BIT $A8
        BPL $20EC
        LDX #$16
        BIT $07A2
        LDA $AB
        BEQ $2101
        JSR $602C
        LDA #$00
        STA $AB
        STX $9E
        LDX $9F
        TXS
        JSR $257E
        LDA $9E
        CMP #$80
        JSR $29AA
        LDA $8E
        LDY $8F
        INY
        BEQ $213A
        DEY
        STA $04FE
        STY $04FF
        LDX $A3
        BNE $213A
        STA $A0
        STY $A1
        LDY $A5
        BEQ $213A
        LDA $90
        LDX $91
        STA $A2
        STX $A3
        LDX $A4
        JSR $259B
        JMP $28A2

        LDX $9E
        JSR $26F5
        CPX #$18
        BCC $2150
        LDA #$23
        JSR $624C
        LDA #$00
        JSR $26DF
        JMP $216D

        LDY #$FF
        BNE $215A
        INY
        LDA $1F0A,Y
        BPL $2154
        DEX
        BNE $2154
        TYA
        TAX
        INX
        LDA $1F0A,X
        PHA
        AND #$7F
        JSR $624C
        INX
        PLA
        BPL $2160
        LDA #$0A
        LDY #$20
        JSR $61FA
        LDA #$00
        STA $C5
        LDX #$07
        STA AUDF1,X
        DEX
        DEX
        BPL $217A
        LDY $8F
        INY
        BEQ $2189
        JSR $26D4
        LDX #$00
        JSR $6596
        STA AUDCTL
        STA AUDF4
        LDA #$A0
        STA AUDC4
        LDA #$23
        STA SKCTL
        STA SSKCTL
        LDA #$FF
        STA SEROUT
        LDA #$16
        LDY #$20
        JSR $61FA
        LDA #$00
        STA $CC
        BIT $CC
        BPL $21DA
        JSR $65AB
        JSR $65AB
        JSR $5F7B
        JSR $65AB
        STA $C9
        JSR $65AB
        STA $CA
        LDY #$04
        STY $D3
        JSR $65AB
        LDY $D3
        INY
        STA $04FB,Y
        TAX
        BNE $21CA
        BEQ $2224
        BVC $21FC
        LDX $9A
        LDA $9B
        STX $C9
        STA $CA
        JSR $26DF
        LDA COLCRS
        PHA
        JSR $249D
        BCC $21F6
        LDY #$03
        STY $C7
        JSR $2603
        PLA
        STA COLCRS
        JSR $6247
        JSR $655C
        STX $B5
        STY $B6
        JSR $00AE
        TAX
        BEQ $21AD
        BIT $CC
        BVS $2221
        LDX #$FF
        STX $8F
        STX $CA
        BCC $221B
        JSR $235D
        JMP $2922

        JSR $20ED
        JSR $2CDA
        JSR $235D
        STY $D3
        JSR $249D
        BCC $2259
        LDA $E4
        PHA
        STA $DE
        LDA $E3
        PHA
        STA $DD
        LDY #$00
        LDA ($E3),Y
        STA $DF
        INY
        LDA ($E3),Y
        STA FR1
        LDA $82
        LDY $83
        STA $E3
        STY $E4
        JSR $207B
        LDA $DD
        LDY $DE
        STA $82
        STY $83
        PLA
        STA $E3
        PLA
        STA $E4
        JSR $2523
        JSR $22A8
        LDA $0500
        BEQ $2207
        CLC
        LDA $84
        STA $DF
        ADC $D3
        STA $DD
        LDY $85
        STY FR1
        BCC $2274
        INY
        STY $DE
        JSR $2059
        LDA $C9
        STA $04FE
        CLC
        ADC $9C
        STA $9A
        LDA $CA
        STA $04FF
        ADC $9D
        STA $9B
        LDA $88
        LDY $89
        STA $82
        STY $83
        LDY $D3
        DEY
        LDA $04FC,Y
        STA ($E3),Y
        DEY
        BPL $2297
        JSR $2523
        JSR $22A8
        JMP $21B1

        LDA $80
        LDY $81
        STA $D5
        STY $D6
        CLC
        LDY #$01
        LDA ($D5),Y
        BEQ $22D4
        LDY #$04
        INY
        LDA ($D5),Y
        BNE $22B9
        INY
        TYA
        ADC $D5
        TAX
        LDY #$00
        STA ($D5),Y
        LDA $D6
        ADC #$00
        INY
        STA ($D5),Y
        STX $D5
        STA $D6
        BCC $22B1
        RTS

        JSR $20ED
        TAY
        BEQ $2300
        BCS $22EB
        JSR $2CDA
        LDX $C9
        LDY $CA
        STX $9A
        STY $9B
        TAY
        BEQ $2300
        JSR $3DE4
        BEQ $2300
        JSR $2CDA
        LDA $C9
        LDY $CA
        STA $9C
        STY $9D
        JSR $00B4
        BNE $230B
        LDA #$40
        STA $CC
        PLA
        PLA
        JMP $21B1

        BNE $230E
        JMP $3DEF

        JSR $25A4
        LDA $E3
        LDY $E4
        STA $DD
        STY $DE
        LDA #$00
        STA $0500
        JSR $249D
        LDX $E3
        LDA $E4
        BCC $232F
        LDY #$00
        LDA ($E3),Y
        TAX
        INY
        LDA ($E3),Y
        STX $DF
        JMP $223E

        LDA #$40
        BIT $00A9
        JSR $20ED
        STA $A8
        RTS

        LDX $B5
        LDY $CD
        LDA $0500,X
        JSR $00BB
        BCC $2350
        JSR $4123
        BCS $2379
        INX
        INY
        STA $04FB,Y
        BNE $2343
        BCC $233F
        LDA #$AB
        BNE $23DC
        LDX $B5
        LDA $0500,X
        LDY $0501,X
        STA $0501,X
        INX
        TYA
        BNE $2362
        STA $0501,X
        LDX $B5
        LDY #$04
        STY $D0
        INX
        LDA $0500,X
        CMP #$20
        BEQ $23DC
        CMP #$30
        BCC $2385
        CMP #$3C
        BCC $23DC
        STA $CF
        CMP #$22
        BEQ $2402
        BIT $D0
        BVS $23DC
        CMP #$3F
        BEQ $2359
        CMP #$80
        BCS $2375
        STY $CD
        LDY #$00
        STY $D3
        STX $B5
        BIT $E8C8
        LDA $0500,X
        SEC
        SBC $5960,Y
        BEQ $23A0
        CMP #$80
        BNE $2409
        ORA $D3
        LDY $CD
        STA $D3
        LDA $0500,X
        JSR $4123
        BCS $23CA
        LDA $0501,X
        JSR $00BB
        BCC $2357
        JSR $4123
        BCC $2357
        LDA $D3
        CMP #$9A
        BCC $23DC
        CMP #$9D
        BCS $23DC
        LDA #$3A
        INY
        STA $04FB,Y
        LDA $D3
        INX
        INY
        STA $04FB,Y
        ORA #$00
        BEQ $2463
        SEC
        SBC #$3A
        BEQ $23EE
        CMP #$4A
        BNE $23F0
        STA $D0
        SEC
        SBC #$5E
        LSR
        LSR
        BNE $246D
        STA $CF
        LDA $0500,X
        BEQ $23DC
        CMP $CF
        BEQ $2470
        INY
        STA $04FB,Y
        INX
        BNE $23F9
        LDX $B5
        INC $D3
        INY
        LDA $595F,Y
        BPL $240D
        LDA $5960,Y
        BNE $23A2
        LDY #$00
        BIT $E8C8
        LDA $0500,X
        SEC
        SBC $5A49,Y
        BEQ $241B
        CMP #$80
        BNE $242E
        ORA $D3
        BNE $248F
        LDX $B5
        INC $D3
        INY
        LDA $5A48,Y
        BPL $2432
        LDA $5A49,Y
        BNE $241D
        LDA #$A3
        STA $D3
        LDY #$00
        BIT $E8C8
        LDA $0500,X
        SEC
        SBC $5B12,Y
        BEQ $2444
        CMP #$80
        BNE $247D
        LDA $0501,X
        JSR $00BB
        BCC $2460
        JSR $4123
        BCS $2492
        JMP $233F

        STA $04FD,Y
        DEC $B6
        LDA #$FF
        STA $B5
        RTS

        JMP $2376

        INX
        LDA $0500,X
        CMP #$22
        BEQ $2402
        LDA #$7C
        JMP $23DD

        LDX $B5
        INC $D3
        INY
        LDA $5B11,Y
        BPL $2481
        LDA $5B12,Y
        BNE $2446
        LDA $0500,X
        JMP $23B1

        LDA #$FF
        LDY $CD
        INY
        STA $04FB,Y
        JMP $23CA

        LDA $80
        LDX $81
        LDY #$01
        STA $E3
        STX $E4
        LDA ($E3),Y
        BEQ $24CA
        INY
        INY
        LDA $CA
        CMP ($E3),Y
        BCC $24CB
        BEQ $24B8
        DEY
        BNE $24C1
        LDA $C9
        DEY
        CMP ($E3),Y
        BCC $24CB
        BEQ $24CB
        DEY
        LDA ($E3),Y
        TAX
        DEY
        LDA ($E3),Y
        BCS $24A1
        CLC
        RTS

        BNE $24CB
        LDA #$00
        STA $A8
        STA AUDCTL
        TAY
        STA ($80),Y
        INY
        STA ($80),Y
        STA $9B
        STA $9D
        LDA #$0A
        STA $9C
        LDA #$64
        STA $9A
        LDA $80
        CLC
        ADC #$02
        STA $82
        LDA $81
        ADC #$00
        STA $83
        JSR $2597
        LDA #$24
        STA $0686
        LDA #$2C
        STA $0687
        LDA #$2E
        STA $0688
        JSR $5FDF
        JMP $2523

        CMP #$FF
        BNE $251E
        JSR $00AE
        CMP #$C5
        BNE $251E
        LDA #$00
        STA $C5
        JMP $00AE

        JSR $00B4
        BNE $2592
        LDA MEMTOP
        LDY MEMTOP+1
        STA $8C
        STY $8D
        STA $8A
        STY $8B
        LDA $82
        LDY $83
        STA $84
        STY $85
        STA $86
        STY $87
        STA $88
        STY $89
        LDX #$00
        STX $A9
        STX $AD
        LDA #$03
        LDX #$1A
        STA $05ED,X
        DEX
        BNE $254B
        LDX #$04
        LDA $2592,X
        STA $05C7,X
        DEX
        BNE $2553
        STX $AA
        STX $A5
        STX $A3
        LDY $81
        LDX $80
        JSR $299E
        STX $96
        STY $97
        PLA
        TAY
        PLA
        LDX #$FE
        STX $9F
        TXS
        PHA
        TYA
        PHA
        LDA #$00
        STA $C5
        STA $91
        LDA $C6
        CMP #$D0
        BEQ $258E
        SBC #$03
        LDY #$05
        JSR $47A3
        JMP $257E

        LDA #$00
        STA $A6
        RTS

        NOP #$4F
        DCP LMARGN
        LDY $81
        LDX $80
        BNE $259E
        DEY
        DEX
        STX $B5
        STY $B6
        RTS

        JSR $20ED
        JSR $00B4
        PHP
        JSR $2CDA
        JSR $249D
        PLP
        BEQ $25CA
        JSR $00B4
        BEQ $25D0
        CMP #$EF
        BNE $25C7
        JSR $00AE
        BEQ $25CA
        JSR $2CDA
        BEQ $25D0
        JMP $3DEF

        LDA #$FF
        STA $C9
        STA $CA
        RTS

        JSR $25A4
        LDA #$FF
        STA DSPFLG
        LDY #$01
        LDA ($E3),Y
        BEQ $2645
        JSR $328F
        INY
        LDA ($E3),Y
        TAX
        INY
        LDA ($E3),Y
        CMP $CA
        BNE $25F1
        CPX $C9
        BEQ $25F3
        BCS $2645
        JSR $26F5
        LDY #$02
        LDA ($E3),Y
        TAX
        INY
        LDA ($E3),Y
        STY $C7
        JSR $26DF
        LDA #$FF
        STA $D0
        LDA #$20
        STA $D1
        LDY $C7
        AND #$7F
        CMP #$3A
        BNE $2621
        INY
        LDA ($E3),Y
        SBC #$9A
        CMP #$03
        BCC $2634
        DEY
        LDA #$3A
        STA $D1
        CMP #$22
        BNE $262E
        BIT $D0
        STA $D0
        BMI $262E
        JSR $624C
        JSR $624C
        INY
        BEQ $2645
        LDA ($E3),Y
        BNE $264D
        TAY
        LDA ($E3),Y
        TAX
        INY
        LDA ($E3),Y
        STX $E3
        STA $E4
        BNE $25D9
        LDA #$00
        STA DSPFLG
        RTS

        BMI $260B
        LDX $D0
        BEQ $262E
        BMI $265F
        CMP #$7C
        BNE $2621
        LDA #$FF
        STA $D0
        LDA #$22
        BNE $262E
        TAX
        BPL $260F
        CMP #$84
        BEQ $26D0
        BIT $D1
        BMI $262E
        SEC
        SBC #$7F
        BMI $26AF
        STY $C7
        LDY #$FF
        CMP #$38
        BCS $2696
        TAX
        SBC #$18
        LSR
        LSR
        BNE $2680
        STA $D0
        DEX
        BEQ $268B
        INY
        LDA $5960,Y
        BPL $2683
        BMI $2680
        INY
        LDA $5960,Y
        BMI $264B
        JSR $624C
        BNE $268B
        SBC #$37
        TAX
        DEX
        BEQ $26A4
        INY
        LDA $5A49,Y
        BPL $269C
        BMI $2699
        INY
        LDA $5A49,Y
        BMI $268F
        JSR $624C
        BNE $26A4
        INY
        STY $C7
        LDA ($E3),Y
        SEC
        SBC #$A2
        LDY #$FF
        TAX
        DEX
        BEQ $26C5
        INY
        LDA $5B12,Y
        BPL $26BD
        BMI $26BA
        INY
        LDA $5B12,Y
        BMI $268F
        JSR $624C
        BNE $26C5
        STA $D1
        BEQ $266A
        LDA #$11
        LDY #$20
        JSR $61FA
        LDA $8F
        LDX $8E
        STA $E8
        STX $E9
        LDX #$90
        SEC
        JSR $50EF
        JSR $5344
        CLC
        ADC #$01
        BCC $26F2
        INY
        JMP $61FA

        LDA #$9B
        JSR $624C
        EOR #$FF
        RTS

        JSR $3F37
        STA $C7
        STY $C8
        BIT $E5
        BPL $270B
        JMP $3BF0

        LDA #$F7
        JSR $3DE6
        LDA $E5
        PHA
        JSR $3C17
        PLA
        JSR $505E
        BIT $E5
        BVC $2728
        LDA $E9
        LDY $EA
        STA $C9
        STY $CA
        BVS $272D
        LDX #$C9
        JSR $4FC9
        PLA
        PLA
        JSR $2BA8
        CLC
        TYA
        ADC $B5
        STA $D1
        LDA $B6
        ADC #$00
        STA $D2
        TSX
        JSR $2026
        BNE $275E
        TXA
        CLC
        ADC #$12
        BIT $E5
        BVC $274E
        ADC #$FC
        TAX
        LDA $00FF,X
        CMP $D1
        BNE $273F
        LDA $0100,X
        CMP $D2
        BNE $273F
        TXS
        LDA #$0A
        JSR $20B3
        LDA $D2
        PHA
        LDA $D1
        PHA
        LDA $8F
        PHA
        LDA $8E
        PHA
        LDA #$D3
        JSR $3DE6
        LDA $E5
        PHA
        JSR $3C17
        PLA
        JSR $505E
        LDX #$02
        LDA $E6
        ORA #$7F
        AND $E8
        STA $E8
        JMP $3CAF

        LDX #$00
        STX $E9
        INX
        STX $EA
        BIT $E5
        BVS $279D
        LDA #$5D
        LDY #$4C
        JSR $4FAC
        JSR $00B4
        CMP #$D8
        BNE $27B1
        JSR $00AE
        LDA $E5
        PHA
        JSR $3C17
        PLA
        JSR $505E
        LDX #$04
        JMP $2780

        LDA $E5
        PHA
        JSR $00B4
        BEQ $27C1
        JMP $3DEF

        JSR $27E1
        JSR $00AE
        LDA $B6
        PHA
        LDA $B5
        PHA
        LDA $D1
        LDY $D2
        STA $8E
        STY $8F
        LDA $C8
        PHA
        LDA $C7
        PHA
        LDA #$81
        PHA
        JSR $2EF1
        LDA $8E
        LDY $8F
        STA $D1
        STY $D2
        JSR $00B4
        LDX #$01
        STX $D3
        BNE $2811
        INC $D3
        JSR $00AE
        BEQ $2811
        CMP #$22
        BNE $2809
        JSR $00AE
        TAY
        BEQ $2814
        CMP #$7C
        BNE $27FD
        BEQ $27F4
        CMP #$9C
        BEQ $2833
        CMP #$9D
        BNE $27F4
        TAY
        BNE $2833
        LDY #$02
        LDA ($B5),Y
        BNE $281F
        LDX #$15
        JMP $20F6

        INY
        LDA ($B5),Y
        STA $D1
        INY
        LDA ($B5),Y
        STA $D2
        TYA
        CLC
        ADC $B5
        STA $B5
        BCC $2833
        INC $B6
        JSR $00AE
        BEQ $2811
        CMP #$98
        BEQ $288B
        CMP #$9A
        BEQ $288B
        CMP #$9B
        BEQ $288B
        CMP #$84
        BNE $284E
        JSR $2B90
        JMP $288E

        CMP #$81
        BEQ $27F2
        CMP #$82
        BNE $27F9
        DEC $D3
        BEQ $288A
        JSR $00AE
        BEQ $2811
        JSR $287A
        JSR $3F37
        JSR $00B4
        BEQ $2874
        CMP #$2C
        BNE $2894
        JSR $287A
        JMP $2856

        JSR $287A
        JMP $2811

        LDX $D1
        LDY $8E
        STY $D1
        STX $8E
        LDX $D2
        LDY $8F
        STY $D2
        STX $8F
        RTS

        JSR $2B9A
        JSR $00B4
        JMP $2811

        JMP $3DEF

        JSR $322E
        LDX $B5
        LDY $B6
        CPY #$05
        BEQ $28A6
        STX $90
        STY $91
        JSR $00B4
        BNE $2894
        LDY $B6
        CPY $97
        BCC $2905
        BNE $28B9
        LDY $96
        CPY $B5
        BCS $2905
        LDA $8F
        PHA
        LDA $8E
        PHA
        LDX $98
        LDY $99
        STX $8E
        STY $8F
        LDX $96
        LDY $97
        STX $B5
        STY $B6
        JSR $00B4
        TAX
        BNE $28D8
        JSR $295E
        JSR $00AE
        BEQ $28E5
        JSR $294F
        JSR $00B4
        BNE $2932
        LDY $B6
        CPY $91
        BNE $28D2
        LDX $B5
        CPX $90
        BNE $28D2
        STX $96
        STY $97
        LDX $8E
        LDY $8F
        STX $98
        STY $99
        TAX
        PLA
        STA $8E
        PLA
        STA $8F
        TXA
        TAX
        BNE $2922
        LDY #$02
        LDA ($B5),Y
        BEQ $2975
        JSR $2960
        BIT $A8
        BVC $2922
        LDA #$5B
        JSR $624C
        JSR $26DB
        LDA #$5D
        JSR $624C
        JSR $00AE
        JSR $2935
        JMP $2897

        CMP #$7F
        BNE $2932
        JMP $3029

        JMP $3DEF

        BEQ $2974
        SBC #$80
        BCC $294C
        CMP #$48
        BCS $292B
        ASL
        TAY
        LDA $5B9C,Y
        PHA
        LDA $5B9B,Y
        PHA
        JMP $00AE

        JMP $2D15

        LDY #$08
        SEC
        SBC #$8C
        BCC $2941
        CMP #$04
        BCS $2941
        ADC #$C8
        BNE $293F
        LDY #$02
        INY
        LDA ($B5),Y
        STA $8E
        INY
        LDA ($B5),Y
        STA $8F
        CLC
        TYA
        ADC $B5
        STA $B5
        BCC $2974
        INC $B6
        RTS

        LDX $C5
        BNE $2928
        LDX $8F
        INX
        BEQ $298A
        LDX $A3
        BEQ $2987
        LDX #$13
        JMP $20F6

        JSR $5FDF
        JMP $2189

        BEQ $2994
        BCC $2994
        JMP $602D

        JSR $2CDA
        JSR $249D
        LDY $E4
        LDX $E3
        BNE $29A1
        DEY
        DEX
        STX $94
        STY $95
        RTS

        BCS $29AA
        CLC
        BNE $29F8
        LDA $B5
        LDY $B6
        LDX $8F
        INX
        BEQ $29D2
        BCS $29C4
        LDX $C5
        BEQ $29C4
        LDA $90
        LDY $91
        STA $B5
        STY $B6
        RTS

        STA $90
        STY $91
        LDA $8E
        LDY $8F
        STA $04FE
        STY $04FF
        PLA
        PLA
        BCC $2987
        LDA #$1A
        LDY #$20
        JMP $2171

        BNE $29F8
        LDX #$11
        LDY $91
        BNE $29E8
        JMP $20F6

        LDA $90
        STA $B5
        STY $B6
        LDA $04FE
        LDY $04FF
        STA $8E
        STY $8F
        RTS

        BEQ $2A00
        JSR $2B46
        BNE $2A03
        JSR $2597
        LDA $8C
        LDY $8D
        CPY $8B
        BNE $2A0F
        CMP $8A
        BEQ $2A38
        SBC #$02
        BCS $2A14
        DEY
        STA $D7
        STY $D8
        LDY #$01
        LDA ($D7),Y
        TAX
        DEY
        LDA ($D7),Y
        CPX #$01
        BEQ $2A2D
        STA $D5
        STX $D6
        LDA ($D5),Y
        JSR $47EB
        LDA $D7
        SBC ($D7),Y
        LDY $D8
        BCS $2A07
        DEY
        BNE $2A07
        LDA $AA
        AND #$20
        STA $AA
        LDA $84
        LDY $85
        LDX $82
        STX $DD
        STX $84
        LDX $83
        STX $DE
        STX $85
        CPY $87
        BNE $2A56
        CMP $86
        BEQ $2A96
        STA $DF
        STY FR1
        LDY #$02
        LDA ($DF),Y
        ADC $DF
        STA $E3
        LDA #$00
        TAY
        ADC FR1
        STA $E4
        LDA ($DF),Y
        BMI $2A90
        ORA $AA
        STA ($DF),Y
        AND #$20
        BEQ $2A90
        INY
        LDA ($DF),Y
        PHA
        JSR $207B
        PLA
        AND #$C0
        CMP #$C0
        BNE $2A90
        LDA $DD
        SBC #$03
        TAX
        LDY $DE
        BCS $2A8D
        DEY
        JSR $4669
        LDA $E3
        LDY $E4
        BNE $2A4E
        LDX $DD
        STX $86
        LDX $DE
        STX $87
        CPY $89
        BNE $2AA6
        CMP $88
        BEQ $2B0F
        STA $DF
        STY FR1
        LDY #$02
        LDA ($DF),Y
        ADC $DF
        STA $E3
        INY
        LDA ($DF),Y
        ADC FR1
        STA $E4
        LDY #$00
        LDA ($DF),Y
        ORA $AA
        STA ($DF),Y
        AND #$20
        BEQ $2B09
        LDA $DD
        LDY $DE
        STA $D5
        STY $D6
        JSR $207B
        LDY #$01
        LDA ($D5),Y
        AND #$C0
        CMP #$C0
        BNE $2B09
        DEY
        LDA ($D5),Y
        LDY #$03
        AND #$40
        BEQ $2AE8
        INY
        LDA ($D5),Y
        BPL $2AE3
        INY
        TYA
        ADC ($D5),Y
        ADC ($D5),Y
        ADC $D5
        STA $D5
        TAX
        BCC $2AF7
        INC $D6
        LDY $D6
        CPY $DE
        BNE $2B01
        CPX $DD
        BEQ $2B09
        JSR $4669
        LDA #$03
        CLC
        BNE $2AEE
        LDA $E3
        LDY $E4
        BNE $2A9E
        LDA $DD
        LDY $DE
        STA $88
        STY $89
        JSR $5FDF
        JMP $2547

        LDA #$D4
        JSR $3DE6
        LDA #$03
        JSR $20B3
        LDA $B6
        PHA
        LDA $B5
        PHA
        LDA $8F
        PHA
        LDA $8E
        PHA
        LDA #$93
        PHA
        JSR $00B4
        JSR $2B46
        JMP $2897

        CMP #$D3
        BNE $2B1D
        JSR $00AE
        JSR $2CDA
        JSR $2BAB
        LDA $8F
        CMP $CA
        BCS $2B5D
        TYA
        SEC
        ADC $B5
        LDX $B6
        BCC $2B61
        INX
        BCS $2B61
        LDA $80
        LDX $81
        JSR $24A1
        BCC $2B7E
        LDY $E4
        LDX $E3
        JMP $259B

        BNE $2BA7
        LDA #$FF
        STA $C8
        JSR $2021
        TXS
        CMP #$93
        BEQ $2B83
        LDX #$03
        BIT $08A2
        JMP $20F6

        PLA
        PLA
        STA $8E
        PLA
        STA $8F
        PLA
        STA $B5
        PLA
        STA $B6
        JSR $2BA8
        BEQ $2B9D
        JSR $43B5
        BNE $2B90
        JSR $2BAB
        TYA
        CLC
        ADC $B5
        STA $B5
        BCC $2BA7
        INC $B6
        RTS

        LDX #$3A
        BIT $00A2
        STX $D0
        LDY #$00
        LDA $D0
        STA $CF
        LDA ($B5),Y
        BEQ $2BA7
        CMP $CF
        BEQ $2BA7
        INY
        CMP #$7C
        BEQ $2BB1
        CMP #$97
        BNE $2BCC
        LDA $CF
        BEQ $2BB5
        INC $DB
        EOR #$22
        BEQ $2BB3
        BNE $2BB5
        JSR $3C17
        JSR $00B4
        CMP #$92
        BEQ $2BE5
        CMP #$95
        BEQ $2BE5
        LDA #$9D
        JSR $3DE6
        JSR $50BD
        BNE $2C05
        LDA #$00
        STA $DB
        JSR $2B90
        JSR $00B4
        TAY
        BEQ $2BA7
        JSR $00AE
        CMP #$9C
        BNE $2BEE
        DEC $DB
        BPL $2BEE
        JSR $00AE
        JSR $00B4
        BCS $2C0D
        JMP $2B46

        JMP $2935

        CMP #$A1
        BNE $2C57
        JSR $00AE
        JSR $2C2E
        LDA $C9
        ORA $CA
        BEQ $2C46
        BCS $2C25
        JMP $2B7E

        LDX $E3
        LDY $E4
        STX $A4
        STY $A5
        RTS

        BCC $2C40
        CMP #$92
        BEQ $2C3D
        LDA #$95
        JSR $3DE6
        CMP #$D3
        BNE $2C2D
        JSR $00AE
        JSR $2CDA
        JMP $249D

        STA $A5
        LDA $A3
        BEQ $2C2D
        LDA $A0
        LDY $A1
        STA $8E
        STY $8F
        JMP $2103

        JSR $48D6
        CMP #$93
        BEQ $2C72
        CMP #$92
        BEQ $2C72
        CMP #$95
        BNE $2C8D
        JSR $00AE
        SBC #$D3
        CMP #$02
        BCS $2C8D
        ADC #$92
        SEC
        PHA
        DEC $EA
        BNE $2C7B
        PLA
        JMP $2937

        JSR $00AE
        JSR $2CDA
        CMP #$2C
        BEQ $2C73
        JSR $00B4
        BNE $2C8D
        JMP $48CE

        JMP $3DEF

        JSR $48D6
        BNE $2C8D
        TXA
        BNE $2CA1
        JMP $48CE

        LDY $A3
        BNE $2CA4
        LDX #$14
        JMP $20F6

        CMP #$82
        BEQ $2CC8
        JSR $00B4
        BCS $2CB5
        JSR $2B46
        LDA #$00
        STA $A3
        RTS

        BNE $2CB4
        LDA $A2
        STA $B5
        STY $B6
        LDA $A0
        LDY $A1
        STA $8E
        STY $8F
        JMP $2CB0

        JSR $2CB5
        LDY #$00
        LDA ($B5),Y
        BNE $2CD4
        JSR $295E
        JSR $00AE
        JMP $2B90

        LDX #$00
        STX $C9
        STX $CA
        BCS $2D14
        SBC #$2F
        STA $D0
        LDA $CA
        STA $D5
        CMP #$19
        BCS $2C8D
        LDA $C9
        ASL
        ROL $D5
        ASL
        ROL $D5
        ADC $C9
        STA $C9
        LDA $D5
        ADC $CA
        STA $CA
        ASL $C9
        ROL $CA
        LDA $C9
        ADC $D0
        STA $C9
        BCC $2D0E
        INC $CA
        JSR $00AE
        JMP $2CE0

        RTS

        JSR $3F3B
        STA $C7
        STY $C8
        LDA #$F7
        JSR $3DE6
        LDA $E5
        PHA
        JSR $3C17
        PLA
        JSR $505E
        BIT $E5
        BVC $2D3D
        BMI $2D47
        LDY #$00
        LDA $E9
        STA ($C7),Y
        INY
        LDA $EA
        STA ($C7),Y
        RTS

        JSR $5021
        LDX $C7
        LDY $C8
        JMP $4FCE

        LDY #$02
        LDA ($E9),Y
        CMP $8B
        BNE $2D54
        DEY
        LDA ($E9),Y
        CMP $8A
        BCC $2D63
        LDY $EA
        CPY #$05
        BNE $2D63
        LDA $E9
        LDY $EA
        JMP $2D80

        LDY #$00
        LDA ($E9),Y
        JSR $45D0
        LDA $DB
        LDY $DC
        JSR $47A3
        LDA $DB
        LDY $DC
        STA $D1
        STY $D2
        JSR $4770
        LDA #$E7
        LDY #$00
        STA $DB
        STY $DC
        JSR $47DB
        LDX $C7
        LDY $C8
        JSR $47E8
        LDY #$00
        LDA ($DB),Y
        STA ($C7),Y
        INY
        LDA ($DB),Y
        STA ($C7),Y
        INY
        LDA ($DB),Y
        STA ($C7),Y
        LDX $C7
        LDY $C8
        JMP $4669

        BEQ $2DCD
        CMP #$D9
        BNE $2DB4
        LDA #$20
        ORA $AA
        STA $AA
        JMP $00AE

        TAX
        JSR $3F40
        LDY #$00
        LDA ($E3),Y
        ORA #$20
        STA ($E3),Y
        JSR $00B4
        BEQ $2DCC
        LDA #$2C
        JSR $3DE6
        BNE $2DB4
        RTS

        JMP $3DEF

        CMP #$D1
        BNE $2E04
        JMP $2B95

        CMP #$D1
        BNE $2DD4
        LDX #$0A
        LDA $AA
        AND #$01
        BNE $2E01
        LDY $87
        CPY $89
        BNE $2E01
        JSR $00AE
        LDY $86
        CPY $88
        BNE $2E01
        SBC #$30
        BCC $2DCD
        CMP #$02
        BCS $2DCD
        STA $A9
        INC $AA
        JMP $00AE

        JMP $20F6

        CMP #$DB
        BEQ $2E0B
        JMP $3330

        JSR $00AE
        JSR $3BDF
        JSR $2FDF
        SEC
        LDA $84
        SBC $82
        STA $CF
        LDA $85
        SBC $83
        STA $D0
        LDA $C9
        SBC $CF
        STA $CF
        LDA $CA
        SBC $D0
        STA $D0
        BCC $2E61
        CLC
        LDA $88
        STA $DF
        ADC $CF
        TAX
        LDA $89
        STA FR1
        ADC $D0
        TAY
        TXA
        JSR $20C0
        STA $88
        STY $89
        STA $DD
        STY $DE
        CLC
        LDA $84
        STA $E3
        ADC $CF
        STA $84
        LDA $85
        STA $E4
        ADC $D0
        STA $85
        JSR $2060
        JMP $2E8A

        CLC
        LDA $88
        STA $E3
        ADC $CF
        STA $88
        LDA $89
        STA $E4
        ADC $D0
        STA $89
        CLC
        LDA $84
        STA $DF
        ADC $CF
        STA $84
        STA $DD
        LDA $85
        STA FR1
        ADC $D0
        STA $85
        STA $DE
        JSR $207B
        CLC
        LDA $86
        ADC $CF
        STA $86
        LDA $87
        ADC $D0
        PHA
        LDA #$00
        STA $87
        JSR $4091
        PLA
        STA $87
        TSX
        INX
        INX
        LDA $0101,X
        BEQ $2ED3
        CMP #$81
        BNE $2ECE
        CLC
        LDA $0102,X
        ADC $CF
        STA $0102,X
        LDA $0103,X
        ADC $D0
        STA $0103,X
        TXA
        CLC
        ADC #$12
        ROL $0106,X
        BPL $2EC8
        ADC #$FC
        LSR $0106,X
        TAX
        BNE $2EA3
        TXA
        ADC #$06
        BNE $2ECB
        RTS

        BEQ $2EEC
        JSR $3BDF
        JSR $5088
        LSR $E6
        LDA #$80
        STA $E7
        JSR $4ABF
        LDX #$C8
        LDY #$05
        JMP $4FCE

        JMP $60F0

        LDA #$00
        STA $D3
        LDA $B5
        LDY $B6
        STA $D1
        STY $D2
        JSR $00B4
        BNE $2F04
        LDY #$00
        BEQ $2F07
        JSR $3F37
        STA $C7
        STY $C8
        JSR $2021
        BEQ $2F15
        LDX #$01
        JMP $20F6

        TXS
        LDA $0104,X
        CMP $D1
        BNE $2F10
        LDA $0105,X
        CMP $D2
        BNE $2F10
        LDA $0106,X
        STA $E5
        BIT $E5
        BVS $2F8D
        LDA $D3
        BEQ $2F3B
        LDA #$C9
        LDY #$00
        JSR $4FAC
        JMP $2F4A

        TXA
        ADC #$06
        LDY #$01
        JSR $4FAC
        LDA $C7
        LDY $C8
        JSR $4A38
        JSR $2D3D
        TSX
        TXA
        SEC
        ADC #$0A
        LDY #$01
        JSR $510E
        TSX
        TAY
        BEQ $2F60
        EOR $0108,X
        BPL $2F77
        LDA $010F,X
        STA $8E
        LDA $0110,X
        STA $8F
        LDA $0111,X
        STA $B5
        LDA $0112,X
        STA $B6
        JMP $2897

        TXA
        CLC
        ADC #$12
        TAX
        TXS
        JSR $00B4
        BEQ $2F74
        JSR $3DE4
        BNE $2F8A
        JMP $3DEF

        JSR $2EF3
        LDY #$01
        LDA $D3
        BEQ $2F9E
        LDA $CA
        STA ($C7),Y
        LDA $C9
        DEY
        STA ($C7),Y
        BVS $2FB3
        LDA ($C7),Y
        CLC
        ADC $0108,X
        STA ($C7),Y
        DEY
        LDA ($C7),Y
        ADC $0107,X
        STA ($C7),Y
        BVC $2FB3
        JMP $474E

        SEC
        INY
        LDA ($C7),Y
        SBC $010A,X
        STA $EA
        DEY
        LDA ($C7),Y
        SBC $0109,X
        STA $E9
        DEX
        DEX
        DEX
        DEX
        JSR $50BD
        BEQ $2F60
        EOR $010B,X
        JMP $2F5E

        JSR $2FDC
        JSR $3DE4
        JMP $48D6

        JSR $3BDF
        BIT $E5
        BVS $2FFB
        LDA $E7
        CMP #$90
        BNE $2FF8
        BIT $E6
        BMI $2FF8
        JSR $515A
        JSR $5021
        JSR $5059
        BNE $2FFB
        JSR $5031
        LDA $E9
        LDY $EA
        STY $C9
        STA $CA
        RTS

        JSR $2FD3
        TXA
        LDY #$00
        STA ($C9),Y
        RTS

        JSR $2FD3
        STX $C7
        LDX #$00
        JSR $00B4
        BEQ $301C
        JSR $2FD6
        STX $C8
        LDY #$00
        LDA ($C9),Y
        EOR $C8
        AND $C7
        BNE $3020
        RTS

        JSR $00AE
        CMP #$C0
        BNE $3081
        JSR $3070
        JSR $5093
        JSR $4AF0
        TAY
        STY $CD
        JSR $3060
        JSR $4E85
        JSR $3060
        JSR $500B
        TAX
        BEQ $3050
        INX
        TXA
        JSR $4E90
        LDY $CD
        INY
        CPY #$09
        BNE $303A
        JSR $4E85
        JSR $515A
        JMP $60D5

        LDY $CD
        LDA ($D5),Y
        INC $CD
        JSR $00BB
        BCS $307D
        SBC #$2F
        JMP $5303

        JSR $00AE
        JSR $30A6
        JSR $4799
        CMP #$08
        BEQ $3080
        JMP $48CE

        RTS

        CMP #$C1
        BNE $3080
        JSR $00AE
        JSR $30A6
        JSR $3091
        JMP $60D5

        JSR $3BDF
        JSR $5088
        LDA $E6
        BMI $307D
        LDA $E7
        BEQ $30A3
        CMP #$98
        BCS $307D
        JMP $515A

        LDA #$F7
        JMP $3DE6

        JSR $3C17
        LDA #$00
        PHA
        LDA $E5
        ROR
        BCS $30CC
        JSR $48D9
        PLA
        TXA
        BNE $30C0
        JMP $48CE

        DEX
        TXA
        PHA
        JSR $3DE4
        JSR $3C17
        JSR $3BE4
        LDA $E9
        PHA
        LDA $EA
        PHA
        JSR $3DE4
        JSR $4799
        STX $CD
        STY $CE
        STA $D3
        JSR $3DDE
        PLA
        TAY
        PLA
        JSR $47A3
        STA $D8
        PLA
        CMP $D8
        BCS $3121
        STA $D7
        CLC
        ADC $D5
        STA $D5
        LDA #$00
        ADC $D6
        STA $D6
        SEC
        LDA $D8
        SBC $D7
        CMP $D3
        BCC $3121
        LDY #$FF
        LDX $D3
        INX
        DEX
        BEQ $311D
        INY
        LDA ($CD),Y
        CMP ($D5),Y
        BEQ $3109
        INC $D7
        INC $D5
        BNE $30FB
        INC $D6
        BNE $30FB
        LDY $D7
        INY
        BIT $00A0
        JMP $4366

        JSR $00B4
        CMP #$E2
        BNE $313B
        LDA $AD
        BEQ $3172
        LDA $AC
        SBC $8D
        CMP #$03
        BNE $3178
        BEQ $314B
        CMP #$E3
        BNE $3158
        LDA $AD
        BEQ $3172
        LDA $AC
        SBC $8D
        CMP #$05
        BNE $3178
        LDA $8D
        LDY $8C
        JSR $435D
        JSR $00AE
        JMP $3DDE

        CMP #$E5
        BNE $316C
        LDA $AD
        BEQ $3172
        SBC $AC
        CMP #$02
        BNE $3178
        LDA $AC
        LDY #$00
        BEQ $314F
        CMP #$E6
        BNE $317C
        LDA $AD
        BEQ $31AB
        SBC $AC
        CMP #$04
        BNE $31AB
        BEQ $3166
        CMP #$DB
        BNE $318D
        JSR $00AE
        JSR $3DDE
        LDY $82
        LDA $83
        JMP $435D

        LDA $89
        PHA
        LDA $88
        PHA
        JSR $3F3B
        LDY $CF
        LDA $D0
        JSR $435D
        PLA
        TAY
        PLA
        CPY $88
        BNE $31AB
        CMP $89
        BNE $31AB
        JMP $3DDE

        JMP $48CE

        JSR $3DE1
        JSR $320E
        JSR $3DDE
        JSR $2C2E
        BCS $31BF
        JMP $2B7E

        LDA $E3
        LDY $E4
        STA $C9
        STY $CA
        LDA #$80
        STA $CC
        LDY $C5
        CPY #$78
        BNE $31DA
        LDA $90
        LDY $91
        STA $B5
        STY $B6
        RTS

        TYA
        ADC #$06
        STA $C5
        TYA
        BEQ $3202
        SEC
        LDA $060C,Y
        SBC $CB
        LDA $0609,Y
        SBC $C8
        LDA $0608,Y
        SBC $C7
        BCC $3202
        LDX #$06
        LDA $060D,Y
        STA $0613,Y
        DEY
        DEX
        BNE $31F6
        BEQ $31DF
        LDX #$FA
        LDA $CD,X
        STA $060E,Y
        INY
        INX
        BNE $3204
        RTS

        JSR $60C0
        LDA $E8
        PHA
        LDA $E9
        PHA
        LDA $EA
        PHA
        JSR $3091
        PLA
        CLC
        ADC $EA
        STA $CB
        PLA
        ADC $E9
        STA $C8
        PLA
        ADC $E8
        STA $C7
        RTS

        LDY $C5
        BEQ $328F
        JSR $60C0
        LDA $E8
        CMP $060E
        BNE $3248
        LDA $E9
        CMP $060F
        BNE $3248
        LDA $EA
        CMP $0612
        BCC $328F
        LDX $0613
        BMI $325B
        LDA $0610
        LDY $0611
        JSR $331B
        JMP $327D

        LDA $A3
        BEQ $3264
        LDX #$17
        JMP $20F6

        LDA $8E
        LDY $8F
        STA $A0
        STY $A1
        LDA $90
        LDY $91
        STA $A2
        STY $A3
        LDY $0611
        LDX $0610
        JSR $259B
        LDY #$00
        LDA $0614,Y
        STA $060E,Y
        INY
        CPY $C5
        BNE $327F
        TYA
        SBC #$06
        STA $C5
        LDA BRKKEY
        LDX #$FF
        STX BRKKEY
        TAX
        SEC
        JMP $29A7

        JSR $48D6
        TXA
        ASL
        STA $CC
        JSR $3DE4
        JSR $48D6
        STX $C9
        JSR $3DE4
        JSR $48D6
        TXA
        ASL
        ASL
        ASL
        ASL
        STA $CA
        JSR $3DE4
        JSR $48D6
        TXA
        ORA $CA
        STA $CA
        JSR $60C0
        LDA $C5
        TAY
        BEQ $32E6
        LDA $CC
        CMP $060D,Y
        BEQ $32D6
        TYA
        SEC
        SBC #$06
        BCS $32C6
        LDA $0608,Y
        STA $E8
        LDA $0609,Y
        STA $E9
        LDA $060C,Y
        STA $EA
        TYA
        PHA
        LDA #$80
        STA $C7
        JSR $00B4
        BEQ $32F6
        JSR $3DE4
        JSR $3211
        PLA
        BNE $3305
        LDX $CC
        LDA $C9
        LDY $CA
        JSR $331B
        JMP $3310

        TAY
        LDA $C9
        STA $060A,Y
        LDA $CA
        STA $060B,Y
        LDA $C7
        BMI $332F
        LDA #$00
        STA $CA
        JMP $31CB

        STA AUDF1,X
        LDA #$03
        STA SKCTL
        STA SSKCTL
        LDA #$00
        STA AUDCTL
        TYA
        STA AUDC1,X
        RTS

        SBC #$E1
        CMP #$06
        BCS $3360
        ASL
        TAX
        JSR $00AE
        BNE $3360
        LDA $3347,X
        PHA
        LDA $3346,X
        PHA
        RTS

        60 33 8C 33 95 33 51 33 FA 33 FF 33

        LDY $AD
        BEQ $3360
        LDA #$00
        LDX $AC
        CPX $8D
        BEQ $336D
        STX $AD
        RTS

        LDY $AD
        BEQ $3360
        LDX $AC
        LDA #$00
        CPY $AC
        BNE $3375
        STA $AD
        LDA MEMTOP
        LDX MEMTOP+1
        LDY $8A
        STY $D9
        LDY $8B
        STY $DA
        STA $8A
        STX $8B
        LDY $8D
        STX $8D
        LDX $8C
        STA $8C
        TXA
        JMP $46D3

        JSR $340F
        LDA #$80
        LDY #$02
        BNE $339D
        JSR $340F
        LDA #$00
        LDY #$05
        STA $D1
        STY $D2
        LDX $AC
        LDA #$00
        JSR $3375
        LDA $8C
        LDY $8D
        STA $E3
        STY $E4
        SEC
        LDA $8A
        STA $DF
        SBC $D1
        STA $DD
        TAX
        LDA $8B
        STA FR1
        SBC $D2
        STA $DE
        CMP $89
        BNE $33C8
        CPX $88
        BCS $33CD
        JMP $20F4

        STX $8A
        STA $8B
        JSR $207B
        LDA $DE
        AND #$FC
        STA PMBASE
        LDA $DD
        LDY $DE
        STA $8C
        STY $8D
        LDX $D2
        LDY $DD
        BEQ $33EA
        INX
        LDA #$00
        STA $DD
        STA ($DD),Y
        INY
        BNE $33EE
        INC $DE
        DEX
        BNE $33EE
        JMP $46C3

        JSR $340F
        BNE $3405
        JSR $340F
        INY
        INY
        INY
        CPY MEMTOP+1
        BCS $33CA
        INY
        STY $AD
        RTS

        LDY $AD
        BNE $342F
        LDA $8D
        SEC
        SBC #$04
        AND #$F8
        STA $AC
        LDA $8D
        SBC $AC
        STA $D2
        LDA $8C
        STA $D1
        LDX $8D
        JSR $33A5
        LDA $AC
        STA $AD
        LDY $AC
        RTS

        JSR $2FDC
        PHA
        TYA
        PHA
        JSR $3DE4
        JSR $2FDC
        PHA
        TYA
        PHA
        JSR $3DE4
        JSR $2FDC
        PLA
        STA $DD
        PLA
        STA $DE
        CLC
        PLA
        STA $DF
        ADC $C9
        STA $E3
        PLA
        STA FR1
        ADC $CA
        STA $E4
        LDA $DE
        CMP FR1
        BNE $3466
        LDA $DD
        CMP $DF
        BCS $346B
        JMP $207B

        LDA $DF
        LDY $E3
        STY $DF
        STA $E3
        LDA FR1
        LDY $E4
        STY FR1
        STA $E4
        CLC
        LDA $DD
        ADC $C9
        STA $DD
        LDA $DE
        ADC $CA
        STA $DE
        JMP $2060

        LDA #$01
        STA $C8
        PHA
        DEX
        JSR $369A
        JSR $00B4
        BNE $349D
        PLA
        JMP $355A

        STX $CC
        JSR $3C17
        JSR $3BE4
        LDA $E9
        LDY $EA
        STA $DB
        STY $DC
        LDA $C8
        TAX
        LDY #$00
        JSR $4839
        JSR $61FD
        PLA
        CMP #$26
        BEQ $34CD
        LDY #$00
        LDA $C8
        SEC
        SBC ($E9),Y
        TAX
        BEQ $34CD
        JSR $6247
        DEX
        BNE $34C7
        JMP $3666

        STX $CC
        STY $DD
        LDA #$02
        STA $C8
        LDA ($D5),Y
        CMP #$25
        BEQ $348F
        CMP #$20
        BNE $34E8
        INC $C8
        INY
        DEX
        BNE $34D8
        LDY $DD
        LDX $CC
        LDA #$25
        JSR $369A
        JSR $624C
        BNE $352B
        JSR $00AE
        JSR $3C17
        JSR $3BE4
        LDA #$3B
        JSR $3DE6
        LDA $E9
        LDY $EA
        STA $C9
        STY $CA
        JMP $3513

        LDA $CB
        BEQ $351C
        LDY #$00
        STY $CB
        LDA ($C9),Y
        TAX
        BNE $351F
        JMP $48CE

        INY
        LDA ($C9),Y
        STA $D5
        INY
        LDA ($C9),Y
        STA $D6
        LDY #$00
        LDA #$00
        STA $D0
        LDA #$00
        STA $C8
        LDA ($D5),Y
        INY
        CMP #$21
        BNE $353D
        JMP $348B

        CMP #$26
        BNE $3548
        LDY #$FF
        STY $C8
        JMP $348F

        CMP #$23
        BEQ $35BB
        DEX
        BNE $3568
        JSR $369A
        JSR $624C
        JSR $00B4
        BNE $350F
        LDA $CB
        BNE $3561
        JSR $26F5
        LDA $C9
        LDY $CA
        JMP $47A3

        CMP #$2B
        BNE $3575
        JSR $369A
        LDA #$20
        STA $D0
        BNE $352F
        CMP $0688
        BEQ $35DD
        CMP #$25
        BNE $3581
        JMP $34D0

        CMP #$5F
        BNE $358E
        LDA ($D5),Y
        INY
        DEX
        BEQ $354F
        JMP $34EE

        CMP ($D5),Y
        BNE $358B
        CMP $0686
        BEQ $35B2
        CMP #$2A
        BNE $358B
        LDA $D0
        ORA #$40
        STA $D0
        CPX #$02
        BCC $35B8
        INY
        LDA ($D5),Y
        DEY
        CMP $0686
        BNE $35B8
        DEX
        INY
        INC $C8
        LDA $D0
        ORA #$10
        STA $D0
        INY
        INC $C8
        LDA #$00
        STA $C7
        INC $C8
        DEX
        BEQ $361D
        LDA ($D5),Y
        INY
        CMP $0688
        BEQ $35EE
        CMP #$23
        BEQ $35BF
        CMP $0687
        BNE $35FA
        LDA $D0
        ORA #$04
        STA $D0
        BNE $35BF
        LDA ($D5),Y
        CMP #$23
        BEQ $35E9
        LDA $0688
        JMP $34EE

        LDA #$01
        STA $C7
        INY
        INC $C7
        DEX
        BEQ $361D
        LDA ($D5),Y
        INY
        CMP #$23
        BEQ $35EE
        CMP #$5E
        BNE $361D
        STY $D7
        CMP ($D5),Y
        BNE $361B
        INY
        CMP ($D5),Y
        BNE $361B
        INY
        CMP ($D5),Y
        BNE $361B
        INY
        CPX #$04
        BCC $361B
        DEX
        DEX
        DEX
        DEX
        INC $D0
        BNE $361E
        LDY $D7
        DEY
        INC $C8
        LDA $D0
        AND #$20
        BNE $363F
        DEC $C8
        TXA
        BEQ $363F
        LDA ($D5),Y
        SEC
        SBC #$2D
        BEQ $3638
        CMP #$FE
        BNE $363F
        LDA #$20
        ORA #$08
        ORA $D0
        STA $D0
        DEX
        JSR $00B4
        BNE $3647
        JMP $355A

        LDA $D0
        PHA
        STX $CC
        JSR $3BDF
        CLC
        LDA $C8
        ADC $C7
        CMP #$19
        BCC $365B
        JMP $48CE

        PLA
        ORA #$80
        STA $D0
        JSR $5348
        JSR $61FA
        LDA #$00
        STA $CB
        JSR $00B4
        BEQ $367E
        STA $CB
        CMP #$3B
        BEQ $367B
        JSR $3DE4
        JMP $367E

        JSR $00AE
        LDY #$02
        LDA ($C9),Y
        STA $D6
        DEY
        LDA ($C9),Y
        STA $D5
        DEY
        LDA ($C9),Y
        SEC
        SBC $CC
        TAY
        LDX $CC
        BEQ $3697
        JMP $352B

        JMP $3555

        PHA
        LDA #$2B
        BIT $D0
        BEQ $36A4
        JSR $624C
        PLA
        RTS

        INC $CD
        BIT $E5
        BVS $36AF
        JMP $3770

        LDA $D0
        ROR
        BCC $36B7
        JMP $382F

        LDA #$07
        STA $E1
        LDA #$04
        STA FR0
        JSR $3756
        LDA $C8
        SEC
        SBC #$06
        JSR $376A
        LDX #$80
        LDA #$00
        JSR $54E3
        DEY
        LDX $C7
        BNE $36D7
        DEY
        DEX
        JSR $556C
        LDA #$30
        STA $F0
        JSR $5572
        LDY $CD
        CPX #$2A
        BEQ $36ED
        INY
        TXA
        STA $00EF,Y
        LDA #$00
        STA $00F0,Y
        LDY #$FF
        INY
        STY $CD
        SEC
        LDA $CE
        SBC $CD
        SBC $C8
        BEQ $3742
        LDA $00EF,Y
        CMP #$20
        BEQ $36F4
        CMP #$2A
        BEQ $36F4
        LDA #$00
        PHA
        LDA $00EF,Y
        INY
        CMP #$2D
        BEQ $370D
        CMP #$2B
        BEQ $370D
        CMP $0686
        BEQ $370D
        CMP #$30
        BNE $3734
        LDA $00F0,Y
        JSR $00BB
        BCS $3734
        DEY
        PLA
        STA $00EF,Y
        BNE $372B
        BEQ $36F4
        PLA
        BNE $3734
        LDY $CD
        DEY
        BPL $373D
        INY
        LDA #$25
        STA $00EF,Y
        JMP $5384

        LDA $E2
        SEC
        ADC $E1
        STA $E1
        CLC
        ADC #$01
        SEC
        SBC #$03
        BCS $3750
        ADC #$05
        STA FR0
        LDA $D0
        AND #$04
        BNE $3760
        STA FR0
        RTS

        LDX #$81
        JSR $5528
        DEY
        BPL $3761
        RTS

        TAX
        LDY $CD
        JMP $556C

        LDA $D0
        ROR
        BCC $3778
        JMP $3832

        LDA #$C2
        LDY #$38
        JSR $510E
        BMI $3788
        JSR $5344
        TAY
        JMP $3739

        LDA #$06
        BIT $E5
        BPL $3790
        LDA #$10
        STA $E1
        LDX $E7
        STX $E2
        BEQ $379F
        PHA
        LDA #$00
        JSR $5442
        PLA
        LDA $E2
        BMI $37C9
        EOR #$FF
        SEC
        ADC $C8
        SEC
        SBC $E1
        JSR $376A
        JSR $3745
        JSR $549E
        LDA $E2
        BEQ $37C6
        LDA #$30
        STA $00EF,Y
        LDY $E2
        DEY
        JSR $3766
        JSR $54F8
        JMP $36D1

        LDA $C7
        BEQ $37D0
        SEC
        SBC #$01
        CLC
        ADC $E2
        BMI $37D7
        LDA #$00
        PHA
        STA $CF
        BPL $37E3
        JSR $4EA9
        INC $CF
        BMI $37DC
        PLA
        EOR #$FF
        SEC
        ADC $E2
        STA $E2
        CLC
        ADC $E1
        BMI $3801
        LDA $C8
        SEC
        SBC $E1
        SEC
        SBC $E2
        JSR $376A
        JSR $3745
        JMP $381E

        LDA $C8
        JSR $376A
        LDA $0688
        INY
        STA $00EF,Y
        STY $CD
        LDA #$00
        SEC
        SBC $E1
        SEC
        SBC $E2
        JSR $376A
        STX $E1
        STX FR0
        JSR $549E
        LDA $C7
        BNE $3827
        LDY $CE
        CLC
        ADC $E2
        TAX
        DEY
        JMP $36D7

        JSR $5097
        LDA $E7
        PHA
        BEQ $383C
        LDA #$00
        JSR $5442
        LDA #$06
        BIT $E5
        BPL $3844
        LDA #$10
        PHA
        STA $E1
        LDA $C7
        BEQ $384E
        SEC
        SBC #$01
        CLC
        ADC $C8
        TAX
        LDA $D0
        AND #$08
        BEQ $385A
        LDA #$FF
        EOR #$FF
        STA $DD
        TXA
        CLC
        ADC $DD
        SEC
        SBC $E1
        PHA
        STA $CF
        BPL $3871
        JSR $4EA9
        INC $CF
        BMI $386A
        PLA
        PHA
        BMI $3877
        LDA #$00
        EOR #$FF
        SEC
        ADC $C8
        SEC
        ADC $DD
        STA $E1
        LDA #$00
        STA FR0
        JSR $549E
        LDA #$30
        STA $00EF,Y
        PLA
        BEQ $3892
        BPL $3894
        DEC $CD
        TAY
        DEY
        JSR $3766
        LDY $CD
        LDA $C7
        BNE $38A0
        DEY
        PLA
        STA $E1
        PLA
        BEQ $38B1
        LDA $E2
        CLC
        ADC $E1
        SEC
        SBC $C8
        SEC
        SBC $DD
        STA $E2
        INY
        STY $CD
        JSR $540A
        INC $CD
        INC $CD
        INC $CD
        JMP $36DB

        LDX APPMHI,Y
        SLO $BFC9,Y
        NOP $00
        BRK
        JSR $20ED
        LDA #$0A
        LDY #$00
        STA $9C
        STY $9D
        STA $C9
        STY $CA
        JSR $00B4
        BCS $38E1
        JSR $2CDA
        LDA $C9
        LDY $CA
        STA $9A
        STY $9B
        JSR $249D
        LDA $E3
        LDY $E4
        STA $C7
        STY $C8
        JSR $00B4
        BEQ $38FC
        JSR $3DE4
        JSR $2CDA
        JSR $249D
        JSR $00B4
        BEQ $391B
        JSR $3DE4
        JSR $2CDA
        LDA $C9
        ORA $CA
        BEQ $395E
        LDA $C9
        LDY $CA
        STA $9C
        STY $9D
        SEC
        LDA $C7
        SBC $E3
        LDA $C8
        SBC $E4
        BCC $395E
        LDA $E3
        LDY $E4
        STA $C7
        STY $C8
        LDA $9A
        LDY $9B
        STA $D1
        STY $D2
        LDY #$00
        LDA ($E3),Y
        TAX
        INY
        LDA ($E3),Y
        BEQ $3961
        STA $E4
        STX $E3
        LDA ($E3),Y
        BEQ $3961
        CLC
        LDA $D1
        ADC $9C
        STA $D1
        LDA $D2
        ADC $9D
        STA $D2
        BCS $395B
        CMP #$FA
        BCC $3936
        JMP $474E

        JMP $48CE

        JSR $2523
        LDA #$00
        STA $CB
        JSR $2597
        JSR $3ABD
        BEQ $39B6
        JSR $249D
        BCS $3993
        LDA $CB
        BNE $3980
        LDA #$C5
        LDY #$3B
        JSR $61FA
        LDA $CA
        LDX $C9
        JSR $26DF
        JSR $26D4
        JSR $26F5
        LDA #$FF
        STA $CB
        BNE $396B
        JSR $3B96
        BEQ $396B
        ADC #$03
        STA $88
        BCC $399F
        INX
        STX $89
        LDA $C9
        STA ($D5),Y
        INY
        LDA $CA
        STA ($D5),Y
        INY
        LDA $E3
        STA ($D5),Y
        INY
        LDA $E4
        STA ($D5),Y
        BNE $396B
        LDA $CB
        BNE $3A1E
        LDY #$01
        LDA ($C7),Y
        BEQ $39E6
        LDY #$03
        LDA $9B
        STA ($C7),Y
        DEY
        LDA $9A
        STA ($C7),Y
        DEY
        LDA ($C7),Y
        TAX
        DEY
        LDA ($C7),Y
        STA $C7
        STX $C8
        LDA $9A
        CLC
        ADC $9C
        STA $9A
        LDA $9B
        ADC $9D
        STA $9B
        JMP $39BA

        LDA $82
        LDX $83
        LDY #$02
        STA $D5
        STX $D6
        CPX $89
        BNE $39F8
        CMP $88
        BEQ $3A13
        LDA ($D5),Y
        STA $E3
        INY
        LDA ($D5),Y
        STA $E4
        LDA ($E3),Y
        STA ($D5),Y
        DEY
        LDA ($E3),Y
        STA ($D5),Y
        LDA $D5
        ADC #$04
        BCC $39EC
        INX
        BCS $39EC
        JSR $2597
        JSR $3ABD
        BNE $3A24
        JSR $22A8
        JSR $2523
        JMP $2189

        JSR $3B96
        INY
        LDA ($D5),Y
        STA $E9
        INY
        LDA ($D5),Y
        STA $E8
        LDX #$90
        SEC
        JSR $50EF
        JSR $5344
        STA $CD
        TAY
        LDX #$FF
        INX
        INY
        LDA $0000,Y
        BNE $3A3F
        STX $D3
        SEC
        LDA $B5
        STA $DF
        SBC $DD
        STA $D1
        LDA $B6
        STA FR1
        LDA $DD
        LDY $DE
        STA $B5
        STY $B6
        TXA
        SEC
        SBC $D1
        STA $D1
        LDA #$00
        SBC #$00
        STA $D2
        LDA $D1
        BEQ $3AA2
        LDA $88
        LDY $89
        STA $E3
        STY $E4
        JSR $207B
        LDA $B5
        LDY $B6
        STA $E3
        STY $E4
        LDA $DD
        LDY $DE
        STA $DF
        STY FR1
        CLC
        ADC $D3
        STA $DD
        BCC $3A90
        INY
        STY $DE
        JSR $2059
        LDA $82
        CLC
        ADC $D1
        STA $82
        LDA $83
        ADC $D2
        STA $83
        LDY #$FF
        LDX $CD
        INY
        INX
        LDA $00,X
        BEQ $3AB0
        STA ($B5),Y
        BNE $3AA6
        TYA
        CLC
        ADC $B5
        STA $B5
        BCC $3ABA
        INC $B6
        JMP $3A16

        JSR $00B4
        CMP #$2C
        BEQ $3B1E
        CMP #$EF
        BEQ $3B1E
        CMP #$22
        BNE $3AD8
        JSR $00AE
        CMP #$7C
        BEQ $3B52
        TAY
        BNE $3ACC
        BEQ $3B53
        LDY #$07
        CMP $3BD7,Y
        BEQ $3B1E
        DEY
        BPL $3ADA
        CMP #$A2
        BNE $3B15
        JSR $00AE
        CMP #$A1
        BNE $3AC8
        JSR $00AE
        BCC $3B06
        CMP #$92
        BEQ $3B01
        CMP #$95
        BNE $3AC8
        JSR $00AE
        CMP #$D3
        BNE $3B20
        JSR $00AE
        BCS $3AC8
        JSR $3B73
        LDA $C9
        ORA $CA
        BNE $3B7E
        JSR $00B4
        JMP $3AC8

        CMP #$95
        BNE $3B26
        JSR $00AE
        CMP #$D3
        BEQ $3B6E
        CMP #$D4
        BEQ $3B6E
        BNE $3AC8
        CMP #$FF
        BNE $3B48
        JSR $00AE
        CMP #$C4
        BNE $3B68
        LDX #$FF
        INX
        JSR $00AE
        CMP #$F6
        BCC $3B3F
        CMP #$F9
        BCC $3B33
        DEX
        BMI $3AC8
        JSR $00B4
        JMP $3B71

        CMP #$84
        BNE $3B52
        JSR $2B90
        JMP $3B0F

        TAY
        BEQ $3B5F
        SEC
        SBC #$98
        LSR
        LSR
        BNE $3B68
        JSR $2B9A
        LDY #$02
        LDA ($B5),Y
        BEQ $3B95
        JSR $2960
        JSR $00AE
        JMP $3AC8

        JSR $00AE
        BCS $3B6B
        LDX $B5
        LDY $B6
        STX $DD
        STY $DE
        JSR $2CDA
        LDY #$00
        LDX $B5
        BNE $3B86
        DEC $B6
        DEC $B5
        LDA ($B5),Y
        JSR $00BB
        BCS $3B80
        INC $B5
        BNE $3B95
        INC $B6
        RTS

        LDA $82
        LDX $83
        LDY #$00
        STA $D5
        STX $D6
        CPX $89
        BNE $3BA8
        CMP $88
        BEQ $3BC2
        LDA $C9
        CMP ($D5),Y
        BNE $3BB6
        INY
        LDA $CA
        CMP ($D5),Y
        BEQ $3BC4
        DEY
        LDA $D5
        LDX $D6
        CLC
        ADC #$04
        BCC $3B9C
        INX
        BCS $3B9C
        INX
        DEX
        RTS

        EOR DRKMSK,X
        NOP $45
        LSR $49
        LSR $4445
        JSR $494C
        LSR $5345
        NOP
        SHS $8500,Y
        KIL
        SHA ($A0),Y
        STA $969C,X
        LDA $1720
        NOP $2418,X
        SEC
        BIT $E5
        BMI $3BEC
        BCS $3BF0
        RTS

        BVC $3BE9
        BCS $3BEB
        LDX #$0D
        JMP $20F6

        TXA
        LDX $B5
        BNE $3BFC
        DEC $B6
        DEC $B5
        LDY #$1E
        STA $CF
        STY FR0
        PLA
        BIT $E5
        BVC $3C0F
        BPL $3C0F
        CMP #$66
        BCS $3BF0
        CMP $498E,Y
        BCC $3C77
        JMP $3CEA

        LDX $B5
        BNE $3C1D
        DEC $B6
        DEC $B5
        LDY #$00
        BIT $48
        TYA
        PHA
        LDA #$01
        JSR $20B3
        JSR $3D89
        LDA #$00
        STA $CF
        JSR $00B4
        SEC
        SBC #$F6
        BCC $3C58
        CMP #$03
        BCS $3C58
        CMP #$01
        ROL
        EOR #$01
        EOR $CF
        CMP $CF
        BCS $3C4B
        JMP $3DEF

        STA $CF
        JSR $00AE
        JMP $3C34

        BVC $3C68
        JMP $4733

        LDX $CF
        BNE $3BF5
        BCS $3CDC
        ADC #$08
        BCC $3CDC
        BNE $3C68
        BIT $E5
        BMI $3C53
        STA $D5
        ASL
        ADC $D5
        TAY
        PLA
        CMP $498E,Y
        BCS $3CE1
        JSR $3BE2
        PHA
        JSR $3C85
        PLA
        LDY FR0
        BPL $3C0F
        TAX
        BEQ $3CDF
        BNE $3CEA
        LDA $4990,Y
        PHA
        LDA $498F,Y
        PHA
        LDA $498E,Y
        CMP #$51
        BCS $3C99
        PHA
        JSR $5031
        PLA
        CMP #$7E
        BNE $3CA2
        JSR $5088
        LDA #$7E
        TAY
        LDX #$00
        BEQ $3CAF
        LDA $E5
        PHA
        LDA $CF
        JMP $3C22

        LDA $3D81,X
        STA $D5
        LDA $3D82,X
        STA $D6
        BIT $E5
        BVS $3CD3
        DEX
        BPL $3D22
        LDA $D2
        ROL $E6
        ROR
        PHA
        LDA $E5
        AND #$0F
        TAX
        LDA $E6,X
        PHA
        DEX
        BNE $3CCB
        BEQ $3CD9
        LDA $EA
        PHA
        LDA $E9
        PHA
        JMP ($00D5)

        LDY #$FF
        PLA
        BEQ $3D1F
        CMP #$65
        BEQ $3CE8
        JSR $3BE2
        STY FR0
        TAY
        PLA
        STA $CD
        PLA
        STA $CE
        BIT $CE
        BVS $3D0C
        AND #$0F
        STA $D3
        LDX #$00
        PLA
        STA $F1,X
        INX
        CPX $D3
        BNE $3CFB
        PLA
        STA $D3
        ASL $D3
        STA $F0
        BVC $3D12
        PLA
        STA INBUFF
        PLA
        STA $F4
        TYA
        ROR
        BCC $3D76
        BIT $CE
        BVS $3D41
        BPL $3D28
        JSR $506B
        JMP $3D76

        JSR $5021
        JMP $3CC6

        BIT $E5
        BVS $3D3B
        BPL $3D76
        LDX #$08
        JSR $3D53
        JSR $506B
        LDX #$08
        JMP $3D53

        JSR $5088
        JMP $3D76

        BMI $3D80
        BIT $E5
        BVS $3D80
        BMI $3D2E
        LDX #$04
        JSR $3D53
        JSR $5088
        LDX #$04
        LDA $F0
        LDY $E6
        STA $E6
        STY $F0
        LDA $CE
        LDY $E5
        STA $E5
        STY $CE
        LDA $D3
        LDY $D2
        STA $D2
        STY $D3
        LDA $F0,X
        LDY $E6,X
        STA $E6,X
        STY $F0,X
        DEX
        BNE $3D6B
        LDA $F0
        EOR $E6
        STA $D1
        BIT $E5
        LDA $E7
        RTS

        A7 3C 8B 27 B6 27 59 44

        JSR $00AE
        BCS $3D91
        JMP $520A

        JSR $4123
        BCC $3DFF
        CMP #$2E
        BEQ $3D8E
        CMP #$EF
        BEQ $3DF4
        CMP #$EE
        BEQ $3D89
        CMP #$22
        BNE $3DB5
        LDA $B5
        LDY $B6
        ADC #$00
        BCC $3DAF
        INY
        JSR $45EC
        JMP $4928

        CMP #$D7
        BNE $3DC3
        LDY #$1B
        LDA #$FF
        STA $E9
        STA $EA
        BNE $3DF6
        CMP #$26
        BNE $3DCA
        JMP $5634

        CMP #$D5
        BNE $3DD1
        JMP $43FA

        CMP #$FF
        BNE $3DD8
        JMP $3E25

        JSR $3DE1
        JSR $3C17
        LDA #$29
        BIT $28A9
        BIT $2CA9
        LDY #$00
        CMP ($B5),Y
        BNE $3DEF
        JMP $00AE

        LDX #$02
        JMP $20F6

        LDY #$18
        PLA
        PLA
        LDA #$42
        STA $E5
        JMP $3C78

        JSR $3F3B
        BIT $E5
        BVS $3E12
        STA $D5
        STY $D6
        LDA $E5
        AND #$0F
        TAY
        JMP $4FB2

        STA $E9
        STY $EA
        BMI $3E24
        LDY #$00
        LDA ($E9),Y
        TAX
        INY
        LDA ($E9),Y
        STX $E9
        STA $EA
        RTS

        JSR $00AE
        ASL
        PHA
        TAX
        JSR $00AE
        CPX #$7E
        BCS $3E6A
        CPX #$6E
        BCC $3E5A
        JSR $3DE1
        CPX #$74
        BCS $3E6A
        JSR $3C17
        JSR $3DE4
        JSR $3BE4
        PLA
        TAX
        LDA $EA
        PHA
        LDA $E9
        PHA
        TXA
        PHA
        JSR $48D6
        PLA
        TAY
        TXA
        PHA
        JMP $3E6C

        JSR $3DD8
        PLA
        CMP #$50
        BCC $3E6B
        CMP #$5D
        BCS $3E6B
        PHA
        JSR $5088
        PLA
        TAY
        LDA $4969,Y
        STA $D5
        LDA $496A,Y
        STA $D6
        JSR $3CD9
        JMP $3BE2

        JSR $5031
        LDA $EA
        AND $F4
        TAY
        LDA $E9
        AND INBUFF
        JMP $435D

        JSR $5031
        LDA $EA
        ORA $F4
        TAY
        LDA $E9
        ORA INBUFF
        JMP $435D

        JSR $5031
        LDA $EA
        EOR $F4
        TAY
        LDA $E9
        EOR INBUFF
        JMP $435D

        LSR $CE
        JSR $3BE5
        BCS $3EE0
        BVS $3EC5
        LDA $F0
        ORA #$7F
        AND CIX
        STA CIX
        LDA #$F1
        LDY #$00
        JSR $5110
        TAX
        JMP $3F0D

        LDA $E9
        EOR INBUFF
        BMI $3EDB
        LDA INBUFF
        CMP $E9
        BNE $3F18
        LDA $F4
        CMP $EA
        BNE $3F18
        LDX #$00
        BEQ $3F0F
        ROL $E9
        JMP $3F18

        JSR $479F
        STA $E7
        STX $E8
        STY $E9
        LDA INBUFF
        LDY $F4
        JSR $47A3
        STX INBUFF
        STY $F4
        TAX
        SEC
        SBC $E7
        BEQ $3F02
        LDA #$01
        BCC $3F02
        LDX $E7
        LDA #$FF
        STA $E6
        LDY #$FF
        INX
        INY
        DEX
        BNE $3F12
        LDX $E6
        BMI $3F1E
        CLC
        BCC $3F1E
        LDA (INBUFF),Y
        CMP ($E8),Y
        BEQ $3F07
        LDX #$FF
        BCS $3F1E
        LDX #$01
        INX
        TXA
        ROL
        AND $CD
        BEQ $3F27
        LDA #$FF
        JMP $50DC

        JSR $3DE4
        TAX
        JSR $3F40
        JSR $00B4
        BNE $3F2A
        RTS

        LDA #$80
        STA $A6
        LDX #$00
        JSR $00B4
        STX $CD
        AND #$9F
        STA $0480
        JSR $00B4
        JSR $4123
        BCC $3F52
        JMP $3DEF

        LDX #$00
        STX $0481
        LDX #$85
        JSR $00AE
        BCC $3F63
        JSR $4123
        BCS $3F73
        STA $03FC,X
        INX
        BNE $3F59
        JSR $00AE
        BCC $3F69
        JSR $4123
        BCC $3F69
        PHA
        CPX #$85
        BEQ $3F8D
        CPX #$87
        BCC $3F8D
        LDA $0480
        ORA #$40
        STA $0480
        DEX
        LDA $03FC,X
        ORA #$80
        STA $03FC,X
        TXA
        ADC #$7C
        STA FR0
        PLA
        SBC #$23
        TAY
        CPY #$03
        BCC $3FA6
        LDA $0480
        AND #$1F
        TAY
        LDA $05ED,Y
        TAY
        BPL $3FA9
        JSR $00AE
        LDA $0481
        AND #$3F
        ORA $4133,Y
        STA $0481
        LDA $4137,Y
        STA $E5
        LDA $84
        LDX $85
        STX $E4
        STA $E3
        LDY #$00
        CPX $87
        BNE $3FCB
        CMP $86
        BEQ $4043
        LDA ($E3),Y
        INY
        AND #$DF
        EOR $0480
        AND #$7F
        BNE $3FF0
        LDA $0481
        CMP ($E3),Y
        BNE $3FF0
        INY
        BIT $0480
        BVC $3FFF
        INY
        LDA $047F,Y
        BMI $3FFB
        CMP ($E3),Y
        BEQ $3FE4
        LDY #$01
        INY
        LDA ($E3),Y
        CLC
        ADC $E3
        BCC $3FBF
        INX
        BNE $3FBD
        CMP ($E3),Y
        BNE $3FEE
        STY $CF
        LDY #$00
        TSX
        LDA $0102,X
        CMP #$3E
        BEQ $401F
        BIT $0480
        BPL $4015
        LDX #$0A
        JMP $20F6

        LDA ($E3),Y
        LDX #$02
        AND #$80
        BNE $4012
        BEQ $402D
        LDA ($E3),Y
        AND #$80
        BEQ $402D
        PLA
        PLA
        JSR $403E
        JMP $43FA

        JSR $00B4
        SEC
        ORA $A6
        SBC #$28
        BNE $403A
        JMP $4150

        LDA #$00
        STA $A6
        LDY $CF
        JMP $4114

        BIT $0480
        BMI $4063
        JSR $00B4
        SEC
        ORA $A6
        SBC #$28
        BEQ $4037
        LDA #$00
        STA $A6
        TSX
        LDA $0102,X
        CMP #$3E
        BNE $4063
        LDA #$C8
        LDY #$55
        RTS

        LDA $86
        LDY $87
        STA $E3
        STY $E4
        LDA $88
        LDY $89
        STA $DF
        STY FR1
        SEC
        LDA $E5
        AND #$0F
        ADC FR0
        STA $CF
        ADC $DF
        BCC $4081
        INY
        STA $DD
        STY $DE
        JSR $2059
        LDA #$00
        STA $D0
        JSR $4091
        BEQ $40E2
        LDA $8C
        LDY $8D
        CPY $8B
        BNE $409D
        CMP $8A
        BEQ $4062
        SBC #$02
        STA $D5
        BCS $40A4
        DEY
        STY $D6
        LDY #$01
        LDA ($D5),Y
        CMP #$01
        BEQ $40D9
        TAX
        DEY
        LDA ($D5),Y
        STA $D7
        CPX $87
        BNE $40BA
        CMP $86
        BCC $40CB
        CLC
        ADC $CF
        STA ($D5),Y
        STA $D7
        TXA
        ADC $D0
        TAX
        INY
        STA ($D5),Y
        DEY
        STX $D8
        LDA $D5
        SEC
        SBC ($D7),Y
        LDY $D6
        BCS $4095
        DEY
        BCC $4095
        LDA $D5
        DEY
        SEC
        SBC ($D5),Y
        JMP $40D2

        LDA $DD
        LDY $DE
        INY
        STA $86
        STY $87
        LDY #$00
        LDA $0480
        STA ($E3),Y
        INY
        LDA $0481
        STA ($E3),Y
        INY
        LDA $CF
        STA ($E3),Y
        BIT $0480
        BVC $410A
        INY
        LDA $047F,Y
        STA ($E3),Y
        BPL $4102
        LDA #$00
        INY
        STA ($E3),Y
        INY
        STA ($E3),Y
        DEY
        DEY
        CLC
        INY
        TYA
        ADC $E3
        LDY $E4
        BCC $411E
        INY
        STA $CF
        STY $D0
        RTS

        CMP #$5F
        BEQ $4131
        CMP #$5B
        BCS $4130
        SBC #$40
        SEC
        SBC #$BF
        RTS

        CLC
        RTS

        NOP #$C0
        RTI

        BRK
        DEY
        DCP (CRITIC,X)
        NOP $A5
        DCP (DOSVEC),Y
        ADC #$03
        ADC FR0
        STY FR0
        ADC $E3
        LDY $E4
        BCC $414B
        INY
        STA $DD
        STY $DE
        RTS

        LDA $CD
        PHA
        LDA $E5
        PHA
        LDY #$00
        TYA
        PHA
        LDA FR0
        JSR $20B4
        LDX FR0
        LDA $047F,X
        PHA
        DEX
        BNE $4161
        JSR $00AE
        JSR $3C17
        JSR $5031
        PLA
        STA $0480
        PLA
        STA $0481
        LDX #$01
        BIT $0480
        BVC $4187
        INX
        PLA
        STA $0480,X
        BPL $4180
        INX
        STX FR0
        LDA $E9
        BMI $420B
        LDX $A9
        BEQ $4199
        ORA $EA
        BEQ $420B
        JSR $579B
        PLA
        TAY
        TSX
        LDA $0102,X
        PHA
        LDA $0101,X
        PHA
        LDA $E9
        STA $0102,X
        LDA $EA
        STA $0101,X
        INY
        JSR $00B4
        CMP #$2C
        BEQ $4158
        STY $D3
        JSR $3DDE
        PLA
        STA $E5
        PLA
        STA $CD
        LDA $E5
        AND #$0F
        STA $E2
        LDX $86
        LDA $87
        STX $E3
        STA $E4
        CMP $89
        BNE $41D7
        CPX $88
        BEQ $4229
        LDY #$00
        LDA ($E3),Y
        AND #$DF
        INY
        CMP $0480
        BNE $41FD
        LDA $0481
        CMP ($E3),Y
        BNE $41FD
        INY
        INY
        BIT $0480
        BVC $4214
        INY
        LDA $047E,Y
        BMI $4210
        CMP ($E3),Y
        BEQ $41F1
        LDY #$01
        INY
        LDA ($E3),Y
        CLC
        ADC $E3
        TAX
        INY
        LDA ($E3),Y
        ADC $E4
        BCC $41CB
        LDX #$09
        JMP $20F6

        CMP ($E3),Y
        BNE $41FB
        LDX #$0A
        LDA $CD
        BNE $420D
        JSR $413B
        LDA $D3
        LDY FR0
        INY
        CMP ($E3),Y
        BNE $420B
        JMP $42C5

        JSR $413B
        JSR $20C0
        LDY #$00
        LDA $0480
        STA ($E3),Y
        LDA $0481
        STY $D0
        INY
        STA ($E3),Y
        LDX $E2
        STX $CF
        INY
        INY
        BIT $0480
        BVC $4251
        INY
        LDA $047E,Y
        STA ($E3),Y
        BPL $4249
        INY
        LDA $D3
        STA ($E3),Y
        STY FR0
        SEC
        LDA #$0B
        SBC $A9
        TAX
        LDA #$00
        BIT $CD
        BVC $426C
        PLA
        CLC
        ADC #$01
        TAX
        PLA
        ADC #$00
        INY
        STA ($E3),Y
        INY
        TXA
        STA ($E3),Y
        JSR $4318
        STX $CF
        STA $D0
        LDY $D5
        DEC $D3
        BNE $4258
        ADC $DE
        BCS $42E2
        STA $DE
        TAY
        TXA
        ADC $DD
        BCC $428F
        INY
        BEQ $42E2
        JSR $20C0
        STA $88
        STY $89
        LDA #$00
        INC $D0
        LDY $CF
        BEQ $42A3
        DEY
        STA ($DD),Y
        BNE $429E
        DEC $DE
        DEC $D0
        BNE $429E
        INC $DE
        SEC
        LDA $88
        SBC $E3
        LDY #$02
        STA ($E3),Y
        LDA $89
        INY
        SBC $E4
        STA ($E3),Y
        LDA $CD
        BNE $4317
        LDY FR0
        LDA ($E3),Y
        STA $D3
        LDA #$00
        STA $CF
        STA $D0
        INY
        PLA
        TAX
        STA $E9
        PLA
        STA $EA
        CMP ($E3),Y
        BCC $42E5
        BNE $42DF
        INY
        TXA
        CMP ($E3),Y
        BCC $42E6
        JMP $420B

        JMP $20F4

        INY
        LDA $D0
        ORA $CF
        CLC
        BEQ $42F7
        JSR $4318
        TXA
        ADC $E9
        TAX
        TYA
        LDY $D5
        ADC $EA
        STX $CF
        DEC $D3
        BNE $42C9
        STA $D0
        LDX $E2
        STX $D1
        LDA #$00
        JSR $4321
        TXA
        ADC $DD
        STA $CF
        TYA
        ADC $DE
        STA $D0
        TAY
        LDA $CF
        RTS

        STY $D5
        LDA ($E3),Y
        STA $D1
        DEY
        LDA ($E3),Y
        STA $D2
        LDA #$10
        STA $E1
        LDX #$00
        LDY #$00
        TXA
        ASL
        TAX
        TYA
        ROL
        TAY
        BCS $42E2
        ASL $CF
        ROL $D0
        BCC $4344
        CLC
        TXA
        ADC $D1
        TAX
        TYA
        ADC $D2
        TAY
        BCS $42E2
        DEC $E1
        BNE $432B
        RTS

        LDA $E5
        BEQ $4350
        JSR $479F
        JSR $46C3
        SEC
        LDA $8A
        SBC $88
        TAY
        LDA $8B
        SBC $89
        STA $E9
        STY $EA
        JMP $5059

        LDY COLCRS
        LDA #$00
        BEQ $435D
        LDX #$03
        BIT ESCFLG
        BIT $01A2
        BIT $00A2
        JSR $4123
        BCS $43B2
        STA $D0
        TAY
        TXA
        PHA
        JSR $00AE
        CMP #$EF
        BNE $4392
        JSR $00AE
        JSR $4123
        BCS $43B2
        TAY
        JSR $00AE
        TYA
        SEC
        SBC $D0
        BCC $43B2
        TAY
        LDA $D0
        SBC #$41
        TAX
        PLA
        STA $05EE,X
        INX
        DEY
        BPL $439F
        TAX
        JSR $00B4
        BEQ $4348
        JSR $3DE4
        JMP $4375

        JMP $3DEF

        LDX $8F
        INX
        BNE $4348
        LDX #$0C
        BIT $12A2
        JMP $20F6

        JSR $43F0
        JSR $43B5
        LDY #$01
        LDA $B6
        STA ($D9),Y
        DEY
        LDA $B5
        STA ($D9),Y
        JSR $00B4
        CMP #$28
        BEQ $43DD
        JMP $2B90

        JSR $00AE
        JSR $3F37
        JSR $00B4
        CMP #$29
        BEQ $43DA
        JSR $3DE4
        JMP $43E0

        ORA #$80
        JSR $3F42
        STA $D9
        STY $DA
        RTS

        STA $D9
        STY $DA
        LDA $E5
        PHA
        LDY #$01
        LDA ($D9),Y
        BEQ $43BD
        TAX
        DEY
        LDA ($D9),Y
        STA $D9
        STX $DA
        TYA
        PHA
        LDA ($D9),Y
        CMP #$28
        BEQ $441A
        JMP $44F3

        INC $D9
        BNE $4420
        INC $DA
        JSR $3DE1
        JSR $4475
        JSR $3F37
        LDA $D0
        PHA
        LDA $CF
        PHA
        LDA $E5
        PHA
        JSR $4475
        PHA
        LDA $D9
        PHA
        JSR $3C17
        PLA
        STA $D9
        PLA
        STA $DA
        PLA
        JSR $505E
        PLA
        STA $CF
        PLA
        STA $D0
        LDA $E5
        ROR
        BCC $4454
        JSR $4580
        LDX #$06
        JMP $2780

        LDA $D0
        PHA
        LDA $CF
        PHA
        LDA $E5
        PHA
        JSR $00B4
        CMP #$29
        BEQ $4486
        JSR $3DE4
        JSR $4475
        JSR $3DE4
        JMP $4426

        LDY $D9
        LDA $B5
        STY $B5
        STA $D9
        LDY $DA
        LDA $B6
        STY $B6
        STA $DA
        RTS

        JSR $00AE
        JSR $4475
        JSR $3DDE
        TSX
        LDA $0101,X
        BEQ $44F6
        STA $E5
        INX
        LDY $0101,X
        STY $CF
        INX
        LDY $0101,X
        STY $D0
        INX
        CMP #$C3
        BCS $44C4
        AND #$0F
        STA $D3
        LDY #$00
        LDA $0101,X
        STA $CE
        LDA ($CF),Y
        STA $0101,X
        LDA $CE
        STA ($CF),Y
        INY
        INX
        CPY $D3
        BNE $44AE
        BEQ $4490
        LDA $0101,X
        STA $D5
        INX
        LDA $0101,X
        STA $D6
        INX
        LDY #$02
        STX $CE
        LDA ($D5),Y
        TAX
        LDA ($CF),Y
        STA ($D5),Y
        TXA
        STA ($CF),Y
        DEY
        BPL $44D4
        LDX $D5
        LDY $D6
        JSR $4669
        LDX $CF
        LDY $D0
        JSR $4669
        LDX $CE
        BNE $4490
        JSR $4475
        LDA #$F7
        JSR $3DE6
        LDA $DA
        PHA
        LDA $D9
        PHA
        JSR $3C17
        JSR $00B4
        BEQ $450C
        JMP $3DEF

        PLA
        STA $B5
        PLA
        STA $B6
        LDA $E5
        ROR
        BCC $452D
        JSR $4580
        LDX $E9
        STX $C6
        LDA $0500,X
        STA $E7
        LDA $0501,X
        STA $E8
        LDA $0502,X
        STA $E9
        PLA
        BEQ $4576
        CMP #$C3
        BCS $454A
        AND #$0F
        STA $D3
        PLA
        STA $CF
        PLA
        STA $D0
        LDY #$00
        PLA
        STA ($CF),Y
        INY
        CPY $D3
        BNE $4540
        BEQ $452D
        PLA
        STA $CF
        PLA
        STA $D0
        PLA
        STA $D5
        PLA
        STA $D6
        LDX $CF
        LDY $D0
        JSR $47E8
        LDY #$02
        LDA ($D5),Y
        STA ($CF),Y
        DEY
        BPL $455F
        DEC $C6
        DEC $C6
        DEC $C6
        LDX $CF
        LDY $D0
        JSR $4669
        JMP $452D

        PLA
        JSR $505E
        LDA $E5
        ROR
        BCS $4598
        RTS

        LDY $EA
        CPY #$05
        BEQ $457F
        LDY #$00
        LDA ($E9),Y
        JSR $45D0
        LDA $DB
        LDY $DC
        STA $D1
        STY $D2
        JSR $4770
        JMP $463D

        JSR $2FDC
        PHA
        TYA
        PHA
        JSR $00B4
        CMP #$29
        BEQ $45C4
        JSR $3DE4
        JSR $3C17
        LDA $E5
        ROR
        BCC $45BC
        JSR $479F
        STA $E8
        STX $E9
        STY $EA
        LDY $E9
        LDA $EA
        STA $E3
        STY $E4
        JSR $3DDE
        PLA
        STA $C9
        PLA
        STA $CA
        JMP ($00C9)

        LDX $E9
        LDY $EA
        STX $DB
        STY $DC
        JSR $4676
        STX $E8
        STY $E9
        STA $E7
        RTS

        JSR $3BE2
        JSR $5344
        TAX
        PLA
        PLA
        TXA
        LDX #$7C
        STX $D0
        STX $CF
        STA $D1
        STY $D2
        STA $E8
        STY $E9
        LDY #$FF
        INY
        LDA ($D1),Y
        BEQ $4609
        CMP $D0
        BEQ $4609
        CMP $CF
        BNE $45FC
        TAX
        TYA
        CPX #$7C
        BEQ $461D
        PHA
        TYA
        BEQ $461B
        DEY
        LDA ($D1),Y
        CMP #$20
        BEQ $4610
        INY
        PLA
        CLC
        STY $E7
        ADC $D1
        STA $CD
        LDX $D2
        BCC $4628
        INX
        STX $CE
        LDA $D2
        BEQ $4632
        CMP #$05
        BNE $463D
        TYA
        JSR $45D0
        LDX $D1
        LDY $D2
        JSR $477E
        LDX $C6
        CPX #$EE
        BNE $4648
        LDX #$10
        JMP $20F6

        LDA $E7
        STA $0500,X
        LDA $E8
        STA $0501,X
        LDA $E9
        STA $0502,X
        LDY #$05
        STX $E9
        STY $EA
        JSR $4669
        DEY
        STY $E5
        INX
        INX
        INX
        STX $C6
        RTS

        JSR $47F5
        TYA
        LDY #$01
        STA ($D7),Y
        DEY
        TXA
        STA ($D7),Y
        RTS

        LSR $E1
        TAX
        BEQ $46B2
        PHA
        SEC
        LDA $8A
        SBC #$02
        STA $D3
        LDY $8B
        BCS $4688
        DEY
        STY FR0
        TXA
        EOR #$FF
        SEC
        ADC $D3
        BCS $4693
        DEY
        CPY $89
        BCC $46B3
        BNE $469D
        CMP $88
        BCC $46B3
        STA $8A
        STY $8B
        TAX
        LDA #$00
        LDY #$01
        STA ($D3),Y
        DEY
        PLA
        STA ($D3),Y
        LDY $8B
        STX $D3
        STY FR0
        RTS

        LDX #$07
        LDA $E1
        BMI $4645
        JSR $46C3
        LDA #$80
        STA $E1
        PLA
        BNE $4678
        LDA $8A
        LDY $8B
        STA $D9
        STY $DA
        LDA $8C
        LDY $8D
        STA $8A
        STY $8B
        STA $DF
        STY FR1
        CPY $DA
        BNE $46DF
        CMP $D9
        BEQ $46B2
        SBC #$02
        STA $D5
        BCS $46E6
        DEY
        STY $D6
        LDY #$01
        LDA ($D5),Y
        CMP #$01
        BNE $46FD
        LDA $D5
        DEY
        SEC
        SBC ($D5),Y
        LDY $D6
        BCS $46D3
        DEY
        BNE $46D3
        STA $D8
        DEY
        LDA ($D5),Y
        STA $D7
        LDA $D5
        SEC
        SBC ($D7),Y
        STA $E3
        LDA $D6
        SBC #$00
        STA $E4
        LDA $8A
        LDY $8B
        STA $DD
        STY $DE
        JSR $2060
        INC $DE
        LDY #$01
        LDA $DD
        STA ($D7),Y
        STA $8A
        LDA $DE
        INY
        STA ($D7),Y
        STA $8B
        LDA $E3
        LDY $E4
        BNE $46D3
        LDA $EA
        PHA
        LDA $E9
        PHA
        JSR $3D89
        JSR $3BE4
        PLA
        STA $D1
        PLA
        STA $D2
        LDY #$00
        LDA ($D1),Y
        CLC
        ADC ($E9),Y
        BCC $4753
        LDX #$0F
        JMP $20F6

        JSR $45D0
        JSR $4770
        LDA $DB
        LDY $DC
        JSR $47A3
        JSR $4782
        LDA $D1
        LDY $D2
        JSR $47A3
        JSR $463D
        JMP $3C2D

        LDY #$00
        LDA ($D1),Y
        PHA
        INY
        LDA ($D1),Y
        TAX
        INY
        LDA ($D1),Y
        TAY
        PLA
        STX $D5
        STY $D6
        TAY
        BEQ $478F
        PHA
        DEY
        LDA ($D5),Y
        STA ($D3),Y
        TYA
        BNE $4786
        PLA
        CLC
        ADC $D3
        STA $D3
        BCC $4798
        INC FR0
        RTS

        JSR $3C17
        JSR $3BE4
        LDA $E9
        LDY $EA
        STA $D5
        STY $D6
        JSR $47DB
        PHP
        LDY #$00
        LDA ($D5),Y
        PHA
        INY
        LDA ($D5),Y
        TAX
        INY
        LDA ($D5),Y
        TAY
        PLA
        PLP
        BNE $47D6
        CPY $8B
        BNE $47D6
        CPX $8A
        BNE $47D6
        PHA
        CLC
        ADC $8A
        BCC $47CC
        INC $8B
        CLC
        ADC #$02
        STA $8A
        BCC $47D5
        INC $8B
        PLA
        STX $D5
        STY $D6
        RTS

        CPY #$05
        BNE $47DA
        TAX
        ADC #$02
        CMP $C6
        BNE $47DA
        STX $C6
        JSR $47F5
        LDY #$00
        STA ($D7),Y
        INY
        TYA
        STA ($D7),Y
        DEY
        RTS

        STX $D7
        STY $D8
        LDY #$02
        LDA ($D7),Y
        TAX
        DEY
        CMP $8B
        BNE $4807
        LDA ($D7),Y
        CMP $8A
        DEY
        BCC $481B
        LDA ($D7),Y
        BEQ $481B
        PHA
        PHA
        INY
        CLC
        ADC ($D7),Y
        BCC $4817
        INX
        LDY $D8
        STX $D8
        LDX $D7
        STA $D7
        PLA
        PLA
        RTS

        JSR $48D9
        TXA
        PHA
        LDA #$01
        JSR $45D8
        PLA
        LDY #$00
        STA ($E8),Y
        PLA
        PLA
        JMP $463D

        JSR $4897
        CMP ($DB),Y
        TYA
        BCC $4842
        LDA ($DB),Y
        TAX
        TYA
        PHA
        TXA
        PHA
        JSR $45D8
        LDA $DB
        LDY $DC
        JSR $47A3
        PLA
        TAY
        PLA
        CLC
        ADC $D5
        STA $D5
        BCC $485B
        INC $D6
        TYA
        JSR $4782
        JMP $463D

        JSR $4897
        CLC
        SBC ($DB),Y
        EOR #$FF
        JMP $483C

        LDA #$FF
        STA $EA
        JSR $00B4
        CMP #$29
        BEQ $487E
        JSR $3DE4
        JSR $48D6
        JSR $4897
        BEQ $48CE
        DEX
        TXA
        PHA
        CLC
        LDX #$00
        SBC ($DB),Y
        BCS $4843
        EOR #$FF
        CMP $EA
        BCC $4844
        LDA $EA
        BCS $4844
        JSR $3DDE
        PLA
        TAY
        PLA
        STA $D5
        PLA
        PLA
        PLA
        TAX
        PLA
        STA $DB
        PLA
        STA $DC
        LDA $D5
        PHA
        TYA
        PHA
        LDY #$00
        TXA
        RTS

        JSR $48B8
        JMP $4366

        JSR $479C
        LDX #$04
        STX $E5
        TAY
        RTS

        JSR $48B8
        BEQ $48CE
        LDY #$00
        LDA ($D5),Y
        TAY
        JMP $4366

        LDX #$05
        JMP $20F6

        JSR $00AE
        JSR $3BDF
        JSR $5031
        LDX $E9
        BNE $48CE
        LDX $EA
        JMP $00B4

        JSR $48B8
        BNE $48ED
        JMP $4AF0

        LDA $B6
        PHA
        LDA $B5
        PHA
        LDX $D5
        STX $B5
        TYA
        CLC
        ADC $D5
        STA $D7
        PHA
        LDA $D6
        STA $B6
        ADC #$00
        STA $D8
        PHA
        LDY #$00
        LDA ($D7),Y
        PHA
        TYA
        STA ($D7),Y
        JSR $00B4
        JSR $520A
        PLA
        TAY
        PLA
        STA $D8
        PLA
        STA $D7
        TYA
        LDY #$00
        STA ($D7),Y
        PLA
        STA $CD
        PLA
        STA $CE
        LDX $CD
        LDY $CE
        STX $B5
        STY $B6
        RTS

        RTS

        JSR $48D6
        TXA
        PHA
        JSR $3DE4
        JSR $3C17
        JSR $3DDE
        LDA $E5
        ROR
        BCS $4960
        JSR $48D9
        PLA
        TAY
        TXA
        PHA
        TYA
        JSR $45D0
        TAY
        PLA
        INY
        DEY
        BEQ $495B
        DEY
        STA ($D3),Y
        BNE $4956
        PLA
        PLA
        JMP $463D

        LDY #$00
        PLA
        PHA
        TAX
        BEQ $4971
        LDA #$00
        CLC
        ADC ($E9),Y
        DEX
        BCS $498B
        BNE $496A
        JSR $45D0
        LDA $DB
        LDY $DC
        JSR $47A3
        TAY
        PLA
        TAX
        BEQ $495B
        TYA
        PHA
        JSR $4782
        PLA
        DEX
        BNE $4981
        BEQ $495B
        JMP $474E

        79 3A 4A 79 20 4A 7B 89 4D 7B C4 4E 7E C7 56 50 |y:Jy J{.M{.N~.VP|
        7B 3E 46 8A 3E 3C 99 3E 7C 0C 57 5A 99 3E 65 A8 |{>F.><.>|.WZ.>e.|
        3E D9 50 93 51 00 51 49 43 64 43 BE 56 7E 4C 4A |>.P.Q.QICdC.V~LJ|
        57 71 58 78 58 C5 58 0B 59 5A 58 B2 48 E2 45 E5 |WqXxX.X.YZX.H.E.|
        48 C1 48 22 48 88 67 C8 67 36 48 62 48 6D 48 AB |H.H"H.g.g6HbHmH.|
        30 32 49 26 31 9B 45 1C 68 00 58 5F 56 91 56 DE |02I&1.E.h.X_V.V.|
        67 AB 56 B0 56 9C 56                            |g.V.V.V

        JSR $50A4
        JMP $4A23

        SEC
        LDA $F4
        SBC $EA
        TAX
        LDA INBUFF
        SBC $E9
        BVS $49F5
        STA $E9
        STX $EA
        RTS

        CLC
        LDA $EA
        ADC $F4
        TAX
        LDA $E9
        ADC INBUFF
        BVC $4A07
        JSR $50A4
        JMP $4A3D

        JSR $4E2E
        BVS $49FB
        LDA $E6
        EOR #$FF
        STA $E6
        EOR $F0
        STA $D1
        LDA $E7
        JMP $4A3D

        RTS

        JSR $4C30
        BCC $4A70
        JSR $4E2E
        BVS $4A0C
        BNE $4A42
        JMP $4FF2

        LDX #$F1
        LDA $F1
        TAY
        BEQ $4A32
        SEC
        SBC $E7
        BEQ $4A72
        BCC $4A64
        STY $E7
        LDY $F0
        STY $E6
        EOR #$FF
        ADC #$00
        LDX $D2
        LDY $D3
        STX $D3
        STY $D2
        LDX #$E7
        CMP #$F9
        BMI $4A33
        TAY
        LDA $D3
        LSR $01,X
        JSR $4C47
        STA $D3
        LDY #$E7
        BIT $D1
        BPL $4AF7
        CPX #$F1
        BEQ $4A7F
        LDY #$F1
        SEC
        LDA $D2
        SBC $D3
        STA $D2
        BIT $E5
        BPL $4AA5
        LDA $0007,Y
        SBC $07,X
        STA $EE
        LDA TRAMSZ,Y
        SBC TRAMSZ,X
        STA $ED
        LDA RAMLO+1,Y
        SBC RAMLO+1,X
        STA $EC
        LDA RAMLO,Y
        SBC RAMLO,X
        STA $EB
        LDA CASINI+1,Y
        SBC CASINI+1,X
        STA $EA
        LDA CASINI,Y
        SBC CASINI,X
        STA $E9
        LDA $0001,Y
        SBC $01,X
        STA $E8
        BCS $4ABF
        JSR $4B6A
        LDA #$00
        CLC
        LDX $E8
        BNE $4B42
        LDY $D2
        STX $D2
        LDX $E9
        STX $E8
        LDX $EA
        STX $E9
        STY $EA
        BIT $E5
        BPL $4AEA
        LDX $EB
        STX $EA
        LDX $EC
        STX $EB
        LDX $ED
        STX $EC
        LDX $EE
        STX $ED
        STY $EE
        ADC #$08
        CMP #$40
        BNE $4AC2
        LDA #$00
        STA $E7
        STA $E6
        RTS

        ADC $D3
        STA $D2
        BIT $E5
        BPL $4B17
        LDA $EE
        ADC $F8
        STA $EE
        LDA $ED
        ADC $F7
        STA $ED
        LDA $EC
        ADC $F6
        STA $EC
        LDA $EB
        ADC $F5
        STA $EB
        LDA $EA
        ADC $F4
        STA $EA
        LDA $E9
        ADC INBUFF
        STA $E9
        LDA $E8
        ADC CIX
        STA $E8
        JMP $4B4F

        ADC #$01
        ASL $D2
        BIT $E5
        BPL $4B3C
        ROL $EE
        ROL $ED
        ROL $EC
        ROL $EB
        ROL $EA
        ROL $E9
        ROL $E8
        BPL $4B2C
        SEC
        SBC $E7
        BCS $4AF0
        EOR #$FF
        ADC #$01
        STA $E7
        BCC $4B69
        INC $E7
        BEQ $4BC7
        ROR $E8
        ROR $E9
        ROR $EA
        BIT $E5
        BPL $4B67
        ROR $EB
        ROR $EC
        ROR $ED
        ROR $EE
        ROR $D2
        RTS

        LDA $E6
        EOR #$FF
        STA $E6
        LDA $E8
        EOR #$FF
        STA $E8
        LDA $E9
        EOR #$FF
        STA $E9
        LDA $EA
        EOR #$FF
        STA $EA
        BIT $E5
        BPL $4B9E
        LDA $EB
        EOR #$FF
        STA $EB
        LDA $EC
        EOR #$FF
        STA $EC
        LDA $ED
        EOR #$FF
        STA $ED
        LDA $EE
        EOR #$FF
        STA $EE
        LDA $D2
        EOR #$FF
        STA $D2
        INC $D2
        BNE $4BC6
        BIT $E5
        BPL $4BBC
        INC $EE
        BNE $4BC6
        INC $ED
        BNE $4BC6
        INC $EC
        BNE $4BC6
        INC $EB
        BNE $4BC6
        INC $EA
        BNE $4BC6
        INC $E9
        BNE $4BC6
        INC $E8
        RTS

        LDX #$00
        LDA $AB
        PHA
        LDA #$00
        STA $AB
        LDA $4BEA,X
        BEQ $4BDB
        JSR $624C
        INX
        BNE $4BD0
        PLA
        STA $AB
        LDX #$08
        LDA #$FF
        STA $E6,X
        DEX
        BNE $4BE2
        STA $D2
        RTS

        SRE $4556
        KIL
        LSR $4C
        SRE $9B57
        BRK
        NOP $49
        LSR $49,X
        SRE ($49),Y
        SRE $204E
        KIL
        EOR $5A20,Y
        EOR LMARGN
        SRE $009B
        LDX #$F8
        LDY CASINI+1,X
        STY $D2
        BIT $E5
        BPL $4C24
        LDY $07,X
        STY $D2
        LDY TRAMSZ,X
        STY $07,X
        LDY RAMLO+1,X
        STY TRAMSZ,X
        LDY RAMLO,X
        STY RAMLO+1,X
        LDY CASINI+1,X
        STY RAMLO,X
        LDY CASINI,X
        STY CASINI+1,X
        LDY $01,X
        STY CASINI,X
        LDY $A7
        STY $01,X
        ADC #$08
        BMI $4C08
        BEQ $4C08
        SBC #$08
        TAY
        LDA $D2
        BCS $4C5B
        ASL $01,X
        BCC $4C43
        INC $01,X
        ROR $01,X
        ROR $01,X
        ROR CASINI,X
        ROR CASINI+1,X
        BIT $E5
        BPL $4C57
        ROR RAMLO,X
        ROR RAMLO+1,X
        ROR TRAMSZ,X
        ROR $07,X
        ROR
        INY
        BNE $4C3D
        CLC
        RTS

        STA ($00,X)
        BRK
        BRK
        KIL
        NOP #$19
        LSR PALNTS,X
        NOP #$76
        KIL
        ISB ($82),Y
        SEC
        TAX
        RTI

        NOP #$35
        NOP INBUFF
        STA (BFENHI,X)
        NOP INBUFF
        NOP #$80
        BRK
        BRK
        NOP #$31
        KIL
        CLC
        JSR $50CB
        BEQ $4C85
        BPL $4C88
        JMP $48CE

        LDA $E7
        SBC #$7F
        PHA
        LDA #$80
        STA $E7
        LDA #$6E
        LDY #$4C
        JSR $4A38
        LDA #$72
        LDY #$4C
        JSR $4EC2
        LDA #$5D
        LDY #$4C
        JSR $4A1E
        LDA #$61
        LDY #$4C
        JSR $57AA
        LDA #$76
        LDY #$4C
        JSR $4A38
        PLA
        JSR $5303
        LDA #$7A
        LDY #$4C
        JMP $4D87

        LDA $E9
        ORA $EA
        BNE $4CCE
        LDA #$04
        STA $E5
        LDA INBUFF
        JMP $4E9E

        JSR $4D00
        BEQ $4CE6
        SEC
        TXA
        SBC $EA
        TAX
        TYA
        SBC $E9
        TAY
        BCS $4CE7
        TXA
        ADC $EA
        TAX
        TYA
        ADC $E9
        TAY
        CLC
        ROL $F4
        ROL INBUFF
        TXA
        ROL
        TAX
        TYA
        ROL
        TAY
        DEC $E8
        BPL $4CD3
        LDA $F4
        STA $EA
        LDA INBUFF
        STA $E9
        JMP $4D66

        LDA $E9
        EOR INBUFF
        STA $D1
        LDA $E9
        BPL $4D0D
        JSR $4D6C
        LDA INBUFF
        BPL $4D1E
        SEC
        LDA #$00
        SBC $F4
        STA $F4
        LDA #$00
        SBC INBUFF
        STA INBUFF
        LDA #$10
        STA $E8
        LDY #$00
        LDX #$00
        RTS

        LDA FLPTR
        LDY $FD
        JSR $50B0
        JMP $4D8C

        LDA INBUFF
        LDY $F4
        STA FLPTR
        STY $FD
        LDA $E9
        LDY $EA
        STA $FA
        STY $FB
        JSR $4D00
        TXA
        ASL
        TAX
        TYA
        ROL
        TAY
        BCS $4D27
        ASL $EA
        ROL $E9
        BCC $4D5D
        CLC
        TXA
        ADC $F4
        TAX
        TYA
        ADC INBUFF
        TAY
        BCS $4D27
        DEC $E8
        BNE $4D44
        STX $EA
        STY $E9
        TYA
        BMI $4D7A
        BIT $D1
        BPL $4D79
        LDA #$00
        SEC
        SBC $EA
        STA $EA
        LDA #$00
        SBC $E9
        STA $E9
        RTS

        EOR #$80
        ORA $EA
        BNE $4D27
        BIT $D1
        BMI $4D79
        JMP $5723

        JSR $4E2E
        BVS $4D31
        BNE $4D91
        JMP $4E2D

        JSR $4E56
        LDY #$00
        STY $F9
        STY $FA
        STY $FB
        STY FLPTR
        STY $FD
        STY $FE
        STY $FF
        LDA $D2
        STY $D2
        JSR $4DD5
        BIT $E5
        BPL $4DC3
        LDA $EE
        JSR $4DD5
        LDA $ED
        JSR $4DD5
        LDA $EC
        JSR $4DD5
        LDA $EB
        JSR $4DD5
        LDA $EA
        JSR $4DD5
        LDA $E9
        JSR $4DD5
        LDA $E8
        JSR $4DDA
        JMP $4F89

        BNE $4DDA
        JMP $4C06

        LSR
        ORA #$80
        TAY
        BCC $4E15
        CLC
        LDA $D2
        ADC $D3
        STA $D2
        BIT $E5
        BPL $4E03
        LDA $FF
        ADC $F8
        STA $FF
        LDA $FE
        ADC $F7
        STA $FE
        LDA $FD
        ADC $F6
        STA $FD
        LDA FLPTR
        ADC $F5
        STA FLPTR
        LDA $FB
        ADC $F4
        STA $FB
        LDA $FA
        ADC INBUFF
        STA $FA
        LDA $F9
        ADC CIX
        STA $F9
        ROR $F9
        ROR $FA
        ROR $FB
        BIT $E5
        BPL $4E27
        ROR FLPTR
        ROR $FD
        ROR $FE
        ROR $FF
        ROR $D2
        TYA
        LSR
        BNE $4DDD
        RTS

        STA $D5
        STY $D6
        LDA $E5
        AND #$0F
        TAY
        DEY
        LDA ($D5),Y
        STA $00F1,Y
        DEY
        BNE $4E38
        STY $D3
        STA $F0
        ORA #$80
        STA CIX
        LDA ($D5),Y
        STA $F1
        LDA $F0
        EOR $E6
        STA $D1
        LDA $E7
        CLV
        RTS

        LDA $F1
        BEQ $4E77
        CLC
        ADC $E7
        BCC $4E63
        BMI $4E7C
        CLC
        BIT $1210
        ADC #$80
        STA $E7
        BNE $4E6E
        JMP $4AF4

        LDA $D1
        STA $E6
        RTS

        LDA $E6
        BPL $4E80
        PLA
        PLA
        JMP $4AF0

        LDA $D1
        STA $E6
        PLA
        PLA
        JMP $4BC7

        JSR $500B
        TAX
        BEQ $4E9B
        CLC
        ADC #$02
        BCS $4E7C
        LDX #$00
        STX $D1
        JSR $4A46
        INC $E7
        BEQ $4E7C
        RTS

        LDA $F0
        STA $E6
        LDX #$0A
        JMP $4BC9

        STY ICHIDZ
        BRK
        BRK
        JSR $500B
        LDA #$A5
        LDY #$4E
        LDX #$00
        STX $EB
        STX $EC
        STX $ED
        STX $EE
        STX $D1
        JSR $4FAC
        JMP $4ECA

        JSR $4E2E
        BVC $4ECA
        JMP $4CBF

        BEQ $4E9C
        LDA #$00
        SEC
        SBC $E7
        STA $E7
        JSR $4E56
        INC $E7
        BEQ $4E7C
        LDA $E5
        AND #$0F
        STA $CE
        LDX #$01
        TXA
        LDY CIX
        CPY $E8
        BNE $4F15
        LDY INBUFF
        CPY $E9
        BNE $4F15
        LDY $F4
        CPY $EA
        BNE $4F15
        BIT $E5
        BPL $4F11
        LDY $F5
        CPY $EB
        BNE $4F15
        LDY $F6
        CPY $EC
        BNE $4F15
        LDY $F7
        CPY $ED
        BNE $4F15
        LDY $F8
        CPY $EE
        BNE $4F15
        LDY $D3
        CPY $D2
        PHP
        ROL
        BCC $4F22
        INX
        CPX $CE
        BPL $4F78
        STA $F7,X
        LDA #$01
        PLP
        BCS $4F3F
        ASL $D3
        BIT $E5
        BPL $4F33
        ROL $F8
        ROL $F7
        ROL $F6
        ROL $F5
        ROL $F4
        ROL INBUFF
        ROL CIX
        BCS $4F15
        BMI $4EE3
        BPL $4F15
        TAY
        LDA $D3
        SBC $D2
        STA $D3
        BIT $E5
        BPL $4F62
        LDA $F8
        SBC $EE
        STA $F8
        LDA $F7
        SBC $ED
        STA $F7
        LDA $F6
        SBC $EC
        STA $F6
        LDA $F5
        SBC $EB
        STA $F5
        LDA $F4
        SBC $EA
        STA $F4
        LDA INBUFF
        SBC $E9
        STA INBUFF
        LDA CIX
        SBC $E8
        STA CIX
        TYA
        JMP $4F25

        BNE $4F80
        STA $F7,X
        LDA #$08
        BNE $4F22
        ASL
        ASL
        ASL
        STA $D2
        PLP
        JMP $4F89

        LDA $F9
        STA $E8
        LDA $FA
        STA $E9
        LDA $FB
        STA $EA
        BIT $E5
        BPL $4FA9
        LDA FLPTR
        STA $EB
        LDA $FD
        STA $EC
        LDA $FE
        STA $ED
        LDA $FF
        STA $EE
        JMP $4ABF

        STA $D5
        STY $D6
        LDY #$03
        LDA ($D5),Y
        STA $00E7,Y
        DEY
        BNE $4FB2
        STA $E6
        ORA #$80
        STA $E8
        LDA ($D5),Y
        STA $E7
        STY $D2
        RTS

        LDX #$D9
        LDY #$00
        JSR $5021
        STX $D5
        STY $D6
        LDA $E5
        AND #$0F
        TAY
        DEY
        LDA $00E7,Y
        STA ($D5),Y
        DEY
        CPY #$01
        BNE $4FD8
        LDA $E6
        ORA #$7F
        AND $E8
        STA ($D5),Y
        DEY
        LDA $E7
        STA ($D5),Y
        STY $D2
        RTS

        LDA $F0
        STA $E6
        LDA $E5
        AND #$0F
        TAX
        LDA $D3
        STA $D2
        LDA $F0,X
        STA $E6,X
        DEX
        BNE $4FFF
        RTS

        LDA $E5
        STA $CE
        LDA $E5
        AND #$0F
        TAX
        INX
        LDA $D2
        STA $D3
        LDA $E6
        STA $F0
        LDA $E6,X
        STA $F0,X
        DEX
        BNE $5019
        RTS

        LDA $E7
        BEQ $5020
        ASL $D2
        BCC $5020
        JSR $4BA8
        BNE $5020
        JMP $4B51

        JSR $3BE2
        BVS $505D
        BPL $503B
        JSR $508F
        LDA $E7
        CMP #$91
        BCS $5056
        JSR $515A
        LDA $E6
        AND #$80
        EOR $D2
        BEQ $504F
        JSR $5021
        LDA $E8
        ASL
        EOR $E9
        BPL $5059
        JMP $474E

        LDA #$42
        STA $E5
        RTS

        STA $CE
        BIT $CE
        BVC $5069
        BPL $5031
        JMP $3BE4

        BPL $5088
        JSR $3BE2
        BMI $505D
        BVC $5075
        JSR $5097
        JSR $5021
        LDA #$00
        STA $EB
        STA $EC
        STA $ED
        STA $EE
        STA $D2
        LDA #$88
        BNE $505B
        JSR $3BE2
        BVS $5097
        BPL $505D
        LDA $EB
        STA $D2
        LDA #$04
        BNE $505B
        LDA $E9
        LDY $EA
        STA $E8
        STY $E9
        LDX #$90
        JMP $50EA

        LDA $E9
        LDY $EA
        STA $FA
        STY $FB
        LDA INBUFF
        LDY $F4
        JSR $509B
        JSR $500B
        LDA $FA
        LDY $FB
        JMP $509B

        BIT $E5
        BVC $50CB
        LDA $E9
        ORA $EA
        BEQ $50D8
        LDA $E9
        BVS $50D1
        LDA $E7
        BEQ $50D8
        LDA $E6
        ROL
        LDA #$FF
        BCS $50D8
        LDA #$01
        RTS

        JSR $50BD
        LDY #$00
        TAX
        BPL $50E3
        LDY #$FF
        STA $EA
        STY $E9
        JMP $5059

        LDA $E8
        EOR #$FF
        ROL
        LDA #$00
        STA $EA
        STX $E7
        STA $D2
        STA $E6
        LDA #$04
        STA $E5
        JMP $4ABA

        BIT $E5
        BVC $510B
        LDA $E9
        BPL $510D
        JMP $571A

        LSR $E6
        RTS

        LSR $D3
        STA $D7
        STY $D8
        LDY #$00
        LDA ($D7),Y
        INY
        TAX
        BEQ $50BD
        LDA ($D7),Y
        EOR $E6
        BMI $50CF
        CPX $E7
        BNE $5151
        LDA ($D7),Y
        ORA #$80
        CMP $E8
        BNE $5151
        LDA $E5
        AND #$0F
        SBC #$03
        TAX
        INY
        LDA ($D7),Y
        CMP $00E7,Y
        BNE $5151
        DEX
        BNE $5135
        LDA $D3
        EOR $D2
        AND $D2
        EOR #$80
        ROL
        INY
        LDA ($D7),Y
        SBC $00E7,Y
        BEQ $510D
        LDA $E6
        BCC $5157
        EOR #$FF
        JMP $50D1

        LDA $E7
        BEQ $51C1
        SEC
        SBC #$98
        BIT $E5
        BPL $5168
        SEC
        SBC #$20
        BIT $E6
        BPL $5175
        TAX
        LDA #$FF
        STA $A7
        JSR $4B70
        TXA
        LDX #$E7
        CMP #$F9
        BPL $5180
        JSR $4C30
        BCC $518E
        TAY
        LDA $E6
        AND #$80
        LSR $E8
        ORA $E8
        STA $E8
        JSR $4C47
        STA $D2
        STY $A7
        RTS

        LDA $E7
        JSR $3BE2
        BVS $51C8
        BPL $519F
        CMP #$B8
        BIT $98C9
        BCS $51C8
        JSR $515A
        STY $D2
        LDA $E6
        STY $E6
        EOR #$80
        ROL
        BIT $E5
        BPL $51B6
        LDA #$B8
        BIT $98A9
        STA $E7
        LDA $EA
        STA $D0
        JMP $4ABA

        STA $E8
        STA $E9
        STA $EA
        TAY
        RTS

        SBC #$2F
        PHA
        BIT $E3
        BPL $51D2
        INC $E1
        BIT $E5
        BVC $51F2
        LDA #$00
        STA INBUFF
        LDA #$0A
        STA $F4
        JSR $4D31
        BIT $E5
        BVC $5203
        PLA
        STA $F4
        LDA #$00
        STA INBUFF
        JSR $4A0C
        JMP $522E

        BMI $5200
        LDA #$28
        LDY #$53
        JSR $510E
        BMI $5200
        JSR $5075
        JSR $4E85
        PLA
        JSR $5303
        JMP $522E

        LDY #$00
        STY $D0
        LDX #$09
        STY $E1,X
        DEX
        BPL $5210
        LDY #$42
        STY $E5
        BCC $51C9
        CMP #$26
        BNE $5222
        JMP $5634

        CMP #$2D
        BNE $522A
        STX $D0
        BEQ $522E
        CMP #$2B
        BNE $5233
        JSR $00AE
        BCC $51C9
        CMP #$2E
        BEQ $5284
        CMP #$45
        BEQ $5257
        CMP #$44
        BEQ $5252
        CMP #$23
        BEQ $5294
        CMP #$21
        BEQ $5299
        CMP #$25
        BNE $529F
        BIT $E5
        BVS $529C
        JMP $3DEF

        JSR $506B
        BNE $525A
        JSR $5088
        JSR $00AE
        BCC $5276
        CMP #$EF
        BEQ $5271
        CMP #$2D
        BEQ $5271
        CMP #$EE
        BEQ $5273
        CMP #$2B
        BEQ $5273
        BNE $5278
        ROR $E4
        JSR $00AE
        BCC $52E6
        BIT $E4
        BPL $529F
        LDA #$00
        SEC
        SBC $E2
        JMP $52A1

        ROR $E3
        BIT $E3
        BVS $529F
        BIT $E5
        BVC $522E
        JSR $5097
        JMP $522E

        JSR $506B
        BNE $529C
        JSR $5088
        JSR $00AE
        LDA $E2
        SEC
        SBC $E1
        STA $E2
        BEQ $52C3
        BPL $52B3
        JSR $4EA9
        INC $E2
        BNE $52AA
        BEQ $52C3
        LDA $E7
        CMP #$FC
        BCC $52BC
        JMP $4BC7

        JSR $4E85
        DEC $E2
        BNE $52B3
        LDA $D0
        BMI $52C8
        RTS

        JSR $570B
        BIT $E5
        BVS $52C7
        BMI $52C7
        LDA $E7
        CMP #$90
        BNE $52C7
        LDA $E8
        EOR #$80
        ORA $E9
        ORA $D2
        ORA $EA
        BNE $52C7
        JMP $5041

        LDA $E2
        CMP #$0A
        BCC $52F0
        LDA #$32
        BNE $52FE
        ASL
        ASL
        CLC
        ADC $E2
        ASL
        CLC
        LDY #$00
        ADC ($B5),Y
        SEC
        SBC #$30
        STA $E2
        JMP $5273

        PHA
        JSR $5007
        PLA
        JSR $50DC
        JSR $5097
        LDA $CE
        BPL $5315
        JSR $5075
        LDA $F0
        EOR $E6
        STA $D1
        LDA $E7
        JMP $4A3D

        STA ($43),Y
        SRE $94F8
        NOP ICSTAZ,X
        ISB $94,X
        NOP ICBALZ,X
        BRK
        KIL
        RRA (OLDADR+1,X)
        LDA #$31
        SHA $FCFF,Y
        LDX APPMHI,Y
        SLO $BFC9,Y
        SLO ($FF,X)
        SBC $15A2,X
        KIL
        SBC $0000,Y
        BRK
        BRK
        LDA #$00
        STA $D0
        LDY #$00
        STY $CD
        LDX #$20
        LDA #$20
        BIT $D0
        BEQ $5356
        LDX #$2B
        JSR $50BD
        BPL $5362
        JSR $570B
        LDA #$FF
        LDX #$2D
        STX $EF
        LDX #$30
        STX $F0
        BIT $D0
        BPL $536F
        JMP $36A6

        TAX
        BEQ $538E
        LDA #$00
        STA FR0
        BIT $E5
        BVC $53D1
        LDX #$80
        STX $E1
        JSR $54E3
        JSR $5572
        TYA
        LDY #$00
        CLC
        ADC #$EF
        BCC $538D
        INY
        RTS

        LDY #$02
        LDA #$00
        STA $00EF,Y
        LDA #$EF
        LDY #$00
        RTS

        SBC #$00
        STA $E2
        LDA $D2
        PHA
        LDX #$08
        LDA $E6,X
        STA $D8,X
        DEX
        BNE $53A3
        JSR $53F5
        LDX #$08
        LDA $D8,X
        STA $E6,X
        DEX
        BNE $53AF
        PLA
        STA $D2
        LDA $E2
        EOR #$FF
        STA $E2
        CMP $E1
        BCS $5395
        LDA $0688
        STA $F0
        LDY #$01
        LDX $E2
        JSR $556C
        BMI $53EE
        JSR $5442
        LDA #$02
        STA $E1
        LDA #$06
        BIT $E5
        BPL $53E0
        LDA #$10
        STA $D3
        INC $D3
        ADC $E2
        BMI $539A
        CMP $D3
        TAX
        BCS $53F2
        INX
        STX $E1
        LDX #$01
        DEX
        STX $E2
        JSR $549E
        TAX
        INX
        DEY
        LDA $00EF,Y
        CMP #$30
        BEQ $53F9
        CMP $0688
        BEQ $5408
        INY
        STX $E1
        LDA #$2B
        LDX $E2
        BEQ $5390
        BPL $541A
        LDA #$00
        SEC
        SBC $E2
        TAX
        LDA #$2D
        STA $00F0,Y
        LDA #$45
        BIT $E5
        BPL $5425
        LDA #$44
        STA $00EF,Y
        TXA
        LDX #$2F
        SEC
        INX
        SBC #$0A
        BCS $542C
        ADC #$3A
        STA CIX,Y
        TXA
        STA $00F1,Y
        LDA #$00
        STA INBUFF,Y
        JMP $5395

        STA $E2
        LDX $E7
        BIT $E5
        BMI $5459
        CPX #$81
        BCS $546A
        LDA #$28
        LDY #$53
        JSR $4D87
        LDA #$FA
        BNE $5466
        CPX #$93
        BCS $546A
        LDA #$3C
        LDY #$53
        JSR $4D87
        LDA #$F6
        ADC $E2
        BNE $5442
        LDA #$24
        LDY #$53
        BIT $E5
        BPL $5476
        LDA #$34
        LDY #$53
        JSR $510E
        BMI $5482
        JSR $4EA9
        INC $E2
        BNE $546A
        LDA #$20
        LDY #$53
        BIT $E5
        BPL $548E
        LDA #$2C
        LDY #$53
        JSR $510E
        BEQ $5495
        BPL $549C
        JSR $4E85
        DEC $E2
        BNE $5482
        CLC
        RTS

        JSR $515A
        JSR $5021
        LDX #$80
        BIT $E5
        BPL $54E5
        LDY #$00
        CLC
        LDA $EE
        ADC $55D0,Y
        STA $EE
        LDA $ED
        ADC $55CF,Y
        STA $ED
        LDA $EC
        ADC $55CE,Y
        STA $EC
        LDA $EB
        ADC $55CD,Y
        STA $EB
        JSR $5503
        BVC $54AC
        INY
        INY
        INY
        INY
        JSR $5525
        CPY #$46
        BNE $54AC
        LDA $EE
        STA $EA
        LDA $ED
        STA $E9
        LDA $EC
        STA $E8
        LDY #$46
        CLC
        JSR $5503
        BVC $54E7
        JSR $5525
        CPY #$58
        BEQ $54F8
        CPY #$6A
        BNE $54E7
        JSR $5525
        LDY $CD
        LDA #$00
        STA $00EF,Y
        RTS

        LDA $EA
        ADC $55CC,Y
        STA $EA
        LDA $E9
        ADC $55CB,Y
        STA $E9
        LDA $E8
        ADC $55CA,Y
        STA $E8
        INX
        BCS $551F
        BPL $5524
        BMI $5521
        BMI $5524
        BIT $5524
        RTS

        INY
        INY
        INY
        STY $CF
        LDY $CD
        DEC $E1
        BNE $553D
        LDA $0688
        INY
        STA $00EF,Y
        STY $CE
        LDA #$00
        STA FR0
        DEC FR0
        BNE $554C
        LDA #$03
        STA FR0
        LDA $0687
        INY
        STA $00EF,Y
        TXA
        BMI $5553
        EOR #$FF
        ADC #$0A
        ADC #$2F
        AND #$7F
        INY
        STA $00EF,Y
        STY $CD
        LDY $CF
        TXA
        EOR #$80
        AND #$80
        TAX
        RTS

        LDA #$30
        INY
        STA $00EF,Y
        DEX
        BPL $5566
        STY $CD
        RTS

        LDA $EF
        LDX #$20
        LDY #$00
        BIT $D0
        BVC $5583
        LDX #$2A
        CMP #$20
        BNE $5583
        TXA
        PHA
        TXA
        STA $00EF,Y
        INY
        LDX $EF,Y
        BEQ $55A3
        CPX #$30
        BEQ $5585
        CPX $0687
        BEQ $5585
        CPX #$45
        BEQ $55A3
        CPX #$44
        BEQ $55A3
        CPX $0688
        BNE $55A9
        DEY
        LDA #$30
        STA $00EF,Y
        LDA #$10
        BIT $D0
        BEQ $55B6
        DEY
        LDA $0686
        STA $00EF,Y
        PLA
        TAX
        DEY
        LDA #$08
        BIT $D0
        BNE $55C5
        TXA
        STA $00EF,Y
        LDX #$2A
        RTS

        NOP #$00
        BRK
        BRK
        NOP $8172,X
        SRE $8039,Y
        BRK
        BRK
        NOP
        ISB (POKMSK),Y
        NOP
        RTI

        BRK
        ISB $E7F6,X
        LDA ($8D),Y
        RTS

        BRK
        BRK
        BRK
        INX
        NOP $A5,X
        BPL $55E6
        ISB $E8FF,X
        LAX $89,Y
        CLC
        BRK
        BRK
        BRK
        KIL
        NOP DOSVEC+1,X
        CPX $00
        ISB $FFFF,X
        CPY ADRESS+1
        ROL $00,X
        BRK
        BRK
        BRK
        ORA $F5
        SBC ($00,X)
        ISB $FFFF,X
        ISB $6967,X
        NOP #$00
        BRK
        BRK
        BRK
        SLO $4042
        INC $6079,X
        BRK
        RLA POKMSK
        ISB $18FC,X
        BRK
        BRK
        NOP $FF
        ISB $00F6,X
        BRK
        ORA ($DF,X)
        ASL
        NOP #$03
        ASR #$C0
        ISB $6073,X
        BRK
        ASL $FF10
        SBC $00A8,X
        BRK
        NOP $00A9,X
        STA $E9
        STA $EA
        JSR $00AE
        BCS $5643
        SBC #$2F
        BCS $564C
        CMP #$47
        JSR $4129
        BCS $565C
        SBC #$36
        LDX #$04
        ASL $EA
        ROL $E9
        DEX
        BNE $564E
        ORA $EA
        STA $EA
        JMP $563A

        JMP $4361

        JSR $60C0
        LDY #$FF
        STY $CD
        STY $E1
        STY FR0
        INY
        STY $F7
        LDY #$58
        LDX #$80
        JSR $54E7
        LDA $F4
        STA $F6
        LDA INBUFF
        STA $F5
        LDX #$3A
        STX $F4
        LDA CIX
        STA INBUFF
        LDA $F1
        STA CIX
        STX $F1
        LDA #$EF
        LDY #$00
        JMP $45E8

        JSR $60C0
        LDA #$00
        LDX #$98
        SEC
        JMP $50F3

        LDA #$78
        SEC
        SBC $C5
        LDY #$FF
        SBC #$06
        INY
        BCS $56A3
        JMP $4366

        LDY $9E
        JMP $4366

        LDA $A0
        STA $E9
        LDA $A1
        STA $E8
        LDX #$90
        SEC
        JMP $50EF

        JSR $500B
        LDA #$C6
        LDY #$55
        JSR $4FAC
        JSR $5088
        LDA $E7
        BEQ $574A
        LDA $F1
        BNE $56DF
        LDA $E6
        BMI $56DA
        JMP $4AF2

        LDA #$00
        JMP $4E9E

        JSR $4FC7
        LDA $F0
        BPL $56F5
        JSR $5193
        LDA #$D9
        LDY #$00
        JSR $510E
        BNE $56F5
        TYA
        LDY $D0
        JSR $4FF4
        TYA
        PHA
        JSR $4C7E
        LDA #$D9
        LDY #$00
        JSR $4D87
        JSR $574A
        PLA
        LSR
        BCC $5719
        BIT $E5
        BVS $571A
        LDA $E7
        BEQ $5719
        LDA $E6
        EOR #$FF
        STA $E6
        RTS

        JSR $4D6C
        EOR #$80
        ORA $EA
        BNE $5719
        JSR $5097
        JMP $570F

        81 38 AA 3B 06 74 63 90 8C 77 23 0C AB 7A 1E 94 |.8.;.tc..w#..z..|
        00 7C 63 42 80 7E 75 FE D0 80 31 72 15 81 00 00 |.|cB.~u...1r....|
        00

        LDA #$29
        LDY #$57
        JSR $4D87
        JSR $50CB
        BEQ $576E
        BPL $5765
        LDA $D2
        SBC #$93
        STA $D2
        BCS $576E
        JSR $579B
        BCC $576E
        LDA $D2
        ADC #$3F
        STA $D2
        JSR $5027
        JSR $500B
        LDA $E7
        CMP #$88
        BCC $577A
        JSR $4E73
        JSR $5193
        LDA $D0
        CLC
        ADC #$81
        BEQ $5777
        SEC
        SBC #$01
        PHA
        JSR $4A23
        LDA #$2D
        LDY #$57
        JSR $57C2
        LDA #$00
        STA $D1
        PLA
        JSR $4E58
        RTS

        LDA $EA
        BNE $57A7
        LDA $E9
        BNE $57A5
        DEC $E8
        DEC $E9
        DEC $EA
        RTS

        STA $CD
        STY $CE
        LDX #$DD
        JSR $4FC9
        LDA #$DD
        JSR $4D87
        JSR $57C6
        LDA #$DD
        LDY #$00
        JMP $4D87

        STA $CD
        STY $CE
        LDX #$E1
        JSR $4FC9
        LDA ($CD),Y
        STA $D0
        LDY $CD
        INY
        TYA
        BNE $57D7
        INC $CE
        STA $CD
        LDY $CE
        JSR $4D87
        LDA $CD
        LDY $CE
        CLC
        ADC #$04
        BCC $57E8
        INY
        STA $CD
        STY $CE
        JSR $4A38
        LDA #$E1
        LDY #$00
        DEC $D0
        BNE $57DB
        RTS

        TYA
        AND $44,X
        NOP
        PLA
        PLP
        LDA ($46),Y
        JSR $4AF0
        LDA #$04
        STA $E5
        JSR $00B4
        CMP #$28
        BNE $581A
        JSR $3DD8
        JSR $5088
        JSR $5100
        JSR $5193
        JSR $4FC7
        LDA #$C8
        LDY #$05
        JSR $4FAC
        LDA #$F8
        LDY #$57
        JSR $4D87
        LDA #$FC
        LDY #$57
        JSR $4A38
        LDX $EA
        LDA $E8
        STA $EA
        STX $E8
        LDA $E7
        STA $D2
        JSR $2EDC
        LDA $D9
        BEQ $57F7
        LDA #$D9
        LDY #$00
        JSR $4D87
        LDA #$5D
        LDY #$4C
        JSR $4A38
        LDA #$00
        STA $D2
        JMP $5193

        LDA $CA
        PHA
        LDA $C9
        PHA
        JSR $2FDF
        LDY #$00
        LDA ($C9),Y
        TAY
        PLA
        STA $C9
        PLA
        STA $CA
        JMP $4366

        LDA #$EA
        LDY #$58
        JSR $4A38
        JSR $500B
        LDA #$EE
        LDY #$58
        LDX $F0
        JSR $4EBA
        JSR $500B
        JSR $5193
        LDA #$00
        STA $D1
        JSR $4A23
        LDA #$F2
        LDY #$58
        JSR $4A1E
        LDA $E6
        PHA
        BPL $58AE
        LDA #$C6
        LDY #$55
        JSR $4A38
        LDA $E6
        BMI $58B1
        LDA $CF
        EOR #$FF
        STA $CF
        JSR $570F
        LDA #$F2
        LDY #$58
        JSR $4A38
        PLA
        BPL $58BE
        JSR $570F
        LDA #$F6
        LDY #$58
        JMP $57AA

        LDA #$00
        STA $CF
        JSR $5878
        JSR $4FC7
        LDA #$DD
        LDY #$00
        JSR $4FAC
        LDA #$00
        STA $E6
        LDA $CF
        JSR $58E6
        LDA #$D9
        LDY #$00
        JMP $4EC2

        PHA
        JMP $58AE

        STA ($49,X)
        SLO $83DB
        EOR #$0F
        DCP COUNTR+1,Y
        BRK
        BRK
        NOP $86
        ASL $FBD7,X
        SAX $99
        ROL ADRESS+1
        SAX ICSTAZ
        NOP SAVMSC,X
        STX $A5
        EOR $83E1,X
        EOR #$0F
        DCP $E6A5,Y
        PHA
        BPL $5913
        JSR $570F
        LDA $E7
        PHA
        CMP #$81
        BCC $5921
        LDA #$5D
        LDY #$4C
        JSR $4EC2
        LDA #$3B
        LDY #$59
        JSR $57AA
        PLA
        CMP #$81
        BCC $5934
        LDA #$EA
        LDY #$58
        JSR $4A1E
        PLA
        BPL $593A
        JMP $570F

        RTS

        08 78 3A C5 37 7B 83 A2 5C 7C 2E DD 4D 7D 99 B0 |.x:.7{..\|..M}..|
        1E 7D 59 ED 24 7E 91 72 00 7E 4C B9 73 7F AA AA |.}Y.$~.r.~L.s...|
        53 81 00 00 00 45 4E C4 46 4F D2 4E 45 58 D4 52 |S....EN.FO.NEX.R|
        45 41 C4 44 41 54 C1 52 45 53 54 4F 52 C5 4C 49 |EA.DAT.RESTOR.LI|
        4E C5 49 4E 50 55 D4 44 45 46 53 54 D2 44 45 46 |N.INPU.DEFST.DEF|
        49 4E D4 44 45 46 44 42 CC 44 45 46 53 4E C7 4F |IN.DEFDB.DEFSN.O|
        50 54 49 4F CE 44 49 CD 43 4F 4D 4D 4F CE 44 45 |PTIO.DI.COMMO.DE|
        C6 4C 45 D4 52 41 4E 44 4F 4D 49 5A C5 47 4F 54 |.LE.RANDOMIZ.GOT|
        CF 47 4F 53 55 C2 52 45 54 55 52 CE 47 CF 52 55 |.GOSU.RETUR.G.RU|
        CE 49 C6 52 45 CD A2 A7 A1 45 4C 53 C5 54 48 45 |.I.RE....ELS.THE|
        CE 53 54 4F D0 43 4F 4E D4 52 45 53 55 4D C5 45 |.STO.CON.RESUM.E|
        52 52 4F D2 4F CE 41 46 54 45 D2 50 4F 4B C5 57 |RRO.O.AFTE.POK.W|
        41 49 D4 4D 4F 56 C5 4C 4F 41 C4 53 41 56 C5 56 |AI.MOV.LOA.SAV.V|
        45 52 49 46 D9 4D 45 52 47 C5 50 52 49 4E 54 A0 |ERIF.MERG.PRINT.|
        50 52 49 4E D4 4C 49 53 D4 41 55 54 CF 44 45 CC |PRIN.LIS.AUT.DE.|
        54 52 4F CE 54 52 4F 46 C6 52 45 4E 55 CD 4F 50 |TRO.TROF.RENU.OP|
        45 CE 43 4C 4F 53 C5 47 45 D4 50 55 D4 00 4E 4F |E.CLOS.GE.PU..NO|
        54 C5 4C 4F 43 CB 55 4E 4C 4F 43 CB 4B 49 4C CC |T.LOC.UNLOC.KIL.|
        4E 41 4D C5 47 52 41 50 48 49 43 D3 43 4F 4C 4F |NAM.GRAPHIC.COLO|
        D2 50 4C 4F D4 46 49 4C CC 53 45 54 43 4F 4C 4F |.PLO.FIL.SETCOLO|
        D2 53 4F 55 4E C4 43 4C D3 44 4F D3 43 4C 45 41 |.SOUN.CL.DO.CLEA|
        D2 4E 45 D7 43 4C 4F 41 C4 43 53 41 56 C5 A2 A2 |.NE.CLOA.CSAV...|
        A2 A2 A2 A2 A2 A2 A2 42 41 53 C5 54 41 42 A8 54 |.......BAS.TAB.T|
        CF 53 55 C2 A2 53 50 43 A8 4E 4F D4 53 54 45 D0 |.SU..SPC.NO.STE.|
        41 4C CC 55 53 49 4E C7 52 45 53 45 52 56 C5 55 |AL.USIN.RESERV.U|
        50 44 41 54 C5 4F 55 54 50 55 D4 41 50 50 45 4E |PDAT.OUTPU.APPEN|
        C4 41 54 A8 41 54 A0 50 4C 4D B0 50 4C 4D B2 50 |.AT.AT.PLM.PLM.P|
        4C 4D B1 43 48 52 B0 43 48 52 B1 43 48 52 B2 A2 |LM.CHR.CHR.CHR..|
        A2 A2 A2 A2 A2 A2 AB AD AA AF DE 41 4E C4 4F D2 |...........AN.O.|
        58 4F D2 BE BD BC 00 53 47 CE 49 4E D4 41 42 D3 |XO.....SG.IN.AB.|
        46 52 C5 50 4F D3 53 51 D2 4C 4F C7 45 58 D0 43 |FR.PO.SQ.LO.EX.C|
        4F D3 53 49 CE 54 41 CE 41 54 CE 50 45 45 CB 4C |O.SI.TA.AT.PEE.L|
        45 CE 53 54 52 A4 56 41 CC 41 53 C3 43 48 52 A4 |E.STR.VA.AS.CHR.|
        53 54 41 54 55 D3 45 4F C6 4C 45 46 54 A4 52 49 |STATU.EO.LEFT.RI|
        47 48 54 A4 4D 49 44 A4 49 4E 53 54 D2 53 54 52 |GHT.MID.INST.STR|
        49 4E 47 A4 56 41 52 50 54 D2 55 53 D2 53 43 52 |ING.VARPT.US.SCR|
        4E A4 52 4E C4 54 49 4D 45 A4 54 49 4D C5 49 4E |N.RN.TIME.TIM.IN|
        4B 45 59 A4 45 52 D2 45 52 CC 53 54 41 43 CB 00 |KEY.ER.ER.STAC..|
        A8 29 FC 26 EE 2E 6F 63 8F 2B 8C 29 FB 64 2D 63 |.).&..oc.+.).d-c|
        6F 43 6C 43 72 43 69 43 CF 2D 94 2B 94 2B 94 2B |oClCrCiC.-.+.+.+|
        14 2D D3 2E 45 2B 21 2B 6C 2B 3E 2B 52 5D D1 2B |.-..E+!+l+>+R].+|
        99 2B CD 48 99 2B 99 2B 99 2B CD 48 A6 29 DC 29 |.+.H.+.+.+.H.).)|
        9A 2C 8F 2C 0F 2C AD 31 03 30 0C 30 31 34 75 5C |.,.,.,.1.0.014u\|
        70 5E E4 5C 95 5C FF 60 FF 60 5A 5E D4 22 08 23 |p^.\.\.`.`Z^.".#|
        33 23 36 23 C9 38 91 5F CA 5F 14 63 16 62 07 66 |3#6#.8._._.c.b.f|
        C2 65 C5 65 BF 65 CA 65 4D 66 05 67 3E 67 3B 67 |.e.e.e.eMf.g>g;g|
        12 67 99 32 77 67 84 67 0B 25 CB 24 3F 5C 32 5C |.g.2wg.g.%.$?\2\|
        D6 2D 2C 3F A4 2D C1 43                         |.-,?.-.C

        LDA #$08
        JSR $5C50
        JSR $6022
        LDA $A8
        JMP $5E76

        JSR $24CE
        LDA #$04
        JSR $5C50
        JSR $5DD3
        BCC $5C81
        JMP $5D4A

        PHA
        JSR $5F5C
        LDA #$03
        STA ICCMD,X
        PLA
        STA ICAX1,X
        LDA #$80
        STA ICAX2,X
        LDA #$43
        STA $0500
        LDA #$3A
        STA $0501
        LDA #$9B
        STA $0502
        LDA #$00
        JMP $5F49

        JSR $5EF8
        JSR $24CE
        JSR $5DCC
        BCS $5CB6
        LDY $8A
        STY $DF
        LDY $8B
        STY FR1
        JSR $5DDC
        LDA #$16
        LDY #$20
        JSR $61FA
        JMP $229F

        JSR $20ED
        JSR $5FDF
        JSR $5F08
        JSR $5DD3
        BCS $5CB6
        ROR
        ROR
        JSR $20EF
        LDY #$80
        STY $CC
        JSR $65AB
        JSR $65AB
        JMP $21B1

        LDY #$00
        STY $CC
        CMP #$9B
        BEQ $5CC9
        STA $0500
        LDA #$01
        JSR $6561
        JMP $21FF

        JMP $21FC

        JSR $5FD2
        LDA #$D6
        LDY #$5C
        JMP $61FA

        46 49 4C 45 20 4D 49 53 4D 41 54 43 48 9B 00    |FILE MISMATCH..

        JSR $5F08
        JSR $5DD3
        BCS $5D4D
        STA $CB
        JSR $5ECC
        JSR $5ECC
        LDA $80
        LDY $81
        STA $D5
        STY $D6
        CLC
        BCC $5D1A
        JSR $5F7B
        JSR $5ECC
        LDY $CB
        BEQ $5D0D
        JSR $5F75
        LDY #$00
        CMP ($D5),Y
        BNE $5CCC
        DEC $D3
        BPL $5D42
        TAY
        BNE $5D42
        LDA $D5
        ADC #$01
        STA $D5
        BCC $5D24
        INC $D6
        JSR $5ECC
        JSR $5ECC
        LDY $CB
        BEQ $5D31
        JSR $5F75
        TAY
        BEQ $5D3A
        LDY #$00
        LDA ($D5),Y
        BEQ $5CCC
        CMP ($D5),Y
        BNE $5CCC
        LDA #$02
        STA $D3
        INC $D5
        BNE $5D00
        INC $D6
        BNE $5D00
        JSR $2523
        JMP $3BF0

        JMP $29F9

        BEQ $5D50
        BCC $5D50
        JSR $5EF8
        JSR $2A00
        JSR $46C3
        LDA $82
        LDY $83
        STA $E3
        STY $E4
        LDA $88
        LDY $89
        STA $DF
        STY FR1
        LDA $8A
        LDY $8B
        STA $DD
        STY $DE
        JSR $2060
        LDA $DD
        LDY $DE
        INY
        STA $DF
        STY FR1
        JSR $5DCC
        BCS $5D4A
        JSR $5DDC
        STA $84
        STY $85
        LDA $8A
        LDY $8B
        STA $E3
        STY $E4
        JSR $207B
        SEC
        LDA $DD
        SBC $88
        STA $CF
        LDA $DE
        SBC $89
        STA $D0
        LDA $DD
        LDY $DE
        STA $88
        STY $89
        CLC
        LDA $CF
        ADC $86
        STA $86
        LDA $D0
        ADC $87
        PHA
        LDA #$00
        STA $87
        JSR $4091
        PLA
        STA $87
        JSR $22A8
        JMP $2897

        LDA $C9
        LDX $CA
        STA ICHID,X
        JSR $6025
        JSR $5ECC
        CMP #$02
        RTS

        LSR
        LDA $A8
        AND #$40
        BCC $5DE5
        LDA #$80
        STA $A8
        JSR $5ECC
        PHA
        JSR $5ECC
        STA ICBLH,X
        STA $D6
        PLA
        STA ICBLL,X
        STA $D5
        CLC
        LDA $80
        STA $D7
        STA ICBAL,X
        ADC $D5
        TAY
        LDA $81
        STA $D8
        STA ICBAH,X
        ADC $D6
        CMP FR1
        BNE $5E13
        CPY $DF
        BCC $5E1B
        JSR $2523
        JMP $20F4

        STY $DD
        STA $DE
        JSR CIOV
        BPL $5E2E
        STY $EA
        JSR $24CE
        LDX $EA
        JMP $20F6

        JSR $5FD2
        BIT $A8
        BPL $5E4F
        JSR $5EBC
        LDY #$00
        LDA ($D7),Y
        JSR $5F75
        STA ($D7),Y
        INC $D7
        BNE $5E47
        INC $D8
        INC $D5
        BNE $5E3A
        INC $D6
        BNE $5E3A
        LDA $DD
        LDY $DE
        STA $82
        STY $83
        RTS

        JMP $25D1

        BEQ $5E58
        BCC $5E58
        CMP #$EF
        BEQ $5E58
        JSR $601D
        JSR $25D1
        JSR $26F5
        LDX $AB
        JMP $5FD2

        JSR $601D
        LDA $CB
        ASL
        ROL
        JSR $5ECC
        SEC
        LDA $82
        SBC $80
        STA $D5
        LDA $83
        SBC $81
        STA $D6
        LDA $D5
        JSR $5ECC
        LDA $D6
        JSR $5ECC
        LDA $80
        LDY $81
        STA $D7
        STY $D8
        JSR $5EBC
        LDY #$00
        LDA ($D7),Y
        BIT $CB
        BPL $5EA8
        JSR $5F6F
        JSR $5ECC
        INC $D7
        BNE $5EB1
        INC $D8
        INC $D5
        BNE $5E9D
        INC $D6
        BNE $5E9D
        JMP $5FD2

        SEC
        LDA #$00
        SBC $D5
        STA $D5
        LDA #$00
        SBC $D6
        STA $D6
        RTS

        LDX $AB
        JSR CIOV
        BMI $5ED2
        RTS

        LDA #$00
        STA ICBLL,X
        STA ICBLH,X
        LDA #$0B
        STA ICCMD
        TYA
        PHA
        LDY ICCMD,X
        CPY #$03
        BNE $5EF0
        LDA #$0C
        STA ICCMD,X
        JSR CIOV
        JSR $2B90
        PLA
        TAX
        JMP $20F6

        JSR $5F08
        LDA ICHID,X
        STA $C9
        STX $CA
        LDA #$FF
        STA ICHID,X
        RTS

        LDA #$04
        PHA
        JSR $4799
        TAY
        LDA $A8
        STA $CB
        JSR $00B4
        BEQ $5F25
        BCC $5F25
        CMP #$B8
        BNE $5F8F
        LDA #$80
        STA $CB
        JSR $00AE
        JSR $5F5C
        PLA
        CMP #$21
        BCS $5F32
        STA ICAX1,X
        LDA #$03
        STA ICCMD,X
        LDA #$9B
        STA $0500,Y
        DEY
        BMI $5F44
        LDA ($D5),Y
        STA $0500,Y
        BNE $5F3A
        LDA #$00
        STA ICAX2,X
        STA ICBLL,X
        STA ICBLH,X
        LDA #$00
        STA ICBAL,X
        LDA #$05
        STA ICBAH,X
        JMP $5ECC

        LDX #$10
        CLC
        LDA ICHID,X
        CMP #$FF
        BEQ $5F6E
        TXA
        ADC #$10
        TAX
        BPL $5F5F
        LDX #$70
        RTS

        EOR #$FF
        CLC
        ADC #$55
        RTS

        SEC
        SBC #$55
        EOR #$FF
        RTS

        LDX $AB
        LDA ICSTA,X
        CMP #$03
        BEQ $5F85
        RTS

        PLA
        PLA
        PLA
        PLA
        JSR $5FD2
        JMP $2189

        JMP $3DEF

        JSR $6001
        JSR $4799
        TAY
        LDX #$0C
        JSR $00B4
        BEQ $5FBB
        CMP #$DC
        BEQ $5FB6
        LDX #$04
        CMP #$87
        BEQ $5FB6
        LDX #$08
        CMP #$DD
        BEQ $5FB6
        LDX #$09
        CMP #$DE
        BNE $5F8F
        JSR $00AE
        BNE $5F8F
        TXA
        LDX $AB
        JSR $5F29
        LDA #$00
        STA ICPTL,X
        STA ICPTH,X
        BEQ $5FDC
        BEQ $5FEA
        JSR $6007
        BNE $5F8F
        LDA #$0C
        STA ICCMD,X
        JSR $5ECC
        LDA #$00
        STA $AB
        RTS

        LDA #$00
        LDX #$07
        STA AUDF1,X
        DEX
        DEX
        BPL $5FE3
        LDX #$10
        LDA ICHID,X
        CMP #$FF
        BEQ $5FF6
        JSR $5FD2
        TXA
        CLC
        ADC #$10
        TAX
        BPL $5FEC
        RTS

        JMP $48CE

        JSR $6007
        JMP $3DE4

        CMP #$23
        BNE $5F8F
        JSR $48D3
        CPX #$08
        BCS $5FFE
        TXA
        ASL
        ASL
        ASL
        ASL
        TAX
        STX $AB
        JMP $00B4

        LDA #$08
        JSR $5F0A
        LDA #$0B
        BIT $07A9
        STA ICCMD,X
        STX $AB
        RTS

        JSR $6007
        BNE $6009
        LDA #$00
        STA ICAX3,X
        STA ICAX4,X
        STA $AB
        BEQ $6098
        LDX #$00
        CMP #$23
        BNE $604F
        JSR $00AE
        JSR $48D6
        BEQ $604F
        JSR $3DE4
        STX $AB
        LDX $AB
        BNE $6073
        JSR $60A9
        BEQ $60BD
        JSR $6063
        JSR $3DDE
        JMP $60BD

        JSR $2FDC
        STY COLCRS
        STA COLCRS+1
        JSR $3DE4
        JSR $48D6
        STX ROWCRS
        RTS

        JSR $600E
        JSR $60A9
        BEQ $60BD
        LDA ICAX2,X
        BNE $605A
        JSR $2FDC
        LDX $AB
        STA ICAX4,X
        TYA
        STA ICAX3,X
        JSR $3DE4
        JSR $48D6
        JSR $3DDE
        TXA
        LDX $AB
        STA ICAX5,X
        LDA #$25
        STA ICCMD,X
        JSR $5ECC
        JSR $00B4
        JMP $60BD

        CMP #$DF
        BNE $60B0
        JMP $00AE

        CMP #$E0
        BNE $60BA
        JSR $00AE
        JMP $3DE1

        LDY #$00
        RTS

        LDX $AB
        RTS

        LDX VCOUNT
        CPX #$04
        BCC $60C0
        CPX #$7B
        BCS $60C0
        LDX #$03
        LDA BRKKEY,X
        STA $E7,X
        DEX
        BNE $60CD
        RTS

        LDX #$02
        SEI
        LDA $E8,X
        STA RTCLOK,X
        DEX
        BPL $60D8
        CLI
        RTS

        LDY #$07
        LDA ($D5),Y
        STA $04F0,Y
        DEY
        BPL $60E3
        INY
        STY $04F8
        RTS

        LDA RTCLOK+2
        STA $E8
        LDA RTCLOK+1
        STA $E9
        LDA RTCLOK
        STA $EA
        JMP $2EDC

        RTS

        JSR $603E
        JSR $6109
        JMP $64E0

        JSR $6022
        JSR $00B4
        CMP #$DA
        BNE $6116
        JMP $34F6

        JSR $00B4
        BNE $611E
        JMP $26F5

        BEQ $60FF
        CMP #$D2
        BEQ $61A3
        CMP #$D6
        CLC
        BEQ $61A3
        CMP #$2C
        BEQ $6175
        CMP #$3B
        BEQ $6195
        JSR $3C17
        LDA $E5
        ROR
        PHP
        BCS $6140
        JSR $5344
        JSR $45EC
        LDA $AB
        BNE $615A
        LDA COLCRS
        SEC
        SBC LMARGN
        BEQ $615A
        LDY #$00
        CLC
        ADC ($E9),Y
        CMP $04FC
        BEQ $615A
        BCC $615A
        JSR $26F5
        JSR $61FD
        PLP
        BCS $6116
        LDA $AB
        BNE $616B
        LDA COLCRS
        SEC
        SBC LMARGN
        BEQ $6116
        JSR $00B4
        BEQ $6116
        JSR $6247
        BNE $6116
        LDX $AB
        BEQ $6189
        LDA ICPTL,X
        LDY ICPTH,X
        BEQ $6198
        SBC #$0E
        BCS $6181
        DEY
        SEC
        BCS $617F
        LDA COLCRS
        SBC LMARGN
        CMP $04FD
        BCC $6198
        JSR $26F5
        JMP $61EC

        SEC
        SBC #$0E
        BCS $6199
        EOR #$FF
        ADC #$01
        BNE $61E7
        PHP
        JSR $00AE
        JSR $3BDF
        JSR $5031
        LDX $E9
        BNE $61B5
        LDX $EA
        BNE $61B7
        LDX #$01
        JSR $00B4
        CMP #$29
        BNE $61F7
        PLP
        BCC $61E8
        LDY $AB
        BEQ $61D2
        LDA ICPTH,Y
        BNE $61E3
        TXA
        CLC
        SBC ICPTL,Y
        JMP $61E1

        TXA
        SBC $04FC
        BCS $61D3
        ADC $04FC
        TAX
        CLC
        ADC LMARGN
        SBC COLCRS
        BCS $61E7
        JSR $26F5
        BIT $E8AA
        DEX
        BNE $61F2
        JSR $00AE
        JMP $611E

        JSR $6247
        BNE $61E9
        JMP $3DEF

        JSR $45EC
        JSR $479F
        TAX
        LDY #$00
        INX
        DEX
        BEQ $6273
        LDA ($D5),Y
        JSR $624C
        INY
        CMP #$9B
        BNE $6204
        JSR $26FA
        JMP $6204

        JSR $603E
        JSR $6022
        JSR $3C17
        LDA $E5
        ROR
        BCC $6232
        JSR $479F
        TAX
        BEQ $623E
        LDY #$00
        LDA ($D5),Y
        JMP $6236

        JSR $48D9
        TXA
        JSR $624C
        JSR $00B4
        BNE $6241
        JMP $64E0

        JSR $3DE4
        JMP $621D

        LDA #$20
        BIT $3FA9
        STX $ED
        STY $EE
        LDX $AB
        BEQ $6274
        CMP #$9B
        BNE $6262
        LDA #$FF
        STA ICPTL,X
        STA ICPTH,X
        LDA #$9B
        INC ICPTL,X
        BNE $626A
        INC ICPTH,X
        PHA
        JSR $5ECC
        LDX $ED
        LDY $EE
        PLA
        RTS

        LDY ICAX1
        BNE $626A
        STY $EA
        PHA
        JSR $6653
        PLA
        LDX #$00
        BEQ $626A
        LDA $AB
        BEQ $62E7
        JSR $5ECA
        CMP #$20
        BEQ $6288
        CMP #$9B
        BEQ $6288
        LDY #$00
        BIT $E5
        BPL $62E1
        BVC $62E1
        LDX #$2C
        CMP #$22
        BNE $62A6
        JSR $6550
        LDX #$22
        STX $CF
        BNE $62AD
        JSR $6550
        CMP #$9B
        BEQ $62B5
        CMP $CF
        BNE $62AA
        CMP #$22
        BNE $62CA
        LDA #$7C
        JSR $6550
        CMP #$2C
        BEQ $62CA
        CMP #$20
        BEQ $62CA
        CMP #$9B
        BNE $62CC
        LDA #$00
        STA $0500,Y
        LDX #$FF
        LDY #$04
        JMP $6413

        JSR $6550
        CMP #$20
        BEQ $62CA
        CMP #$9B
        BEQ $62CA
        CMP #$2C
        BEQ $62CA
        BNE $62D6
        LDA $CB
        BEQ $62FC
        BMI $62F1
        LDY #$FF
        BNE $62F5
        LDA $92
        LDY $93
        STA $8E
        STY $8F
        JMP $3DEF

        LDA $AB
        BEQ $6305
        LDX #$0E
        JMP $20F6

        LDA #$EA
        LDY #$64
        JSR $61FA
        LDA $90
        LDY $91
        STA $B5
        STY $B6
        RTS

        JSR $43B5
        JSR $603E
        BEQ $6320
        JSR $6025
        LDX #$01
        LDY #$05
        LDA #$00
        STA $0501
        LDA #$40
        JMP $6379

        JSR $43B5
        JSR $603E
        BNE $6362
        JSR $652C
        JSR $655C
        LDY #$00
        CPY #$38
        INY
        LDA $04FF,Y
        BEQ $6354
        EOR #$22
        BNE $6340
        BCC $633F
        LDA #$7C
        STA $04FF,Y
        CLC
        BCC $6340
        LDY #$04
        LDA #$00
        CMP $0500
        LDA #$2C
        BCC $636B
        JMP $2B90

        JSR $6025
        LDA #$00
        LDX #$FF
        LDY #$04
        STA $04FF
        BNE $6377
        LDX $94
        LDY $95
        LDA #$98
        BIT $00A9
        STA $CB
        STX $C9
        STY $CA
        LDX #$00
        ORA $AB
        BNE $638F
        LDX $B5
        LDY $B6
        STX $C7
        STY $C8
        LDX #$80
        STX $CC
        LDA $CC
        STA $A6
        JSR $3F3B
        LDX $CC
        BNE $63A5
        STA $C7
        STY $C8
        BEQ $63D0
        JMP $3DEF

        JSR $00B4
        CMP #$28
        BNE $63D0
        LDX #$00
        INX
        JSR $00AE
        BEQ $63A2
        CMP #$22
        BNE $63C2
        JSR $00AE
        TAY
        BEQ $63A2
        CMP #$7C
        BNE $63B8
        CMP #$28
        BEQ $63AE
        CMP #$29
        BNE $63AF
        DEX
        BNE $63AF
        JSR $00AE
        LDX $C9
        LDA $B5
        STA $C9
        STX $B5
        LDY $CA
        LDA $B6
        STA $CA
        STY $B6
        JSR $00B4
        BNE $6417
        BIT $CB
        BVC $640E
        JSR $65B1
        TAY
        LDA $E5
        ROR
        BCS $63FA
        ROL
        PHA
        JSR $4366
        JMP $645E

        STY $0500
        LDX #$00
        LDY #$05
        STX $B5
        STY $B6
        LDY #$00
        STY $0501
        STY $D0
        BEQ $6434
        BMI $648D
        JMP $6284

        STX $B5
        STY $B6
        JSR $00AE
        BIT $E5
        BVC $6456
        BPL $6456
        LDY #$7C
        STY $D0
        CMP #$22
        BEQ $6435
        LDY #$2C
        BIT $CB
        BPL $6430
        LDY #$3A
        STY $D0
        LDY #$2C
        CLC
        STY $CF
        LDA $B5
        LDY $B6
        ADC #$00
        BCC $6440
        INY
        JSR $45F2
        JSR $4928
        LDA $CC
        BEQ $6450
        JSR $479F
        JMP $6466

        JSR $2D47
        JMP $6466

        TAY
        LDA $E5
        PHA
        TYA
        JSR $520A
        PLA
        LDX $CC
        BNE $6466
        JSR $2D28
        JSR $00B4
        BEQ $6472
        CMP #$2C
        BEQ $6472
        JMP $62E7

        LDY $C9
        LDA $B5
        STA $C9
        STY $B5
        LDY $CA
        LDA $B6
        STA $CA
        STY $B6
        JSR $00B4
        BEQ $64B6
        JSR $3DE4
        JMP $6391

        JSR $2BA8
        INY
        TAX
        BNE $64A9
        LDX #$04
        INY
        LDA ($B5),Y
        BNE $649E
        JMP $20F6

        INY
        LDA ($B5),Y
        STA $92
        INY
        LDA ($B5),Y
        INY
        STA $93
        LDA ($B5),Y
        TAX
        JSR $2B9D
        CPX #$84
        BNE $648D
        JMP $6417

        LDX $C9
        LDY $CA
        LDA $CB
        BPL $64C1
        JMP $29A2

        LDY #$00
        LDA $CC
        BEQ $64E0
        LDA ($C9),Y
        BNE $646F
        LDX #$FF
        LDY #$04
        STX $C9
        STY $CA
        LDX $C7
        LDY $C8
        STX $B5
        STY $B6
        LDX #$00
        JMP $638F

        LDA $AB
        JSR $602C
        LDX #$00
        STX $AB
        RTS

        RLA $4552,X
        NOP COLRSH
        JSR $5246
        SRE $204D
        SRE (ROWCRS),Y
        EOR (LMARGN,X)
        NOP $9B,X
        BRK
        LDA #$87
        JSR $3DE6
        JSR $603E
        BNE $6509
        JSR $652C
        JSR $3F3B
        STA $C7
        STY $C8
        JSR $3BE4
        JSR $655F
        TAY
        INY
        LDA $04FF,Y
        BNE $6517
        LDA #$7C
        STA $04FF,Y
        LDA #$00
        LDY #$05
        JSR $45EC
        JMP $2D47

        CMP #$22
        BEQ $6536
        JSR $624A
        JMP $6247

        JSR $3DA6
        JSR $00B4
        LDA #$3B
        JSR $3DE6
        JSR $61FD
        LDA $E7
        BNE $64E9
        JSR $6247
        LDA #$1E
        JMP $624C

        STA $0500,Y
        INY
        STY $B5
        JSR $5ECA
        LDY $B5
        RTS

        JSR $5F7B
        LDA #$00
        LDX $AB
        STA ICBAL,X
        BNE $6574
        LDY ICAX1
        BNE $6574
        STY $EA
        JSR $6653
        LDX #$00
        LDA #$05
        STA ICBAH,X
        LDA #$C8
        STA ICBLL,X
        LDA #$00
        STA ICBLH,X
        LDA #$05
        STA ICCMD,X
        JSR $5ECC
        LDY ICBLL,X
        LDA $04FF,Y
        CMP #$9B
        BEQ $6596
        INY
        LDA #$0B
        STA ICCMD
        LDA #$00
        STA $04FF,Y
        STA ICBLL,X
        STA ICBLH,X
        LDX #$FF
        LDY #$04
        RTS

        LDX $AB
        JSR CIOV
        RTS

        LDX $AB
        BEQ $65B8
        JMP $5ECC

        JSR $67F0
        LDA $EF
        JMP $624C

        LDA #$21
        BIT $23A9
        BIT $24A9
        JMP $5F0A

        JSR $4799
        TAY
        LDA #$2C
        STA $0500,Y
        STY $C7
        DEY
        BMI $65E0
        LDA ($D5),Y
        STA $0500,Y
        BNE $65D6
        LDA #$D3
        JSR $3DE6
        JSR $4799
        TAY
        SEC
        ADC $C7
        TAX
        LDA #$9B
        STA $0500,X
        DEX
        DEY
        BMI $65FD
        LDA ($D5),Y
        STA $0500,X
        BNE $65F2
        JSR $5F5C
        LDA #$20
        STA ICCMD,X
        JMP $5F44

        JSR $6001
        LDA #$26
        STA ICCMD,X
        JSR $5ECC
        JSR $3F3B
        STA $C7
        STY $C8
        JSR $3BE2
        LDX $AB
        LDY ICAX3,X
        LDA ICAX4,X
        LDX $E5
        JSR $435D
        TXA
        JSR $2D28
        JSR $3DE4
        JSR $3F3B
        STA $C7
        STY $C8
        JSR $3BE2
        LDX $AB
        LDY ICAX5,X
        LDA #$00
        LDX $E5
        STA $AB
        JSR $435D
        TXA
        JMP $2D28

        RTS

        JSR $48D6
        BNE $664D
        LDA #$00
        LDY $AD
        BNE $667B
        JSR $46C3
        LDA $8A
        LDY $8B
        STA $DF
        STY FR1
        LDA $8C
        LDY $8D
        STA $E3
        STY $E4
        LDA $88
        LDY $89
        STA $DD
        STY $DE
        JSR $207B
        LDA $DD
        LDY $DE
        STA APPMHI
        STY APPMHI+1
        LDX #$60
        LDA #$0C
        STA ICAX1
        STA $03A2
        JSR CIOV
        LDA $EA
        LDY #$53
        AND #$0F
        BNE $6696
        LDY #$45
        STY $0500
        LDY #$3A
        STY $0501
        LDY #$9B
        STY $0502
        STA ICAX2,X
        LDA $EA
        BEQ $66AE
        EOR #$10
        AND #$30
        ORA #$0C
        STA ICAX1,X
        LDA #$00
        STA ICBAL,X
        LDA #$05
        STA ICBAH,X
        LDA #$03
        STA ICCMD,X
        JSR CIOV
        BPL $66D1
        LDA #$00
        STA $EA
        JSR $667F
        JMP $20F4

        LDA #$00
        STA ICBLL,X
        STA ICBLH,X
        LDA ICAX2,X
        CMP $EA
        BEQ $66E5
        LDA #$00
        STA ICAX1
        LDY $AD
        BNE $670F
        LDA MEMTOP
        LDY MEMTOP+1
        STA $8C
        STY $8D
        STA $8A
        STY $8B
        LDA $88
        LDY $89
        STA $D9
        STY $DA
        LDA $DD
        LDY $DE
        JMP $46D3

        JSR $48D6
        STX ATACHR
        STX FILDAT
        RTS

        JMP $48CE

        JSR $48D6
        CPX #$09
        BCS $6710
        STX $C7
        JSR $3DE4
        JSR $48D6
        TXA
        ASL
        ASL
        ASL
        ASL
        STA $C8
        JSR $3DE4
        JSR $48D6
        BNE $670F
        TXA
        AND #$0F
        ORA $C8
        LDX $C7
        STA PCOLR0,X
        RTS

        LDX #$12
        BIT $11A2
        STX $03A2
        LDY FILDAT
        STY ATACHR
        CMP #$D3
        BEQ $676B
        TXA
        PHA
        JSR $6063
        LDA #$0B
        STA $03A2
        LDA ATACHR
        LDX #$60
        JSR $5ECC
        PLA
        STA $03A2
        JSR $00B4
        CMP #$D3
        BNE $673B
        JSR $00AE
        JSR $6063
        LDX #$60
        JSR $5ECC
        BPL $6764
        BEQ $6780
        JSR $48D6
        STX COLOR4
        LDA #$7D
        JMP $624C

        JMP (DOSVEC)

        LDA $E5
        ROR
        BCC $67B8
        JSR $479F
        TAY
        JSR $5F5C
        LDA #$0D
        STA ICCMD,X
        LDA #$9B
        STA $0500,Y
        DEY
        BMI $67A8
        LDA ($D5),Y
        STA $0500,Y
        BNE $679E
        LDA #$00
        STA ICBAL,X
        LDA #$05
        STA ICBAH,X
        JSR CIOV
        JMP $67C1

        JSR $48D9
        JSR $600E
        LDY ICSTA,X
        LDA #$00
        STA $AB
        JMP $435D

        JSR $48D9
        JSR $600E
        LDA #$00
        STA $AB
        LDY ICSTA,X
        CPY #$03
        BNE $67DB
        LDA #$FF
        JMP $50DC

        LDX CH
        INX
        STX $EF
        BEQ $67E9
        JSR $67F0
        LDA #$00
        STA $F0
        JMP $568A

        JSR $5F5C
        LDA #$4B
        STA $0500
        LDA #$3A
        STA $0501
        LDA #$9B
        STA $0502
        LDA #$03
        STA ICCMD,X
        LDA #$04
        STA ICAX1,X
        JSR $5F44
        LDA #$07
        STA ICCMD,X
        JSR $5ECC
        STA $EF
        JMP $5FD2

        JSR $6063
        JSR $3DDE
        LDA #$07
        STA $03A2
        LDX #$60
        JSR $5ECC
        STA $EF
        BPL $67E9
        INC $B5
        BNE $6836
        INC $B6
        LDA $EA60
        CMP #$20
        BEQ $6830
        CMP #$3A
        BCS $6846
        SBC #$2F
        SEC
        SBC #$D0
        RTS

        LDA #$D4
        LDY #$68
        JSR $61FA
        LDX #$00
        JSR $6596
        TAX
        LDA #$7D
        JSR CIOV
        LDY #$10
        CLC
        LDA #$FF
        STA ICHID,Y
        TYA
        ADC #$10
        TAY
        BPL $685C
        LDX #$FF
        TXS
        LDA #$4C
        LDA #$CE
        LDY #$48
        LDA #$26
        STA $04FC
        LDA #$0E
        STA $04FD
        LDX #$17
        LDA $682F,X
        STA $AD,X
        DEX
        BNE $687C
        TXA
        STA $A7
        PHA
        STA $AB
        DEX
        STX $8B
        LDX #$D0
        STX $C6
        LDA MEMTOP
        LDY MEMTOP+1
        STA $8C
        STY $8D
        LDX MEMLO
        LDY MEMLO+1
        STX $80
        STY $81
        LDY #$00
        TYA
        STA ($80),Y
        INC $80
        BNE $68B0
        INC $81
        JSR $24CE
        LDA $80
        LDY $81
        JSR $20C0
        JSR $26F5
        LDA $8C
        SEC
        SBC $80
        TAX
        LDA $8D
        SBC $81
        JSR $26DF
        LDA #$F2
        LDY #$68
        JSR $61FA
        JMP $6980

        34 33 57 52 49 54 54 45 4E 20 42 59 20 57 45 49 |43WRITTEN BY WEI|
        4C 41 4E 44 20 26 20 47 41 54 45 53 9B 00 20 42 |LAND & GATES.. B|
        59 54 45 53 20 46 52 45 45 9B 9B 41 54 41 52 49 |YTES FREE..ATARI|
        20 38 4F 4F 20 42 41 53 49 4B 20 56 32 2E 37 9B | 8OO BASIK V2.7.|
        28 43 29 20 31 39 38 31 20 4D 49 43 52 4F 53 4F |(C) 1981 MICROSO|
        52 54 9B 00 0E 1A 11 80 00 CD 05 00 0E 13 11 84 |RT..............|
        69 CD 05 00 AF 32 90 69 32 A4 69 0E 16 11 84 69 |i....2.i2.i....i|
        CD 05 00 21 00 1F 22 A5 69 EB 0E 1A CD 05 00 0E |...!..".i.......|
        15 11 84 69 CD 05 00 B7 C2 00 00 2A A5 69 11 80 |...i.......*.i..|
        00 19 22 A5 69 01 28 69 7C B8 DA 4D 69 C2 79 69 |..".i.(i|..Mi.yi|
        7D B9 DA 4D 69 0E 10 11 84 69 CD 05             |}..Mi....i..

        LDX #$00
        STX INITAD
        STX INITAD+1
        STX COLDST
        NOP
        STX $0009
        LDA MEMLO
        STA $69C1
        LDA MEMLO+1
        STA $69C6
        LDA DOSINI
        STA $69CB
        LDA DOSINI+1
        STA $69CC
        LDA #$C0
        STA DOSINI
        LDA #$69
        STA DOSINI+1
        JMP $2189

        00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|

        LDA #$FF
        STA MEMLO
        LDA #$2F
        STA MEMLO+1
        JSR $4618
        JMP $2189

