// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:11
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $1a7f  (4736 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $0fb0 (4016)
// IRQ handler:  $1050 (irq_1050)
// IRQ handler:  $121d (loc_121d)
// IRQ handler:  $11d0 (irq_11d0)
//
// Code: 848 bytes, Data: 3888 bytes
// Labels: 122, Subroutines: 12
//
// Cross-references: all OK
// ============================================


// --- Region $0c20-$0c8b ---
.pc = $0c20 "loc_0c20"

loc_0c20:
        lda #$00
        sta $d020
        sta $d021
        ldx #$00

loc_0c2a:
        lda dat_0a00,x
        sta $0450,x
        lda $0b00,x
        sta $0550,x
        inx
        bne loc_0c2a
        jsr sub_0fa0
        lda #$02
        sta $d022
        lda #$02
        sta $d023
        ldx #$00
        lda #$0f

loc_0c4a:
        sta $d800,x
        sta $d900,x
        inx
        bne loc_0c4a
        ldx #$00
        txa

loc_0c56:
        sta dat_0a00,x
        sta $0b00,x
        inx
        bne loc_0c56
        jsr sub_10c9
        jsr $8000
        lda #$13
        sta $d018
        jsr sub_0c80
        jmp loc_0cb0

loc_0c70:
        lda #$0b
        sta $0286
        lda #$93
        jsr $ffd2
        jmp loc_0c20

chr_0c7d:
        // === Charset data (3 bytes, $0c7d-$0c7f) ===
        .byte $ea,$ea,$ea                           // char 0 (partial)
// Referenced by: jsr from $0c6a

sub_0c80:
        ldx #$00

loc_0c82:
        lda dat_1300,x
        jsr $ffd2
        inx
        bne loc_0c82
        rts

// --- Region $0ca0-$0d00 ---
.pc = $0ca0 "loc_0ca0"

loc_0ca0:
        jsr sub_1a00
        jsr sub_1a40
        lda #$ff
        sta chr_0800
        jmp loc_0c70

chr_0cae:
        // === Charset data (2 bytes, $0cae-$0caf) ===
        .byte $00,$00                               // char 0 (partial)

loc_0cb0:
        lda $dc21
        cmp #$ef
        bne loc_0cb0
        sei
        lda #$00
        sta $d01a
        lda $d019
        sta $d019
        lda #$31
        nop
        sta $0314
        lda #$ea
        nop
        sta $0315
        cli
        jsr sub_12e0
        lda #$00
        sta $d020
        sta $d021
        lda #$0b
        sta $0286
        lda #$93
        jsr $ffd2
        jsr sub_1a00
        jsr sub_1a40
        ldx #$00
        txa

loc_0cee:
        sta $d400,x
        inx
        bne loc_0cee
        lda #$00
        sta chr_0800
        jsr $e3bf
        jmp loc_0ea0

chr_0cff:
        // === Charset data (2 bytes, $0cff-$0d00) ===
        .byte $ea,$a2                               // char 0 (partial)

// --- Region $0ea0-$0eb0 ---
.pc = $0ea0 "loc_0ea0"

loc_0ea0:
        ldx #$00

loc_0ea2:
        lda chr_0eb0,x
        sta $03b7,x
        inx
        cmp #$60
        bne loc_0ea2
        jmp $03b7

chr_0eb0:
        // === Charset data (1 bytes, $0eb0-$0eb0) ===
        .byte $78                                   // char 0 (partial)

// --- Region $0fa0-$0fbf ---
.pc = $0fa0 "sub_0fa0"
// Referenced by: jsr from $0c39

sub_0fa0:
        lda #$1b
        sta $d011
        lda #$00
        sta $ae
        lda #$19
        sta $af
        rts

chr_0fae:
        // === Charset data (2 bytes, $0fae-$0faf) ===
        .byte $00,$00                               // char 0 (partial)

main_0fb0:
        ldx #$20

loc_0fb2:
        lda $0fc0,x
        sta chr_0800,x
        dex
        bne loc_0fb2
        jmp loc_0ca0

chr_0fbe:
        // === Charset data (2 bytes, $0fbe-$0fbf) ===
        .byte $ea,$ea                               // char 0 (partial)

// --- Region $1050-$117d ---
.pc = $1050 "irq_1050"

irq_1050:
        lda #$01
        sta $d019
        jsr sub_10a1
        lda #$42
        sta $d012
        nop
        nop
        nop
        lda $ff
        beq loc_1077
        jsr sub_1191
        ldx #$0e

loc_1069:
        dec $e000,x
        dex
        dex
        bpl loc_1069
        lda #$00
        sta $ff
        jmp loc_1088

loc_1077:
        jsr sub_10c9
        jsr sub_10c9
        ldx #$0e

loc_107f:
        inc $e000,x
        dex
        dex
        bpl loc_107f
        stx $ff

loc_1088:
        ldx #$07

loc_108a:
        txa
        clc
        adc $fa
        lsr
        lsr
        and #$07
        tay
        lda $1198,y
        jsr sub_0f90
        dex
        bpl loc_108a
        dec $fa
        jmp loc_11c0

// Referenced by: jsr from $1055
sub_10a1: {
        ldx #$19
        ldy #$11
loop1:
        dey
        bne loop1
        nop
loop2:
        nop
        dec $d016
        inc $d016
        lda $d012
        and #$07
        eor #$15
        ora #$18
        sta $d011
        ldy #$01
loop3:
        dey
        bne loop3
        bit $ea
        nop
        nop
        dex
        bpl loop2
        rts
}
// Referenced by: jsr from $0c5f, $1077, $107a, $1191; jmp from $1194

sub_10c9:
        ldx #$00

loc_10cb:
        clc
        rol $0bc8,x
        rol $0bc7,x
        rol $0bc6,x
        rol $0b88,x
        rol txt_0b87,x
        rol $0b86,x
        rol $0b48,x
        rol $0b47,x
        rol $0b46,x
        rol $0b08,x
        rol $0b07,x
        rol $0b06,x
        rol $0ac8,x
        rol $0ac7,x
        rol dat_0ac6,x
        rol $0a88,x
        rol $0a87,x
        rol $0a86,x
        rol $0a48,x
        rol $0a47,x
        rol $0a46,x
        rol $0a08,x
        rol $0a07,x
        rol $0a06,x
        nop
        nop
        nop
        inx
        inx
        inx
        cpx #$3f
        bne loc_10cb
        cli
        dec $b2
        beq loc_1124
        rts

loc_1124:
        ldy #$00
        sty $b1
        lda ($9e),y
        asl
        rol $b1
        asl
        rol $b1
        asl
        rol $b1
        sta $b0
        lda $b1
        clc
        adc #$08
        sta $b1
        sei
        lda #$33
        sta $01
        ldx #$00
        ldy #$00

loc_1145:
        lda ($b0),y
        sta $0bc8,x
        jsr sub_1174
        iny
        cpy #$08
        bne loc_1145
        sty $b2
        lda #$37
        sta $01
        cli
        inc $9e
        bne loc_115f
        inc $9f

loc_115f:
        eor ($00,x)
        lda ($9e),y
        bne loc_1168
        jsr sub_116b

loc_1168:
        jmp loc_1173
// Referenced by: jsr from $1165

sub_116b:
        lda #$00
        ldx #$14
        sta $9e
        stx $9f

loc_1173:
        rts
// Referenced by: jsr from $114a

sub_1174:
        inx
        inx
        inx
        inx
        inx
        inx
        inx
        inx
        inx
        rts

// --- Region $1191-$1197 ---
.pc = $1191 "sub_1191"
// Referenced by: jsr from $1064

sub_1191:
        jsr sub_10c9
        jmp sub_10c9

dat_1197:
        .byte $00                                   // .

// --- Region $11c0-$11f6 ---
.pc = $11c0 "loc_11c0"

loc_11c0:
        lda #$d0
        sta $0314
        lda #$11
        sta $0315
        jmp $febc

dat_11cd:
        .byte $00,$00,$00                           // ...

irq_11d0:
        lda #$ce
        sta $d012
        lda #$01
        sta $d019
        nop
        nop
        nop
        lda #$00
        sta $d021
        sta $d020
        nop
        nop

loc_11e7:
        nop
        nop
        lda #$50
        sta $0314
        lda #$10
        sta $0315
        jmp loc_121d

dat_11f6:
        .byte $20                                   //  

// --- Region $1200-$1276 ---
.pc = $1200 "loc_1200"

loc_1200:
        sei
        lda #$1d
        sta $0314
        lda #$12
        sta $0315
        lda #$01
        sta $d01a
        lda #$7f
        sta $dc0d
        lda #$30
        sta $d012
        cli
        rts

dat_121c:
        .byte $07                                   // .

loc_121d:
        lda #$01
        sta $d019
        lda #$d8
        sta $d016
        ldx #$00

loc_1229:
        ldy $1280,x
        sty dat_121c
        ldy $1380,x
        lda $d012

loc_1235:
        cmp $d012
        beq loc_1235
        nop
        nop
        nop
        lda dat_121c
        sta $d022
        inx
        cpx #$50
        bne loc_1229
        lda #$c8
        sta $d016
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        ldy $12d0
        ldx #$51

loc_1265:
        lda $1280,x
        sta $1281,x
        dex
        cpx #$ff
        bne loc_1265
        sty $1280
        jmp $8020

dat_1276:
        .byte $ea                                   // .

// --- Region $12e0-$12e7 ---
.pc = $12e0 "sub_12e0"
// Referenced by: jsr from $0cd0

sub_12e0:
        jsr $ff81
        lda #$00
        sta $c6
        rts

// --- Region $1a00-$1a7e ---
.pc = $1a00 "sub_1a00"
// Referenced by: jsr from $0ca0, $0ce5

sub_1a00:
        sei
        lda #$34
        sta $01
        lda #$0d
        ldx #$00
        sta $fc
        stx $fb
        lda #$80
        ldx #$00
        sta $fe
        stx $fd
        ldy #$00

loc_1a17:
        lda ($fd),y
        tax
        lda ($fb),y
        sta ($fd),y
        txa
        sta ($fb),y
        inc $fb
        bne loc_1a27

dat_1a25:
        .byte $e6,$fc                               // ..

loc_1a27:
        inc $fd
        bne loc_1a2d
        inc $fe

loc_1a2d:
        lda $fc
        cmp #$0f
        bne loc_1a17
        lda $fb
        cmp #$00
        bne loc_1a17
        lda #$37
        sta $01
        cli
        rts

dat_1a3f:
        .byte $b1                                   // .
// Referenced by: jsr from $0ca3, $0ce8

sub_1a40:
        sei
        lda #$34
        sta $01
        lda #$17
        ldx #$00
        sta $fc
        stx $fb
        lda #$8a
        ldx #$00
        sta $fe
        stx $fd
        ldy #$00

loc_1a57:
        lda ($fd),y
        tax
        lda ($fb),y
        sta ($fd),y
        txa
        sta ($fb),y
        inc $fb
        bne loc_1a67

dat_1a65:
        .byte $e6,$fc                               // ..

loc_1a67:
        inc $fd
        bne loc_1a6d
        inc $fe

loc_1a6d:
        lda $fc
        cmp #$1a
        bne loc_1a57
        lda $fb
        cmp #$00
        bne loc_1a57
        lda #$37
        sta $01
        cli
        rts

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

// --- Region $0800-$08d7 ---
.pc = $0800 "chr_0800"

chr_0800:
        // === Charset data (216 bytes, $0800-$08d7) ===
        .byte $00,$1e,$08,$70,$17,$9e               // char 0 (partial)

txt_0806:
        .byte $28,$34                               // char 0 (partial)
        .byte $30,$31,$36,$29,$20,$54,$48,$45       // char 1 @+1
        .byte $20,$42,$45,$41,$53,$54,$49,$45       // char 2 @+2
        .byte $20,$42,$4f,$59,$53,$00,$00,$00       // char 3 @+3
        .byte $00,$6c,$66,$e6,$e6,$ec,$ec,$00       // char 4 @+4
        .byte $00,$6e,$60,$f8,$c0,$c0,$fe,$00       // char 5 @+5
        .byte $00,$6e,$60,$f8,$e0,$e0,$e0,$00       // char 6 @+6
        .byte $00,$3c,$66,$c0,$ce,$e6,$7e,$00       // char 7 @+7
        .byte $00,$66,$66,$f6,$c6,$c6,$ce,$00       // char 8 @+8
        .byte $00,$38,$18                           // char 9 (partial)

txt_084b:
        .byte $38,$38,$38,$38,$00                   // char 9 (partial)
        .byte $00,$1c,$0c,$0c,$cc,$dc,$58,$00       // char 10 @+10
        .byte $00,$66,$66,$ec,$ec,$e6,$e6,$00       // char 11 @+11
        .byte $00,$60,$60,$e0,$e0,$e0,$fe,$00       // char 12 @+12
        .byte $00,$66,$5a,$da,$c2,$e6,$e6,$00       // char 13 @+13
        .byte $00,$66,$76,$f6,$ee,$ee,$e6,$00       // char 14 @+14
        .byte $00,$3e,$66,$e6,$e6,$e6,$ec,$00       // char 15 @+15
        .byte $00,$7e,$66,$e6,$ec,$e0,$e0,$00       // char 16 @+16
        .byte $00,$3e,$66,$e6,$e6,$ec,$6e,$00       // char 17 @+17
        .byte $00,$7e,$66,$ec,$e6,$e6,$e6,$00       // char 18 @+18
        .byte $00,$7e,$e0,$7c,$06,$c6,$7c,$00       // char 19 @+19
        .byte $00,$fe,$00                           // char 20 (partial)

txt_08a3:
        .byte $38,$38,$38,$38,$00                   // char 20 (partial)
        .byte $00,$66,$66,$e6,$e6,$c6,$fe,$00       // char 21 @+21
        .byte $00,$66,$66,$e6,$e6,$ec,$70,$00       // char 22 @+22
        .byte $00,$62,$62,$da,$fe,$ee,$c6,$00       // char 23 @+23
        .byte $00,$66,$30,$1c,$30,$e6,$e6,$00       // char 24 @+24
        .byte $00,$e6,$e2,$30,$18,$38,$38,$00       // char 25 @+25
        .byte $00,$7e,$00,$18,$70,$e0,$ee           // char 26 (partial)

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

// --- Region $0909-$091e ---
.pc = $0909 "dat_0909"

dat_0909:
        .byte $0e,$0e,$0c,$08,$20,$30,$00           // char 33 (partial)
        .byte $00,$66,$22,$00,$00,$00,$00,$00       // char 34 '"'
        .byte $00,$6c,$7f,$36,$7f,$1b,$1b           // char 35 (partial)

// --- Region $0939-$09df ---
.pc = $0939 "dat_0939"

dat_0939:
        .byte $0c,$18,$00,$00,$00,$00,$00           // char 39 (partial)
        .byte $00,$0c,$18,$30,$30,$18,$0c,$00       // char 40 '('
        .byte $00,$30,$18,$0c,$0c,$18,$30,$00       // char 41 ')'
        .byte $00,$66,$3c,$0c,$1e,$33,$00,$00       // char 42 '*'
        .byte $00,$18,$18,$7f,$0c,$0c,$00,$00       // char 43 '+'
        .byte $00,$00,$00,$00,$00,$18,$30,$00       // char 44 ','
        .byte $00,$00,$00,$3e,$70,$00,$00,$00       // char 45 '-'
        .byte $00,$00,$00,$00,$00,$18,$18,$00       // char 46 '.'
        .byte $00,$03,$06,$0c,$18,$30,$60,$00       // char 47 '/'
        .byte $00,$3e,$66,$e6,$e6,$e6,$7c,$00       // char 48 '0'
        .byte $00,$18,$38,$18,$38,$38,$3c,$00       // char 49 '1'
        .byte $00,$7e,$86,$3e,$f0,$e0,$fe,$00       // char 50 '2'
        .byte $00,$fe,$86,$3e,$06,$c6,$7c,$00       // char 51 '3'
        .byte $00,$1e,$36,$e6,$ff,$06,$0e,$00       // char 52 '4'
        .byte $00,$fe,$c0,$fc,$06,$c6,$fe,$00       // char 53 '5'
        .byte $00,$7e,$60,$fc,$e6,$e6,$fe,$00       // char 54 '6'
        .byte $00,$f6,$cc,$18,$30,$30,$30,$00       // char 55 '7'
        .byte $00,$7e,$c6,$7c,$c6,$c6,$fc,$00       // char 56 '8'
        .byte $00,$7e,$c6,$76,$06,$c6,$fc,$00       // char 57 '9'
        .byte $00,$00,$30,$00,$30,$00,$00,$00       // char 58 ':'
        .byte $00,$00,$30,$00,$30,$60,$40           // char 59 (partial)

dat_09df:
        // === Fill data (1 bytes, $09df-$09df) ===
        .byte $00                                   // .

// --- Region $0a00-$0c00 ---
.pc = $0a00 "dat_0a00"

dat_0a00:
        .byte $20,$20,$20,$00,$00                   // char 64 (partial)

txt_0a05:
        .byte $20,$20,$20                           // char 64 (partial)
        .byte $20,$00,$00,$00,$20,$20,$20,$00       // char 65 'A'
        .byte $00,$00,$20,$20,$00,$00,$00,$00       // char 66 'B'
        .byte $20,$00,$00,$00,$00,$00,$20,$00       // char 67 'C'
        .byte $20,$20,$20,$00,$00,$00               // char 68 (partial)

txt_0a26:
        .byte $20,$20                               // char 68 (partial)
        .byte $20,$20,$00,$00,$20,$00,$20,$20       // char 69 'E'
        .byte $00,$00                               // char 70 (partial)

txt_0a32:
        .byte $20,$20,$20,$20,$00,$00               // char 70 (partial)
        .byte $20,$00,$20,$00,$00                   // char 71 (partial)

txt_0a3d:
        .byte $20,$20,$20                           // char 71 (partial)
        .byte $20,$20,$20,$00,$20,$20,$20,$00       // char 72 'H'
        .byte $20,$20,$00,$00                       // char 73 (partial)

txt_0a4c:
        .byte $20,$20,$20,$20                       // char 73 (partial)
        .byte $20,$20,$00,$00,$00,$20,$20,$20       // char 74 'J'
        .byte $00,$00,$00,$20,$20,$20,$00,$00       // char 75 'K'
        .byte $00,$00,$20,$20,$00,$00,$00           // char 76 (partial)

txt_0a67:
        .byte $20                                   // char 76 (partial)
        .byte $20,$20,$20,$00,$20,$20,$20,$00       // char 77 'M'
        .byte $20,$20,$00,$00,$00                   // char 78 (partial)

txt_0a75:
        .byte $20,$20,$20                           // char 78 (partial)
        .byte $20,$00,$00,$20,$20,$00,$20,$00       // char 79 'O'
        .byte $00                                   // char 80 (partial)

txt_0a81:
        .byte $20,$20,$20,$20,$00,$00,$20           // char 80 (partial)
        .byte $20,$00                               // char 81 (partial)

txt_0a8a:
        .byte $20,$20,$20,$20,$00,$00               // char 81 (partial)
        .byte $20,$20,$20,$00,$20,$20,$20,$00       // char 82 'R'
        .byte $20,$00,$00                           // char 83 (partial)

txt_0a9b:
        .byte $20,$20,$20,$20,$20                   // char 83 (partial)
        .byte $20,$00,$00,$00,$00,$20,$20,$00       // char 84 'T'
        .byte $00,$00,$00,$00,$20,$00,$00,$20       // char 85 'U'
        .byte $20,$00,$20,$00,$00,$00,$00           // char 86 (partial)

txt_0ab7:
        .byte $20                                   // char 86 (partial)
        .byte $20,$20,$20,$00,$20,$20,$20,$00       // char 87 'W'
        .byte $20,$00,$00,$00,$00,$00               // char 88 (partial)

dat_0ac6:
        .text "                                                    "
        .byte $00                                   // string terminator
        .byte $00                                   // char 95 (partial)

txt_0afc:
        .byte $20,$20,$20,$20                       // char 95 (partial)
        .byte $00,$00,$00,$20,$00,$00,$20,$00       // char 96 '`'
        .byte $00,$20,$20,$00,$00,$00,$00           // char 97 (partial)

txt_0b0f:
        .byte $20                                   // char 97 (partial)
        .byte $20,$20,$20,$20,$20,$20,$20,$20       // char 98 'b'
        .byte $20,$20,$20,$20,$20,$20,$20,$20       // char 99 'c'
        .byte $20,$00,$00,$20,$00,$20,$20,$00       // char 100 'd'
        .byte $00,$20,$00,$20,$20,$00,$20,$00       // char 101 'e'
        .byte $00,$20,$00,$00                       // char 102 (partial)

txt_0b34:
        .byte $20,$20,$20,$20                       // char 102 (partial)
        .byte $20,$20,$20,$20,$20,$20,$20,$20       // char 103 'g'
        .byte $20,$20,$20,$20,$20,$20,$20,$20       // char 104 'h'
        .byte $20,$00,$00,$00,$20,$20,$20,$00       // char 105 'i'
        .byte $20,$20,$00,$20,$20,$20,$00,$00       // char 106 'j'
        .byte $20,$20,$20,$00,$00,$00               // char 107 (partial)

txt_0b5e:
        .byte $20,$20                               // char 107 (partial)
        .byte $20,$20,$20,$20,$20,$20,$20,$20       // char 108 'l'
        .byte $20,$20,$20,$20,$20,$20,$20,$20       // char 109 'm'
        .byte $00,$00,$20,$20,$00,$20,$00,$00       // char 110 'n'
        .byte $20,$00,$00,$20,$20,$00,$00           // char 111 (partial)

txt_0b7f:
        .byte $20                                   // char 111 (partial)
        .byte $20,$20,$20,$20,$20,$00,$00           // char 112 (partial)

txt_0b87:
        .byte $20                                   // char 112 (partial)
        .byte $20,$20,$20,$20,$20,$20,$20,$20       // char 113 'q'
        .byte $20,$20,$20,$20,$20,$20,$20,$20       // char 114 'r'
        .byte $00,$00,$00,$00,$20,$20,$00,$00       // char 115 's'
        .byte $00,$00,$00,$20,$00,$00               // char 116 (partial)

txt_0ba6:
        .byte $20,$20                               // char 116 (partial)
        .byte $20,$20,$00,$00,$00,$00               // char 117 (partial)

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

// --- Region $0c8c-$0c9f ---
.pc = $0c8c "chr_0c8c"

chr_0c8c:
        // === Charset data (20 bytes, $0c8c-$0c9f) ===
        .byte $00,$00,$00,$00,$00,$00,$00,$00       // char 0 @+0
        .byte $00,$00,$00,$00,$00,$00,$00,$00       // char 1 @+1
        .byte $00,$00,$00,$00                       // char 2 (partial)

// --- Region $0d01-$0e9f ---
.pc = $0d01 "Program $0d01"
        .byte $24,$a9,$00,$9d,$00,$d4               // char 0 (partial)
        .byte $bd,$80,$81,$9d,$00,$d4,$ca,$10       // char 1 @+1
        .byte $f2,$a9,$03,$85,$78,$20,$a4,$80       // char 2 @+2
        .byte $4c,$00,$10,$00,$00,$00,$00,$00       // char 3 @+3
        .byte $00,$c6,$70,$d0,$77,$a5,$71,$85       // char 4 @+4
        .byte $70,$c6,$75,$d0,$25,$a4,$72,$b1       // char 5 @+5
        .byte $7a,$c9,$ff,$f0,$6a,$8d,$01,$d4       // char 6 @+6
        .byte $c8,$d0,$02,$e6,$7b,$b1,$7a,$8d       // char 7 @+7
        .byte $00,$d4,$c8,$d0,$02,$e6,$7b,$b1       // char 8 @+8
        .byte $7a,$85,$75,$c8,$d0,$02,$e6,$7b       // char 9 @+9
        .byte $84,$72,$c6,$76,$d0,$21,$a4,$73       // char 10 @+10
        .byte $b1,$7c,$8d,$08,$d4,$c8,$d0,$02       // char 11 @+11
        .byte $e6,$7d,$b1,$7c,$8d,$07,$d4,$c8       // char 12 @+12
        .byte $d0,$02,$e6,$7d,$b1,$7c,$85,$76       // char 13 @+13
        .byte $c8,$d0,$02,$e6,$7d,$84,$73,$c6       // char 14 @+14
        .byte $77,$d0,$21,$a4,$74,$b1,$7e,$8d       // char 15 @+15
        .byte $0f                                   // char 16 (partial)

spr_0d80:
        .byte $d4,$c8,$d0,$02,$e6,$7f,$b1           // char 16 (partial)
        .byte $7e,$8d,$0e,$d4,$c8,$d0,$02,$e6       // char 17 @+17
        .byte $7f,$b1,$7e,$85,$77,$c8,$d0,$02       // char 18 @+18
        .byte $e6,$7f,$84,$74,$4c,$7e,$ea,$20       // char 19 @+19
        .byte $a4,$80,$4c,$7e,$ea,$a9,$00,$85       // char 20 @+20
        .byte $72,$85,$73,$85,$74,$a9,$01,$85       // char 21 @+21
        .byte $75,$85,$76,$85,$77,$85,$70,$a6       // char 22 @+22
        .byte $78,$bd,$00,$81,$85,$7a,$bd,$10       // char 23 @+23
        .byte $81,$85,$7b,$bd,$20,$81,$85,$7c       // char 24 @+24
        .byte $bd,$30,$81,$85,$7d,$bd,$40,$81       // char 25 @+25
        .byte $85,$7e,$bd,$50,$81,$85,$7f,$bd       // char 26 @+26
        .byte $60,$81,$85,$71,$60,$00,$00,$00       // char 27 @+27
        .byte $00,$78,$a9,$20,$8d,$14,$03,$a9       // char 28 @+28
        .byte $80,$8d,$15,$03,$58,$60,$00,$00       // char 29 @+29
        .byte $00,$00,$00,$00,$00,$00,$00,$00       // char 30 @+30
        .byte $00,$00,$00,$00,$00,$00,$00,$00       // char 31 @+31
        .byte $00,$00,$00,$a0,$00,$60,$60,$60       // char 32 ' '
        .byte $00,$c0,$b0,$90,$60,$40,$c0,$60       // char 33 '!'
        .byte $ff,$82,$90,$8c,$8a,$83,$87,$8f       // char 34 '"'
        .byte $91,$85,$82,$8e,$91,$95,$8d,$8d       // char 35 '#'
        .byte $ff,$38,$38,$20,$00,$88,$d0,$a0       // char 36 '$'
        .byte $20,$68,$d8,$c0,$60,$00,$f0,$80       // char 37 '%'
        .byte $ff,$82,$90,$8d,$8b,$84,$87,$8f       // char 38 '&'
        .byte $91,$86,$82,$8e,$92,$97,$8d,$8d       // char 39 '''
        .byte $ff,$78,$78,$70,$00,$50,$d0,$d8       // char 40 '('
        .byte $40,$08,$20,$f0,$60,$00,$40,$98       // char 41 ')'
        .byte $ff,$82,$90,$9e,$8c,$85,$88,$8f       // char 42 '*'
        .byte $91,$87,$83,$8e,$94,$9b,$8e,$8d       // char 43 '+'
        .byte $ff,$06,$08,$07,$06,$08,$06,$02       // char 44 ','
        .byte $06,$04,$05,$06,$08,$04,$05,$06       // char 45 '-'
        .byte $ff,$00,$00,$00,$00,$00,$00,$00       // char 46 '.'
        .byte $00,$00,$00,$00,$00,$00,$00,$00       // char 47 '/'
        .byte $00,$00,$00,$03,$0b,$21,$88,$ce       // char 48 '0'
        .byte $00,$00,$41,$03,$21,$88,$c0,$00       // char 49 '1'
        .byte $00,$83,$02,$41,$00,$f0,$03,$98       // char 50 '2'
        .byte $10,$5f,$00,$00,$00,$00,$00,$00       // char 51 '3'
        .byte $00                                   // char 52 (partial)

// --- Region $0eb1-$0ed8 ---
.pc = $0eb1 "Program $0eb1"
        .byte $a9,$30,$85,$01,$a2,$00,$bd           // char 0 (partial)
        .byte $80,$1a,$9d,$01,$08,$e8,$d0,$f7       // char 1 @+1
        .byte $ee,$c0,$03,$ee,$c3,$03,$ad,$c0       // char 2 @+2
        .byte $03,$c9,$00,$d0,$ea,$a9,$37,$85       // char 3 @+3
        .byte $01,$58,$4c,$e2,$fc,$4c,$ae,$a7       // char 4 @+4

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

// --- Region $0ef9-$0f1b ---
.pc = $0ef9 "dat_0ef9"

dat_0ef9:
        .byte $94,$88,$85,$a0,$93,$99,$8e           // char 9 (partial)
        .byte $84,$89,$83,$81,$94,$85,$a0,$8f       // char 10 @+10
        .byte $86,$a0,$94,$88,$85,$a0,$82,$85       // char 11 @+11
        .byte $81,$93,$94,$89,$85,$a0,$82,$8f       // char 12 @+12
        .byte $99,$93,$60                           // char 13 (partial)

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

// --- Region $0f80-$0f9f ---
.pc = $0f80 "dat_0f80"

dat_0f80:
        .byte $a2,$08,$a9,$02,$9d,$26,$d0,$ca       // char 26 @+26
        .byte $d0,$fa,$60,$ea,$ea,$ea,$ea,$ea       // char 27 @+27
// Referenced by: jsr from $1096

sub_0f90:
        .byte $a2,$08,$9d,$26,$d0,$ca,$d0,$fa       // char 28 @+28
        .byte $60,$00,$00,$00,$00,$00,$00,$00       // char 29 @+29

// --- Region $0fc0-$0fdf ---
.pc = $0fc0 "Program $0fc0"
        .byte $ff,$d6,$d6,$d6,$d6,$d6               // char 0 (partial)
        .byte $d6,$aa,$00,$3c,$6c,$c6,$f6,$c6       // char 1 @+1
        .byte $c6,$00,$00,$7c,$e6,$f8,$ce,$c6       // char 2 @+2
        .byte $fc,$00,$00,$3c,$66,$c0,$c0,$e0       // char 3 @+3
        .byte $7e                                   // char 4 (partial)

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

// --- Region $1000-$104f ---
.pc = $1000 "dat_1000"

dat_1000:
        .byte $78,$a9,$7f,$8d,$0d,$dc,$a9,$81,$8d,$1a,$d0,$a9,$1b,$8d,$11,$d0 // x...............
        .byte $a9,$50,$8d,$14,$03,$a9,$10,$8d,$15,$03,$58,$a9,$ff,$8d,$15,$d0 // .P........X.....
        .byte $8d,$1d,$d0,$ea,$ea,$ea,$a2,$08,$a0,$2f,$98,$9d,$f7,$07,$88,$ca // ........./......
        .byte $d0,$f8,$a2,$10,$bd,$80,$11,$9d,$00,$d0,$ca,$10,$f7,$20,$6b,$11 // ............. k.
        .byte $4c,$a0,$11,$00,$9d,$00,$0a,$9d,$00,$0b,$e8,$d0,$f7,$4c,$a0,$11 // L............L..

// --- Region $117e-$1190 ---
.pc = $117e "dat_117e"

dat_117e:
        .byte $00,$00,$f6,$d1,$2e,$d1,$5e,$d1,$8e,$d1,$be,$d1,$ee,$d1,$1e,$d1 // ......^.........
        .byte $4e,$d1,$c1                           // N..

// --- Region $1198-$11bf ---
.pc = $1198 "Segment $1198"
        .byte $06,$0e,$03,$01,$01,$03,$0e,$06,$20,$80,$0f,$60,$00,$00,$00,$00 // ........ ..`....
        .byte $00,$c9,$10,$60,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ...`............
        .fill 8, $00

// --- Region $11f7-$11ff ---
.pc = $11f7 "Segment $11f7"
        .byte $28,$12,$4c,$28,$12,$00,$00,$00,$00   // (.L(.....

// --- Region $1277-$12df ---
.pc = $1277 "Segment $1277"
        .fill 9, $ea
        .byte $02,$08,$08,$0a,$0a,$07,$07,$07,$0d,$0d,$01,$01,$0d,$0d,$07,$07 // ................
        .byte $07,$07,$07,$07,$07,$08,$08,$08,$02,$02,$02,$02,$08,$08,$0a,$0a // ................
        .byte $07,$07,$07,$0d,$0d,$01,$01,$0d,$0d,$07,$07,$07,$07,$07,$0a,$0a // ................
        .byte $08,$08,$02,$02,$02,$02,$08,$08,$0a,$0a,$07,$07,$07,$0d,$0d,$01 // ................
        .byte $01,$0d,$0d,$07,$07,$07,$07,$07,$07,$07,$0a,$0a,$08,$08,$02,$02 // ................
        .byte $02,$02,$08,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................

// --- Region $1300-$18de ---
.pc = $1300 "dat_1300"

dat_1300:
        .byte $13                                   // .

txt_1301:
        .text "           THE WORLD FAMOUS"
        .fill 14, $8d

txt_132a:
        .text "               PRESENT"
        .byte $8d,$8d                               // ..

txt_1342:
        .text "      HUNT"
        .byte $60,$46,$4f,$52,$60,$54,$48,$45,$60,$52,$45,$44,$60 // `FOR`THE`RED`

txt_1359:
        .text "OCTOBER"

dat_1360:
        // === Fill data (200 bytes, $1360-$1427) ===
        .fill 200, $20

txt_1428:
        .encoding "screencode_mixed"
        .text "this program was cracked by captain future. greetings to fbr, fairlight(crack instead of enjoying porns), scoop, radwar/tlc, triad, hotline and all friends"
        .encoding "petscii_upper"

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

dat_14cd:
        .text "                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  "
        .byte $1f                                   // .

txt_16f0:
        .text "                "
        .byte $00                                   // string terminator
        .byte $18,$04,$0f,$d2,$04,$10,$c3,$04,$15,$1f,$04,$12,$d1,$06,$10,$c3 // ................
        .byte $02,$0f,$d2,$02,$0e,$18,$02,$0c,$8f,$04,$0e,$18,$04,$0f,$d2,$04 // ................
        .byte $10,$c3,$04,$15,$1f,$04,$19,$1e,$06,$1c,$31,$02,$19,$1e,$02,$16 // ..........1.....
        .byte $60,$02,$15,$1f,$02,$1c,$31,$01,$1d,$df,$01,$1f,$a5,$04,$1c,$31 // `.....1........1
        .byte $04,$1f,$a5,$04,$1c,$31,$04,$25,$a2,$06,$2a,$3e,$02,$25,$a2,$02 // .....1.%..*>.%..
        .byte $21,$87,$02,$1c,$31,$02,$1c,$31,$01,$1d,$df,$01,$1f,$a5,$04,$1c // !...1..1........
        .byte $31,$04,$1f,$a5,$04,$1c,$31,$04,$25,$a2,$06,$2a,$3e,$02,$25,$a2 // 1.....1.%..*>.%.
        .byte $02,$21,$87,$02,$1c,$31,$04,$25,$a2,$06,$2a,$3e,$02,$25,$a2,$02 // .!...1.%..*>.%..
        .byte $21,$87,$02,$1c,$31,$04,$25,$a2,$06,$2a,$3e,$02,$25,$a2,$02,$21 // !...1.%..*>.%..!
        .byte $87,$02,$1c,$31,$04,$25,$a2,$06,$2a,$3e,$02,$25,$a2,$02,$21,$87 // ...1.%..*>.%..!.
        .byte $02,$1c,$31,$04,$25,$a2,$01,$2a,$3e,$01,$25,$a2,$01,$21,$87,$01 // ..1.%..*>.%..!..
        .byte $1f,$a5,$01,$21,$87,$01,$1f,$a5,$01,$1c,$31,$01,$19,$1e,$01,$1c // ...!......1.....
        .byte $31,$01,$19,$1e,$01,$16,$60,$01,$15,$1f,$01,$16,$60,$01,$15,$1f // 1.....`.....`...
        .byte $01,$12,$d1,$01,$10,$c3,$01,$12,$d1,$01,$10,$c3,$01,$0f,$d2,$01 // ................
        .byte $0e,$18,$01,$0f,$d2,$01,$0e,$18,$01,$0d,$4e,$01,$ff,$00,$00,$00 // ..........N.....
        .fill 15, $00
        .byte $15,$1f,$02,$10,$c3,$02,$03,$88,$04,$15,$1f,$02,$10,$c3,$02,$03 // ................
        .byte $88,$04,$17,$b5,$02,$12,$d1,$02,$04,$b6,$04,$17,$b5,$02,$12,$d1 // ................
        .byte $02,$04,$b6,$04,$15,$1f,$02,$10,$c3,$02,$03,$88,$04,$15,$1f,$02 // ................
        .byte $10,$c3,$02,$03,$88,$04,$10,$c3,$02,$0e,$18,$02,$05,$96,$04,$10 // ................
        .byte $c3,$02,$0e,$18,$02,$05,$96,$04,$15,$1f,$02,$10,$c3,$02,$03,$88 // ................
        .byte $04,$15,$1f,$02,$10,$c3,$02,$03,$88,$04,$10,$c3,$02,$0e,$18,$02 // ................
        .byte $05,$96,$04,$10,$c3,$02,$0e,$18,$02,$05,$96,$04,$15,$1f,$02,$10 // ................
        .byte $c3,$02,$03,$88,$04,$15,$1f,$02,$10,$c3,$02,$03,$88,$04,$10,$c3 // ................
        .byte $02,$0e,$18,$02,$05,$96,$04,$10,$c3,$02,$0e,$18,$02,$05,$96,$04 // ................
        .byte $1c,$31,$02,$16,$60,$02,$04,$b6,$04,$1c,$31,$02,$16,$60,$02,$04 // .1..`.....1..`..
        .byte $b7,$04,$1f,$a5,$02,$1a,$9c,$02,$05,$49,$04,$1f,$a5,$02,$1a,$9c // .........I......
        .byte $02,$05,$47,$04,$1c,$31,$02,$16,$60,$02,$04,$b6,$04,$1c,$31,$02 // ..G..1..`.....1.
        .byte $16,$60,$02,$04,$b6,$04,$0d,$4e,$03,$08,$61,$03,$07,$e9,$03,$0e // .`.....N..a.....
        .byte $18,$03,$0b,$da,$03,$0d,$4e,$03,$10,$c3,$03,$0d,$4e,$03 // ......N.....N.

dat_18de:
        // === Fill data (1 bytes, $18de-$18de) ===
        .byte $00                                   // .

// --- Region $1902-$19ff ---
.pc = $1902 "dat_1902"

dat_1902:
        .byte $04,$03,$86,$04,$00,$00,$04,$03,$86,$04,$00,$00,$04,$04,$b4,$04 // ................
        .byte $00,$00,$04,$04,$b4,$04,$00,$00,$04,$03,$84,$04,$00,$00,$04,$03 // ................
        .byte $86,$04,$00,$00,$04,$05,$98,$04,$00,$00,$04,$05,$98,$04,$00,$00 // ................
        .byte $04,$03,$86,$04,$00,$00,$04,$03,$86,$04,$00,$00,$04,$05,$98,$04 // ................
        .byte $00,$00,$04,$05,$98,$04,$00,$00,$04,$03,$86,$04,$00,$00,$04,$03 // ................
        .byte $86,$04,$00,$00,$04,$05,$98,$04,$00,$00,$04,$05,$98,$04,$00,$00 // ................
        .byte $04,$04,$b4,$04,$00,$00,$04,$04,$b4,$04,$00,$00,$04,$05,$47,$04 // ..............G.
        .byte $00,$00,$04,$05,$47,$04,$00,$00,$04,$04,$b4,$04,$00,$00,$04,$04 // ....G...........
        .byte $b4,$04,$05,$47,$03,$07,$0c,$03,$06,$47,$03,$05,$98,$03,$04,$b4 // ...G.....G......
        .byte $03,$05,$47,$03,$07,$0c,$03,$05,$47,$03,$ff,$ff,$ff,$ff,$21,$87 // ..G.....G.....!.
        .byte $02,$15,$1f,$02,$1f,$a5,$02,$15,$1f,$02,$1c,$31,$02,$15,$1f,$02 // ...........1....
        .byte $19,$1e,$02,$15,$1f,$02,$1f,$a5,$02,$12,$d1,$02,$1c,$31,$02,$12 // .............1..
        .byte $d1,$02,$19,$1e,$02,$12,$d1,$02,$16,$60,$02,$12,$d1,$02,$1a,$9c // .........`......
        .byte $02,$10,$c3,$02,$19,$1e,$02,$10,$c3,$02,$16,$60,$02,$10,$c3,$02 // ...........`....
        .byte $15,$1f,$02,$10,$c3,$02,$0e,$18,$01,$0f,$d2,$01,$10,$c3,$01,$12 // ................
        .byte $d1,$01,$15,$1f,$01,$12,$d1,$01,$10,$c3,$01,$0f,$d2,$01 // ..............

// --- Region $1a7f-$1a7f ---
.pc = $1a7f "dat_1a7f"

dat_1a7f:
        .byte $80                                   // .