// ============================================
// scg-04 - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 vdisasm-one 1.0 build 1, 2026-03-29 17:54:23
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $1000 (4096)
// IRQ handler:  $106d (irq_106d)
//
// Code: 1132 bytes, Data: 62356 bytes
// Labels: 148, Subroutines: 10
//
// Cross-references: all OK
// ============================================


// --- Region $0814-$0851 ---
.pc = $0814 "sub_0814"
// Referenced by: jsr from $ffd9

sub_0814:
        sbc #$eb
        nop
        nop
        .byte $3f,$fa,$ea                           // rla $eafa,x // ILLEGAL
        nop
        nop
        sbc #$e9
        sbc #$ff
        nop
        nop
        nop
        sbc #$e9
        sbc #$e9
        .byte $3f,$fa,$ea                           // rla $eafa,x // ILLEGAL
        nop
        sbc #$eb
        nop
        nop
        .byte $3f,$fa,$ea                           // rla $eafa,x // ILLEGAL
        nop
        sbc #$eb
        nop
        nop
        .byte $3f,$fa,$ea                           // rla $eafa,x // ILLEGAL
        nop
        nop
        sbc #$e9
        sbc #$fd
        sbc #$e9
        sbc #$e9
        sbc #$ea
        nop
        .byte $0f,$0e,$0e                           // slo $0e0e // ILLEGAL
        asl $0e0e
        asl.abs $000e
        brk

// --- Region $09db-$09e0 ---
.pc = $09db "loc_09db"

loc_09db:
        brk

dat_09dc:
        .byte $00                                   // .

loc_09dd:
        brk

dat_09de:
        .byte $00                                   // .

loc_09df:
        brk

loc_09e0:
        brk

// --- Region $0a2c-$0a61 ---
.pc = $0a2c "Program $0a2c"
        eor $fd,x
        lda #$a9
        sbc $a9a9,x
        lda #$55
        sbc $a9a9,x
        sbc $a9a9,x
        lda #$55
        sbc $a9a9,x
        sbc $e9e9,x
        sbc #$e9
        sbc #$a9
        lda #$d0
        bcc loc_09db
        bcc loc_09dd
.label loc_0a4e = * + 1
        bcc loc_09df
        bcc loc_0a4e
        sbc #$e9
        sbc #$e9
        sbc #$e9
        sbc #$fd
        sbc #$e9
        sbc #$e9
        lda #$a5
        sty $00,x
        brk

// --- Region $0e0f-$0e17 ---
.pc = $0e0f "sub_0e0f"
// Referenced by: jsr from $1410

sub_0e0f:
        brk

dat_0e10:
        .byte $a9,$69,$e9,$a9,$a9                   // .i...
        lda $54
        brk

// --- Region $0f03-$0f03 ---
.pc = $0f03 "Program $0f03"
        brk

// --- Region $0f14-$0f14 ---
.pc = $0f14 "sub_0f14"
// Referenced by: jsr from $142e

sub_0f14:
        brk

// --- Region $1000-$119a ---
.pc = $1000 "main_1000"

main_1000:
        sei
        lda #$08
        jsr $ffd2
        lda #$93
        jsr $ffd2
        lda #$0b
        sta $d022
        lda #$0c
        sta $d024
        lda #$12
        sta $d018                                   // screen=$0400, charset=$0800
        ldx #$00
        lda #$09

loc_101e:
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_101e
        lda #$04
        sta smc_12ff                                // SMC: modifies $12ff
        sta smc_1305                                // SMC: modifies $1305
        sta smc_130c                                // SMC: modifies $130c
        sta smc_1312                                // SMC: modifies $1312
        ldy #$00
        jsr sub_12e0
        jmp loc_1044

dat_1043:
        .byte $ea                                   // .

loc_1044:
        lda #$00
        sta $f7
        sta $fa
        sta $fb
        sta $fc
        sta $d020
        lda #$7f                                    // disable all CIA1 interrupts
        sta $dc0d                                   // disable all CIA IRQs
        lda #$6d
        sta $0314                                   // set IRQ handler low byte
        lda #$10
        sta $0315                                   // set IRQ handler high byte
        lda #$01
        sta $d019                                   // raster // acknowledge raster IRQ
        sta $d01a                                   // raster IRQ on
        cli

loc_1069:
        jmp loc_1069

dat_106c:
        .byte $ea                                   // .

// ============================================
// IRQ handler
// ============================================
irq_106d: {
        lda $d019
        sta $d019
        jsr sub_1280
        jsr sub_1280
        lda #$17
        sta $d011                                   // text mode, screen on, 24 rows, Y-scroll=7
        ldy #$00
        ldx #$39
loop1:
        lda $119d,y
loop2:
        cpx $d012
        bne loop2
        adc #$0f
        sta $d016
        lda $11f4,y
        sta $d023
        iny
        inx
        inx
        cpx #$9f
        bne loop1
        lda #$00
        sta $d020
        inc $f7
        lda $f7
        cmp #$03
        bne skip1
        ldy $119d
        ldx #$00
loop3:
        lda $119e,x
        sta $119d,x
        inx
        cpx #$55
        bne loop3
        sty $11f2
        ldy $11f4
        ldx #$00
loop4:
        lda $11f5,x
        sta $11f4,x
        inx
        cpx #$55
        bne loop4
        sty $1249
        lda #$00
        sta $f7
skip1:
        nop
        lda #$d0
loop5:
        cmp $d012
        bne loop5
        ldx #$0b
loop6:
        dex
        bne loop6
        lda #$01
        sta $d020
        sta $d021
        lda #$08
        sta $d016                                   // hires, 40 cols, X-scroll=0
        lda #$0c
        sta $d023
        ldx #$2e
loop7:
        dex
        bne loop7
        lda #$0c
        sta $d020
        sta $d021
        lda $fb
        sta $d016
        lda #$e6
loop8:
        cmp $d012
        bne loop8
        ldx #$0f
loop9:
        dex
        bne loop9
        lda #$0b
        sta $d020
        sta $d021
        lda #$08
        sta $d016                                   // hires, 40 cols, X-scroll=0
        ldx #$2f
loop10:
        dex
        bne loop10
        lda #$00
        sta $d020
        sta $d021
        dec $fb
        dec $fb
        lda $fb
        cmp #$0e
        beq skip2
        jmp loc_ea31
skip2:
        lda #$16
        sta $fb
        jsr sub_1144
        jsr sub_1158
        jmp loc_ea31
}
// Referenced by: jsr from $113b

sub_1144:
        ldx #$00

loc_1146:
        lda $0749,x
        sta $0748,x
        lda $0721,x
        sta $0720,x
        inx
        cpx #$28
        bne loc_1146
        rts
// Referenced by: jsr from $113e

sub_1158:
        inc $fa
        lda $fa
        cmp #$02
        beq loc_1188
        jmp loc_116d

loc_1163:
        lda #$00
        sta smc_116e                                // SMC: modifies $116e
        lda #$14
        sta smc_116f                                // SMC: modifies $116f

loc_116d:
.label smc_116e = * + 1
.label smc_116f = * + 2
        lda dat_1400                                // !SMC: modified by $1165, $116a
        cmp #$00
        beq loc_1163
        sta smc_117b                                // SMC: modifies $117b
        inc smc_116e
.label smc_117b = * + 1
        lda #$20                                    // !SMC: modified by $1174
        sta $0747
        clc
        adc #$80
        sta $076f
        sta $fc
        rts

loc_1188:
        lda #$00
        sta $fa
        lda $fc
        sec
        sbc #$40
        sta $0747
        clc
        adc #$80
        sta $076f
        rts

// --- Region $122c-$1232 ---
.pc = $122c "Segment $122c"
        .byte $0b,$0c                               // anc #$0c // ILLEGAL
        .byte $0f,$01,$0f                           // slo $0f01 // ILLEGAL

dat_1231:
        .byte $0c,$00                               // ..

// --- Region $1280-$131a ---
.pc = $1280 "sub_1280"
// Referenced by: jsr from $1073, $1076

sub_1280:
        lda $dc01
        and #$10
        beq loc_1288
        rts

loc_1288:
        jsr $ff84
        jsr $ff81
        jsr $ff8a
        nop
        nop
        lda #$15
        sta $d018                                   // screen=$0400, charset=$1000
        lda #$30
        sta $ae
        lda #$91
        sta $af
        ldy #$00

loc_12a2:
        lda loc_12b0,y
        sta $0100,y
        iny
        cpy #$31
        bne loc_12a2
        jmp $0100

