// ============================================
// output - Part 1 of 3
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:55
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $a718  (40728 bytes)
// Crunched with Exomizer — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $9000 (36864)
//
// Code: 1813 bytes, Data: 38915 bytes
// Labels: 159, Subroutines: 20
//
// Verification: 4 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0813-$081f ---
.pc = $0813 "loc_0813"

loc_0813:
        lda $160b,x
        sta.abs $00fc,x
        dex
        bne loc_0813
        jmp loc_15d9

dat_081f:
        .byte $80                                   // .

// --- Region $0e01-$0e27 ---
.pc = $0e01 "Program $0e01"
        pla
        cpy $58
        cpy $38
        cpy $70
        cpy $78
        sty $b331
        jsr sub_a21b
        .byte $83,$62                               // sax ($62,x) // ILLEGAL
        .byte $93,$4b                               // sha ($4b),y // ILLEGAL
        dex
        .byte $4b,$aa                               // alr #$aa // ILLEGAL
        lda #$01
        cmp $0221,x
        adc ($ab,x)
        .byte $03,$e2                               // slo ($e2,x) // ILLEGAL
        lsr $3d,x
        .byte $43,$9b                               // sre ($9b,x) // ILLEGAL
        jmp loc_9419

dat_0e27:
        .byte $89                                   // .

// --- Region $0f06-$0f06 ---
.pc = $0f06 "Program $0f06"
        .byte $72                                   // jam // ILLEGAL

// --- Region $0f17-$0f35 ---
.pc = $0f17 "sub_0f17"
// Referenced by: jsr from $933d

sub_0f17:
        ldx #$db
.label loc_0f1a = * + 1
        lda $6c00,x
        .byte $2f,$26,$36                           // rla $3626 // ILLEGAL
        lda $6d5b,y
        sta $23b5
        jsr sub_1bdf
        ora $6848,x
        inc $e8,x
        cpx #$12
        bne loc_0f1a
        iny
        bit $ff
        rts

dat_0f35:
        .byte $ea                                   // .

// --- Region $10f0-$10f0 ---
.pc = $10f0 "Segment $10f0"
        brk

// --- Region $1214-$122c ---
.pc = $1214 "Segment $1214"
        lsr $b9,x
        .byte $53,$b3                               // sre ($b3),y // ILLEGAL
        .byte $7b,$9d,$c3                           // rra $c39d,y // ILLEGAL
        sbc $e5,x
        .byte $34,$32                               // nop $32,x // ILLEGAL
        dec $8c19,x
        bpl loc_124f
        dec $527e
        ror $e9bd
        .byte $d4,$e8                               // nop $e8,x // ILLEGAL
        .byte $5a                                   // nop // ILLEGAL

// --- Region $15d9-$160c ---
.pc = $15d9 "loc_15d9"

loc_15d9:
        inx
        tya
        and #$0f
        beq loc_15f3
        txa
        lsr
        ldx $0333,y

loc_15e4:
        rol
        rol $9f
        dex
        bpl loc_15e4
        adc $0367,y
        tax
        lda $9f
        adc $039b,y

loc_15f3:
        sta $039c,y
        txa
        sta $0368,y
        ldx #$04
        jsr $0100
        sta $0334,y
        iny
        cpy #$34
        bne loc_15d9
        ldy #$00
        jmp $0137

dat_160c:
        .byte $10                                   // .

// --- Region $1805-$1805 ---
.pc = $1805 "sub_1805"
// Referenced by: jsr from $941e

sub_1805:
        brk

// --- Region $1bdf-$1bdf ---
.pc = $1bdf "sub_1bdf"
// Referenced by: jsr from $0f25

sub_1bdf:
        brk

// --- Region $202d-$202d ---
.pc = $202d "sub_202d"
// Referenced by: jsr from $9333

sub_202d:
        brk

// --- Region $2184-$2184 ---
.pc = $2184 "Segment $2184"
        brk

// --- Region $264c-$264c ---
.pc = $264c "Segment $264c"
        brk

// --- Region $2bf0-$2bf0 ---
.pc = $2bf0 "Segment $2bf0"
        brk

// --- Region $3cf0-$3cf0 ---
.pc = $3cf0 "Segment $3cf0"
        brk

// --- Region $45f0-$45f0 ---
.pc = $45f0 "Segment $45f0"
        brk

// --- Region $54d0-$54d0 ---
.pc = $54d0 "Segment $54d0"
        brk

// --- Region $60c9-$60c9 ---
.pc = $60c9 "Segment $60c9"
        brk

// --- Region $8ed0-$8ed0 ---
.pc = $8ed0 "Segment $8ed0"
        brk

// --- Region $9000-$91d0 ---
.pc = $9000 "main_9000"

main_9000:
        sei
        lda #$33
        sta $01
        ldx #$00
        ldy #$d4
        stx $fa
        sty $fb
        ldy #$20
        stx $fc
        sty $fd
        ldy #$24
        stx $fe
        sty $ff
        ldx #$00

loc_901b:
        ldy #$00

loc_901d:
        lda ($fa),y
        sta ($fc,x)
        jsr sub_91c2
        sta ($fc,x)
        jsr sub_91c2
        iny
        cpy #$04
        bne loc_901d

loc_902e:
        lda ($fa),y
        sta ($fe,x)
        jsr sub_91c9
        sta ($fe,x)
        jsr sub_91c9
        iny
        cpy #$08
        bne loc_902e
        clc
        lda $fa
        adc #$08
        sta $fa
        lda $fb
        adc #$00
        sta $fb
        cmp #$d8
        bne loc_901b
        lda #$36
        sta $01
        jsr sub_a048
        ldx #$00
        stx $d020
        stx $d021

loc_905f:
        lda #$20

loc_9061:
        sta $0400,x
        sta $d800,x
        inx
        bne loc_9061
        inc $9063
        inc $9066
        lda $9063
        cmp #$08
        bne loc_905f

loc_9077:
        lda $91e7,x
        stx $02
        ldy #$08

loc_907e:
        asl
        bcs loc_9085
        ldx #$20
        bne loc_9088

loc_9085:
        jsr sub_91a6

loc_9088:
        stx $0568
        inc $9089
        bne loc_9093
        inc $908a

loc_9093:
        dey
        bne loc_907e
        ldx $02
        inx
        cpx #$1e
        bne loc_9077
        ldx #$16

loc_909f:
        lda txt_91d0,x
        sta $0480,x
        lda #$07
        sta $d880,x
        dex
        bpl loc_909f
        jsr sub_9321
        lda #$1b
        sta $d011
        lda #$18
        sta $d018
        lda #$0a
        sta $d022
        lda #$02
        sta $d023

loc_90c4:
        lda #$b0

loc_90c6:
        cmp $d012
        bne loc_90c6
.label smc_90cc = * + 1
        lda #$c8                                    // !SMC: modified by $92e6
        sta $d016
.label smc_90d1 = * + 1
        lda #$0f                                    // !SMC: modified by $9679
        sta $d021
        jsr sub_9674
        jsr sub_9207
        lda #$fc

loc_90dd:
        cmp $d012
        bne loc_90dd
        lda #$00
        sta $d021
        lda #$15
        sta $d018
        jsr sub_92e1
        jsr sub_92e1
        jsr sub_a021
        ldx #$4b
        ldy #$07
        sty $d016

loc_90fc:
        cpx $d012
        bne loc_90fc
        sty $d016
        inx
        dey
        bpl loc_90fc
        lda $d012

loc_910b:
        cmp $d012
        beq loc_910b
        lda #$18
        sta $d018
        lda #$d8
        sta $d016
        lda $dc01
        cmp #$ef
        bne loc_90c4
        ldx #$00
        stx $d011
        stx $d418

loc_9129:
        lda $9800,x
        sta $2000,x
        inx
        bne loc_9129
        inc $912b
        inc $912e
        lda $912e
        cmp #$28
        bne loc_9129
        ldx #$ff
        txs
        cld
        jsr $ff84
        lda #$00
        tay

loc_9149:
        sta.abs $0002,y
        sta $0201,y
        sta $0300,y
        iny
        bne loc_9149
        ldx #$3c
        ldy #$03
        stx $b2
        sty $b3
        lda #$a0
        sta $0284
        sta $c2
        lda #$08
        sta $0282
        lsr
        sta $0288
        ldy #$1f

loc_916f:
        lda $fd30,y
        sta $0314,y
        dey
        bpl loc_916f
        ldx #$00
        ldy #$03
        stx $99
        sty $9a
        txa
        ldx #$2e

loc_9183:
        sta $d000,x
        dex
        bpl loc_9183
        lda #$1b
        sta $d011
        lda #$08
        sta $d016
        lda #$14
        sta $d018
        lda #$0f
        sta $d019
        jsr $e51b
        jsr $ff5e
        jmp $fce2
// Referenced by: jsr from $9085

sub_91a6:
        sta smc_91c0                                // SMC: modifies $91c0
        lda $9089
        sta smc_91bb                                // SMC: modifies $91bb
        lda $908a
        clc
        adc #$d4
        sta smc_91bc                                // SMC: modifies $91bc
        ldx #$09
.label smc_91bb = * + 1
.label smc_91bc = * + 2
        stx $8888                                   // !SMC: modified by $91ac, $91b5
        ldx #$ff
.label smc_91c0 = * + 1
        lda #$00                                    // !SMC: modified by $91a6
        rts
// Referenced by: jsr from $9021, $9026

sub_91c2:
        inc $fc
        bne loc_91c8
        inc $fd

loc_91c8:
        rts
// Referenced by: jsr from $9032, $9037

sub_91c9:
        inc $fe
        bne loc_91cf
        inc $ff

loc_91cf:
        rts

txt_91d0:
        .encoding "screencode_mixed"
        .text "d"
        .encoding "petscii_upper"

// --- Region $9207-$92c0 ---
.pc = $9207 "sub_9207"
// Referenced by: jsr from $90d8

sub_9207:
        dec $9205
        beq loc_920d
        rts

loc_920d:
        ldx $9206
        lda #$02

loc_9212:
        sta $9205
        ldy #$00

loc_9217:
        lda $9231,x
        sta $27f8,y
        inx
        iny
        cpy #$08
        bne loc_9217
        cpx #$b8
        beq loc_922b
        stx $9206
        rts

loc_922b:
        lda #$80
        ldx #$00
        beq loc_9212
        .byte $ff,$d6,$d6                           // isc $d6d6,x // ILLEGAL
        dec $d6,x
        dec $d6,x
        tax
        .byte $ff,$fe,$f6                           // isc $f6fe,x // ILLEGAL
        dec $d6,x
        dec $d6,x
        tax
        .byte $ff,$fe,$fe                           // isc $fefe,x // ILLEGAL
        inc $d6,x
        dec $d6,x
        tax
        .byte $ff,$fe,$fe                           // isc $fefe,x // ILLEGAL
        inc $d6f6,x
        dec $aa,x
        .byte $ff,$fe,$fe                           // isc $fefe,x // ILLEGAL
        inc $f6fe,x
        dec $aa,x
        .byte $ff,$fe,$fe                           // isc $fefe,x // ILLEGAL
        inc $fefe,x
        inc $aa,x
        .byte $ff,$fe,$fe                           // isc $fefe,x // ILLEGAL
        inc $fefe,x
        inc $ffaa,x
        dec $fefe,x
        inc $fefe,x
        nop
        .byte $ff,$d6,$de                           // isc $ded6,x // ILLEGAL
        inc $fefe,x
        inc $fffa,x
        dec $d6,x
        dec $fefe,x
        inc $fffe,x
        dec $d6,x
        dec $de,x
        inc $fffe,x
        .byte $ff,$d6,$d6                           // isc $d6d6,x // ILLEGAL
        dec $d6,x
        dec $bffe,x
        .byte $ff,$d6,$d6                           // isc $d6d6,x // ILLEGAL
        dec $d6,x
        dec $de,x
        .byte $af,$ff,$d6                           // lax $d6ff // ILLEGAL
        dec $d6,x
        dec $d6,x
        dec $ab,x
        .byte $ff,$d6,$d6                           // isc $d6d6,x // ILLEGAL
        dec $d6,x
        dec $d6,x
        .byte $ab,$ff                               // lax #$ff // ILLEGAL
        dec $d6,x
        dec $d6,x
        dec $d7,x
        .byte $ab,$ff                               // lax #$ff // ILLEGAL
        dec $d6,x
        dec $d7,x
        .byte $d7,$d7                               // dcp $d7,x // ILLEGAL
        .byte $ab,$ff                               // lax #$ff // ILLEGAL
        dec $d7,x
        .byte $d7,$d7                               // dcp $d7,x // ILLEGAL
        .byte $d7,$d7                               // dcp $d7,x // ILLEGAL

