// ============================================
// tlc-02 - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 vdisasm-one 1.0 build 1, 2026-03-29 17:54:26
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $1bff  (5120 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1000 (4096)
// IRQ handler:  $1162 (irq_1162)
// IRQ handler:  $117f (irq_117f)
// IRQ handler:  $11bd (irq_11bd)
//
// Code: 888 bytes, Data: 4232 bytes
// Labels: 112, Subroutines: 12
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1105 ---
.pc = $1000 "main_1000"

main_1000:
        sei
        lda #$62
        sta $0314                                   // set IRQ handler low byte
        lda #$11
        sta $0315                                   // set IRQ handler high byte
        lda #$01
        sta $d01a                                   // raster IRQ on
        sta $cd
        lda #$7f                                    // disable all CIA1 interrupts
        sta $dc0d                                   // disable all CIA IRQs
        lda #$1b
        sta $d011                                   // text mode, screen on, 25 rows, Y-scroll=3
        lda #$13
        sta $d018                                   // screen=$0400, charset=$0800
        ldx #$00

loc_1023:
        lda $1800,x
        sta $0400,x
        lda $1900,x
        sta $0500,x
        lda $1a00,x
        sta $0600,x
        lda $1ae8,x
        sta $06e8,x
        lda #$00
        sta $d800,x
        sta $d900,x
        lda #$08
        sta $da00,x
        lda #$0b
        sta $dae0,x
        sta $db00,x
        inx
        bne loc_1023
        ldx #$2c
        stx $07f9
        stx $07fd
        inx
        stx $07fa
        stx $07fe
        inx
        stx $07f8
        stx $07fc
        stx $07fb
        stx $07ff
        lda #$ff
        sta $d015
        sta $d01c
        lda #$00
        sta $d017
        sta $d01d
        ldx #$00

loc_1081:
        lda #$46
        sta $d001,x
        lda #$5e
        sta $d009,x
        inx
        inx
        cpx #$08
        bne loc_1081
        ldx #$00
        lda #$7d

loc_1095:
        sta $d000,x
        sta $d008,x
        clc
        adc #$21
        inx
        inx
        cpx #$08
        bne loc_1095
        lda #$0e
        sta $d025
        lda #$0f
        sta $d026
        lda #$00
        sta $d020
        sta $d021
        jsr sub_12a1
        jsr sub_13b7
        lda #$48
        sta $b0
        ldx #$00

loc_10c2:
        lda #$06
        sta $d027,x
        inx
        cpx #$08
        bne loc_10c2
        cli

loc_10cd:
        lda $dc01
        cmp #$ef
        bne loc_10cd
        sei
        jsr $fda3
        jsr $fd15
        jsr $ff5b
        lda #$00
        tax
        tay
        sty $d020
        stx $d021

loc_10e8:
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_10e8
        dex
        txs

loc_10f9:
        lda dat_1550,y
        sta $0100,y
        iny
        bne loc_10f9
        jmp $0100

dat_1105:
        .byte $00                                   // .

// --- Region $110f-$1220 ---
.pc = $110f "sub_110f"
// Referenced by: jsr from $114d

sub_110f:
        sta smc_112f                                // SMC: modifies $112f
        lda #$d8
        sta $af
        lda $1700,x
        sta $ae
        ldy $1600,x
        beq loc_112e

loc_1120:
        lda $ae
        clc
        adc #$28
        sta $ae
        bcc loc_112b
        inc $af

loc_112b:
        dey
        bne loc_1120

loc_112e:
.label smc_112f = * + 1
        lda #$01                                    // !SMC: modified by $110f
        sta ($ae),y
        rts

// Referenced by: jsr from $1143
sub_1133: {
        cpx #$00
        beq done
        rts
done:
        ldx #$48
        stx $b0
        ldx #$00
        rts
}
// Referenced by: jsr from $11dc, $11df

sub_113f:
        dec $b0
        ldx $b0
        jsr sub_1133
        ldy #$00

loc_1148:
        lda dat_115d,y
        sty $b5
        jsr sub_110f
        txa
        clc
        sbc #$05
        tax
        ldy $b5
        iny
        cpy #$05
        bne loc_1148
        rts

dat_115d:
        .byte $00,$02,$07,$0d,$06                   // .....

// ============================================
// IRQ handler
// ============================================

irq_1162:
        lda #$01
        sta $d019                                   // raster // acknowledge raster IRQ
        sei
        lda #$c8
        sta $d016                                   // hires, 40 cols, X-scroll=0
        lda #$96
        sta $d012
        lda #$7f
        sta $0314                                   // set IRQ handler low byte
        lda #$11
        sta $0315                                   // set IRQ handler high byte
        jmp $ea81

// ============================================
// IRQ handler
// ============================================
irq_117f: {
        lda #$01
        sta $d019                                   // raster // acknowledge raster IRQ
        lda #$d8
        sta $d016                                   // multicolor, 40 cols, X-scroll=0
        ldx #$9a
        stx $d012
loop1:
        lda $1187,x
        sta $d022
        lda $11c7,x
        sta $d023
        inx
loop2:
        cpx $d012
        bne loop2
        cpx #$c8
        bne loop1
        lda #$c8
        sta $d016                                   // hires, 40 cols, X-scroll=0
        ldx #$00
loop3:
        inx
        cpx #$cd
        bne loop3
        lda #$bd
        sta $0314                                   // set IRQ handler low byte
        lda #$11
        sta $0315                                   // set IRQ handler high byte
        jmp $ea81
}

// ============================================
// IRQ handler
// ============================================

irq_11bd:
        lda #$01
        sta $d019                                   // raster // acknowledge raster IRQ
.label smc_11c3 = * + 1
        lda #$23                                    // !SMC: modified by $135b
        sta $d016                                   // hires, 38 cols, X-scroll=3
        lda #$f9
        sta $d012
        lda #$62
        sta $0314                                   // set IRQ handler low byte
        lda #$11
        sta $0315                                   // set IRQ handler high byte
        jsr sub_11f5
        jsr sub_13fa
        jsr sub_113f
        jsr sub_113f
        jsr sub_1342
        lda $1261
        ldy #$00

loc_11ea:
        sta $daf8,y
        iny
        cpy #$28
        bne loc_11ea
        jmp $ea7e

// Referenced by: jsr from $11d6
sub_11f5: {
        ldy dat_1221
        ldx #$00
loop:
        lda $1222,x
        sta dat_1221,x
        inx
        cpx #$40
        bne loop
        sty $1260
        jsr sub_120f
        jsr sub_120f
        rts
}
// Referenced by: jsr from $1208, $120b

sub_120f:
        ldy $12a0
        ldx #$3f

loc_1214:
        lda $1260,x
        sta $1261,x
        dex
        bne loc_1214
        sty $1261
        rts

// --- Region $12a1-$13d1 ---
.pc = $12a1 "sub_12a1"

// Referenced by: jsr from $10b6
sub_12a1: {
        lda #$2f
        sta $35
        lda #$14
        sta $36
        lda #$00
        sta $02a7
        lda #$08
        sta $cc
        lda #$00
        tay
        sta $fb
        sta $fd
        sta $02
        lda #$d0
        sta $fc
        lda #$0c
        sta $fe
        lda #$0e
        sta $03
        sei
        lda #$33
        sta $01
loop1:
        lda #$00
        pha
        lda ($fb),y
        tax
        and #$80
        beq skip1
        pla
        eor #$c0
        pha
skip1:
        txa
        and #$40
        beq skip2
        pla
        eor #$30
        pha
skip2:
        txa
        and #$20
        beq skip3
        pla
        eor #$0c
        pha
skip3:
        txa
        and #$10
        beq skip4
        pla
        eor #$03
        pha
skip4:
        pla
        sta ($fd),y
        lda #$00
        pha
        txa
        and #$08
        beq skip5
        pla
        eor #$c0
        pha
skip5:
        txa
        and #$04
        beq skip6
        pla
        eor #$30
        pha
skip6:
        txa
        and #$02
        beq skip7
        pla
        eor #$0c
        pha
skip7:
        txa
        and #$01
        beq skip8
        pla
        eor #$03
        pha
skip8:
        pla
        sta ($02),y
        iny
        bne loop1
        inc $fc
        inc $fe
        inc $03
        lda $fc
        cmp #$d2
        bne loop1
        ldx #$00
        txa
loop2:
        sta chr_0800,x
        inx
        cpx #$08
        bne loop2
        lda #$37
        sta $01
        cli
        rts
}
// Referenced by: jsr from $11e2

sub_1342:
        ldx #$04

loc_1344:
        dec $cc
        dex
        bne loc_1344
        ldx $cc
        bne loc_1357
        lda #$08
        sta $cc
        jsr sub_139d
        jsr sub_136c

loc_1357:
        txa
        clc
        adc #$1f
        sta smc_11c3                                // SMC: modifies $11c3
        rts

loc_135f:
        lda #$2f
        sta $35
        lda #$14
        sta $36
        lda #$00
        sta $02a7

// Referenced by: jsr from $1354
sub_136c: {
        lda $a4
        beq skip
        ldy $02a7
        lda ($35),y
        beq loc_135f
        eor #$40
        clc
        adc #$80
        sta $07e7
        lda #$00
        sta $a4
        inc $02a7
        bne done
        inc $36
done:
        rts
skip:
        ldy $02a7
        lda ($35),y
        beq loc_135f
        clc
        adc #$80
        sta $07e7
        lda #$01
        sta $a4
        rts
}

// Referenced by: jsr from $1351
sub_139d: {
        ldx #$00
loop:
        lda $07c1,x
        sta $07c0,x
        lda $1261,x
        sta $dbc0,x
        lda dat_1221,x
        sta $db48,x
        inx
        cpx #$28
        bne loop
        rts
}
// Referenced by: jsr from $10b9

sub_13b7:
        ldx #$00

loc_13b9:
        lda $1600,x
        sta $16b8,x
        lda $1700,x
        sta dat_17b8,x
        inx
        cpx #$48
        bne loc_13b9
        rts
// Referenced by: jsr from $140e

sub_13cb:
        sec
        sbc #$a0
        sta $d001,y
        rts

// --- Region $13fa-$142f ---
.pc = $13fa "sub_13fa"
// Referenced by: jsr from $11d9

sub_13fa:
        ldx #$00
        ldy #$00

loc_13fe:
        tya
        pha
        lda $13f2,x
        tay
        lda dat_13d2,y
        sta $cb
        pla
        tay
        sec
        sbc $cb
        jsr sub_13cb
        iny
        iny
        inx
        cpx #$08
        bne loc_13fe
        ldx #$00

loc_141a:
        inc $13f2,x
        lda $13f2,x
        cmp #$20
        bne loc_1429
        lda #$00
        sta $13f2,x

loc_1429:
        inx
        cpx #$08
        bne loc_141a
        rts

txt_142f:
        .text " "

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

// --- Region $0800-$0acd ---
.pc = $0800 "chr_0800"

chr_0800:
        // === Charset data (718 bytes, $0800-$0acd) ===
        .byte $00,$00,$00,$00,$00,$00,$00,$00       // char 0 @+0
        .byte $00,$00,$00,$00,$00,$00,$01,$1f       // char 1 @+1
        .byte $00,$00,$00,$00,$00,$1f,$ff,$f0       // char 2 @+2
        .byte $00,$00,$00,$03,$ff,$fe,$80,$00       // char 3 @+3
        .byte $00,$00,$03,$ff,$fe,$00,$00,$00       // char 4 @+4
        .byte $00,$00,$ff,$ff,$00,$00,$00,$00       // char 5 @+5
        .byte $00,$00,$f8,$ff,$0f,$00,$00,$00       // char 6 @+6
        .byte $00,$00,$00,$f8,$ff,$0f,$00,$00       // char 7 @+7
        .byte $00,$00,$00,$00,$e0,$ff,$3f,$01       // char 8 @+8
        .byte $00,$00,$00,$00,$00,$00,$f0,$ff       // char 9 @+9
        .byte $00,$00,$00,$00,$00,$00,$00,$03       // char 10 @+10
        .byte $00,$00,$00,$01,$0f,$3f,$fc,$e0       // char 11 @+11
        .byte $01,$0f,$7f,$fc,$e0,$00,$00,$00       // char 12 @+12
        .byte $ff,$f0,$80,$00,$00,$00,$00,$00       // char 13 @+13
        .byte $1f,$01,$00,$00,$00,$00,$00,$00       // char 14 @+14
        .byte $f0,$fe,$3f,$07,$00,$00,$00,$00       // char 15 @+15
        .byte $00,$00,$c0,$f0,$fe,$1f,$07,$00       // char 16 @+16
        .byte $00,$00,$00,$00,$00,$80,$e0,$f8       // char 17 @+17
        .byte $00,$00,$00,$03,$07,$1f,$3e,$78       // char 18 @+18
        .byte $0f,$3e,$f8,$e0,$c0,$00,$00,$00       // char 19 @+19
        .byte $80,$00,$00,$00,$00,$00,$00,$00       // char 20 @+20
        .byte $3e,$0f,$03,$00,$00,$00,$00,$00       // char 21 @+21
        .byte $00,$80,$e0,$f8,$7c,$1f,$0f,$03       // char 22 @+22
        .byte $00,$00,$00,$00,$00,$00,$80,$c0       // char 23 @+23
        .byte $00,$03,$07,$0f,$1e,$3c,$78,$70       // char 24 @+24
        .byte $f0,$c0,$80,$00,$00,$00,$00,$00       // char 25 @+25
        .byte $01,$00,$00,$00,$00,$00,$00,$00       // char 26 @+26
        .byte $e0,$78,$3c,$1e,$0f,$07,$03,$01       // char 27 @+27
        .byte $00,$00,$00,$00,$00,$80,$c0,$c0       // char 28 @+28
        .byte $00,$01,$01,$03,$07,$07,$06,$0e       // char 29 @+29
        .byte $e0,$c0,$c0,$80,$00,$00,$00,$00       // char 30 @+30
        .byte $e0,$70,$70,$38,$1c,$1c,$0c,$0e       // char 31 @+31
        .byte $0c,$1c,$1c,$18,$18,$18,$18,$18       // char 32 ' '
        .byte $06,$07,$07,$03,$03,$03,$03,$03       // char 33 '!'
        .byte $18,$18,$18,$18,$18,$18,$1c,$1c       // char 34 '"'
        .byte $03,$03,$03,$03,$03,$03,$07,$07       // char 35 '#'
        .byte $0c,$0e,$06,$07,$07,$03,$01,$01       // char 36 '$'
        .byte $06,$0e,$0c,$1c,$1c,$38,$70,$70       // char 37 '%'
        .byte $e0,$70,$78,$3c,$1e,$0f,$07,$03       // char 38 '&'
        .byte $00,$01,$03,$07,$0f,$1e,$3c,$78       // char 39 '''
        .byte $f0,$78,$3e,$1f,$07,$03,$00,$00       // char 40 '('
        .byte $00,$00,$00,$00,$c0,$e0,$f8,$3e       // char 41 ')'
        .byte $00,$00,$00,$00,$00,$00,$03,$0f       // char 42 '*'
        .byte $01,$03,$0f,$1f,$7c,$f8,$e0,$80       // char 43 '+'
        .byte $e0,$c0,$80,$00,$00,$00,$00,$00       // char 44 ','
        .byte $0f,$03,$00,$00,$00,$00,$00,$00       // char 45 '-'
        .byte $80,$e0,$fc,$3f,$0f,$01,$00,$00       // char 46 '.'
        .byte $00,$00,$00,$00,$e0,$fc,$7f,$0f       // char 47 '/'
        .byte $00,$00,$00,$00,$00,$00,$80,$f0       // char 48 '0'
        .byte $00,$00,$00,$00,$00,$00,$00,$01       // char 49 '1'
        .byte $00,$00,$00,$00,$00,$07,$3f,$fe       // char 50 '2'
        .byte $00,$00,$07,$1f,$fe,$f0,$c0,$00       // char 51 '3'
        .byte $3e,$f8,$e0,$80,$00,$00,$00,$00       // char 52 '4'
        .byte $ff,$1f,$01,$00,$00,$00,$00,$00       // char 53 '5'
        .byte $00,$f0,$ff,$1f,$00,$00,$00,$00       // char 54 '6'
        .byte $00,$00,$80,$fe,$ff,$03,$00,$00       // char 55 '7'
        .byte $00,$00,$00,$00,$fe,$ff,$03,$00       // char 56 '8'
        .byte $00,$00,$00,$00,$00,$ff,$ff,$00       // char 57 '9'
        .byte $00,$00,$00,$00,$0f,$ff,$f8,$00       // char 58 ':'
        .byte $00,$00,$00,$0f,$ff,$f8,$00,$00       // char 59 ';'
        .byte $00,$01,$3f,$ff,$e0,$00,$00,$00       // char 60 '<'
        .byte $1f,$ff,$f0,$00,$00,$00,$00,$00       // char 61 '='
        .byte $f0,$00,$00,$00,$00,$00,$00,$00       // char 62 '>'
        .byte $00,$00,$00,$00,$00,$00,$00,$00       // char 63 '?'
        .byte $e7,$69,$5a,$96,$a5,$69,$5a,$96       // char 64 '@'
        .byte $ff,$69,$5a,$96,$a5,$69,$5a,$96       // char 65 'A'
        .byte $a5,$69,$5a,$96,$a5,$29,$da,$06       // char 66 'B'
        .byte $a7,$69,$5a,$96,$a5,$69,$5a,$94       // char 67 'C'
        .byte $ff,$00,$ff,$00,$ff,$00,$ff,$00       // char 68 'D'
        .byte $a5,$69,$5a,$96,$a5,$69,$5a,$14       // char 69 'E'
        .byte $ff,$09,$da,$16,$a5,$69,$5a,$96       // char 70 'F'
        .byte $ff,$60,$5b,$94,$a5,$69,$5a,$96       // char 71 'G'
        .byte $bd,$00,$ff,$00,$ff,$00,$ff,$00       // char 72 'H'
        .byte $fd,$00,$ff,$00,$ff,$00,$ff,$82       // char 73 'I'
        .byte $a5,$69,$5a,$96,$a5,$68,$5b,$90       // char 74 'J'
        .byte $a5,$69,$5a,$14,$ff,$00,$ff,$00       // char 75 'K'
        .byte $f5,$29,$da,$16,$e5,$29,$da,$06       // char 76 'L'
        .byte $a5,$69,$5a,$96,$a5,$69,$5a,$96       // char 77 'M'
        .byte $bd,$69,$5a,$96,$a5,$69,$5a,$96       // char 78 'N'
        .byte $fd,$00,$ff,$00,$ff,$00,$ff,$00       // char 79 'O'
        .byte $a7,$69,$5a,$96,$a5,$69,$5a,$96       // char 80 'P'
        .byte $bd,$69,$5a,$96,$a5,$69,$5a,$82       // char 81 'Q'
        .byte $e5,$69,$5a,$96,$a5,$69,$5a,$16       // char 82 'R'
        .byte $a7,$69,$5a,$96,$a5,$69,$5a,$94       // char 83 'S'
        .byte $ff,$00,$ff,$00,$e7,$69,$5a,$96       // char 84 'T'
        .byte $bf,$68,$5a,$96,$a5,$69,$5b,$80       // char 85 'U'
        .byte $af,$60,$5f,$90,$a7,$68,$5a,$96       // char 86 'V'
        .byte $a5,$69,$da,$16,$f5,$09,$fe,$02       // char 87 'W'
        .byte $00,$00,$00,$00,$ff,$00,$ff,$00       // char 88 'X'
        .byte $ff,$00,$ff,$00,$ff                   // char 89 (partial)

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

// --- Region $0b00-$0bc0 ---
.pc = $0b00 "dat_0b00"

dat_0b00:
        .byte $aa,$aa,$aa,$aa,$aa,$aa,$95,$55       // char 96 '`'
        .byte $56,$9f,$ff,$f6,$9f,$ff,$f6,$9f       // char 97 'a'
        .byte $ff,$f6,$9f,$55,$f6,$9f,$55,$f6       // char 98 'b'
        .byte $9f,$ff,$f6,$9f,$ff,$f6,$9f,$ff       // char 99 'c'
        .byte $f6,$95,$55,$f6,$aa,$a9,$f6,$aa       // char 100 'd'
        .byte $a9,$f6,$95,$55,$f6,$9f,$ff,$f6       // char 101 'e'
        .byte $9f,$ff,$f6,$9f,$ff,$f6,$95           // char 102 (partial)

txt_0b37:
        .byte $55                                   // char 102 (partial)
        .byte $56,$aa,$aa,$aa,$aa,$aa,$aa,$50       // char 103 'g'
        .byte $aa,$aa,$aa,$aa,$aa,$aa,$95,$69       // char 104 'h'
        .byte $56,$9f,$69,$f6,$9f,$69,$f6,$9f       // char 105 'i'
        .byte $69,$f6,$9f,$55,$f6,$9f,$55,$f6       // char 106 'j'
        .byte $9f,$ff,$f6,$9f,$ff,$f6,$9f,$ff       // char 107 'k'
        .byte $f6,$95,$55,$f6,$aa,$a9,$f6,$aa       // char 108 'l'
        .byte $a9,$f6,$00,$09,$f6,$00,$09,$f6       // char 109 'm'
        .byte $00,$09,$f6,$00,$09,$f6,$00,$09       // char 110 'n'
        .byte $56,$00,$0a,$aa,$00,$0a,$aa,$50       // char 111 'o'
        .byte $02,$aa,$80,$0a,$aa,$80,$29,$55       // char 112 'p'
        .byte $80,$25,$fd,$80,$27,$fd,$80,$27       // char 113 'q'
        .byte $fd,$80,$27,$fd,$80,$27,$7d,$80       // char 114 'r'
        .byte $25,$7d,$80,$2a,$7d,$80,$2a,$7d       // char 115 's'
        .byte $80,$02,$7d,$80,$aa,$7d,$aa,$aa       // char 116 't'
        .byte $7d,$aa,$95,$7d,$56,$9f,$ff,$f6       // char 117 'u'
        .byte $9f,$ff,$f6,$9f,$ff,$f6,$95           // char 118 (partial)

txt_0bb7:
        .byte $55                                   // char 118 (partial)
        .byte $56,$aa,$aa,$aa,$aa,$aa,$aa,$50       // char 119 'w'

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

// --- Region $0c00-$0fff ---
.pc = $0c00 "dat_0c00"

dat_0c00:
        .byte $0f,$3c,$3c,$3c,$3c,$3c,$0f,$00       // char 128
        .byte $03,$0f,$3c,$3f,$3c,$3c,$3c,$00       // char 129

txt_0c10:
        .byte $3f,$3c,$3c,$3f,$3c,$3c,$3f,$00       // char 130
        .byte $0f,$3c,$3c,$3c,$3c,$3c,$0f,$00       // char 131

txt_0c20:
        .byte $3f,$3c,$3c,$3c,$3c,$3c,$3f,$00       // char 132

txt_0c28:
        .byte $3f,$3c,$3c,$3f,$3c,$3c,$3f,$00       // char 133

txt_0c30:
        .byte $3f,$3c,$3c,$3f,$3c,$3c,$3c,$00       // char 134
        .byte $0f,$3c,$3c,$3c,$3c,$3c,$0f,$00       // char 135

txt_0c40:
        .byte $3c,$3c,$3c,$3f,$3c,$3c,$3c,$00       // char 136
        .byte $0f,$03,$03,$03,$03,$03,$0f,$00       // char 137
        .byte $03,$00,$00,$00,$00,$3c,$0f,$00       // char 138

txt_0c58:
        .byte $3c,$3c,$3f,$3f,$3f,$3c,$3c,$00       // char 139

txt_0c60:
        .byte $3c,$3c,$3c,$3c,$3c,$3c,$3f,$00       // char 140

txt_0c68:
        .byte $3c,$3f,$3f,$3c,$3c,$3c,$3c,$00       // char 141

txt_0c70:
        .byte $3c,$3f,$3f,$3f,$3c,$3c,$3c,$00       // char 142
        .byte $0f,$3c,$3c,$3c,$3c,$3c,$0f,$00       // char 143

txt_0c80:
        .byte $3f,$3c,$3c,$3f,$3c,$3c,$3c,$00       // char 144
        .byte $0f,$3c,$3c,$3c,$3c,$0f,$00,$00       // char 145

txt_0c90:
        .byte $3f,$3c,$3c,$3f,$3f,$3c,$3c,$00       // char 146
        .byte $0f,$3c,$3c,$0f,$00,$3c,$0f,$00       // char 147
        .byte $3f,$03,$03,$03,$03,$03,$03,$00       // char 148

txt_0ca8:
        .byte $3c,$3c,$3c,$3c,$3c,$3c,$0f,$00       // char 149
        .byte $3c,$3c,$3c,$3c,$3c,$0f,$03,$00       // char 150

txt_0cb8:
        .byte $3c,$3c,$3c,$3c,$3f,$3f,$3c,$00       // char 151
        .byte $3c,$3c,$0f,$03,$0f,$3c,$3c,$00       // char 152
        .byte $3c,$3c,$3c,$0f,$03,$03,$03,$00       // char 153
        .byte $3f,$00,$00,$03,$0f,$3c,$3f,$00       // char 154
        .byte $0f,$0f,$0f,$0f,$0f,$0f,$0f,$00       // char 155
        .byte $00,$03,$0f,$3f,$0f,$3c,$ff,$00       // char 156
        .byte $0f,$00,$00,$00,$00,$00,$0f,$00       // char 157
        .byte $00,$03,$0f,$3f,$03,$03,$03,$03       // char 158
        .byte $00,$03,$0f,$3f,$3f,$0f,$03,$00       // char 159
        .byte $00,$00,$00,$00,$00,$00,$00,$00       // char 160
        .byte $03,$03,$03,$03,$00,$00,$03,$00       // char 161
        .byte $3c,$3c,$3c,$00,$00,$00,$00,$00       // char 162
        .byte $3c,$3c,$ff,$3c,$ff,$3c,$3c,$00       // char 163
        .byte $03,$0f,$3c,$0f,$00,$3f,$03,$00       // char 164
        .byte $3c,$3c,$00,$03,$0f,$3c,$30,$00       // char 165
        .byte $0f,$3c,$0f,$0f,$3c,$3c,$0f,$00       // char 166
        .byte $00,$00,$03,$00,$00,$00,$00,$00       // char 167
        .byte $00,$03,$0f,$0f,$0f,$03,$00,$00       // char 168
        .byte $0f,$03,$00,$00,$00,$03,$0f,$00       // char 169
        .byte $00,$3c,$0f,$ff,$0f,$3c,$00,$00       // char 170
        .byte $00,$03,$03,$3f,$03,$03,$00,$00       // char 171
        .byte $00,$00,$00,$00,$00,$03,$03,$0f       // char 172
        .byte $00,$00,$00,$3f,$00,$00,$00,$00       // char 173
        .byte $00,$00,$00,$00,$00,$03,$03,$00       // char 174
        .byte $00,$00,$00,$00,$03,$0f,$3c,$00       // char 175
        .byte $0f,$3c,$3c,$3f,$3c,$3c,$0f,$00       // char 176
        .byte $03,$03,$0f,$03,$03,$03,$3f,$00       // char 177
        .byte $0f,$3c,$00,$00,$0f,$3c,$3f,$00       // char 178
        .byte $0f,$3c,$00,$03,$00,$3c,$0f,$00       // char 179
        .byte $00,$00,$03,$3c,$3f,$00,$00,$00       // char 180
        .byte $3f,$3c,$3f,$00,$00,$3c,$0f,$00       // char 181
        .byte $0f,$3c,$3c,$3f,$3c,$3c,$0f,$00       // char 182
        .byte $3f,$3c,$00,$03,$03,$03,$03,$00       // char 183
        .byte $0f,$3c,$3c,$0f,$3c,$3c,$0f,$00       // char 184
        .byte $0f,$3c,$3c,$0f,$00,$3c,$0f,$00       // char 185
        .byte $00,$00,$03,$00,$00,$03,$00,$00       // char 186
        .byte $00,$00,$03,$00,$00,$03,$03,$0f       // char 187
        .byte $00,$03,$0f,$3c,$0f,$03,$00,$00       // char 188
        .byte $00,$00,$3f,$00,$3f,$00,$00,$00       // char 189
        .byte $3f,$03,$00,$00,$00,$03,$3f,$00       // char 190
        .byte $0f,$3c,$00,$00,$03,$00,$03,$00       // char 191
        .byte $f0,$3c,$fc,$fc,$00,$0c,$f0,$00       // char 192
        .byte $c0,$f0,$3c,$fc,$3c,$3c,$3c,$00       // char 193
        .byte $f0,$3c,$3c,$f0,$3c,$3c,$f0,$00       // char 194
        .byte $f0,$3c,$00,$00,$00,$3c,$f0,$00       // char 195
        .byte $c0,$f0,$3c,$3c,$3c,$f0,$c0,$00       // char 196
        .byte $fc,$00,$00,$c0,$00,$00,$fc,$00       // char 197
        .byte $fc,$00,$00,$c0,$00,$00,$00,$00       // char 198
        .byte $f0,$3c,$00,$fc,$3c,$3c,$f0,$00       // char 199
        .byte $3c,$3c,$3c,$fc,$3c,$3c,$3c,$00       // char 200
        .byte $f0,$c0,$c0,$c0,$c0,$c0,$f0,$00       // char 201
        .byte $fc,$f0,$f0,$f0,$f0,$f0,$c0,$00       // char 202
        .byte $3c,$f0,$c0,$00,$c0,$f0,$3c,$00       // char 203
        .byte $00,$00,$00,$00,$00,$00,$fc,$00       // char 204
        .byte $0f,$3f,$ff,$cf,$0f,$0f,$0f,$00       // char 205
        .byte $3c,$3c,$fc,$fc,$fc,$3c,$3c,$00       // char 206
        .byte $f0,$3c,$3c,$3c,$3c,$3c,$f0,$00       // char 207
        .byte $f0,$3c,$3c,$f0,$00,$00,$00,$00       // char 208
        .byte $f0,$3c,$3c,$3c,$3c,$f0,$fc,$00       // char 209
        .byte $f0,$3c,$3c,$f0,$c0,$f0,$3c,$00       // char 210
        .byte $f0,$3c,$00,$f0,$3c,$3c,$f0,$00       // char 211
        .byte $fc,$c0,$c0,$c0,$c0,$c0,$c0,$00       // char 212

txt_0ea8:
        .byte $3c,$3c,$3c,$3c,$3c,$3c,$f0,$00       // char 213
        .byte $3c,$3c,$3c,$3c,$3c,$f0,$c0,$00       // char 214
        .byte $0f,$0f,$0f,$cf,$ff,$3f,$0f,$00       // char 215
        .byte $3c,$3c,$f0,$c0,$f0,$3c,$3c,$00       // char 216
        .byte $3c,$3c,$3c,$f0,$c0,$c0,$c0,$00       // char 217
        .byte $fc,$3c,$f0,$c0,$00,$00,$fc,$00       // char 218
        .byte $f0,$00,$00,$00,$00,$00,$f0,$00       // char 219
        .byte $f0,$0c,$00,$f0,$00,$0c,$f0,$00       // char 220
        .byte $f0,$f0,$f0,$f0,$f0,$f0,$f0,$00       // char 221
        .byte $00,$c0,$f0,$fc,$c0,$c0,$c0,$c0       // char 222
        .byte $00,$00,$00,$ff,$ff,$00,$00,$00       // char 223
        .byte $00,$00,$00,$00,$00,$00,$00,$00       // char 224
        .byte $c0,$c0,$c0,$c0,$00,$00,$c0,$00       // char 225
        .byte $3c,$3c,$3c,$00,$00,$00,$00,$00       // char 226
        .byte $3c,$3c,$ff,$3c,$ff,$3c,$3c,$00       // char 227
        .byte $c0,$fc,$00,$f0,$3c,$f0,$c0,$00       // char 228
        .byte $0c,$3c,$f0,$c0,$00,$3c,$3c,$00       // char 229
        .byte $f0,$3c,$f0,$c0,$3f,$3c,$ff,$00       // char 230
        .byte $3c,$f0,$c0,$00,$00,$00,$00,$00       // char 231
        .byte $f0,$c0,$00,$00,$00,$c0,$f0,$00       // char 232
        .byte $00,$c0,$f0,$f0,$f0,$c0,$00,$00       // char 233
        .byte $00,$3c,$f0,$ff,$f0,$3c,$00,$00       // char 234
        .byte $00,$c0,$c0,$fc,$c0,$c0,$00,$00       // char 235
        .byte $00,$00,$00,$00,$00,$c0,$c0,$00       // char 236
        .byte $00,$00,$00,$fc,$00,$00,$00,$00       // char 237
        .byte $00,$00,$00,$00,$00,$c0,$c0,$00       // char 238
        .byte $00,$0f,$3c,$f0,$c0,$00,$00,$00       // char 239
        .byte $f0,$3c,$fc,$3c,$3c,$3c,$f0,$00       // char 240
        .byte $c0,$c0,$c0,$c0,$c0,$c0,$fc,$00       // char 241
        .byte $f0,$3c,$3c,$f0,$00,$00,$fc,$00       // char 242
        .byte $f0,$3c,$3c,$f0,$3c,$3c,$f0,$00       // char 243
        .byte $3c,$fc,$fc,$3c,$ff,$3c,$3c,$00       // char 244
        .byte $fc,$00,$f0,$3c,$3c,$3c,$f0,$00       // char 245
        .byte $f0,$3c,$00,$f0,$3c,$3c,$f0,$00       // char 246
        .byte $fc,$3c,$f0,$c0,$c0,$c0,$c0,$00       // char 247
        .byte $f0,$3c,$3c,$f0,$3c,$3c,$f0,$00       // char 248
        .byte $f0,$3c,$3c,$fc,$3c,$3c,$f0,$00       // char 249
        .byte $00,$00,$c0,$00,$00,$c0,$00,$00       // char 250
        .byte $00,$00,$c0,$00,$00,$c0,$c0,$00       // char 251
        .byte $fc,$c0,$00,$00,$00,$c0,$fc,$00       // char 252
        .byte $00,$00,$fc,$00,$fc,$00,$00,$00       // char 253
        .byte $00,$c0,$f0,$3c,$f0,$c0,$00,$00       // char 254
        .byte $f0,$3c,$3c,$f0,$c0,$00,$c0,$00       // char 255

// --- Region $1106-$110e ---
.pc = $1106 "Segment $1106"
        .fill 9, $00

// --- Region $1221-$12a0 ---
.pc = $1221 "dat_1221"

dat_1221:
        .byte $0e,$06,$06,$06,$00,$00,$02,$02,$02,$0a,$0a,$0f,$01,$01,$0f,$0a // ................
        .byte $0a,$02,$02,$02,$00,$00,$08,$08,$08,$07,$07,$07,$01,$01,$07,$07 // ................
        .byte $07,$08,$08,$08,$00,$00,$05,$05,$05,$0d,$0d,$0d,$01,$01,$0d,$0d // ................
        .byte $0d,$05,$05,$05,$00,$00,$06,$06,$06,$0e,$0e,$0f,$01,$01,$0f,$0e // ................
        .fill 10, $01
        .byte $0f,$0f,$0f,$0f,$0c,$0c,$0c,$0c,$0b,$0b,$0b,$0b,$00,$00,$00,$00 // ................
        .fill 16, $00
        .byte $0b,$0b,$0b,$0b,$0c,$0c,$0c,$0c,$0f,$0f,$0f,$0f,$01,$01,$01,$01 // ................
        .byte $01,$01,$01,$01,$01,$01               // ......

// --- Region $13d2-$13f9 ---
.pc = $13d2 "dat_13d2"

dat_13d2:
        // === Sine/lookup table (40 bytes, range $00-$22) ===
        .byte $00,$04,$07,$0b,$0e,$12,$15,$18,$1a,$1b,$1d,$1f // ............

txt_13de:
        .text " !!"
        .byte $22                                   // double quote character
        .byte $22                                   // double quote character
        .byte $22                                   // double quote character
        .text "!! "
        .byte $1f,$1d,$1b,$1a,$17,$15,$13,$10,$0d,$09,$05,$0b,$0f,$13,$17,$1b // ................
        .byte $1f,$03,$07                           // ...

// --- Region $1430-$14f0 ---
.pc = $1430 "Segment $1430"
        .fill 16, $20

txt_1440:
        .encoding "screencode_mixed"
        .text "stratton, cracked and trained by radwar on december 19th"
        .encoding "petscii_upper"

txt_1478:
        .text ", 1987! "

txt_1480:
        .encoding "screencode_mixed"
        .text "greets to all our friends and contacts all arround the world! gotta rush"
        .encoding "petscii_upper"

txt_14c8:
        .text "... "
        .byte $0c,$01,$14,$05,$12,$20,$07,$15,$19,$13 // ..... ....

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

// --- Region $1550-$1576 ---
.pc = $1550 "dat_1550"

dat_1550:
        .byte $84,$01,$84,$02,$84,$04,$a9,$1c,$85,$03,$a9,$08,$85,$05,$b1,$02 // ................
        .byte $91,$04,$c8,$d0,$f9,$e6,$05,$e6,$03,$d0,$f3,$a9,$37,$85,$01,$58 // ............7..X
        .byte $4c,$e2,$fc,$4c,$b1,$a7               // L..L..

dat_1576:
        // === Fill data (1 bytes, $1576-$1576) ===
        .byte $00                                   // .

// --- Region $160c-$1648 ---
.pc = $160c "dat_160c"

dat_160c:
        .byte $01,$01,$01,$01,$02,$02,$02,$03,$03,$03,$04,$05,$06,$07,$08,$08 // ................
        .byte $09,$09,$09,$0a,$0a,$0a,$0a,$0b,$0b,$0b,$0b,$0b,$0b,$0b,$0b,$0b // ................
        .byte $0b,$0b,$0b,$0b,$0b,$0a,$0a,$0a,$0a,$09,$09,$08,$08,$07,$07,$06 // ................
        .byte $05,$04,$04,$03,$03,$02,$02,$02,$01,$01,$01,$01 // ............

dat_1648:
        // === Fill data (1 bytes, $1648-$1648) ===
        .byte $00                                   // .

// --- Region $16c4-$1748 ---
.pc = $16c4 "dat_16c4"

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

dat_1748:
        // === Fill data (1 bytes, $1748-$1748) ===
        .byte $00                                   // .

// --- Region $17b8-$1819 ---
.pc = $17b8 "dat_17b8"

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

// --- Region $1833-$19ac ---
.pc = $1833 "dat_1833"

dat_1833:
        .byte $0a,$0b,$0c,$0d,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$0e,$0f // ................
        .byte $10,$11,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .byte $00,$00,$00,$00,$00,$00,$00,$12,$13,$14,$00,$00,$00,$00,$00,$00 // ................
        .fill 9, $00
        .byte $15,$16,$17,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .byte $00,$00,$00,$00,$00,$18,$19,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .fill 9, $00
        .byte $1a,$1b,$1c,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .byte $00,$00,$00,$1d,$1e,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .fill 10, $00
        .byte $1f,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ................
        .byte $00,$20,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // . ..............
        .fill 8, $00
        .byte $21,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // !...............
        .byte $00,$22,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ."..............
        .fill 8, $00
        .byte $23,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // #...............
        .byte $00,$24,$1c,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // .$..............
        .fill 8, $00
        .byte $25,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // %...............
        .byte $00,$00,$26,$17,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ..&.............
        .byte $00,$00,$00,$00,$00,$00,$00,$27,$1e,$00,$00,$00,$00,$00,$00,$00 // .......'........
        .fill 11, $00
        .byte $28,$29,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ()..............
        .byte $00,$00,$2a,$2b,$2c,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00 // ..*+,...........
        .fill 9, $00

txt_199b:
        .text "-./0"
        .byte $00                                   // string terminator
        .fill 9, $00

txt_19a9:
        .text "1234"

// --- Region $19c5-$19d3 ---
.pc = $19c5 "dat_19c5"

dat_19c5:
        .byte $1a                                   // .

txt_19c6:
        .text "56789999:;<=>"
        .byte $00                                   // string terminator

// --- Region $1a08-$1ad0 ---
.pc = $1a08 "dat_1a08"

dat_1a08:
        .byte $40,$00,$00,$00,$40,$00,$46,$41,$47,$00,$40,$00,$40,$00,$52,$4e // @...@.FAG.@.@.RN
        .byte $53,$00,$00,$46,$41,$47,$00,$40,$00,$46,$41,$47,$00,$46,$41,$47 // S..FAG.@.FAG.FAG
        .byte $00,$40,$00,$00,$00                   // .@...

txt_1a2d:
        .text "FAGM"
        .byte $00                                   // string terminator
        .byte $00,$00,$4d,$00,$4d,$48,$4b,$00,$4d,$00,$4d,$00,$00,$4d,$00,$00 // ..M.MHK.M.M..M..
        .byte $00,$4d,$48,$4b,$00,$4d,$00,$4d,$48,$4d,$00,$4d,$48,$4b,$00,$4d // .MHK.M.MHM.MHK.M
        .byte $00,$00,$00                           // ...

txt_1a55:
        .text "MHKM"
        .byte $00                                   // string terminator
        .byte $00,$00,$4d,$00,$4d,$4c,$50,$00,$4d,$51,$4d,$00,$00,$4d,$00,$00 // ..M.MLP.MQM..M..
        .byte $00,$4d,$00,$00,$00,$4d,$00,$4d,$4e,$4a,$00,$4d,$00,$00,$00,$4d // .M...M.MNJ.M...M
        .byte $00,$00,$00,$4d,$55,$00,$4d,$00,$00,$00,$4d,$00,$4d,$4f,$4d,$00 // ...MU.M...M.MOM.
        .byte $4d,$00,$4d,$00,$00,$4d,$00,$00,$00,$4d,$00,$54,$00,$4d,$00,$4d // M.M..M...M.T.M.M
        .byte $57,$56,$00,$4d,$00,$54,$00,$4d,$00,$00,$00,$4d,$00,$54,$42,$4e // WV.M.T.M...M.TBN
        .byte $43,$00,$45,$00,$42,$4e,$4a,$00,$45,$00,$45,$00,$00,$45,$00,$00 // C.E.BNJ.E.E..E..
        .byte $00,$42,$4e,$4a,$00,$45,$00,$45,$00,$45,$00,$42,$4e,$4a,$00,$42 // .BNJ.E.E.E.BNJ.B
        .byte $4e,$43,$00,$42,$4e,$4a               // NC.BNJ

dat_1ad0:
        // === Fill data (1 bytes, $1ad0-$1ad0) ===
        .byte $00                                   // .

// --- Region $1b01-$1b17 ---
.pc = $1b01 "dat_1b01"

dat_1b01:
        .byte $83,$c3,$8f,$cf,$8f,$cf,$90,$d0,$85,$c5,$92,$d2,$81,$c1,$94,$d4 // ................
        .byte $89,$c9,$8f,$cf,$8e,$ce               // ......

dat_1b17:
        // === Fill data (1 bytes, $1b17-$1b17) ===
        .byte $00                                   // .

// --- Region $1b4f-$1b69 ---
.pc = $1b4f "dat_1b4f"

dat_1b4f:
        .byte $92,$d2,$97,$d7,$85,$c5,$00,$00,$00,$00,$94,$d4,$83,$c3,$93,$d3 // ................
        .byte $00,$00,$00,$00,$92,$d2,$93,$d3,$89,$c9 // ..........

dat_1b69:
        // === Fill data (1 bytes, $1b69-$1b69) ===
        .byte $00                                   // .