loc_12b0:
        sei
        lda #$34
        sta $01
        lda #$01
        sta $fc
        lda #$15
        sta $fd
        lda #$ff
        sta $fe
        lda #$07
        sta $ff

loc_12c5:
        ldy #$00

loc_12c7:
        lda ($fc),y
        sta ($fe),y
        iny
        bne loc_12c7
        inc $fd
        inc $ff
        lda $fd
        cmp #$9f
        bne loc_12c5
        lda #$37
        sta $01
        cli
        jmp loc_fce2
// Referenced by: jsr from $103d

sub_12e0:
        lda #$60
        sta smc_12fe                                // SMC: modifies $12fe
        sta smc_130b                                // SMC: modifies $130b
        lda #$88
        sta smc_1304                                // SMC: modifies $1304
        sta smc_1311                                // SMC: modifies $1311
        ldx #$00

loc_12f2:
        lda dat_131a,x
        beq loc_1319
        nop
        nop
        cmp #$ff
        beq loc_1370
.label smc_12fe = * + 1
.label smc_12ff = * + 2
        sta $063d,y                                 // !SMC: modified by $102f, $12e2, $1374, $137e
        clc
        adc #$80
.label smc_1304 = * + 1
.label smc_1305 = * + 2
        sta $0665,y                                 // !SMC: modified by $1032, $12ea, $1388, $1392
        iny
        sec
        sbc #$40
.label smc_130b = * + 1
.label smc_130c = * + 2
        sta $063d,y                                 // !SMC: modified by $1035, $12e5, $1377, $1381
        clc
        adc #$80
.label smc_1311 = * + 1
.label smc_1312 = * + 2
        sta $0665,y                                 // !SMC: modified by $1038, $12ed, $138b, $1395
        iny
        inx
        cpx #$ff
        bne loc_12f2

loc_1319:
        rts

dat_131a:
        .byte $14                                   // .

// --- Region $132c-$1337 ---
.pc = $132c "Segment $132c"
        .byte $03,$0b                               // slo ($0b,x) // ILLEGAL
        ora #$0e
        .byte $07,$ff                               // slo $ff // ILLEGAL
        lsr $7605
        ora $07
        .byte $12                                   // jam // ILLEGAL

// --- Region $1370-$139d ---
.pc = $1370 "loc_1370"

loc_1370:
        inx
        lda dat_131a,x
        sta smc_12fe                                // SMC: modifies $12fe
        sta smc_130b                                // SMC: modifies $130b
        inx
        lda dat_131a,x
        sta smc_12ff                                // SMC: modifies $12ff
        sta smc_130c                                // SMC: modifies $130c
        inx
        lda dat_131a,x
        sta smc_1304                                // SMC: modifies $1304
        sta smc_1311                                // SMC: modifies $1311
        inx
        lda dat_131a,x
        sta smc_1305                                // SMC: modifies $1305
        sta smc_1312                                // SMC: modifies $1312
        inx
        ldy #$00
        jmp loc_12f2

// --- Region $1401-$1434 ---
.pc = $1401 "Segment $1401"
        php
        ora #$13
        jsr $0117
        .byte $13,$20                               // slo ($20),y // ILLEGAL
        ora $0e,x
        asl $0f
        .byte $1a                                   // nop // ILLEGAL
        ora $0e
        jsr sub_0e0f
        jsr sub_3332
        .byte $2f,$30,$35                           // rla $3530 // ILLEGAL
        .byte $2f,$38,$37                           // rla $3738 // ILLEGAL
        rol $2e2e
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr $0508
        .byte $0c,$0c,$0f                           // nop $0f0c // ILLEGAL
        jsr sub_0f14
        jsr sub_1702
        .byte $02                                   // jam // ILLEGAL

// --- Region $1702-$1702 ---
.pc = $1702 "sub_1702"
// Referenced by: jsr from $1431

sub_1702:
        brk

// --- Region $2020-$2020 ---
.pc = $2020 "sub_2020"
// Referenced by: jsr from $141f, $1422, $1425

sub_2020:
        brk

// --- Region $3332-$3332 ---
.pc = $3332 "sub_3332"
// Referenced by: jsr from $1413

sub_3332:
        brk

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

// --- Region $478d-$478d ---
.pc = $478d "Segment $478d"
        brk

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

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

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

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

// --- Region $ea31-$ea31 ---
.pc = $ea31 "loc_ea31"

loc_ea31:
        brk

// --- Region $fcdd-$fd31 ---
.pc = $fcdd "loc_fcdd"

loc_fcdd:
        lda $0749,x
.label loc_fce2 = * + 2
        sta $0748,x
        lda $0721,x
        sta $0720,x
        inx
        cpx #$28
        bne loc_fcdd
        rts

loc_fcef:
        inc $fa
        lda $fa
        cmp #$02
        beq loc_fd1f
        jmp loc_116d

loc_fcfa:
        lda #$00
        sta smc_116e
        lda #$14
        sta smc_116f
        lda dat_1400
        cmp #$00
        beq loc_fcfa
        sta smc_117b
        inc smc_116e
        lda #$20
        sta $0747
        clc
        adc #$80
        sta $076f
        sta $fc
        rts

loc_fd1f:
        lda #$00
        sta $fa
        lda $fc
        sec
        sbc #$40
        sta $0747
        clc
        adc #$80
        sta $076f
        rts

// --- Region $fe07-$fe72 ---
.pc = $fe07 "loc_fe07"

loc_fe07:
        .byte $0f,$0c,$00                           // slo $000c // ILLEGAL
        ora #$08
        .byte $07,$03                               // slo $03 // ILLEGAL
        ora ($03,x)
        asl $01ad
.label loc_fe15 = * + 2
        .byte $dc,$29,$10                           // nop $1029,x // ILLEGAL
        beq loc_fe19
        rts

loc_fe19:
        jsr $ff84
        jsr $ff81
        jsr $ff8a
        nop
        nop
        lda #$15
        sta $d018                                   // screen=$0400, charset=$1000
        lda #$30
        sta $ae
        lda #$91
        sta $af
        ldy #$00

loc_fe33:
        lda loc_12b0,y
        sta $0100,y
        iny
        cpy #$31
        bne loc_fe33
        jmp $0100

loc_fe41:
        sei
        lda #$34
        sta $01
        lda #$01
        sta $fc
        lda #$15
        sta $fd
        lda #$ff
        sta $fe
        lda #$07
        sta $ff

loc_fe56:
        ldy #$00

loc_fe58:
        lda ($fc),y
        sta ($fe),y
        iny
        bne loc_fe58
        inc $fd
        inc $ff
        lda $fd
        cmp #$9f
        bne loc_fe56
        lda #$37
        sta $01
        cli
        jmp loc_fce2

dat_fe71:
        .byte $a9,$60                               // .`

// --- Region $fee3-$ff13 ---
.pc = $fee3 "loc_fee3"

loc_fee3:
        ldx $2e60,y
        inx
        lda dat_131a,x
        sta smc_12fe
        sta smc_130b
        inx
        lda dat_131a,x
        sta smc_12ff
        sta smc_130c
        inx
        lda dat_131a,x
        sta smc_1304
        sta smc_1311
        inx
        lda dat_131a,x
        sta smc_1305
        sta smc_1312
        inx
        ldy #$00
        jmp loc_12f2

// --- Region $ff81-$ffbd ---
.pc = $ff81 "Segment $ff81"
        .byte $12                                   // jam // ILLEGAL

dat_ff82:
        .byte $04,$09                               // ..
        jsr $032c
        asl $0f
        jsr $052c
        clc
        .byte $14,$12                               // nop $12,x // ILLEGAL
        .byte $0f,$20,$2c                           // slo $2c20 // ILLEGAL
        ora $18
        .byte $0f,$04,$15                           // slo $1504 // ILLEGAL
        .byte $13,$20                               // slo ($20),y // ILLEGAL
        bit $1407
        .byte $13,$20                               // slo ($20),y // ILLEGAL
        bit $0112
        .byte $14,$13                               // nop $13,x // ILLEGAL
        .byte $0f,$20,$2c                           // slo $2c20 // ILLEGAL
        ora ($0e,x)
        .byte $03,$20                               // slo ($20,x) // ILLEGAL
        bit $1313
        ora #$20
        bit $1910
        .byte $14,$20                               // nop $20,x // ILLEGAL
        bit $0f0a
        .byte $0c,$e3,$2e                           // nop $2ee3 // ILLEGAL
        cpx $20
        rts

txt_ffbd:
        .encoding "screencode_mixed"
        .text "="
        .encoding "petscii_upper"