dat_92c0:
        .byte $ab                                   // .

// --- Region $92e1-$9341 ---
.pc = $92e1 "sub_92e1"
// Referenced by: jsr from $90ec, $90ef

sub_92e1:
.label smc_92e2 = * + 1
        ldx #$00                                    // !SMC: modified by $92f0
        lda $932b,x
        sta smc_90cc                                // SMC: modifies $90cc
        inx
        cpx #$08
        bne loc_92f0

dat_92ee:
        .byte $a2,$00                               // ..

loc_92f0:
        stx smc_92e2                                // SMC: modifies $92e2
        cmp #$c7
        beq loc_92f8
        rts

loc_92f8:
        ldx #$00

loc_92fa:
        lda $0721,x
        sta $0720,x
        lda $0749,x
        sta $0748,x
        inx
        cpx #$27
        bne loc_92fa

loc_930b:
        ldy #$00
        lda ($20),y
        beq sub_9321
        sta $0747
        clc
        adc #$80
        sta $076f
        inc $20
        bne loc_9320
        inc $21

loc_9320:
        rts
// Referenced by: jsr from $90ad; branch from $930f

sub_9321:
        ldx #$33
        ldy #$93
        stx $20
        sty $21
        bne loc_930b
        .byte $c7,$c6                               // dcp $c6 // ILLEGAL
        cmp $c4
        .byte $c3,$c2                               // dcp ($c2,x) // ILLEGAL
        cmp ($c0,x)
        jsr sub_202d
        ora ($0e,x)
        .byte $0f,$14,$08                           // slo $0814 // ILLEGAL
        ora $12
        jsr sub_0f17
        .byte $12                                   // jam // ILLEGAL

txt_9341:
        .encoding "screencode_mixed"
        .text "l"
        .encoding "petscii_upper"

// --- Region $9419-$9437 ---
.pc = $9419 "loc_9419"

loc_9419:
        .byte $0c,$05,$01                           // nop $0105 // ILLEGAL
        .byte $13,$05                               // slo ($05),y // ILLEGAL
        jsr sub_1805
        ora ($0d,x)
        ora #$0e
        ora $20
        .byte $14,$08                               // nop $08,x // ILLEGAL
        ora $20
        .byte $14,$12                               // nop $12,x // ILLEGAL
        ora ($09,x)
        asl $1205
        .byte $13,$20                               // slo ($20),y // ILLEGAL
        asl $0f
        .byte $12                                   // jam // ILLEGAL

txt_9437:
        .encoding "screencode_mixed"
        .text " "
        .encoding "petscii_upper"

// --- Region $9674-$9686 ---
.pc = $9674 "sub_9674"
// Referenced by: jsr from $90d5

sub_9674:
.label smc_9675 = * + 1
        ldx #$00                                    // !SMC: modified by $9683
        lda dat_9687,x
        sta smc_90d1                                // SMC: modifies $90d1
        inx
        cpx #$20
        bne loc_9683

dat_9681:
        .byte $a2,$00                               // ..

loc_9683:
        stx smc_9675                                // SMC: modifies $9675
        rts

// --- Region $a021-$a080 ---
.pc = $a021 "sub_a021"
// Referenced by: jsr from $90f2

sub_a021:
        ldx #$00
        dec $a090
        bmi loc_a034
        jsr sub_a226
        jsr sub_a225
        jmp sub_a225

dat_a031:
        .byte $ff,$ff,$ff                           // ...

loc_a034:
        lda #$05
        sta $a090
        jsr sub_a040
        jsr sub_a03f
// Referenced by: jsr from $a03c

sub_a03f:
        inx
// Referenced by: jsr from $a039

sub_a040:
        dec $a08a,x
        bmi loc_a091
        jmp sub_a226
// Referenced by: jsr from $9054

sub_a048:
        lda #$1f
        sta $d418
        lda #$f0
        sta $d417
        and #$0f
        sta smc_a262                                // SMC: modifies $a262
        ldx #$0f

loc_a059:
        sta dat_a081,x
        dex
        bpl loc_a059
        ldx #$02

loc_a061:
        lda $a4b9,x
        sta $fa
        lda $a4bc,x
        sta $fb
        ldy #$00
        lda ($fa),y
        sta $a08d,x
        iny
        lda ($fa),y
        sta $a0e6,x
        and #$0f
        sta $a0e9,x
        dex
        bpl loc_a061
        rts

// --- Region $a091-$a0c6 ---
.pc = $a091 "loc_a091"

loc_a091:
        ldy $a08d,x
        cpy #$fe
        bne loc_a0a1
// Referenced by: jsr from $a0c0

sub_a098:
        lda $a084,x
        and #$fe
        sta $a084,x
        rts

loc_a0a1:
        lda $a6c1,y
        sta $fa
        lda $a6b8,y
        sta $fb
        ldy dat_a081,x
        lda ($fa),y
        bmi loc_a0d2
        cmp #$60
        bcc loc_a0f9

loc_a0b6:
        and #$1f
        sta $a08a,x
        lda #$fe
        sta dat_a031,x
        jsr sub_a098

loc_a0c3:
        jmp loc_a187

dat_a0c6:
        .byte $00                                   // .

// --- Region $a0d2-$a0dd ---
.pc = $a0d2 "loc_a0d2"

loc_a0d2:
        cmp #$a0
        bcc loc_a0ec
        and #$1f
        sta $a08a,x
        bcs loc_a0c3
        brk

// --- Region $a0ec-$a141 ---
.pc = $a0ec "loc_a0ec"

loc_a0ec:
        asl
        asl
        asl
        sta dat_a3d9,x
        iny
        lda ($fa),y
        cmp #$60
        bcs loc_a0b6

loc_a0f9:
        sta $fc
        iny
        lda $a0e6,x
        lsr
        lsr
        lsr
        lsr
        clc
        adc $fc
        sta $a0c9,x
        sty $fc
        tay
        lda dat_a437,y
        sta $a0cc,x
        sta $a3e2,x
        lda dat_a1c5,y
        sta $a0cf,x
        sta $a2b6,x
        ldy $fc
        lda ($fa),y
        sta dat_a141,x
        and #$1f
        sta $a08a,x
        lda ($fa),y
        bmi loc_a150
        and #$20
        beq loc_a177
        iny
        lda ($fa),y
        sta $a147,x
        iny
        lda ($fa),y
        sta $a14a,x
        jmp loc_a177

dat_a141:
        .byte $42                                   // B

// --- Region $a150-$a1c4 ---
.pc = $a150 "loc_a150"

loc_a150:
        stx smc_a262                                // SMC: modifies $a262
        iny
        lda ($fa),y
        sta smc_a266                                // SMC: modifies $a266
        and #$0f
        asl
        sec
        sbc #$10
        sta $a2a0
        iny
        lda ($fa),y
        bne loc_a16e
        lda #$f0
        sta $d417
        bne loc_a177

loc_a16e:
        sta smc_a26b                                // SMC: modifies $a26b
        lda dat_a2b3,x
        sta $d417

loc_a177:
        lda #$ff
        sta dat_a031,x
        sta $a2b9,x
        lda #$00
        sta $a0dd,x
        sta $a2bd,x

loc_a187:
        iny
        lda ($fa),y
        cmp #$ff
        bne loc_a1c0
        dec $a0e9,x
        bpl loc_a1be
        lda $a4b9,x
        sta $fa
        lda $a4bc,x
        sta $fb
        ldy $a087,x
        iny
        iny
        lda ($fa),y
        cmp #$ff
        bne loc_a1aa
        ldy #$00

loc_a1aa:
        tya
        sta $a087,x
        lda ($fa),y
        sta $a08d,x
        iny
        lda ($fa),y
        sta $a0e6,x
        and #$0f
        sta $a0e9,x

loc_a1be:
        ldy #$00

loc_a1c0:
        tya
        sta dat_a081,x
        rts

// --- Region $a21b-$a29a ---
.pc = $a21b "sub_a21b"
// Referenced by: jsr from $0e0d

sub_a21b:
        .byte $9c,$a5,$af                           // shy $afa5,x // ILLEGAL
        lda $d0c4,y
        cmp $f8ea,x
.label sub_a225 = * + 1
.label sub_a226 = * + 2
        sbc $bce8,x
        cmp $84a3,y
        .byte $fc,$bd,$41                           // nop $41bd,x // ILLEGAL
        lda ($29,x)
        rti
        bne loc_a290
        sta $a144,x
        lda $a6ca,y
        sta $fa
        lda $a6cb,y
        ldy dat_a0c6,x
        sta $d406,y
        lda $fa
        sta $d405,y
        lda $a084,x
        and #$fe
        sta $d404,y
        ldy $fc
        lda $a6cc,y
        sta $a084,x
        lda $a6cd,y
        sta $a3dc,x
        sta $a3df,x
.label smc_a262 = * + 1
        cpx #$00                                    // !SMC: modified by $a054, $a150
        bne loc_a26f
.label smc_a266 = * + 1
        lda #$33                                    // !SMC: modified by $a156
        sta $a29e
.label smc_a26b = * + 1
        lda #$04                                    // !SMC: modified by $a16e
        sta smc_a296                                // SMC: modifies $a296

loc_a26f:
        lda #$00
        sta $a0e0,x
        sta $a0e3,x
        lda $a6cf,y
        lsr
        lsr
        lsr
        sta $a14d,x
        lda dat_a141,x
        ora #$40
        sta dat_a141,x
        lda $a6d1,y
        sta $fd,x
        jmp loc_a385

loc_a290:
        cpx smc_a262
        bne loc_a2a7
.label smc_a296 = * + 1
        lda #$00                                    // !SMC: modified by $a26c
        beq loc_a2a7

dat_a299:
        .byte $ce,$96                               // ..

// --- Region $a2a7-$a2b3 ---
.pc = $a2a7 "loc_a2a7"

loc_a2a7:
        lda $fd,x
        and #$0f
        beq loc_a2c7
        jsr sub_a3e5
        jmp loc_a322

dat_a2b3:
        .byte $f1                                   // .

// --- Region $a2c7-$a3d8 ---
.pc = $a2c7 "loc_a2c7"

loc_a2c7:
        lda dat_a141,x
        and #$20
        bne loc_a322
        lda $fd,x
        and #$10
        beq loc_a322
        dec $a14d,x
        bpl loc_a322
        inc $a14d,x
        lda $a2bd,x
        and #$03
        tay
        lda $a2c3,y
        bne loc_a2fa
        ldy $fc
        sec
        lda $a0cc,x
        sbc $a6d0,y
        sta $a0cc,x
        bcs loc_a30d
        dec $a0cf,x
        bne loc_a30d

loc_a2fa:
        ldy $fc
        clc
        lda $a0cc,x
        adc $a6d0,y
        sta $a0cc,x
        bcc loc_a30d
        inc $a0cf,x
        bcs loc_a30d

loc_a30d:
        inc $a0dd,x
        lda $a6cf,y
        and #$0f
        cmp $a0dd,x
        bne loc_a322
        lda #$00
        sta $a0dd,x
        inc $a2bd,x

loc_a322:
        ldy $fc
        lda $a6ce,y
        sta $fc
        lda $fd,x
        and #$40
        beq loc_a343
        clc
        lda $fc
        adc $a3dc,x
        sta $a3dc,x
        lda $fc
        adc $a3df,x
        sta $a3df,x
        jmp loc_a385

loc_a343:
        lda $fd,x
        and #$20
        beq loc_a385
        lda $a0e3,x
        beq loc_a35e
        clc
        lda $a3dc,x
        adc $fc
        sta $a3dc,x
        bcc loc_a36c
        inc $a3df,x
        bcs loc_a36c