// --- Region $ffd2-$ffe6 ---
.pc = $ffd2 "Segment $ffd2"
        .byte $07,$15                               // slo $15 // ILLEGAL
        ora $2013,y
        ora ($14,x)
        jsr sub_0814
        ora $20
        .byte $03,$0f                               // slo ($0f,x) // ILLEGAL
        ora $0f0d
        .byte $04,$0f                               // nop $0f // ILLEGAL
        .byte $12                                   // jam // ILLEGAL

txt_ffe6:
        .encoding "screencode_mixed"
        .text "e"
        .encoding "petscii_upper"

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

// --- Region $0809-$0813 ---
.pc = $0809 "dat_0809"

dat_0809:
        .byte $03,$03,$0f,$0e,$0e,$3e,$3a,$ff,$ea,$ea,$ea // .....>:....

// --- Region $0852-$08d8 ---
.pc = $0852 "dat_0852"

dat_0852:
        .byte $00,$00,$00,$00,$00,$00,$fd,$e9,$e9,$e9,$e9,$e9,$ea,$ea,$fd,$e9 // ................
        .byte $e9,$e9,$e9,$e9,$e9,$e9,$ff,$e9,$ea,$ea,$ea,$e6,$e6,$e6,$ff,$e9 // ................
        .byte $ea,$ea,$ea,$ea,$ea,$e9,$3f,$fa,$ea,$ea,$ea,$e9,$e9,$e9,$ff,$ea // ......?.........
        .byte $ea,$ea,$d5,$ff,$ea,$ea,$3f,$fa,$ea,$ea,$ea,$e9,$e9,$e9,$ff,$ea // ......?.........
        .byte $ea,$ea,$d5,$ff,$ea,$ea,$3f,$fa,$ea,$ea,$e9,$eb,$ea,$ea,$ff,$ea // ......?.........
        .byte $ea,$ea,$d6,$0e,$0e,$0e,$fd,$e9,$e9,$e9,$e9,$e9,$e9,$e9,$fd,$e9 // ................
        .byte $e9,$e9,$e9,$e9,$e9,$ea,$ff,$e6,$e6,$e6,$e6,$e6,$e6,$e6,$fd,$e9 // ................
        .byte $e9,$e9,$e9,$ea,$fa,$3e,$fd,$e9,$e9,$e9,$e9,$e9,$ea,$fa,$ff,$ea // .....>..........
        .byte $ea,$ea,$d5,$03,$0f,$0e               // ......

dat_08d8:
        // === Fill data (1 bytes, $08d8-$08d8) ===
        .byte $00                                   // .

// --- Region $0908-$0915 ---
.pc = $0908 "dat_0908"

dat_0908:
        .byte $0f,$0e,$0e,$0e,$0e,$0e,$0e,$0e       // ........

txt_0910:
        .text "=9995"
        .byte $00                                   // string terminator

// --- Region $0938-$094f ---
.pc = $0938 "dat_0938"

dat_0938:
        .byte $0f,$0e,$0e,$0f,$0e,$0d,$00,$00,$00,$03,$03,$0f,$0e,$0e,$0e,$0e // ................
        .text "=9::>"
        .byte $0e,$0e,$0e

// --- Region $096d-$09da ---
.pc = $096d "dat_096d"

dat_096d:
        .byte $3f,$3a,$3a,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$03,$03 // ?::.............
        .byte $0f,$0e,$3e,$3f,$fa,$ea,$ea,$ea,$e9,$e9,$ea,$03,$0f,$3e,$3a,$3a // ..>?.........>::
        .byte $3e,$0e,$0e,$3f,$fa,$ea,$ea,$e9,$d5,$03,$0f,$3f,$fa,$ea,$ea,$e9 // >..?.......?....
        .byte $d7,$0e,$0e,$fd,$e9,$e9,$e9,$e9,$e9,$ea,$ea,$ff,$ea,$ea,$ea,$e9 // ................
        .byte $eb,$ea,$ea,$3f,$fa,$ea,$ea,$e9,$eb,$ea,$ea,$ff,$ea,$ea,$ea,$d5 // ...?............
        .byte $03,$03,$03,$3f,$fa,$ea,$ea,$e9,$eb,$ea,$fa,$3f,$fa,$ea,$ea,$e9 // ...?.......?....
        .byte $eb,$ea,$fa,$00,$00,$00,$0f,$0e,$0e,$0e,$0d,$00,$00,$00 // ..............

// --- Region $09e1-$0a2b ---
.pc = $09e1 "dat_09e1"

dat_09e1:
        .fill 23, $00
        .byte $3f,$fa,$ea,$ea,$e9,$d7,$0f,$0e,$00,$00,$00,$00,$00,$00,$00,$00 // ?...............
        .byte $fc,$ed,$a9,$a9,$a9,$a9,$a9,$e9,$fc,$ad,$a9,$a9,$69,$e9,$a9,$a5 // ............i...
        .byte $fd,$a9,$a9,$a9,$55,$40,$00,$00,$f4,$a5,$a9,$a9,$a9,$e9,$e9,$e9 // ....U@..........
        .byte $fd,$a9,$a9,$a9                       // ....

// --- Region $0a62-$0ad8 ---
.pc = $0a62 "dat_0a62"

dat_0a62:
        .byte $00,$00,$00,$00,$00,$00,$fd,$e9,$a9,$a9,$a9,$69,$69,$69,$fd,$e9 // ...........iii..
        .byte $e9,$e9,$a9,$a9,$a9,$a9,$f4,$a5,$a9,$a9,$a9,$e9,$e9,$e9,$f4,$a5 // ................
        .byte $a9,$a9,$69,$e9,$a9,$a9,$f4,$a5,$a9,$a9,$a9,$e9,$e9,$e9,$f4,$a5 // ..i.............
        .byte $a9,$a9,$69,$e9,$a9,$a9,$fd,$a9,$a9,$a9,$55,$f4,$a5,$a9,$fd,$a9 // ..i.......U.....
        .byte $a9,$a9,$95,$90,$90,$90,$fd,$e9,$e9,$e9,$e9,$e9,$e9,$e9,$fd,$e9 // ................
        .byte $e9,$e9,$e9,$e9,$e9,$a9,$ff,$69,$69,$69,$69,$69,$69,$69,$fd,$e9 // .......iiiiiii..
        .byte $e9,$e9,$e9,$a9,$a5,$94,$fd,$e9,$e9,$e9,$e9,$e9,$a9,$a5,$fd,$a9 // ................
        .byte $a9,$a9,$69,$a9,$a5,$a4               // ..i...

dat_0ad8:
        // === Fill data (1 bytes, $0ad8-$0ad8) ===
        .byte $00                                   // .

// --- Region $0b08-$0b15 ---
.pc = $0b08 "dat_0b08"

dat_0b08:
        .byte $d0,$90,$90,$90,$90,$90,$90,$90,$f4,$e4,$e4,$e4,$d4 // .............

dat_0b15:
        // === Fill data (1 bytes, $0b15-$0b15) ===
        .byte $00                                   // .

// --- Region $0b38-$0b4f ---
.pc = $0b38 "dat_0b38"

dat_0b38:
        .byte $d0,$90,$90,$90,$50,$40,$00,$00,$f4,$e4,$a4,$a4,$94,$90,$90,$90 // ....P@..........
        .byte $00,$40,$40,$50,$90,$90,$90,$90       // .@@P....

// --- Region $0b6d-$0bd8 ---
.pc = $0b6d "dat_0b6d"

dat_0b6d:
        .byte $f4,$a4,$a4,$00,$00,$00,$00,$00,$00,$00,$00,$3d,$f9,$e9,$e9,$a5 // ...........=....
        .byte $a4,$94,$90,$f4,$a5,$a9,$a9,$a9,$a9,$a9,$a9,$d0,$90,$90,$90,$90 // ................
        .byte $90,$90,$90,$f4,$a5,$a9,$a9,$69,$e9,$a9,$a5,$f4,$a5,$a9,$a9,$69 // .......i.......i
        .byte $e9,$a9,$a5,$00,$00,$f4,$a4,$a4,$a5,$a9,$a9,$fd,$a9,$a9,$a9,$55 // ...............U
        .byte $fd,$a9,$a9,$f4,$a5,$a9,$a9,$69,$fd,$a9,$a9,$fd,$a9,$a9,$a9,$69 // .......i.......i
        .byte $e9,$a5,$a4,$f4,$a5,$a9,$a9,$69,$e9,$a9,$a5,$f4,$a5,$a9,$a9,$69 // .......i.......i
        .byte $e9,$a9,$a9,$00,$00,$00,$d0,$90,$90,$90,$50 // ..........P

dat_0bd8:
        // === Fill data (1 bytes, $0bd8-$0bd8) ===
        .byte $00                                   // .

// --- Region $0bf8-$0cd7 ---
.pc = $0bf8 "dat_0bf8"

dat_0bf8:
        .byte $f4,$a5,$a9,$a9,$69,$a9,$a5,$a4,$00,$00,$00,$00,$00,$00,$00,$00 // ....i...........
        .byte $3a,$fa,$ea,$e9,$e9,$e9,$d5,$00,$ea,$e9,$eb,$ea,$ea,$ea,$d5,$00 // :...............
        .byte $e9,$e9,$ea,$ea,$ea,$fa,$35,$00,$e9,$e9,$e9,$ea,$ea,$ea,$d5,$00 // ......5.........
        .byte $ea,$e9,$eb,$ea,$ea,$fa,$35,$00,$ea,$e9,$e9,$e9,$e9,$e9,$d5,$00 // ......5.........
        .byte $e9,$e9,$ea,$ea,$ea,$fa,$35,$00,$ea,$e9,$e9,$e9,$e9,$e9,$d5,$00 // ......5.........
        .byte $0e,$0e,$0e,$0e,$0e,$0e,$0d,$00,$fd,$e9,$e9,$ea,$ea,$fa,$35,$00 // ..............5.
        .byte $ea,$e9,$e9,$e9,$e9,$e9,$d5,$00,$e9,$e9,$e9,$ea,$ea,$fa,$35,$00 // ..............5.
        .byte $e6,$e6,$e6,$e6,$e6,$e6,$d5,$00,$e9,$e9,$e9,$e9,$e9,$e9,$d5,$00 // ................
        .byte $e9,$e9,$ea,$ea,$ea,$fa,$35,$00,$ea,$e9,$e9,$e9,$e9,$e9,$d5,$00 // ......5.........
        .byte $e9,$e9,$ea,$ea,$ea,$fa,$35,$00,$ea,$e9,$e9,$e9,$e9,$e9,$d5,$00 // ......5.........
        .byte $fa,$35,$ff,$ea,$ea,$ea,$d5,$00,$0e,$0e,$0e,$0e,$0e,$0e,$0d,$00 // .5..............
        .byte $e9,$e9,$ea,$ea,$ea,$fa,$35,$00,$fa,$3a,$3a,$3e,$0e,$0e,$0d,$00 // ......5..::>....
        .byte $e6,$e6,$ea,$ea,$ea,$e9,$d5,$00,$da,$ea,$e9,$e9,$e9,$e9,$d5,$00 // ................
        .byte $3a,$3e,$0e,$0e,$0e,$0e,$0d,$00,$3e,$3a,$fa,$ea,$ea,$ea,$d5 // :>......>:.....

dat_0cd7:
        // === Fill data (1 bytes, $0cd7-$0cd7) ===
        .byte $00                                   // .

// --- Region $0d08-$0d0f ---
.pc = $0d08 "dat_0d08"

dat_0d08:
        .byte $0e,$0d,$0f,$0e,$0e,$0e,$0d           // .......

dat_0d0f:
        // === Fill data (1 bytes, $0d0f-$0d0f) ===
        .byte $00                                   // .

// --- Region $0d40-$0dd5 ---
.pc = $0d40 "dat_0d40"

dat_0d40:
        .byte $0e,$0e,$0e,$0f,$03,$03,$00,$00,$0e,$0e // ..........

txt_0d4a:
        .text ">::95"
        .byte $00                                   // string terminator
        .fill 18, $00
        .byte $0f,$0e,$0e,$0f,$0e,$0d,$3a,$35,$00,$00,$00,$00,$00,$00,$00,$00 // ......:5........
        .byte $0f,$0e,$0e,$0e,$0d,$00,$3a,$fa,$e9,$e9,$e5,$e4,$d4,$d0,$ea,$ea // ......:.........
        .byte $ea,$ea,$ea,$fa
        .byte $35,$00,$0e,$0e
        .text ">:::5"
        .byte $00
        .byte $3e,$fa
        .byte $ea,$ea,$ea,$ea,$d5,$00,$0e,$fd,$eb,$ea,$ea,$fa,$35,$00,$fa,$35 // ............5..5
        .byte $03,$03,$03,$03,$03,$00,$ea,$d5,$eb,$ea,$ea,$fa,$35,$00,$ea,$e9 // ............5...
        .byte $eb,$ea,$ea,$fa,$35,$00,$0f,$0e,$0e,$0e,$0e,$0e,$0d,$00,$ea,$e9 // ....5...........
        .byte $eb,$ea,$ea,$fa,$35,$00,$3a,$fd,$eb,$ea,$ea,$fa,$35,$00,$0f,$0e // ....5.:.....5...
        .byte $0e,$0e,$0d                           // ...

dat_0dd5:
        // === Fill data (1 bytes, $0dd5-$0dd5) ===
        .byte $00                                   // .

// --- Region $0df8-$0e0e ---
.pc = $0df8 "dat_0df8"

dat_0df8:
        .byte $0e,$0d,$0f,$0e,$0e,$0e,$0d,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .byte $e9,$a9,$a9,$e9,$e9,$e9,$d5           // .......

// --- Region $0e18-$0ed7 ---
.pc = $0e18 "dat_0e18"

dat_0e18:
        .byte $00,$00,$fd,$a9,$a9,$a9,$55,$00,$e9,$e9,$a9,$a9,$a9,$a5,$54,$00 // ......U.......T.
        .byte $a9,$55,$fd,$a9,$a9,$a9,$55,$00,$a9,$55,$00,$00,$00,$00,$00,$00 // .U....U..U......
        .byte $a9,$e9,$e9,$a9,$a9,$a5,$54,$00,$a9,$e9,$e9,$e9,$e9,$e9,$d5,$00 // ......T.........
        .byte $90,$90,$90,$90,$90,$90,$50,$00,$e9,$e9,$e9,$a9,$a9,$a5,$54,$00 // ......P.......T.
        .byte $a5,$a9,$e9,$e9,$e9,$e9,$d5,$00,$00,$00,$fd,$a9,$a9,$a9,$55,$00 // ..............U.
        .byte $69,$69,$69,$69,$69,$69,$55,$00,$a9,$e9,$e9,$e9,$e9,$e9,$d5,$00 // iiiiiiU.........
        .byte $e9,$e9,$a9,$a9,$a9,$a5,$54,$00,$a5,$54,$00,$00,$00,$00,$00,$00 // ......T..T......
        .byte $e9,$e9,$a9,$a9,$a9,$a5,$69,$d5,$a5,$a5,$a9,$e9,$e9,$e9,$d5,$00 // ......i.........
        .byte $a9,$69,$e9,$a9,$a9,$a5,$54,$00,$90,$90,$90,$90,$90,$90,$50,$00 // .i....T.......P.
        .byte $e9,$e9,$a9,$a9,$a9,$a5,$54,$00,$a5,$a4,$a4,$94,$90,$90,$50,$00 // ......T.......P.
        .byte $69,$69,$a9,$a9,$a9,$e9,$55,$00,$ad,$a9,$e9,$e9,$e9,$e9,$d5,$00 // ii....U.........
        .byte $a4,$94,$90,$90,$90,$90,$50,$00,$94,$90,$fd,$a9,$a9,$a9,$55 // ......P.......U

dat_0ed7:
        // === Fill data (1 bytes, $0ed7-$0ed7) ===
        .byte $00                                   // .

// --- Region $0f04-$0f13 ---
.pc = $0f04 "dat_0f04"

dat_0f04:
        .byte $00,$00,$00,$00,$90,$50,$d0,$90,$90,$90,$50,$00,$00,$00,$00,$00 // .....P....P.....

// --- Region $0f15-$0f15 ---
.pc = $0f15 "dat_0f15"

dat_0f15:
        // === Fill data (1 bytes, $0f15-$0f15) ===
        .byte $00                                   // .

// --- Region $0f40-$0fd5 ---
.pc = $0f40 "dat_0f40"

dat_0f40:
        .byte $90,$90,$94,$a4,$a4,$e4,$d4,$00,$90,$90,$90,$50,$40,$40,$00,$00 // ...........P@@..
        .fill 18, $00
        .byte $d0,$90,$90,$90                       // ....