loc_a35e:
        sec
        lda $a3dc,x
        sbc $fc
        sta $a3dc,x
        bcs loc_a36c
        dec $a3df,x

loc_a36c:
        inc $a0e0,x
        lda $fc
        and #$0f
        cmp $a0e0,x
        bne loc_a385
        lda #$00
        sta $a0e0,x
        lda $a0e3,x
        eor #$01
        sta $a0e3,x

loc_a385:
        ldy dat_a0c6,x
        lda $a084,x
        sta $d404,y
        lda $a3df,x
        sta $d403,y
        lda $a3dc,x
        sta $d402,y
        lda dat_a141,x
        and #$20
        beq loc_a3cc
        lda $a147,x
        and #$01
        beq loc_a3b2
        lda $a2b9,x
        eor #$ff
        sta $a2b9,x
        bne loc_a3cc

loc_a3b2:
        clc
        lda $a3e2,x
        adc $a147,x
        sta $a3e2,x
        sta $d400,y
        lda $a2b6,x
        adc $a14a,x
        sta $a2b6,x
        sta $d401,y
        rts

loc_a3cc:
        lda $a0cc,x
        sta $d400,y
        lda $a0cf,x
        sta $d401,y
        rts

// --- Region $a3e5-$a436 ---
.pc = $a3e5 "sub_a3e5"
// Referenced by: jsr from $a2ad

sub_a3e5:
        tay
        lda $a498,y
        sta $fa
        lda $a4a8,y
        sta $fb
        ldy $a144,x
        lda ($fa),y
        and dat_a031,x
        sta $a084,x
        iny
        lda ($fa),y
        bmi loc_a404
        clc
        adc $a0c9,x

loc_a404:
        and #$7f
        sta smc_a429                                // SMC: modifies $a429
        iny
        lda ($fa),y
        beq loc_a411
        sta $a29e

loc_a411:
        iny
        lda ($fa),y
        cmp #$fe
        bcc loc_a424
        beq loc_a41e
        ldy #$00
        beq loc_a424

loc_a41e:
        lda $fd,x
        and #$f0
        sta $fd,x

loc_a424:
        tya
        sta $a144,x
.label smc_a429 = * + 1
        ldy #$14                                    // !SMC: modified by $a406
        lda dat_a437,y
        sta $a0cc,x
        lda dat_a1c5,y
        sta $a0cf,x
        rts

// ============================================
// Data blocks
// ============================================

// --- Region $0801-$0812 ---
.pc = $0801 "dat_0801"

dat_0801:
        // === BASIC loader stub ===
        .byte $0b,$08                                                     // [corrected] was: .byte $0c,$08                               // next line pointer ($080c)
        .byte $14,$00                                                     // [corrected] was: .byte $00,$00                               // line number 0
        .byte $9e                                   // SYS token
        .byte $32,$30,$36,$31,$00
        .byte $00                                   // end of line
        .byte $00,$a0                                                     // [corrected] was: .byte $00,$00                               // end of BASIC program
        .byte $00,$78,$e6,$01,$ba                   // .x...

// --- Region $0820-$0e00 ---
.pc = $0820 "Program $0820"
        .byte $00,$78,$a9,$33,$3b,$e6,$7a,$d4,$8c,$fa,$d9,$fb,$b3,$20,$66,$fd // .x.3;.z...... f.
        .byte $fd,$37,$24,$86,$fe,$6e,$59,$e2,$eb,$00,$88,$69,$26,$1b,$fc,$bb // .7$..nY....i&...
        .byte $c2,$a6,$04,$a2,$1a,$b1,$fa,$72,$81,$61,$fe,$20,$c9,$91,$ff,$c3 // .......r.a. ....
        .byte $ef,$a1,$18,$cd,$a7,$d5,$f8,$fa,$a5,$f5,$f1,$bf,$fb,$c9,$d8,$1c // ................
        .byte $cb,$f5,$36,$85,$01,$f7,$10,$3f,$8a,$6c,$4d,$15,$cc,$16,$20,$31 // ..6....?.lM... 1
        .byte $04,$3e,$5c,$d8,$e3,$50,$ee,$c9,$66,$ad,$63,$ab,$90,$c9,$c7,$3e // .>\..P..f.c....>
        .byte $bd,$e7,$9d,$86,$e8,$f7,$08,$0a,$b0,$04,$a2,$3e,$a5,$20,$53,$91 // ...........>. S.
        .byte $8e,$fb,$68,$05,$c6,$a4,$f2,$03,$ee,$6d,$93,$88,$ca,$ca,$a6,$02 // ..h......m......
        .byte $c6,$fe,$1e,$46,$da,$a2,$16,$bd,$d0,$91,$fe,$04,$92,$ba,$ef,$80 // ...F............
        .byte $d8,$e7,$8d,$f2,$c9,$66,$93,$4b,$b0,$32,$38,$0a,$46,$22,$8c,$6a // .....f.K.28.F".j
        .byte $23,$e3,$aa,$b0,$51,$a0,$c8,$be,$a8,$0f,$6d,$42,$74,$96,$bb,$5f // #...Q.....mBt.._
        .byte $87,$9e,$fc,$67,$a1,$f4,$d6,$c1,$af,$58,$15,$c9,$74,$61,$e1,$92 // ...g.....X..ta..
        .byte $0c,$87,$7e,$a2,$4b,$a0,$07,$3f,$ec,$23,$aa,$69,$8c,$f6,$b4,$e8 // ..~.K..?.#.i....
        .byte $f7,$f4,$ad,$67,$cd,$12,$13,$f0,$fb,$5b,$1a,$4f,$28,$d8,$4a,$ad // ...g.....[.O(.J.
        .byte $01,$63,$dc,$c9,$ef,$f3,$a3,$5a,$c5,$7b,$8e,$18,$d4,$67,$bd,$98 // .c.....Z.{...g..
        .byte $aa,$d6,$20,$e8,$67,$f7,$aa,$2b,$ee,$ab,$ad,$2e,$13,$91,$c9,$28 // .. .g..+.......(
        .byte $d0,$ea,$fd,$07,$9a,$d8,$35,$6f,$85,$a8,$31,$56,$86,$01,$02,$99 // ......5o..1V....
        .byte $57,$00,$c8,$ad,$aa,$a2,$3c,$e6,$ed,$b2,$11,$b3,$ab,$3e,$84,$5a // W.....<......>.Z
        .byte $85,$c2,$b7,$5d,$82,$1d,$4a,$8d,$73,$02,$a7,$1f,$b9,$30,$fd,$bd // ...]..J.s....0..
        .byte $14,$75,$88,$10,$f7,$6e,$79,$a0,$03,$86,$99,$cf,$84,$9a,$8a,$a2 // .u...ny.........
        .byte $2e,$9d,$00,$ff,$b4,$66,$fc,$1b,$0d,$11,$1b,$08,$49,$16,$1b,$14 // .....f......I...
        .byte $49,$18,$1a,$a9,$0f,$37,$ba,$6d,$7e,$1b,$e5,$20,$5e,$ff,$4c,$3f // I....7.m~.. ^.L?
        .byte $e2,$fc,$e6,$c0,$e4,$89,$cc,$bb,$3a,$ad,$8a,$3b,$90,$cb,$d4,$79 // ........:..;...y
        .byte $8d,$bc,$91,$e3,$09,$8e,$62,$88,$a2,$ff,$a9,$00,$62,$fc,$9d,$fd // ......b.....b...
        .byte $22,$b6,$fe,$a6,$ae,$ff,$60,$04,$3a,$85,$10,$dc,$11,$4c,$ef,$09 // ".....`.:....L..
        .byte $19,$19,$a3,$ee,$06,$14,$35,$6f,$17,$fe,$ff,$7e,$63,$40,$fe,$63 // ......5o...~c@.c
        .byte $5e,$e0,$01,$9b,$a9,$b0,$7b,$7c,$49,$63,$ca,$90,$66,$0c,$c1,$18 // ^.....{|Ic..f...
        .byte $61,$5f,$6f,$ba,$64,$df,$ce,$aa,$a3,$07,$ae,$19,$a9,$02,$d3,$8d // a_o.d...........
        .byte $05,$c6,$a0,$e5,$31,$73,$99,$f8,$fb,$27,$e8,$c8,$c0,$f4,$ae,$f4 // ....1s...'......
        .byte $e0,$b8,$79,$04,$8e,$06,$92,$60,$df,$a9,$80,$f7,$f0,$39,$e1,$ed // ..y....`.....9..
        .byte $13,$20,$0a,$32,$00,$a3,$20,$0a,$31,$00,$d6,$77,$10,$f6,$32,$81 // . .2.. .1..w..2.
        .byte $86,$b9,$b0,$2c,$06,$ea,$ec,$14,$fa,$1c,$80,$a3,$48,$0b,$0d,$85 // ...,........H...
        .byte $98,$0e,$fe,$bf,$f2,$de,$af,$0f,$2c,$02,$b3,$0c,$98,$84,$e9,$98 // ........,.......
        .byte $1e,$d3,$ab,$0e,$21,$93,$10,$14,$d9,$d7,$87,$20,$ff,$86,$d6,$aa // ....!...... ....
        .byte $1a,$34,$2b,$93,$8d,$cc,$7b,$bd,$08,$e2,$ef,$7c,$e2,$92,$c9,$c7 // .4+...{....|....
        .byte $f0,$01,$3f,$60,$f5,$de,$21,$39,$3f,$bd,$49,$2b,$9d,$48,$57,$e8 // ..?`..!9?.I+.HW.
        .byte $e0,$7b,$27,$d0,$ef,$f7,$93,$f0,$f0,$10,$7b,$47,$9b,$18,$69,$80 // .{'.......{G..i.
        .byte $37,$8d,$6f,$07,$fa,$7d,$bc,$e6,$47,$60,$a2,$33,$a0,$93,$86,$7e // 7.o..}..G`.3...~
        .byte $84,$21,$7b,$d0,$e0,$c7,$c6,$c5,$c4,$c3,$c2,$ff,$c1,$c0,$f5,$46 // .!{............F
        .byte $e8,$b6,$4c,$69,$93,$80,$d5,$17,$88,$d7,$d8,$ad,$50,$35,$c6,$bb // ..Li........P5..
        .byte $58,$03,$b8,$76,$8d,$31,$51,$e1,$b5,$58,$39,$93,$3f,$1f,$00,$6c // X..v.1Q..X9.?..l
        .byte $96,$c9,$31,$a2,$39,$32,$cf,$cf,$19,$06,$8b,$2d,$58,$fd,$3e,$10 // ..1.92.....-X.>.
        .byte $12,$d2,$b8,$f8,$2d,$6a,$6e,$06,$31,$c7,$13,$71,$2c,$e4,$38,$09 // ....-jn.1..q,.8.
        .byte $5b,$58,$06,$0e,$27,$cc,$07,$93,$55,$c8,$98,$16,$cb,$2f,$dc,$19 // [X..'...U..../..
        .byte $a0,$f7,$95,$9e,$1f,$b4,$3c,$60,$67,$2a,$c8,$d3,$c2,$03,$01,$1a // ......<`g*......
        .byte $98,$5e,$85,$0b,$f4,$a4,$55,$ec,$06,$15,$35,$8d,$1f,$bf,$d4,$07 // .^....U...5.....
        .byte $23,$1a,$98,$2a,$74,$16,$16,$af,$09,$45,$4b,$90,$2c,$04,$1e,$01 // #..*t....EK.,...
        .byte $5e,$14,$04,$1d,$ee,$d7,$10,$1c,$ec,$d4,$e2,$f4,$18,$c9,$78,$94 // ^.............x.
        .byte $79,$bc,$0b,$18,$18,$a0,$3d,$8a,$b1,$c6,$6a,$62,$06,$85,$d9,$8b // y.....=...jb....
        .byte $e3,$c1,$46,$0c,$e2,$a1,$d0,$87,$83,$c1,$a2,$10,$17,$da,$b6,$76 // ..F............v
        .byte $66,$8b,$42,$91,$86,$45,$93,$0b,$b9,$2c,$35,$3a,$99,$16,$12,$15 // f.B..E...,5:....
        .byte $fd,$70,$08,$2d,$de,$06,$1e,$2f,$1c,$25,$ed,$c6,$6c,$0a,$19,$14 // .p.-.../.%..l...
        .byte $8f,$45,$10,$65,$54,$02,$0c,$18,$bf,$04,$46,$39,$0b,$b6,$bb,$01 // .E.eT.....F9....
        .byte $47,$66,$5f,$70,$1b,$06,$0c,$4c,$08,$45,$40,$ed,$23,$62,$b4,$14 // Gf_p...L.E@.#b..
        .byte $be,$66,$91,$fd,$19,$9d,$64,$08,$b9
        .text "4PH/"
        .byte $0e
        .byte $3b,$05
        .byte $09,$e7,$90,$03,$02,$f5,$b0,$12,$de,$93,$18,$72,$10,$3c,$09,$db // ...........r.<..
        .byte $61,$96,$6e,$e6,$43,$62,$d0,$39,$10,$0a,$8c,$18,$ca,$20,$54,$36 // a.n.Cb.9..... T6
        .byte $58,$e2,$d7,$b4,$06,$34,$03,$07,$8f,$8a,$26,$09,$ed,$e1,$c0,$ac // X....4....&.....
        .byte $01,$33,$2c,$0a,$67,$15,$39,$13,$e4,$0c,$45,$3c,$05,$02,$0f,$0e // .3,.g.9...E<....
        .byte $1a,$4f,$09,$5a,$94,$3b,$70,$cb,$03,$12,$05,$17,$9f,$2a,$29,$e3 // .O.Z.;p......*).
        .byte $86,$b4,$6e,$b0,$63,$32,$0f,$5a,$79,$b2,$c4,$b7,$4f,$e8,$7d,$2f // ..n.c2.Zy...O.}/
        .byte $24,$09,$31,$06,$9c,$15,$e1,$14,$3c,$cb,$19,$60,$13,$a1,$fd,$60 // $.1.....<..`...`
        .byte $54,$e6,$0f,$06,$43,$cc,$17,$23,$19,$a0,$ae,$1b,$4c,$83,$07,$10 // T...C..#....L...
        .byte $5d,$4d,$b9,$54,$19,$25,$1d,$aa,$46,$17,$0f,$73,$12,$0b,$f4,$2d // ]M.T.%..F..s...-
        .byte $64,$b4,$18,$3b,$27,$a2,$7b,$34,$63,$0f,$69,$02,$a5,$12,$9c,$d1 // d..;'.{4c.i.....
        .byte $da,$15,$0e,$0e,$0d,$53,$37,$e6,$6d,$36,$f6,$16,$69,$2f,$41,$a3 // .....S7.m6..i/A.
        .byte $18,$06,$42,$9b,$06,$18,$50,$ed,$0b,$b0,$03,$9e,$10,$0f,$e9,$ed // ..B...P.........
        .byte $18,$a9,$d0,$f3,$25,$3c,$18,$5d,$5a,$26,$82,$03,$09,$d7,$0e,$14 // ....%<.]Z&......
        .byte $4d,$f4,$cc,$c1,$1e,$c2,$bf,$c3,$ba,$26,$0c,$01,$14,$f3,$12,$56 // M........&.....V
        .byte $15,$04,$96,$ba,$21,$4f,$90,$51,$17,$9a,$49,$85,$b0,$0e,$be,$08 // ....!O.Q..I.....
        .byte $fd,$14,$03,$cd,$75,$05,$13,$39,$01,$48,$0c,$09,$0e,$07,$bc,$06 // ....u..9.H......
        .byte $12,$0f,$0d,$6f,$14,$08,$05,$d7,$13,$0b,$9b,$19,$2e,$8a,$1a,$03 // ...o............
        .byte $74,$8d,$bd,$87,$4c,$8d,$d1,$90,$f7,$e8,$e0,$20,$d0,$02,$a2,$00 // t...L...... ....
        .byte $8e,$ff,$75,$96,$60,$fa,$01,$0d,$07,$97,$06,$00,$0f,$83,$fc,$00 // ..u.`...........
        .text "O +X8"
        .byte $d9,$93,$9b
        .byte $47,$b0,$a7,$f8,$12
        .byte $3a,$03,$c0
        .byte $34,$27,$0f,$c4,$4c,$2c,$e4,$f4,$51,$36,$1c,$70,$71,$60,$2a,$3c // 4'..L,..Q6.pq`*<
        .byte $8a,$3e,$72,$06,$01,$44,$41,$31,$0e,$13,$ee,$40,$20,$35,$e1,$77 // .>r..DA1...@ 5.w
        .byte $b8,$48,$01,$3b,$4f,$04,$07,$38,$c8,$0c,$fc,$4a,$30,$40,$ba,$b4 // .H.;O..8...J0@..
        .byte $52,$66,$34,$51,$36,$62,$88,$71,$90,$2a,$42,$a0,$41,$d5,$c0,$f6 // Rf4Q6b.q.*B.A...
        .byte $8b,$a0,$46,$d1,$cc,$3d,$02,$69,$0e,$9d,$9f,$3e,$40,$10,$c1,$75 // ..F..=.i...>@..u
        .byte $31,$e0,$55,$78,$c0,$68,$7d,$80,$28,$7e,$ff,$07,$13,$2c,$2c,$0c // 1.Ux.h}.(~...,,.
        .byte $4e,$30,$1e,$22,$da,$39,$00,$c2,$75,$3c,$f1,$ae,$01,$7c,$a0,$29 // N0.".9..u<...|.)
        .byte $3a,$10,$4e,$31,$ff,$1c,$87,$20,$94,$82,$40,$56,$81,$ff,$80,$ab // :.N1... ..@V....
        .byte $b3,$52,$06,$39,$32,$71,$21,$81,$3f,$89,$08,$d9,$10,$7e,$0e,$36 // .R.92q!.?....~.6
        .byte $e9,$96,$e5,$87,$30,$0d,$3f,$7a,$07,$da,$7d,$23,$b5,$3e,$a1,$c0 // ....0.?z..}#.>..
        .byte $0f,$71,$df,$03,$60,$57,$80,$13,$88,$b0,$ac,$78,$5c,$70,$7c,$76 // .q..`W.....x\p|v
        .byte $74,$81,$02,$fa,$c9,$69,$3e,$64,$55,$79,$a3,$84,$78,$40,$82,$5c // t....i>dUy..x@.\
        .byte $9f,$60,$c1,$5a,$e2,$30,$8a,$0c,$d5,$91,$03,$61,$ab,$81,$89,$48 // .`.Z.0.....a...H
        .byte $ac,$71,$71,$c1,$d0,$c1,$b3,$60,$0c,$18,$1e,$36,$9a,$3f,$1b,$b1 // .qq....`...6.?..
        .byte $1f,$d2,$03,$0f,$ad,$33,$1f,$58,$8d,$e3,$0b,$0e,$30,$04,$e1,$46 // .....3.X....0..F
        .byte $1c,$c0,$76,$74,$01,$fb,$08,$92,$35,$12,$62,$21,$49,$7b,$40,$e4 // ..vt....5.b!I{@.
        .byte $b5,$70,$e0,$6a,$0c,$84,$02,$79,$b3,$01,$72,$eb,$54,$89,$14,$89 // .p.j...y..r.T...
        .byte $c6,$18,$15,$18,$3d,$cd,$78,$f8,$bc,$e0,$e7,$66,$c0,$54,$6b,$b0 // ....=.x....f.Tk.
        .byte $6c,$c4,$35,$c4,$55,$ea,$de,$93,$4c,$9e,$c4,$1d,$80,$c6,$50,$30 // l.5.U...L.....P0
        .byte $c4                                   // .