txt_0f66:
        .text "P"
        .byte $40                                   // @ character
        .byte $a4                                   // '$' | $80 (end-of-string marker)
        .byte $54,$00,$00,$00,$00,$00,$00,$00,$00,$d0,$90,$90,$90,$50,$00,$50 // T............P.P
        .byte $40,$40,$00,$00,$00,$00,$00,$e9,$e9,$a9,$a9,$a9,$a5,$54,$00,$90 // @@...........T..
        .byte $90,$94,$a4,$a4,$a4,$54,$00,$a4,$94,$fd,$a9,$a9,$a9,$55,$00,$a9 // .....T.......U..
        .byte $69,$e9,$a9,$a9,$a5,$54,$00,$a9,$a5,$a4,$a4,$a4,$a4,$54,$00,$a9 // i....T.......T..
        .byte $69,$e9,$a9,$a9,$a5,$54,$00,$a9,$69,$e9,$a9,$a9,$a5,$54,$00,$a4 // i....T..i....T..
        .byte $94,$90,$90,$90,$90,$50,$00,$a9,$69,$e9,$a9,$a9,$a5,$54,$00,$a9 // .....P..i....T..
        .byte $69,$e9,$a9,$a9,$a5,$54,$00,$d0,$90,$90,$90,$50 // i....T.....P

dat_0fd5:
        // === Fill data (1 bytes, $0fd5-$0fd5) ===
        .byte $00                                   // .

// --- Region $0ff8-$0fff ---
.pc = $0ff8 "dat_0ff8"

dat_0ff8:
        .byte $94,$50,$d0,$90,$90,$90,$50,$00       // .P....P.

// --- Region $119b-$122b ---
.pc = $119b "dat_119b"

dat_119b:
        // === Sine/lookup table (145 bytes, range $00-$ea) ===
        .byte $ea,$60,$05,$04,$03,$02,$01,$00,$00,$01,$02,$02,$03,$04,$05,$06 // .`..............
        .byte $07,$06,$05,$04,$03,$02,$01,$00,$01,$02,$03,$04,$05,$06,$07,$06 // ................
        .byte $05,$04,$03,$02,$01,$01,$02,$03,$04,$05,$06,$07,$06,$05,$04,$03 // ................
        .byte $02,$01,$00,$01,$02,$03,$04,$05,$06,$07,$06,$05,$04,$03,$02,$01 // ................
        .byte $00,$00,$01,$02,$03,$04,$05,$07,$06,$05,$04,$03,$02,$01,$00,$01 // ................
        .byte $02,$03,$04,$05,$06,$07,$06,$05,$00,$00,$06,$0e,$03,$01,$03,$0e // ................
        .byte $06,$00,$00,$09,$08,$07,$01,$07,$08,$09,$00,$00,$00,$00,$0b,$0c // ................
        .byte $0f,$01,$0f,$0c,$00,$09,$08,$07,$03,$01,$03,$0e,$00,$06,$0e,$03 // ................
        .byte $01,$03,$0e,$06,$00,$00,$09,$08,$07,$01,$07,$08,$09,$00,$00,$00 // ................
        .byte $00                                   // .

// --- Region $1233-$127f ---
.pc = $1233 "Segment $1233"
        .byte $09,$08,$07,$03,$01,$03,$0e,$00,$06,$0e,$03,$01,$03,$0e,$06,$00 // ................
        .byte $00,$09,$08,$07,$01,$07,$08,$09,$00,$00,$00,$00,$0b,$0c,$0f,$01 // ................
        .byte $0f,$0c,$00,$09,$08,$07,$03,$01,$03,$0e,$00,$06,$0e,$03,$01,$03 // ................
        .byte $0e,$06,$00,$00,$09,$08,$07,$01,$07,$08,$09,$00,$00,$00,$00,$0b // ................
        .byte $0c,$0f,$01,$0f,$0c,$00,$09,$08,$07,$03,$01,$03,$0e // .............

// --- Region $131b-$132b ---
.pc = $131b "Segment $131b"
        .byte $08,$05,$ff,$cc,$04,$f4,$04,$13,$03,$0f,$15,$13,$05,$20,$03,$12 // ............. ..
        .byte $01                                   // .

// --- Region $1338-$1351 ---
.pc = $1338 "dat_1338"

dat_1338:
        .byte $0f,$15,$10,$ff,$c4,$05,$ec,$05,$10,$12,$05,$13,$05,$0e,$14,$ff // ................
        .byte $3d,$06,$65,$06,$09,$2d,$02,$01,$0c,$0c // =.e..-....

// --- Region $139e-$139e ---
.pc = $139e "dat_139e"

dat_139e:
        // === Fill data (1 bytes, $139e-$139e) ===
        .byte $00                                   // .

// --- Region $1400-$1400 ---
.pc = $1400 "dat_1400"

dat_1400:
        .byte $14                                   // .

// --- Region $1435-$14ff ---
.pc = $1435 "txt_1435"

txt_1435:
        .text " ,1001 "
        .byte $03,$12,$05,$17,$20,$2c,$15,$13,$01,$2d,$14,$05,$01,$0d,$28,$04 // .... ,...-....(.
        .byte $15,$14,$03,$08,$29,$20,$2c,$01,$05,$0b,$20,$2c,$0b,$12,$01,$02 // ....) ,... ,....
        .byte $01,$14,$20,$2c,$0b,$05,$0e,$14,$20,$14,$05,$01,$0d,$20,$2c,$14 // .. ,.... .... ,.
        .byte $13,$06,$20,$2c,$12,$04,$09,$20,$2c,$03,$06,$0f,$20,$2c,$05,$18 // .. ,... ,... ,..
        .byte $14,$12,$0f,$20,$2c,$05,$18,$0f,$04,$15,$13,$20,$2c,$07,$14,$13 // ... ,...... ,...
        .byte $20,$2c,$12,$01,$14,$13,$0f,$20,$2c,$01,$0e,$03,$20,$2c,$13,$13 //  ,..... ,... ,..
        .byte $09,$20,$2c,$10,$19,$14,$20,$2c,$0a,$0f,$0c // . ,... ,...

txt_14a7:
        .text "...    "

txt_14ae:
        .encoding "screencode_mixed"
        .text "see all you british guys at the commodore show , so be there"
        .encoding "petscii_upper"

txt_14ea:
        .text "!                    "
        .byte $00                                   // string terminator

// --- Region $1703-$1703 ---
.pc = $1703 "dat_1703"

dat_1703:
        // === Fill data (1 bytes, $1703-$1703) ===
        .byte $00                                   // .

// --- Region $2021-$2021 ---
.pc = $2021 "dat_2021"

dat_2021:
        // === Fill data (1 bytes, $2021-$2021) ===
        .byte $00                                   // .

// --- Region $2800-$2800 ---
.pc = $2800 "chr_2800"

chr_2800:
        .byte $00                                   // .

// --- Region $3333-$3333 ---
.pc = $3333 "dat_3333"

dat_3333:
        // === Fill data (1 bytes, $3333-$3333) ===
        .byte $00                                   // .

// --- Region $3d61-$3d61 ---
.pc = $3d61 "dat_3d61"

dat_3d61:
        // === Fill data (1 bytes, $3d61-$3d61) ===
        .byte $00                                   // .

// --- Region $478e-$478e ---
.pc = $478e "dat_478e"

dat_478e:
        // === Fill data (1 bytes, $478e-$478e) ===
        .byte $00                                   // .

// --- Region $8dd1-$8dd1 ---
.pc = $8dd1 "dat_8dd1"

dat_8dd1:
        // === Fill data (1 bytes, $8dd1-$8dd1) ===
        .byte $00                                   // .

// --- Region $a9d1-$a9d1 ---
.pc = $a9d1 "dat_a9d1"

dat_a9d1:
        // === Fill data (1 bytes, $a9d1-$a9d1) ===
        .byte $00                                   // .

// --- Region $e6d1-$e6d1 ---
.pc = $e6d1 "dat_e6d1"

dat_e6d1:
        // === Fill data (1 bytes, $e6d1-$e6d1) ===
        .byte $00                                   // .

// --- Region $e808-$e808 ---
.pc = $e808 "dat_e808"

dat_e808:
        // === Fill data (1 bytes, $e808-$e808) ===
        .byte $00                                   // .

// --- Region $ea32-$ea32 ---
.pc = $ea32 "dat_ea32"

dat_ea32:
        // === Fill data (1 bytes, $ea32-$ea32) ===
        .byte $00                                   // .

// --- Region $f600-$fcdc ---
.pc = $f600 "dat_f600"