// --- Region $0e28-$0f05 ---
.pc = $0e28 "Program $0e28"
        .byte $a4,$89,$c4,$89,$88,$89,$84,$89,$18,$70,$fc,$86,$04,$7c,$b7,$d8 // .........p...|..
        .byte $56,$62,$7f,$45,$10,$b4,$6d,$be,$35,$60,$57,$a0,$12,$3e,$e0,$ae // Vb.E..m.5`W..>..
        .byte $3c,$5c,$73,$c0,$d3,$01,$ef,$80,$e9,$46,$ee,$ee,$cc,$4a,$1f,$88 // <\s......F...J..
        .byte $b9,$0f,$5c,$19,$00,$25,$30,$82,$c4,$fe,$c4,$a9,$89,$42,$80,$c4 // ..\..%0......B..
        .byte $40,$92,$aa,$f9
        .byte $4a,$90
        .byte $5c                                   // backslash
        .text "PJA"
        .byte $b4,$c3,$99,$e0,$01,$8c
        .byte $e7,$02,$a6,$de,$07,$f0,$80,$7b,$19,$32,$92,$20,$54,$af,$d4,$98 // .......{.2. T...
        .byte $08,$cb,$07,$12,$10,$13,$4b,$b5,$09,$16,$e7,$30,$e5,$19,$77,$0a // ......K....0..w.
        .byte $02,$1d,$7f,$20,$0d,$da,$a9,$45,$e4,$04,$b2,$08,$0c,$cb,$25,$11 // ... ...E......%.
        .byte $0e,$10,$e2,$4e,$e6,$4c,$7f,$24,$e0,$4f,$e1,$e4,$4d,$e8,$4b,$30 // ...N.L.$.O..M.K0
        .byte $40,$3f,$58,$ad,$8d,$a4,$69,$18,$01,$d5,$03,$89,$05,$89,$07,$89 // @?X...i.........
        .byte $09,$89,$0b,$89,$0d,$89,$50,$0f,$d0,$be,$76,$ef,$6f,$cb,$66,$f8 // ......P...v.o.f.
        .byte $4e,$01,$4e,$f9,$4e,$02,$4e,$fa,$4e,$03,$4e,$fb,$4e,$04,$4e,$fc // N.N.N.N.N.N.N.N.
        .byte $4e,$05,$4e,$fd,$4e,$06,$4e,$fe,$4e,$07,$4d,$a6,$ff,$63,$73,$30 // N.N.N.N.N.M..cs0
        .byte $72,$00,$72,$31,$72,$02,$72,$32,$72,$04,$72,$33,$72,$06 // r.r1r.r2r.r3r.

// --- Region $0f07-$0f16 ---
.pc = $0f07 "dat_0f07"

dat_0f07:
        .byte $34,$72,$08,$72,$35,$72,$0a,$72,$36,$72,$0c,$66,$37,$db,$0e,$29 // 4r.r5r.r6r.f7..)