dat_f600:
        .byte $d0,$02,$e6,$30,$e6,$2d,$d0,$02,$e6,$2e,$ca,$d0,$ed,$f0,$a8,$20 // ...0.-......... 
        .byte $71,$01,$b1,$2f,$20,$22,$01,$91,$2d,$e6,$2d,$d0,$02,$e6,$2e,$ca // q../ "..-.-.....
        .byte $d0,$f5,$c6,$39,$10,$f1,$30,$8f,$86,$39,$b1,$2f,$aa,$4c,$22,$01 // ...9..0..9./.L".
        .byte $20,$71,$01,$b1,$2f,$91,$2d,$e6,$2f,$d0,$02,$e6,$30,$e6,$2d,$d0 //  q../.-./...0.-.
        .byte $02,$e6,$2e,$ca,$d0,$ed,$c6,$39,$10,$e9,$4c,$00,$01,$2c,$da,$01 // .......9..L..,..
        .byte $a9,$37,$85,$01,$58,$20,$00,$10,$4c,$ae,$a7,$e0,$00,$f0,$ee,$a9 // .7..X ..L.......
        .byte $04,$2c,$a9,$08,$85,$ff,$b1,$2f,$91,$2d,$c8,$c4,$ff,$d0,$f7,$18 // .,...../.-......
        .byte $a5,$2d,$65,$ff,$85,$2d,$a5,$2e,$69,$00,$85,$2e,$a0,$00,$ca,$d0 // .-e..-..i.......
        .byte $e5,$18,$a5,$2f,$65,$ff,$85,$2f,$a5,$30,$69,$00,$85,$30,$4c,$00 // .../e../.0i..0L.
        .byte $01,$b9,$00,$ef,$99,$00,$ff,$c8,$d0,$f7,$ce,$dc,$01,$ce,$df,$01 // ................
        .byte $ad,$df,$01,$c9,$df,$d0,$ea,$60,$a9,$28,$03,$03,$0f,$0e,$0e,$3e // .......`.(.....>
        .byte $3a,$ff,$e3,$ea,$26,$e9,$eb,$ea,$ea,$3f,$fa,$e3,$ea,$e3,$e9,$c1 // :...&....?......
        .byte $e3,$ea,$e4,$e9,$21,$3f,$42,$fa,$ea,$ea,$e9,$eb,$ea,$ea,$3f,$21 // ....!?B.......?!
        .byte $fa,$e3,$ea,$e3,$e9,$21,$fd,$e5,$e9,$23,$ea,$ea,$0f,$e7,$0e,$a8 // .....!...#......
        .byte $21,$fd,$e5,$e9,$23,$ea,$ea,$fd,$e7,$e9,$22,$ff,$e9,$e3,$ea,$e3 // !...#.....".....
        .byte $e6,$22,$ff,$e9,$e5,$ea,$23,$e9,$3f,$fa,$e3,$ea,$e3,$e9,$c1,$e3 // ."....#.?.......
        .byte $ea,$26,$d5,$ff,$ea,$ea,$3f,$fa,$e3,$ea,$e3,$e9,$c1,$e3,$ea,$2d // .&....?........-
        .byte $d5,$ff,$ea,$ea,$3f,$fa,$ea,$ea,$e9,$eb,$ea,$ea,$ff,$e3,$ea,$21 // ....?..........!
        .byte $d6,$e3,$0e,$21,$fd,$e7,$e9,$21,$fd,$e6,$e9,$22,$ea,$ff,$e7,$e6 // ...!...!..."....
        .byte $21,$fd,$e4,$e9,$24,$ea,$fa,$3e,$fd,$e5,$e9,$23,$ea,$fa,$ff,$e3 // !...$..>...#....
        .byte $ea,$24,$d5,$03,$0f,$0e,$80,$30,$00,$21,$0f,$e7,$0e,$21,$3d,$e3 // .$.....0.!...!=.
        .byte $39,$21,$35,$80,$23,$00,$26,$0f,$0e,$0e,$0f,$0e,$0d,$a3,$23,$03 // 9!5.#.&.......#.
        .byte $03,$0f,$e4,$0e                       // ....

txt_f764:
        .text "%=9::>"
        .byte $e3,$0e,$bd                           // ...

txt_f76d:
        .text "#?::"
        .byte $ab                                   // '+' | $80 (end-of-string marker)
        .byte $27,$03,$03,$0f,$0e,$3e,$3f,$fa,$e3,$ea,$3c,$e9,$e9,$ea,$03,$0f // '....>?...<.....
        .text ">::>"
        .byte $0e,$0e
        .byte $3f,$fa,$ea,$ea,$e9,$d5,$03,$0f
        .byte $3f,$fa
        .byte $ea,$ea,$e9,$d7,$0e,$0e,$fd,$e5,$e9,$23,$ea,$ea,$ff,$e3,$ea,$2d // .........#.....-
        .byte $e9,$eb,$ea,$ea,$3f,$fa,$ea,$ea,$e9,$eb,$ea,$ea,$ff,$e3,$ea,$21 // ....?..........!
        .byte $d5,$e3,$03,$30,$3f,$fa,$ea,$ea,$e9,$eb,$ea,$fa,$3f,$fa,$ea,$ea // ...0?.......?...
        .byte $e9,$eb,$ea,$fa,$a3,$21,$0f,$e3,$0e,$21,$0d,$80,$20,$00,$28,$3f // .....!...!.. .(?
        .byte $fa,$ea,$ea,$e9,$d7,$0f,$0e,$a8,$22,$fc,$ed,$e5,$a9,$2a,$e9,$fc // ........"....*..
        .byte $ad,$a9,$a9,$69,$e9,$a9,$a5,$fd,$e3,$a9 // ...i......

txt_f7ec:
        .byte $22                                   // double quote character
        .text "U"
        .byte $40                                   // @ character
        .byte $a2                                   // '"' | $80 (end-of-string marker)
        .byte $22,$f4,$a5,$e3,$a9,$e3,$e9,$21,$fd,$e3,$a9,$21,$55,$42,$fd,$a9 // "......!...!UB..
        .byte $a9,$fd,$a9,$a9,$a9,$55,$24,$fd,$a9,$a9,$fd,$e5,$e9,$23,$a9,$a9 // .....U$......#..
        .byte $d0,$e7,$90,$21,$fd,$e7,$e9,$21,$fd,$e4,$e9,$23,$a9,$a5,$94,$a8 // ...!...!...#....
        .byte $22,$fd,$e9,$e3,$a9,$e3,$69,$21,$fd,$e3,$e9,$e4,$a9,$22,$f4,$a5 // ".....i!....."..
        .byte $e3,$a9,$e3,$e9,$2a,$f4,$a5,$a9,$a9,$69,$e9,$a9,$a9,$f4,$a5,$e3 // ....*....i......
        .byte $a9,$e3,$e9,$29,$f4,$a5,$a9,$a9,$69,$e9,$a9,$a9,$fd,$e3,$a9,$25 // ...)....i......%
        .byte $55,$f4,$a5,$a9,$fd,$e3,$a9,$21,$95,$e3,$90,$21,$fd,$e7,$e9,$21 // U......!...!...!
        .byte $fd,$e6,$e9,$22,$a9,$ff,$e7,$69,$21,$fd,$e4,$e9,$24,$a9,$a5,$94 // ..."...i!...$...
        .byte $fd,$e5,$e9,$23,$a9,$a5,$fd,$e3,$a9,$24,$69,$a9,$a5,$a4,$80,$30 // ...#.....$i....0
        .byte $00,$21,$d0,$e7,$90,$21,$f4,$e3,$e4,$21,$d4,$80,$23,$00,$21,$d0 // .!...!...!..#.!.
        .byte $e3,$90                               // ..