// --- Region $0f36-$10ef ---
.pc = $0f36 "Program $0f36"
        .byte $00,$05,$2f,$0a,$0f,$14,$19,$1e,$23,$28,$2d,$ff,$d0,$25,$f0,$e9 // ../.....#(-..%..
        .byte $04,$30,$c9,$06,$a7,$a8,$38,$ca,$88,$9d,$fc,$d5,$51,$49,$b5,$c0 // .0....8.....QI..
        .byte $f8,$27,$14,$2c,$4b,$08,$3a,$88,$89,$cc,$2c,$0c,$b8,$bd,$02,$5e // .'.,K.:...,....^
        .byte $50,$90,$20,$4c,$90,$6a,$7a,$24,$8c,$44,$a9,$a8,$dd,$55,$14,$9b // P. L.jz$.D...U..
        .byte $52,$80,$a4,$71,$44,$18,$b3,$04,$a8,$85,$0b,$88,$68,$08,$64,$5f // R..qD.......h.d_
        .byte $a0
        .text "DHA$"
        .byte $1e,$12
        .byte $22                                   // double quote
        .text "Z7TUE&"
        .byte $d4
        .byte $40
        .byte $50,$9c,$50,$09,$39,$72,$21,$42,$44,$14,$04,$d7,$10,$84,$00,$02 // P.P.9r!BD.......
        .byte $6b,$0f,$00,$e6,$be,$a5,$5d,$50,$c5,$08,$0a,$aa,$b8,$58,$d1,$ad // k.....]P.....X..
        .byte $59,$b1,$5a,$6b,$6c,$95,$00,$68,$26,$b1,$27,$be,$8c,$4f,$0c,$e7 // Y.Zkl..h&.'..O..
        .byte $28,$b5,$23,$f4,$aa,$e2,$41,$66,$28,$6d,$b6,$17,$23,$a9,$03,$7d // (.#...Af(m..#..}
        .byte $ac,$3e,$42,$b9,$80,$33,$b5,$09,$06,$d6,$1c,$a8,$d0,$22,$b9,$1f // .>B..3......."..
        .byte $88,$24,$85,$f9,$f8,$33,$10,$40,$39,$6d,$f0,$0a,$a8,$ce,$c9,$9a // .$...3.@9m......
        .byte $69,$08,$85,$e7,$8b,$be,$42,$07,$06,$73,$05,$04,$03,$02,$fd,$a6 // i.....B..s......
        .byte $46,$a9,$01,$8d,$e0,$1e,$2a,$64,$e9,$3c,$86,$20,$0a,$26,$cd,$45 // F.....*d.<. .&.E
        .byte $86,$a2,$8a,$7d,$9b,$a3,$27,$ba,$40,$65,$3f,$ab,$24,$68,$5e,$47 // ...}..'.@e?.$h^G
        .byte $96,$1f,$9e,$0e,$71,$26,$dc,$3d,$fe,$ea,$4f,$b5,$68,$a5,$3e,$d3 // ....q&.=..O.h.>.
        .byte $79,$57,$29,$c5,$03,$be,$60,$ba,$18,$8a,$0a,$65,$9f,$72,$09,$74 // yW)...`....e.r.t
        .byte $9b,$38,$00,$93,$73,$69,$78,$af,$75,$a5,$7b,$58,$88,$a8,$f1,$be // .8..six.u.{X....
        .byte $46,$d4,$66,$37,$d2,$67,$1f,$48,$1f,$7d,$0f,$47,$d2,$03,$68,$69 // F.f7.g.H.}.G..hi
        .byte $07,$bd,$69,$27,$85,$29,$a0,$07,$7f,$b1,$28,$99,$2f,$2a,$fe,$47 // ..i'.)....(./*.G
        .byte $f8,$60,$30,$45,$00,$20,$04,$84,$08,$10,$0c,$10,$83,$14,$18,$1c // .`0E. ..........
        .byte $e2,$7f,$41,$11,$87,$03,$5f,$2c,$8f,$b2,$97,$b7,$cb,$bf,$2c,$df // ..A..._,......,.
        .byte $b2,$e7,$29,$07,$2a,$fd,$58,$50,$60,$70,$80,$79,$c7,$b0,$c0,$d0 // ..).*.XP`p.y....
        .byte $e0,$f0
        .byte $3e,$10
        .text " 07"
        .byte $40                                   // @ character
        .byte $83,$80,$00,$d7,$1f,$60,$ad
        .byte $40
        .byte $26,$0f,$f0,$fa,$a9,$80,$fd,$6f,$7b,$4d,$76,$67,$85,$77,$4f,$9b // &......o{Mvg.wO.
        .byte $37,$0e,$0f,$e9,$e6,$18,$83,$36,$a6,$40,$cd,$a5,$3b,$69,$01,$85 // 7......6.@..;i..
        .byte $71,$af,$0f,$7d,$7d,$99,$47,$b6,$b9,$1f,$af,$91,$70,$88,$77,$10 // q..}}.G.....p.w.
        .byte $f3,$e6,$61,$54,$57,$aa,$74,$99,$5b,$b3 // ..aTW.t.[.

// --- Region $10f1-$1213 ---
.pc = $10f1 "dat_10f1"

dat_10f1:
        .byte $72,$73,$58,$2a,$bb,$b1,$78,$20,$48,$f7,$ce,$18,$a0,$45,$8d,$14 // rsX*..x H....E..
        .byte $8c,$d5,$15,$03,$c9,$0e,$dc,$e8,$8e,$1a,$3e,$58,$60,$ee,$37,$19 // ..........>X`.7.
        .byte $d0,$cf
        .text "!M19"
        .byte $ea,$8e,$00,$ce,$90,$e7,$0c,$a5
        .byte $47,$a5
        .byte $e8,$4c,$25,$a2,$9f,$1c,$a9,$f1,$05,$8d,$90,$f1,$40,$3a,$1c,$3f // .L%.........@:.?
        .byte $e8,$de,$eb,$fe,$30,$c8,$4c,$26,$b7,$c3,$1f,$46,$18,$8d,$59,$e1 // ....0.L&...F..Y.
        .byte $43,$8d,$62,$31,$6c,$03,$81,$26,$d0,$a2,$02,$b7,$62,$e4,$01,$17 // C.b1l..&....b...
        .byte $87,$2f,$c0,$ca,$10,$e1,$60,$0f,$0c,$15,$7f,$04,$40,$88,$06,$02 // ./....`.....@...
        .byte $6e,$0b,$c9,$af,$03,$00,$bc,$39,$57,$c0,$2b,$5d,$73,$40,$f8,$64 // n......9W.+]s@.d
        .byte $1e,$60,$23,$c1,$7d,$da,$b8,$a6,$1d,$87,$81,$1e,$94,$1f,$26,$90 // .`#.}.........&.
        .byte $43,$67,$ad,$a9,$fe,$87,$da,$c7,$98,$a0,$4c,$87,$ef,$a1,$00,$07 // Cg........L.....
        .byte $0e,$18,$2f,$02,$5a,$ff,$dc,$74,$04,$20,$03,$f9,$26,$90,$16,$6b // ../.Z..t. ..&..k
        .byte $0e,$b0,$e6,$19,$32,$7b,$80,$04,$0a,$9d,$df,$3c,$09,$50,$60,$b0 // ....2{.....<.P`.
        .byte $f5,$5b,$c8,$bd,$f3,$82,$e0,$4a,$18,$47,$2a,$78,$c9,$8e,$e4,$a8 // .[.....J.G*x....
        .byte $f3,$3d,$78,$10,$2f,$0d,$d7,$82,$82,$f1,$39,$e3,$a8,$24,$1f,$e3 // .=x./.....9..$..
        .byte $8a,$7b,$f3,$30,$22,$1a,$71,$45,$e2,$a2,$47,$19,$9a,$50,$4a,$4c // .{.0".qE..G..PJL
        .byte $77,$ab,$a1,$42,$41,$8b,$06,$0c,$96,$02,$18,$9a,$37,$c1,$e9,$b4 // w..BA.......7...
        .byte $8e,$62,$35,$48,$0e,$66,$8e,$e6,$0a,$38,$e9,$10,$cf,$8b,$03,$90 // .b5H.f...8......
        .byte $07,$5b,$f0,$fa,$94,$d0,$09,$73,$6b,$bd,$55,$b3,$f6,$17,$79,$d4 // .[.....sk.U...y.
        .byte $ff,$ed,$31                           // ..1

// --- Region $122d-$15d8 ---
.pc = $122d "dat_122d"

dat_122d:
        .byte $82,$d3,$3a,$ff,$d0,$02,$1e,$19,$87,$08,$ca,$8d,$47,$14,$e8,$e6 // ..:.........G...
        .byte $0d,$1b,$bb,$93,$e9,$45,$8f,$f3,$5f,$81,$e6,$7f,$e0,$48,$01,$08 // .....E.._....H..
        .byte $02,$41                               // .A

loc_124f:
        .byte $04,$03,$21,$04,$10,$05,$48,$06,$24,$07,$51,$08,$09,$45,$0a,$0b // ..!...H.$.Q..E..
        .byte $0c,$17,$0d,$0e,$0f,$10,$11,$12,$13,$14,$15,$17,$18,$1a,$1b,$1d // ................
        .byte $1f
        .text " "
        .byte $22                                   // double quote
        .text "$')+.147:>AEI"
        .text "NRW"
        .byte $5c                                   // backslash
        .byte $62,$68,$6e,$75,$7c,$83,$8b,$93,$9c,$a5,$af,$b9
        .byte $c4,$d0,$dd,$ea,$f8,$fd,$e8,$bc,$d9,$a3,$84,$fc,$12,$e0,$04,$00 // ................
        .byte $00,$e9,$50,$40,$d0,$5e,$ee,$47,$81,$ca,$a3,$18,$1e,$cb,$a6,$3c // ..P@.^.G.......<
        .byte $57,$03,$06,$46,$a5,$fa,$f6,$05,$ed,$b2,$29,$fe,$e3,$99,$71,$6d // W..F......)...qm
        .byte $cc,$8e,$84,$4b,$cd,$e9,$a6,$d7,$61,$7b,$0c,$7f,$d0,$0a,$31,$33 // ...K....a{....13
        .byte $b4,$0c,$04,$0d,$8d,$98,$c2,$4f,$09,$4e,$0a,$58,$04,$4a,$ed,$c8 // .......O.N.X.J..
        .byte $c5,$09,$40,$9d,$27,$8c,$b9,$d1,$a6,$ce,$f1,$f1,$d5,$ec,$62,$8e // ..@.'.........b.
        .byte $2c,$12,$98,$72,$33,$ce,$96,$e7,$18,$a9,$3a,$b7,$69,$f6,$c4,$dc // ,..r3.....:.i...
        .byte $8d,$16,$d4,$74,$e8,$0f,$f0,$1a,$20,$e5,$ff,$47,$22,$a3,$f1,$f3 // ...t.... ..G"...
        .byte $f7,$04,$3f,$10,$ee,$04,$ff,$82,$02,$01,$85,$00,$bb,$70,$d0,$54 // ..?..........p.T
        .byte $d9,$18,$f0,$4e,$9b,$de,$d2,$10,$49,$fe,$4d,$a1,$7c,$49,$29,$99 // ...N....I.M.|I).
        .byte $03,$e8,$c3,$79,$a2,$ba,$40,$fb,$32,$f9,$5d,$b0,$61,$de,$da,$9a // ...y..@.2.].a...
        .byte $0e,$13,$f0,$c8,$b3,$79,$d0,$27,$fa,$85,$90,$05,$c6,$36,$c3,$b0 // .....y.'.....6..
        .byte $5f,$fe,$65,$b9,$cf,$a6,$3c,$a3,$02,$d0,$08,$9c,$a3,$dd,$a0,$fe // _.e...<.........
        .byte $bd,$a2,$1f,$a4,$b9,$8d,$ce,$a6,$85,$e3,$a9,$40,$f0,$a3,$14,$18 // ...........@....
        .byte $f2
        .byte $22                                   // double quote
        .text "+C&"
        .byte $7d,$62,$9d,$77
        .byte $4c,$85
        .byte $4d,$f3,$76
        .byte $3a,$3c
        .byte $cf,$f4,$f0,$72,$39,$aa,$65,$3a,$90,$90,$13,$fe,$fe,$a2,$0e,$38 // ...r9.e:.......8
        .byte $ec,$01,$e5,$89,$9d,$ef,$8c,$b0,$03,$de,$e4,$fe,$32,$a5,$29,$fc // ............2.).
        .byte $29,$0f,$dd,$f1,$d0,$0d,$a9,$00,$4f,$e0,$da,$aa,$52,$49,$01,$9d // ).......O...RI..
        .byte $e3,$7a,$bc,$c6,$b5,$4d,$dd,$93,$04,$72,$df,$72,$03,$72,$dc,$48 // .z...M...r.r.r.H
        .byte $02,$64,$86
        .text "AE ++V-)"
        .byte $01,$f0,$0a
        .byte $3d,$75
        .byte $49,$ff,$27,$b9,$a2,$bb,$d0,$1a,$18,$fb,$b2,$6e,$47,$ea,$e2,$a3 // I.'........nG...
        .byte $9b,$a4,$32,$7d,$4a,$75,$b6,$d9,$a2,$8a,$42,$cc,$6e,$45,$d3,$bd // ..2}Ju....B.nE..
        .byte $45,$99,$01,$b3,$d4,$60,$10,$f5,$dc,$7b,$c4,$22,$08,$5a,$8b,$6e // E....`...{.".Z.n
        .byte $38,$d6,$98,$1b,$49,$b9,$a8,$3b,$a4,$85,$fb,$bc,$f2,$4c,$15,$3d // 8...I..;.....L.=
        .byte $31,$35,$9d,$84,$63,$a5,$30,$04,$18,$47,$7d,$c9,$a0,$ea,$7f,$29 // 15..c.0..G}....)
        .byte $ed,$a4,$e4,$6e,$03,$8d,$9e,$a2,$c8,$b1,$fa,$c9,$fe,$90,$0c,$f0 // ...n............
        .byte $04,$a0,$00,$f0,$06,$b5,$fd,$29,$f0,$95,$fd,$98,$9d,$44,$a1,$a0 // .......).....D..
        .byte $14,$b9,$37,$a4,$9d,$cc,$a0,$b9,$c5,$a1,$9d,$cf,$a0,$60,$16,$27 // ..7..........`.'
        .byte $38,$4b,$5f,$73,$8a,$a1,$ba,$d4,$f0,$0e,$2d,$4e,$71,$96,$bd,$e7 // 8K_s......-Nq...
        .byte $13,$42,$74,$a9,$e0,$1b,$5a,$9b,$e2,$2c,$7b,$ce,$27,$85,$e8,$51 // .Bt...Z..,{.'..Q
        .byte $c1,$37,$b4,$37,$c4,$57,$f5,$9c,$4e,$09,$d0,$a3,$82,$6e,$68,$6e // .7.7.W..N....nhn
        .byte $88,$af,$eb,$39,$9c,$13,$a1,$46,$04,$dc,$d0,$dc,$10,$5e,$d6,$72 // ...9...F.....^.r
        .byte $38,$26,$42,$8c,$08,$b8,$a0,$b8,$20,$bc,$ac,$e4,$70,$4c,$84,$18 // 8&B..... ...pL..
        .byte $10,$70,$40,$70,$40,$78,$58,$c8,$e0,$98,$08,$30,$20,$2e,$6a,$66 // .p@p@xX....0 .jf
        .byte $81,$97,$a4,$b1,$09,$00,$80,$00,$18,$00,$20,$40,$87,$60,$80,$a0 // .......... @.`..
        .byte $c0,$e0,$f8,$47,$e0,$83,$88,$20,$84,$7a,$73,$6a,$78,$a6,$7f,$26 // ...G... .zsjx..&
        .byte $61,$e6,$60,$4b,$11,$53,$8e,$0c,$83,$1b,$03,$30,$06,$3c,$25,$1c // a.`K.S.....0.<%.
        .byte $ae
        .byte $20,$4c,$6d,$1a,$c2,$1f,$00
        .byte $36,$18,$bf,$00
        .text "%=45"
        .byte $a4,$ff,$54,$5e,$00,$81,$62,$80,$46,$01,$ff,$82,$f9,$06,$8c,$91 // ..T^..b.F.......
        .byte $27,$b4,$18,$72,$0d,$51,$22,$4c,$17,$8e,$08,$09,$15,$6b,$a9,$10 // '..r.Q"L.....k..
        .byte $6b,$88,$13,$6a,$42,$0e,$45,$13,$f4,$71,$f4,$4a,$84,$9b,$6e,$d6 // k..jB.E..q.J..n.
        .byte $df,$a4,$e8,$49,$c4,$9b,$6e,$95,$81,$f7,$80,$83,$61,$79,$18,$05 // ...I..n.....ay..
        .byte $e4,$03,$44,$35,$93,$34,$3b,$2d,$01,$75,$32,$2e,$bd,$32,$33,$2d // ..D5.4;-.u2..23-
        .byte $91,$2b,$ba,$06,$1d,$07,$95,$03,$11,$14,$84,$02,$05,$ca,$29,$22 // .+............)"
        .byte $b1,$b1,$89,$47,$1a,$21,$14,$89,$12,$89,$18,$89,$40,$57,$81,$40 // ...G.!......@W.@
        .byte $d4,$7f,$9b,$ea,$20,$55,$10,$3a,$80,$aa,$e5,$1e,$11,$70,$81,$eb // .... U.:.....p..
        .byte $ff,$c9,$65,$0a,$00,$3a,$6b,$41,$62,$40,$0c,$30,$fe,$7e,$a5,$a4 // ..e..:kAb@.0.~..
        .byte $a6,$13,$a5,$14,$bf,$c6,$39,$77,$03,$c1,$d6,$68,$64,$c6,$04,$db // ......9w...hd...
        .byte $8d,$01,$87,$e8,$11,$f7,$a9,$02,$0a,$2b,$e9,$2a,$24,$23,$0f,$53 // .........+.*$#.S
        .byte $e9,$01,$08,$f9,$04,$10,$30,$00,$2d,$0e,$09,$51,$17,$be,$14,$a7 // ......0.-..Q....
        .byte $53,$86,$15,$2f,$8d,$0f,$02,$97,$04,$19,$0c,$37,$01,$0e,$20,$2d // S../.......7.. -
        .byte $fc,$48,$81,$e6,$6a,$ca,$2c,$cc,$80,$80,$83,$9e,$6a,$62,$62,$2c // .H..j.,.....jbb,
        .byte $40,$48,$00,$06,$a2,$16,$4c,$c8,$08,$00 // @H....L...

// --- Region $160d-$16ce ---
.pc = $160d "Segment $160d"
        .byte $19,$a7,$a9,$00,$85,$9f,$e0,$01,$90,$1f,$46,$fd,$d0,$15,$48,$ad // ..........F...H.
        .byte $19,$01,$d0,$03,$ce,$1a,$01,$ce,$19,$01,$ad,$d9,$15,$90,$15,$6a // ...............j
        .byte $85,$fd,$68,$2a,$26,$9f,$ca,$d0,$e1,$60,$ca,$c6,$ff,$c6,$af,$88 // ..h*&....`......
        .byte $90,$dd,$b1,$ae,$91,$fe,$98,$d0,$f6,$8a,$d0,$ee,$e8,$20,$00,$01 // ............. ..
        .byte $a8,$d0,$13,$e8,$20,$08,$01,$4a,$c8,$90,$f8,$c0,$11,$90,$0f,$f0 // .... ..J........
        .byte $65,$a2,$10,$20,$00,$01,$85,$a7,$a6,$9f,$a0,$00,$90,$27,$be,$33 // e.. .........'.3
        .byte $03,$20,$00,$01,$79,$67,$03,$85,$a7,$a5,$9f,$79,$9b,$03,$48,$d0 // . ..yg.....y..H.
        .byte $06,$a4,$a7,$c0,$04,$90,$02,$a0,$03,$be,$b9,$01,$20,$00,$01,$79 // ............ ..y
        .byte $bc,$01,$a8,$a5,$a7,$e5,$fe,$90,$02,$c6,$ff,$49,$ff,$85,$fe,$c0 // ...........I....
        .byte $01,$90,$1e,$be,$34,$03,$20,$00,$01,$79,$68,$03,$90,$03,$e6,$9f // ....4. ..yh.....
        .byte $18,$65,$fe,$85,$ae,$a5,$9f,$79,$9c,$03,$65,$ff,$85,$af,$68,$aa // .e.....y..e...h.
        .byte $38,$a4,$a7,$4c,$34,$01,$c6,$01,$58,$4c,$00,$90,$02,$04,$04,$30 // 8..L4...XL.....0
        .byte $20,$10                               //  .

// --- Region $91d1-$9206 ---
.pc = $91d1 "Segment $91d1"
        .byte $05,$01,$0c,$05,$12,$20,$11,$15,$01,$0c,$09,$14,$19,$20,$13,$0f // ..... ....... ..
        .byte $06,$14,$17,$01,$12,$05,$ff,$7e,$60,$40,$fe,$18,$01,$60,$e0,$01 // .......~`@...`..
        .byte $18,$61,$61,$b0,$c1,$18,$7c,$63,$18,$c1,$18,$66,$66,$0c,$c1,$18 // .aa...|c...ff...
        .byte $61,$6f,$fe,$fe,$01,$00               // ao....

// --- Region $92c1-$92e0 ---
.pc = $92c1 "Segment $92c1"
        .byte $ff,$d7,$d7,$d7,$d7,$d7,$d6,$aa,$ff,$d7,$d7,$d7,$d6,$d6,$d6,$aa // ................
        .byte $ff,$d7,$d6,$d6,$d6,$d6,$d6,$aa,$ff,$d6,$d6,$d6,$d6,$d6,$d6,$aa // ................

// --- Region $9342-$9418 ---
.pc = $9342 "Segment $9342"
        .byte $04,$20,$2d,$20,$17,$01,$13,$20,$03,$12,$01,$03,$0b,$05,$04,$20 // . - ... ....... 
        .byte $01,$0e,$04,$20,$14,$12,$01,$09,$0e,$05,$04,$20,$02,$19,$20,$0b // ... ....... .. .
        .byte $09,$0e,$07,$20,$06,$09,$13,$08,$05,$12,$20,$0f,$06,$20,$14,$12 // ... ...... .. ..
        .byte $09,$01,$04                           // ...

txt_9375:
        .text " 1992. "

txt_937c:
        .encoding "screencode_mixed"
        .text "sorry for not putting it on files, but i haven't got the time. this music is originally made by noone else but bob dylan - short conversion by me and tdm - p"
        .encoding "petscii_upper"

// --- Region $9438-$9673 ---
.pc = $9438 "Segment $9438"
        .byte $02,$05,$13,$14,$20,$05,$06,$06,$05,$03,$14 // .... ......

txt_9443:
        .text ".     "

txt_9449:
        .encoding "screencode_mixed"
        .text "worldwide shipwrecking handshakes to: fairlight * hotline * legend * byterapers * bloodsuckers * censor * flash * red sector * onyx * inc * nec/nei * tcb * paradox * noice * lcp * faces * padua * the force * f4cg * silents * laserjesus * light * bonzai * dualcrew * and you.. this game is strange - if you understand something of the way the transporting system works - tell me! and observe that unlimited lives does not mean that you cannot die in a fatal accident.. see you all later dudes"
        .encoding "petscii_upper"

txt_9634:
        .text "!    .."

txt_963b:
        .encoding "screencode_mixed"
        .text "when the night comes falling from the sky"
        .encoding "petscii_upper"

txt_9664:
        .text "..             "
        .byte $00                                   // string terminator

// --- Region $9687-$96a8 ---
.pc = $9687 "dat_9687"

dat_9687:
        // === Data block (34 bytes, $9687-$96a8) ===
        .byte $07,$0d,$01,$0d,$07,$0f,$0f,$0f,$0f,$0f,$0f,$0f,$0f,$0f,$0f,$0f // ................
        .fill 17, $0f

dat_96a8:
        // === Fill data (1 bytes, $96a8-$96a8) ===
        .byte $00                                   // .

// --- Region $9804-$9c70 ---
.pc = $9804 "dat_9804"