txt_f892:
        .byte $22                                   // double quote character
        .text "P"
        .byte $40                                   // @ character
        .byte $a2                                   // '"' | $80 (end-of-string marker)
        .byte $25,$f4,$e4,$a4,$a4,$94,$e3,$90,$24,$00,$40,$40,$50,$e4,$90,$bd // %.......$.@@P...
        .byte $23,$f4,$a4,$a4,$a8,$2a,$3d,$f9,$e9,$e9,$a5,$a4,$94,$90,$f4,$a5 // #....*=.........
        .byte $e6,$a9,$21,$d0,$e7,$90,$30,$f4,$a5,$a9,$a9,$69,$e9,$a9,$a5,$f4 // ..!...0....i....
        .byte $a5,$a9,$a9,$69,$e9,$a9,$a5,$a2,$27,$f4,$a4,$a4,$a5,$a9,$a9,$fd // ...i....'.......
        .byte $e3,$a9,$2d,$55,$fd,$a9,$a9,$f4,$a5,$a9,$a9,$69,$fd,$a9,$a9,$fd // ..-U.......i....
        .byte $e3,$a9,$34,$69,$e9,$a5,$a4,$f4,$a5,$a9,$a9,$69,$e9,$a9,$a5,$f4 // ..4i.......i....
        .byte $a5,$a9,$a9,$69,$e9,$a9,$a9,$a3,$21,$d0,$e3,$90,$21,$50,$80,$20 // ...i....!...!P. 
        .byte $00,$28,$f4,$a5,$a9,$a9,$69,$a9,$a5,$a4,$a8,$23,$3a,$fa,$ea,$e3 // .(....i....#:...
        .byte $e9,$25,$d5,$00,$ea,$e9,$eb,$e3,$ea,$24,$d5,$00,$e9,$e9,$e3,$ea // .%.......$......
        .byte $23,$fa,$35,$00,$e3,$e9,$e3,$ea,$2b,$d5,$00,$ea,$e9,$eb,$ea,$ea // #.5.....+.......
        .byte $fa,$35,$00,$ea,$e5,$e9,$24,$d5,$00,$e9,$e9,$e3,$ea,$24,$fa,$35 // .5....$......$.5
        .byte $00,$ea,$e5,$e9,$22,$d5,$00,$e6,$0e,$2b,$0d,$00,$fd,$e9,$e9,$ea // ...."....+......
        .byte $ea,$fa,$35,$00,$ea,$e5,$e9,$22,$d5,$00,$e3,$e9,$25,$ea,$ea,$fa // ..5...."....%...
        .byte $35,$00,$e6,$e6,$22,$d5,$00,$e6,$e9,$24,$d5,$00,$e9,$e9,$e3,$ea // 5..."....$......
        .byte $24,$fa,$35,$00,$ea,$e5,$e9,$24,$d5,$00,$e9,$e9,$e3,$ea,$24,$fa // $.5....$......$.
        .byte $35,$00,$ea,$e5,$e9,$25,$d5,$00,$fa,$35,$ff,$e3,$ea,$22,$d5,$00 // 5....%...5..."..
        .byte $e6,$0e,$24,$0d,$00,$e9,$e9,$e3,$ea,$2d,$fa,$35,$00,$fa,$3a,$3a // ..$......-.5..::
        .byte $3e,$0e,$0e,$0d,$00,$e6,$e6,$e3,$ea,$25,$e9,$d5,$00,$da,$ea,$e4 // >........%......
        .byte $e9,$24,$d5,$00,$3a,$3e,$e4,$0e,$25,$0d,$00,$3e,$3a,$fa,$e3,$ea // .$..:>..%..>:...
        .byte $21,$d5,$80,$31,$00,$23,$0e,$0d,$0f,$e3,$0e,$21,$0d,$80,$31,$00 // !..1.#.....!..1.
        .byte $e3,$0e,$23,$0f,$03,$03,$a2,$27,$0e,$0e // ..#....'..

txt_f9e0:
        .text ">::95"
        .byte $b3                                   // '3' | $80 (end-of-string marker)
        .byte $28,$0f,$0e,$0e,$0f,$0e,$0d           // (......

txt_f9ed:
        .text ":5"
        .byte $a8                                   // '(' | $80 (end-of-string marker)
        .byte $21,$0f,$e3,$0e,$2a,$0d,$00,$3a,$fa,$e9,$e9,$e5,$e4,$d4,$d0,$e5 // !...*..:........
        .byte $ea,$26,$fa,$35,$00,$0e,$0e,$3e,$e3,$3a,$24,$35,$00,$3e,$fa,$e4 // .&.5...>.:$5.>..
        .byte $ea,$2c,$d5,$00,$0e,$fd,$eb,$ea,$ea,$fa,$35,$00,$fa,$35,$e5,$03 // .,........5..5..
        .byte $32,$00,$ea,$d5,$eb,$ea,$ea,$fa,$35,$00,$ea,$e9,$eb,$ea,$ea,$fa // 2.......5.......
        .byte $35,$00,$0f,$e5,$0e,$33,$0d,$00,$ea,$e9,$eb,$ea,$ea,$fa,$35,$00 // 5....3........5.
        .byte $3a,$fd,$eb,$ea,$ea,$fa,$35,$00,$0f,$e3,$0e,$21,$0d,$80,$23,$00 // :.....5....!..#.
        .byte $23,$0e,$0d,$0f,$e3,$0e,$21,$0d,$a9,$23,$e9,$a9,$a9,$e3,$e9,$29 // #.....!..#.....)
        .byte $d5,$00,$a9,$69,$e9,$a9,$a9,$a5,$54,$a3,$21,$fd,$e3,$a9,$24,$55 // ...i....T.!...$U
        .byte $00,$e9,$e9,$e3,$a9,$26,$a5,$54,$00,$a9,$55,$fd,$e3,$a9,$24,$55 // .....&.T..U...$U
        .byte $00,$a9,$55,$a6,$29,$a9,$e9,$e9,$a9,$a9,$a5,$54,$00,$a9,$e5,$e9 // ..U.)......T....
        .byte $22,$d5,$00,$e6,$90,$22,$50,$00,$e3,$e9,$27,$a9,$a9,$a5,$54,$00 // "...."P...'...T.
        .byte $a5,$a9,$e4,$e9,$21,$d5,$a3,$21,$fd,$e3,$a9,$22,$55,$00,$e6,$69 // ....!..!..."U..i
        .byte $23,$55,$00,$a9,$e5,$e9,$24,$d5,$00,$e9,$e9,$e3,$a9,$25,$a5,$54 // #U....$......%.T
        .byte $00,$a5,$54,$a6,$22,$e9,$e9,$e3,$a9,$26,$a5,$69,$d5,$a5,$a5,$a9 // ..T."....&.i....
        .byte $e3,$e9,$2a,$d5,$00,$a9,$69,$e9,$a9,$a9,$a5,$54,$00,$e6,$90,$24 // ..*...i....T...$
        .byte $50,$00,$e9,$e9,$e3,$a9,$2d,$a5,$54,$00,$a5,$a4,$a4,$94,$90,$90 // P.....-.T.......
        .byte $50,$00,$69,$69,$e3,$a9,$25,$e9,$55,$00,$ad,$a9,$e4,$e9,$24,$d5 // P.ii..%.U.....$.
        .byte $00,$a4,$94,$e4,$90,$25,$50,$00,$94,$90,$fd,$e3,$a9,$21,$55,$80 // .....%P......!U.
        .byte $31,$00,$23,$90,$50,$d0,$e3,$90,$21,$50,$80,$31,$00,$28,$90,$90 // 1.#.P...!P.1.(..
        .byte $94,$a4,$a4,$e4,$d4,$00,$e3,$90       // ........

txt_fb28:
        .text "#P"
        .byte $40                                   // @ character
        .byte $40                                   // @ character
        .byte $b4                                   // '4' | $80 (end-of-string marker)
        .byte $21,$d0,$e3,$90                       // !...

txt_fb31:
        .text "$P"
        .byte $40                                   // @ character
        .byte $a4                                   // '$' | $80 (end-of-string marker)
        .byte $54,$a8,$21,$d0,$e3,$90,$25,$50,$00   // T.!...%P.