dat_9804:
        .byte $3e,$00,$00,$00,$00,$00,$2b,$00,$00,$3f,$c0,$00,$1e,$60,$00,$47 // >.....+..?...`.G
        .byte $b0,$00,$c0,$f8,$00,$c0,$34,$03,$c0,$34,$0f,$80,$2c,$00,$80,$2c // ......4..4..,..,
        .byte $7f,$00,$1c,$7c,$00,$1c,$70,$00,$3c,$60,$00,$3c,$40,$00,$3e,$00 // ...|..p.<`.<@.>.
        .fill 13, $00
        .byte $7f,$00,$00,$41,$00,$00,$7f,$00,$00,$54,$80,$00,$40,$20,$00,$e1 // ...A.....T..@ ..
        .byte $90,$00,$b8
        .byte $48,$01
        .byte $3b,$04,$07
        .byte $38,$c8,$0c
        .text "0J0"
        .byte $40                                   // @ character
        .text "R"
        .byte $7f,$00,$52,$80,$00,$62,$82,$00,$62,$88,$00,$42,$90,$00,$42,$a0 // ..R..b..b..B..B.
        .byte $00,$41,$c0,$00,$7f,$80,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // .A..............
        .byte $00,$00,$00,$7c,$00,$00,$00,$00,$00,$56,$00,$00,$7f,$00,$00,$3d // ...|.....V.....=
        .byte $80,$00,$0e,$c0,$00,$83,$40,$10,$c1,$e0,$31,$c0,$e0,$78,$c0,$68 // ......@...1..x.h
        .byte $7d,$80,$28,$7e,$00,$2c,$07,$00,$2c,$00,$00,$0c,$00,$00,$1e,$00 // }.(~.,..,.......
        .byte $00,$1e,$00,$00,$1e,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .byte $fe,$00,$00,$82,$00,$00,$fe,$00,$00,$a9,$00,$00,$80,$80,$00,$c2 // ................
        .byte $40,$00,$f1,$20,$01,$7c,$a0,$29,$3a,$10,$4e,$31,$1c,$87,$20,$94 // @.. .|.):.N1.. .
        .byte $82,$40,$56,$81,$80,$52,$38,$00,$52,$06,$00,$32,$00,$00,$21,$00 // .@V..R8.R..2..!.
        .byte $00,$21,$00,$00,$21,$00,$00,$3f,$00,$00,$00,$00,$00,$00,$00,$00 // .!..!..?........
        .byte $00,$00,$00,$7c,$00,$00,$00,$00,$00,$54,$00,$00,$7e,$00,$00,$36 // ...|.....T..~..6
        .byte $00,$10,$1b,$00,$30,$0d,$00,$7a,$07,$80,$7d,$23,$80,$3e,$a1,$c0 // ....0..z..}#.>..
        .byte $0f,$71,$b0,$03,$60,$b0,$00,$80,$b0,$00,$00,$b0,$00,$00,$38,$00 // .q..`.........8.
        .byte $00,$78,$00,$00,$7c,$00,$00,$7c,$00,$00,$00,$00,$00,$00,$00,$00 // .x..|..|........
        .byte $fe,$00,$00,$82,$00,$00,$fe,$00,$00,$aa,$00,$00,$81,$00,$00,$c9 // ................
        .byte $00,$20,$64,$80,$48,$72,$80,$84,$78,$40,$82,$5c,$60,$c1,$5a,$30 // . d.Hr..x@.\`.Z0
        .byte $30,$8a,$48,$0c,$91,$48,$03,$61,$48,$00,$81,$48,$00,$00,$c4,$00 // 0.H..H.aH..H....
        .byte $00,$84,$00,$00,$82,$00,$00,$82,$00,$00,$fe,$00,$00,$00,$00,$00 // ................
        .byte $00,$00,$00,$7c,$00,$00,$00,$00,$00,$54,$00,$00,$7c,$00,$00,$6c // ...|.....T..|..l
        .byte $00,$0c,$36,$00,$1e,$36,$00,$3f,$1b,$00,$0f,$1f,$00,$03,$0f,$00 // ..6..6.?........
        .byte $01,$4c,$00,$00,$8d,$00,$00,$0b,$00,$00,$0b,$00,$00,$07,$00,$00 // .L..............
        .byte $07,$00,$00,$0f,$80,$00,$0f,$c0,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .byte $fe,$00,$00,$82,$00,$00,$fe,$00,$00,$aa,$00,$00,$82,$00,$08,$92 // ................
        .byte $00,$12,$49,$00,$21,$49,$00,$40,$e4,$80,$70,$e0,$80,$0c,$f0,$80 // ..I.!I.@..p.....
        .byte $02,$b3,$00,$01,$72,$80,$00,$54,$80,$00,$14,$80,$00,$18,$80,$00 // ....r..T........
        .byte $18,$80,$00,$10,$40,$00,$10,$20,$00,$1f,$e0,$00,$00,$00,$00,$00 // ....@.. ........
        .byte $00,$00,$00,$7c,$00,$00,$00,$00,$00,$54,$00,$00,$7c,$00,$00,$6c // ...|.....T..|..l
        .byte $00,$00,$35,$00,$00,$55,$00,$00,$de,$80,$01,$9e,$80,$00,$1d,$80 // ..5..U..........
        .byte $00,$3c,$00,$00,$30,$00,$00,$68,$00,$00,$58,$00,$00,$38,$00,$00 // .<..0..h..X..8..
        .byte $70,$00,$00,$78,$00,$00,$7c,$00,$00,$00,$00,$00,$00,$00,$00,$00 // p..x..|.........
        .byte $fe,$00,$00,$82,$00,$00,$fe,$00,$00,$aa,$00,$00,$83,$00,$00,$93 // ................
        .byte $00,$00,$ca,$80,$00,$aa,$80,$01,$21,$40,$02,$61,$40,$03,$e2,$40 // ........!@.a@..@
        .byte $00,$43,$80,$00,$4c,$00,$00,$94,$00,$00,$a4,$00,$00,$c4,$00,$00 // .C..L...........
        .byte $88,$00,$00,$84,$00,$00,$82,$00,$00,$fc,$00,$00,$00,$00,$00,$00 // ................
        .byte $00,$00,$00,$7c,$00,$00,$00,$00,$00,$56,$00,$00,$7f,$00,$00,$6d // ...|.....V.....m
        .byte $80,$00,$6d,$c0,$00,$35,$60,$00,$3e,$a0,$00,$3e,$e0,$00,$3c,$00 // ..m..5`.>..>..<.
        .byte $00,$73,$c0,$01,$ef,$80,$00,$0f,$00,$07,$ee,$00,$0f,$cc,$00,$1f // .s..............
        .byte $88,$00,$0f,$00,$00,$07,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .byte $fe,$00,$00,$82,$00,$00,$fe,$00,$00,$a9,$00,$00,$80,$80,$00,$92 // ................
        .byte $40,$00,$92,$20,$00,$4a,$90,$00,$41,$50,$00,$41,$10,$00,$c3,$e0 // @.. .J..AP.A....
        .byte $01,$8c,$20,$02,$10,$40,$07,$f0,$80,$08,$11,$00,$10,$32,$00,$20 // .. ..@.......2. 
        .byte $54,$00,$10,$98,$00,$08,$00,$00,$07,$00,$00,$00,$00,$00,$00,$00 // T...............
        .byte $13,$00,$10,$09,$16,$02,$0d,$0a,$19,$04,$0a,$02,$1d,$0e,$20,$0d // .............. .
        .byte $10,$11,$10,$00,$11,$04,$11,$08,$11,$0c,$11,$10,$11,$0e,$10,$e2 // ................
        .byte $4e,$e6
        .byte $4c,$e4
        .byte $4d,$e0
        .byte $4f,$e4
        .byte $4d,$e4
        .byte $4d,$e8
        .text "K0"
        .byte $40                                   // @ character
        .text "X"
        .byte $18,$ad,$01,$d0,$69,$18,$8d,$01,$d0,$8d,$03,$d0,$8d,$05,$d0,$8d // ....i...........
        .byte $07,$d0,$8d,$09,$d0,$8d,$0b,$d0,$8d,$0d,$d0,$8d,$0f,$d0,$be,$76 // ...............v
        .byte $6f,$bd,$00,$6d,$8d,$f8,$63,$bd,$01,$6d,$8d,$f9,$63,$bd,$02,$6d // o..m..c..m..c..m
        .byte $8d,$fa,$63,$bd,$03,$6d,$8d,$fb,$63,$bd,$04,$6d,$8d,$fc,$63,$bd // ..c..m..c..m..c.
        .byte $05,$6d,$8d,$fd,$63,$bd,$06,$6d,$8d,$fe,$63,$bd,$07,$6d,$8d,$ff // .m..c..m..c..m..
        .byte $63,$bd,$30,$6c,$8d,$00,$d0,$bd,$31,$6c,$8d,$02,$d0,$bd,$32,$6c // c.0l....1l....2l
        .byte $8d,$04,$d0,$bd,$33,$6c,$8d,$06,$d0,$bd,$34,$6c,$8d,$08,$d0,$bd // ....3l....4l....
        .byte $35,$6c,$8d,$0a,$d0,$bd,$36,$6c,$8d,$0c,$d0,$bd,$37,$6c,$8d,$0e // 5l....6l....7l..
        .byte $d0,$a2,$00,$bd,$00,$6c,$8d,$26,$d0,$b9,$d0,$6d,$8d,$b5,$23,$20 // .....l.&...m..# 
        .byte $e9,$1b,$48,$68,$ea,$e8,$e0,$12,$d0,$e9,$c8,$24,$ea,$60,$ea,$00 // ..Hh.......$.`..
        .byte $05,$0a,$0f,$14,$19,$1e               // ......

txt_9bd7:
        .text "#(-"
        .byte $b8                                   // '8' | $80 (end-of-string marker)
        .byte $cc,$cc,$cc,$b8,$f0                   // .....

txt_9be0:
        .text "000"
        .byte $b8                                   // '8' | $80 (end-of-string marker)
        .byte $b8,$0c,$b8,$c0,$b8,$b8,$0c,$38,$0c,$b8,$88,$cc,$fc,$0c,$08,$b8 // .......8........
        .byte $c0,$f8,$0c,$b8,$b8,$c0,$f8,$cc,$b8,$b8,$0c,$2c,$0c,$08,$b8,$cc // ...........,....
        .byte $b8,$cc,$b8,$b8,$cc,$b8,$0c,$b8,$64,$88,$88,$88,$64 // ........d...d

txt_9c11:
        .text "P   "
        .byte $64,$64,$08,$64,$80,$64,$64,$08,$24,$08,$64,$44,$88,$a8,$08,$04 // dd.d.dd.$.dD....
        .byte $64,$80,$a4,$08,$64,$64,$80,$a4,$88,$64,$64,$08,$18,$08,$04,$64 // d...dd...dd....d
        .byte $88,$64,$88,$64,$64,$88,$68,$08,$64,$10,$44,$44,$44,$10,$10,$10 // .d.dd.h.d.DDD...
        .byte $10,$10,$10,$10,$04,$10,$40,$10,$10,$04,$10,$04,$10,$00,$44,$54 // ......@.......DT
        .byte $04,$00,$10,$40,$50,$04,$10,$10,$40,$50,$44,$10,$10,$04,$04,$04 // ...@P...@PD.....
        .byte $00,$10,$44,$10,$44,$10,$10,$44,$14,$04,$10 // ..D.D..D...

dat_9c70:
        // === Fill data (1 bytes, $9c70-$9c70) ===
        .byte $00                                   // .

// --- Region $9e3e-$a020 ---
.pc = $9e3e "dat_9e3e"

dat_9e3e:
        .byte $6b,$0f,$00,$e6,$08,$a5,$08,$29,$07,$85,$08,$0a,$aa,$bd,$58,$26 // k......)......X&
        .byte $85,$28,$bd,$59,$26,$85,$29,$6c,$28,$00,$68,$26,$b1 // .(.Y&.)l(.h&.

txt_9e5b:
        .text "'O(O(O(O(O("
        .byte $e7,$28,$18,$a5,$41,$29,$07,$aa,$18,$a5,$41,$7d,$ac,$26,$6d,$6d // .(..A)....A}.&mm
        .byte $b6,$a8,$18,$a9,$03,$7d,$ac,$26,$85,$26,$b9,$80,$24,$85,$27,$29 // .....}.&.&..$.')
        .byte $f8,$f0,$09,$a5,$27,$29,$07,$f0,$1c,$a8,$d0,$22,$b9,$88,$24,$85 // ....')....."..$.
        .byte $27,$29,$f8,$f0,$10,$a5,$27,$29,$07,$f0,$0a,$a8,$18,$a5,$26,$69 // ')....')......&i
        .byte $08,$85,$26,$d0,$09,$60,$00,$07,$06,$05,$04,$03,$02,$01,$a6,$26 // ..&..`.........&
        .byte $a9,$01,$8d                           // ...

txt_9eb9:
        .byte $40                                   // @ character
        .text "&"
        .byte $a5                                   // '%' | $80 (end-of-string marker)
        .byte $3e,$85,$71,$a5,$3d,$29,$fe,$0a,$26,$71,$0a,$26,$71,$0a,$26,$71 // >.q.=)..&q.&q.&q
        .byte $18,$7d,$86,$27,$85,$70,$a5,$71,$7d,$9b,$27,$85,$71,$18,$a5,$70 // .}.'.p.q}.'.q..p
        .byte $79,$3f,$29,$85,$70,$a5,$71,$79,$47,$29,$29,$1f,$69,$40,$85,$71 // y?).p.qyG)).i@.q
        .byte $18,$a5,$3d,$29,$fe,$79,$4f,$29,$85,$72,$a5,$3e,$79,$57,$29,$29 // ..=).yO).r.>yW))
        .byte $03,$69,$60,$85,$73,$18,$8a,$0a,$65,$72,$85,$72,$85,$74,$a5,$73 // .i`.s...er.r.t.s
        .byte $69,$00,$85,$73,$69,$78,$85,$75,$a5   // i..six.u.