txt_fb3e:
        .text "P"
        .byte $40                                   // @ character
        .byte $40                                   // @ character
        .byte $a5                                   // '%' | $80 (end-of-string marker)
        .byte $22,$e9,$e9,$e3,$a9,$26,$a5,$54,$00,$90,$90,$94,$e3,$a4,$25,$54 // "....&.T......%T
        .byte $00,$a4,$94,$fd,$e3,$a9,$2c,$55,$00,$a9,$69,$e9,$a9,$a9,$a5,$54 // ......,U..i....T
        .byte $00,$a9,$a5,$e4,$a4,$21,$54,$42,$00,$a9,$69,$e9,$a9,$a9,$a5,$54 // .....!TB..i....T
        .byte $23,$00,$a4,$94,$e4,$90,$21,$50,$42,$00,$a9,$69,$e9,$a9,$a9,$a5 // #.....!PB..i....
        .byte $54,$22,$00,$d0,$e3,$90,$21,$50,$80,$23,$00,$23,$94,$50,$d0,$e3 // T"....!P.#.#.P..
        .byte $90,$61,$a4,$50,$00,$78,$a9,$08,$20,$d2,$ff,$a9,$93,$20,$d2,$ff // .a.P.x.. .... ..
        .byte $a9,$0b,$8d,$22,$d0,$a9,$0c,$8d,$24,$d0,$a9,$12,$8d,$18,$d0,$a2 // ..."....$.......
        .byte $00,$a9,$09,$9d,$00,$d8,$9d,$00,$d9,$9d,$00,$da,$9d,$00,$db,$e8 // ................
        .byte $d0,$f1,$a9,$04,$8d,$ff,$12,$8d,$05,$13,$8d,$0c,$13,$8d,$12,$13 // ................
        .byte $a0,$00,$20,$e0,$12,$4c,$44,$10,$ea,$a9,$00,$85,$f7,$85,$fa,$85 // .. ..LD.........
        .byte $fb,$85,$fc,$8d,$20,$d0,$a9,$7f,$8d,$0d,$dc,$a9,$6d,$8d,$14,$03 // .... .......m...
        .byte $a9,$10,$8d,$15,$03,$a9,$01,$8d,$19,$d0,$8d,$1a,$d0,$58,$4c,$69 // .............XLi
        .byte $10,$ea,$ad,$19,$d0,$8d,$19,$d0,$20,$80,$12,$20,$80,$12,$a9,$17 // ........ .. ....
        .byte $8d,$11,$d0,$a0,$00,$a2,$39,$b9,$9d,$11,$ec,$12,$d0,$d0,$fb,$69 // ......9........i
        .byte $0f,$8d,$16,$d0,$b9,$f4,$11,$8d,$23,$d0,$c8,$e8,$e8,$e0,$9f,$d0 // ........#.......
        .byte $e6,$a9,$00,$8d,$20,$d0,$e6,$f7,$a5,$f7,$c9,$03,$d0,$2a,$ac,$9d // .... ........*..
        .byte $11,$a2,$00,$bd,$9e,$11,$9d,$9d,$11,$e8,$e0,$55,$d0,$f5,$8c,$f2 // ...........U....
        .byte $11,$ac,$f4,$11,$a2,$00,$bd,$f5,$11,$9d,$f4,$11,$e8,$e0,$55,$d0 // ..............U.
        .byte $f5,$8c,$49,$12,$a9,$00,$85,$f7,$ea,$a9,$d0,$cd,$12,$d0,$d0,$fb // ..I.............
        .byte $a2,$0b,$ca,$d0,$fd,$a9,$01,$8d,$20,$d0,$8d,$21,$d0,$a9,$08,$8d // ........ ..!....
        .byte $16,$d0,$a9,$0c,$8d,$23,$d0,$a2,$2e,$ca,$d0,$fd,$a9,$0c,$8d,$20 // .....#......... 
        .byte $d0,$8d,$21,$d0,$a5,$fb,$8d,$16,$d0,$a9,$e6,$cd,$12,$d0,$d0,$fb // ..!.............
        .byte $a2,$0f,$ca,$d0,$fd,$a9,$0b,$8d,$20,$d0,$8d,$21,$d0,$a9,$08,$8d // ........ ..!....
        .byte $16,$d0,$a2,$2f,$ca,$d0,$fd,$a9,$00,$8d,$20,$d0,$8d,$21,$d0,$c6 // .../...... ..!..
        .byte $fb,$c6,$fb,$a5,$fb,$c9,$0e,$f0,$03,$4c,$31,$ea,$a9,$16,$85,$fb // .........L1.....
        .byte $20,$44,$11,$20,$58,$11,$4c,$31,$ea,$a2,$00 //  D. X.L1...

// --- Region $fd32-$fe06 ---
.pc = $fd32 "dat_fd32"

dat_fd32:
        .byte $ea,$60,$05,$04,$03,$02,$01,$a2,$60,$37,$01,$02,$02,$03,$04,$05 // .`......`7......
        .byte $06,$07,$06,$05,$04,$03,$02,$01,$00,$01,$02,$03,$04,$05,$06,$07 // ................
        .byte $06,$05,$04,$03,$02,$01,$01,$02,$03,$04,$05,$06,$07,$06,$05,$04 // ................
        .byte $03,$02,$01,$00,$01,$02,$03,$04,$05,$06,$07,$06,$05,$04,$03,$02 // ................
        .byte $01,$a2,$36,$01,$02,$03,$04,$05,$07,$06,$05,$04,$03,$02,$01,$00 // ..6.............
        .byte $01,$02,$03,$04,$05,$06,$07,$06,$05,$a2,$27,$06,$0e,$03,$01,$03 // ..........'.....
        .byte $0e,$06,$a2,$27,$09,$08,$07,$01,$07,$08,$09,$a4,$36,$0b,$0c,$0f // ...'........6...
        .byte $01,$0f,$0c,$00,$09,$08,$07,$03,$01,$03,$0e,$00,$06,$0e,$03,$01 // ................
        .byte $03,$0e,$06,$a2,$27,$09,$08,$07,$01,$07,$08,$09,$a4,$36,$0b,$0c // ....'........6..
        .byte $0f,$01,$0f,$0c,$00,$09,$08,$07,$03,$01,$03,$0e,$00,$06,$0e,$03 // ................
        .byte $01,$03,$0e,$06,$a2,$27,$09,$08,$07,$01,$07,$08,$09,$a4,$36,$0b // .....'........6.
        .byte $0c,$0f,$01,$0f,$0c,$00,$09,$08,$07,$03,$01,$03,$0e,$00,$06,$0e // ................
        .byte $03,$01,$03,$0e,$06,$a2,$27,$09,$08,$07,$01,$07,$08,$09,$a4,$60 // ......'........`
        .byte $e0,$0b,$0c,$0f,$01                   // .....

// --- Region $fe73-$fee2 ---
.pc = $fe73 "Segment $fe73"
        .byte $8d,$fe,$12,$8d,$0b,$13,$a9,$88,$8d,$04,$13,$8d,$11,$13,$a2,$00 // ................
        .byte $bd,$1a,$13,$f0,$22,$ea,$ea,$c9,$ff,$f0,$73,$99,$3d,$06,$18,$69 // ....".....s.=..i
        .byte $80,$99,$65,$06,$c8,$38,$e9,$40,$99,$3d,$06,$18,$69,$80,$99,$65 // ..e..8.@.=..i..e
        .byte $06,$c8,$e8,$e0,$ff,$d0,$d9,$60,$14,$08,$05,$ff,$cc,$04,$f4,$04 // .......`........
        .byte $13,$03,$0f,$15,$13,$05,$20,$03,$12,$01,$03,$0b,$09,$0e,$07,$ff // ...... .........
        .byte $4e,$05,$76,$05,$07,$12,$0f,$15,$10,$ff,$c4,$05,$ec,$05,$10,$12 // N.v.............
        .byte $05,$13,$05,$0e,$14,$ff,$3d,$06,$65,$06,$09,$2d,$02,$01,$0c,$0c // ......=.e..-....

// --- Region $ff14-$ff80 ---
.pc = $ff14 "dat_ff14"

dat_ff14:
        .byte $80,$62,$00                           // .b.

txt_ff17:
        .encoding "screencode_mixed"
        .text "<this was unfozen on"
        .encoding "petscii_upper"

txt_ff2b:
        .text " 23/05/87"
        .byte $e3,$2e,$ea,$20,$60,$7e               // ... `~

txt_ff3a:
        .encoding "screencode_mixed"
        .text "hello to bwb"
        .encoding "petscii_upper"

txt_ff46:
        .text " ,1001 "
        .byte $03,$12,$05,$17,$20,$2c,$15,$13,$01,$2d,$14,$05,$01,$0d,$28,$04 // .... ,...-....(.
        .byte $15,$14,$03,$08,$29,$20,$2c,$01,$05,$0b,$20,$2c,$0b,$12,$01,$02 // ....) ,... ,....
        .byte $01,$14,$20,$2c,$0b,$05,$0e,$14,$20,$14,$05,$01,$0d,$20,$2c,$14 // .. ,.... .... ,.
        .byte $13,$06,$20,$2c                       // .. ,

// --- Region $ffbe-$ffd1 ---
.pc = $ffbe "Segment $ffbe"
        .byte $13,$05,$05,$20,$01,$0c,$0c,$20,$19,$0f,$15,$20,$02,$12,$09,$14 // ... ... ... ....
        .byte $09,$13,$08,$20                       // ... 

// --- Region $ffe7-$ffff ---
.pc = $ffe7 "Segment $ffe7"
        .byte $20,$13,$08,$0f,$17,$20,$2c,$20,$13,$0f,$20,$02,$05,$20,$14,$08 //  .... , .. .. ..
        .byte $05,$12,$05,$21,$f4,$20,$a2,$00,$ff   // ...!. ...