txt_9f15:
        .text "'JJJ"
        .byte $a8                                   // '(' | $80 (end-of-string marker)
        .byte $be                                   // .

txt_9f1b:
        .text "F'"
        .byte $bd                                   // '=' | $80 (end-of-string marker)
        .byte $66,$27,$85,$28,$bd,$67,$27,$85,$29,$a0,$1f,$b1,$28,$99,$0f,$2a // f'.(.g'.)...(..*
        .byte $88,$10,$f8,$bd,$68,$27,$85,$28,$bd,$69,$27,$85,$29,$a0,$07,$b1 // ....h'.(.i'.)...
        .byte $28,$99,$2f,$2a,$88,$10,$f8,$60,$00,$00,$00,$00,$00,$00,$00,$04 // (./*...`........
        .byte $04,$04,$04,$04,$04,$04,$08,$08,$08,$08,$08,$08,$08,$0c,$0c,$0c // ................
        .byte $0c,$0c,$0c,$0c,$10,$14,$18,$1c,$5f,$29,$7f,$29,$5f,$29,$7f,$29 // ........_).)_).)
        .byte $5f,$29,$87,$29,$5f,$29,$87,$29,$5f,$29,$8f,$29,$97,$29,$b7,$29 // _).)_).)_).).).)
        .byte $bf,$29,$df,$29,$e7,$29,$07,$2a,$00,$10 // .).).).*..

txt_9f88:
        .text " 0"
        .byte $40                                   // @ character
        .text "P"
        .byte $60,$70,$80,$90,$a0,$b0,$c0,$d0,$e0,$f0,$00,$10,$20,$30,$40,$00 // `p.......... 0@.
        .fill 15, $00
        .byte $01,$01,$01,$01,$01,$60,$ad,$40,$26,$f0,$fa,$a9,$80,$85,$6f,$a5 // .....`.@&.....o.
        .byte $70,$85,$76,$a5,$71,$85,$77,$a0,$0f,$b1,$70,$99 // p.v.q.w...p.

txt_9fc7:
        .text "7*"
        .byte $b9                                   // '9' | $80 (end-of-string marker)
        .byte $0f,$2a,$91,$70,$88,$10,$f3,$18,$a5,$70,$69,$40,$85,$70,$a5,$71 // .*.p.....pi@.p.q
        .byte $69,$01,$85,$71,$a0,$0f,$b1,$70,$99   // i..q...p.

txt_9fe3:
        .text "G*"
        .byte $b9                                   // '9' | $80 (end-of-string marker)
        .byte $1f,$2a,$91,$70,$88,$10,$f3,$a0,$00,$b1,$72,$8d // .*.p......r.

txt_9ff2:
        .text "W*"
        .byte $b1                                   // '1' | $80 (end-of-string marker)
        .byte $74,$8d,$5b,$2a,$c8,$b1,$72,$8d       // t.[*..r.

txt_9ffd:
        .text "X*"
        .byte $b1                                   // '1' | $80 (end-of-string marker)
        .byte $78                                   // x

txt_a001:
        .text " H"
        .byte $a0                                   // ' ' | $80 (end-of-string marker)
        .byte $a9,$18,$a0,$a0,$8d,$14,$03,$8c,$15,$03,$e8,$8e,$0e,$dc,$e8,$8e // ................
        .byte $1a,$d0,$58,$60,$ee,$19,$d0           // ..X`...

txt_a01b:
        .text " !"
        .byte $a0                                   // ' ' | $80 (end-of-string marker)
        .byte $4c,$31,$ea                           // L1.

// --- Region $a081-$a090 ---
.pc = $a081 "dat_a081"

dat_a081:
        .byte $0f,$0c,$15,$40,$40,$40,$04,$04,$06,$02,$01,$01,$04,$05,$03,$00 // ...@@@..........

// --- Region $a0c7-$a0d1 ---
.pc = $a0c7 "Segment $a0c7"
        .byte $07,$0e,$18,$2f,$02,$5a,$dc,$74,$04,$20,$03 // .../.Z.t. .

// --- Region $a0de-$a0eb ---
.pc = $a0de "dat_a0de"

dat_a0de:
        .byte $00,$00,$04,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ..............

// --- Region $a142-$a14f ---
.pc = $a142 "Segment $a142"
        .byte $42,$41,$0c,$06,$0c,$00,$02,$18,$9a,$c1,$00,$00,$00,$00 // BA............

// --- Region $a1c5-$a21a ---
.pc = $a1c5 "dat_a1c5"

dat_a1c5:
        .fill 11, $01
        .byte $02,$02,$02,$02,$02,$02,$02,$03,$03,$03,$03,$03,$04,$04,$04,$04 // ................
        .byte $05,$05,$05,$06,$06,$06,$07,$07,$08,$08,$09,$09,$0a,$0a,$0b,$0c // ................
        .byte $0d,$0d,$0e,$0f,$10,$11,$12,$13,$14,$15,$17,$18,$1a,$1b,$1d,$1f // ................

txt_a200:
        .text " "
        .byte $22                                   // double quote character
        .text "$')+.147:>AEINRW"
        .byte $5c                                   // backslash character
        .byte $62,$68,$6e,$75,$7c,$83,$8b,$93       // bhnu|...

// --- Region $a29b-$a2a6 ---
.pc = $a29b "Segment $a29b"
        .byte $a2,$18,$a9,$3a,$69,$f6,$8d,$9e,$a2,$8d,$16,$d4 // ...:i.......

// --- Region $a2b4-$a2c6 ---
.pc = $a2b4 "Segment $a2b4"
        .byte $f3,$f7,$04,$10,$01,$ff,$ff,$ff,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .byte $01,$01,$00                           // ...

// --- Region $a3d9-$a3e4 ---
.pc = $a3d9 "dat_a3d9"

dat_a3d9:
        .byte $10,$18,$00,$7b,$08,$08,$22,$08,$08,$5a,$6e,$38 // ...{.."..Zn8

// --- Region $a437-$a718 ---
.pc = $a437 "dat_a437"

dat_a437:
        .byte $16,$27,$38,$4b,$5f,$73,$8a,$a1,$ba,$d4,$f0,$0e,$2d,$4e,$71,$96 // .'8K_s......-Nq.
        .byte $bd,$e7,$13,$42,$74,$a9,$e0,$1b,$5a,$9b,$e2,$2c,$7b,$ce,$27,$85 // ...Bt...Z..,{.'.
        .byte $e8,$51,$c1,$37,$b4,$37,$c4,$57,$f5,$9c,$4e,$09,$d0,$a3,$82,$6e // .Q.7.7.W..N....n
        .byte $68,$6e,$88,$af,$eb,$39,$9c,$13,$a1,$46,$04,$dc,$d0,$dc,$10,$5e // hn...9...F.....^
        .byte $d6,$72,$38,$26,$42,$8c,$08,$b8,$a0,$b8,$20,$bc,$ac,$e4,$70,$4c // .r8&B..... ...pL
        .byte $84,$18,$10,$70,$40,$70,$40,$78,$58,$c8,$e0,$98,$08,$30,$20,$2e // ...p@p@xX....0 .
        .byte $6a,$66,$81,$97,$a4,$b1,$80,$a0,$c0,$e0,$00,$20,$40,$60,$80,$a0 // jf......... @`..
        .byte $c0,$e0,$a6,$a6,$a6,$a6,$83,$83,$83,$83,$84,$84,$84,$84,$84,$84 // ................
        .byte $84,$84,$7a,$73,$6a,$a6,$a6,$a6,$7f,$ff,$82,$11,$02,$11,$00,$18 // ..zsj...........
        .byte $02,$18,$00,$11,$02,$11,$00,$18,$02,$18,$00,$13,$02,$13,$00,$1a // ................
        .byte $02,$1a,$00,$13,$02,$13,$00,$1a,$02,$1a,$00,$15,$02,$15,$00,$1c // ................
        .byte $02,$1c,$00,$15,$02,$15,$00,$1c,$02,$1c,$00,$13,$02,$13,$00,$1a // ................
        .byte $02,$1a,$00,$13,$02,$13,$00,$1a,$02,$1f,$00,$ff,$80,$02,$01,$81 // ................
        .byte $02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02 // ................
        .byte $01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01 // ................
        .byte $80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81 // ................
        .byte $02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02 // ................
        .byte $01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01 // ................
        .byte $80,$02,$01,$81,$02,$01,$02,$01,$02,$00,$02,$00,$ff,$81,$02,$01 // ................
        .byte $ff,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01 // ................
        .byte $81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80 // ................
        .byte $02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02 // ................
        .byte $01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01 // ................
        .byte $81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80 // ................
        .byte $02,$01,$81,$02,$01,$80,$02,$01,$81,$02,$01,$80,$02,$01,$ff,$82 // ................
        .byte $18,$02,$18,$00,$13,$02,$13,$00,$18,$02,$18,$00,$13,$02,$18,$00 // ................
        .byte $17,$02,$17,$00,$10,$02,$10,$00,$17,$02,$17,$00,$10,$02,$17,$00 // ................
        .byte $15,$02,$15,$00,$10,$02,$10,$00,$15,$02,$15,$00,$10,$02,$10,$00 // ................
        .byte $13,$02,$13,$00,$0e,$02,$0e,$00,$13,$02,$13,$00,$0e,$02,$13,$00 // ................
        .byte $ff,$83,$61,$30,$03,$30,$01,$32,$00,$30,$01,$2f,$02,$30,$03,$32 // ..a0.0.2.0./.0.2
        .byte $03,$32,$01,$34,$00,$32,$01,$30,$02,$32,$03,$34,$03,$34,$01,$35 // .2.4.2.0.2.4.4.5
        .byte $00,$34,$01,$32,$01,$30,$02,$32,$02,$30,$00,$2f,$02,$2d,$00,$2b // .4.2.0.2.0./.-.+
        .byte $07,$ff,$83,$61,$34,$03,$34,$01,$35,$00,$34,$01,$32,$02,$34,$03 // ...a4.4.5.4.2.4.
        .byte $34,$03,$34,$01,$35,$00,$34,$01,$32,$02,$34,$03,$34,$03,$34,$01 // 4.4.5.4.2.4.4.4.
        .byte $35,$00,$34,$01,$32,$01,$30,$02,$32,$02,$30,$00,$2f,$02,$2d,$00 // 5.4.2.0.2.0./.-.
        .byte $2b,$07,$ff,$06,$00,$07,$00,$03,$00,$03,$00,$ff,$02,$00,$02,$00 // +...............
        .byte $05,$00,$ff,$01,$00,$01,$00,$04,$00,$ff,$81,$ff,$00,$41,$1a,$00 // .............A..
        .byte $40,$14,$00,$40,$12,$00,$40,$18,$00,$40,$08,$00,$00,$00,$00,$fe // @..@..@..@......
        .byte $81,$7f,$00,$41,$20,$00,$81,$10,$00,$80,$30,$00,$fe,$11,$00,$70 // ...A .....0....p
        .byte $81,$ff,$00,$41,$00,$30,$40,$00,$3a,$fe,$41,$0c,$30,$40,$0c,$30 // ...A.0@.:.A.0@.0
        .byte $fe,$a4,$a5,$a6,$a5,$a4,$a6,$a5,$a5,$00,$bf,$c6,$39,$03,$c1,$08 // ............9...
        .byte $68,$64,$00,$0f,$04,$01,$08,$00,$00,$00,$01,$0f,$e8,$11,$08,$00 // hd..............
        .byte $00,$00,$02,$08,$2b,$00,$23,$2a,$00,$00,$23,$0f,$e9 // ....+.#*..#..

txt_a6e4:
        .encoding "screencode_mixed"
        .text "ah"
        .text "@"
        .text "@"
        .text "@"
        .text "d"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "- i want you /bob dylan -"
        .encoding "petscii_upper"
