// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:20
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $ffff  (63487 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $cad9 (51929)
// IRQ handler:  $c950 (irq_c950)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 664 bytes, Data: 62823 bytes
// Labels: 106, Subroutines: 4
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0f19-$0f19 ---
.pc = $0f19 "sub_0f19"
// Referenced by: jsr from $ff39

sub_0f19:
        brk

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

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

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

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

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

// --- Region $c900-$c942 ---
.pc = $c900 "sub_c900"
// Referenced by: jsr from $cafa

sub_c900:
        sei
        lda #$7f
        sta $dc0d
        lda #$01
        sta $d01a
        lda #$1b
        sta $d011
        lda #$62
        sta $d012
        lda #$50
        sta $02
        lda #$cb
        sta $03
        lda #$07
        sta $04
        lda #$50
        sta $05
        lda #$cd
        sta $06
        lda #$50
        sta $0314
        lda #$c9
        sta $0315
        lda #$07
        sta $07
        lda #$04
        sta $02aa
        lda #$c1
        sta $0318
        cli
        rts

// --- Region $c950-$cb01 ---
.pc = $c950 "irq_c950"
irq_c950: {
        ldy #$08
        jsr sub_cad5
        lda $04
        sta $d016
        lda #$15
        sta $d018
        ldy #$00
        ldx #$01
        lda #$6a
loop1:
        cmp $d012
        bne loop1
        ldy #$08
        jsr sub_cad5
        nop
        lda txt_cb00
        sta $d021
        sta $d020
        ldy #$00
        ldx #$01
        nop
        nop
        nop
loop2:
        lda txt_cb00,x
        sta $d021
        sta $d020
        ldy $cb18,x
loop3:
        dey
        bne loop3
        inx
        cpx #$18
        bne loop2
        nop
        nop
        lda #$00
        sta $d020
        sta $d021
        lda #$07
        sta $d016
        dec $04
        dec $04
        lda $04
        cmp #$ff
        bne skip3
        lda #$07
        sta $04
        ldx #$00
loop4:
        lda $0541,x
        sta $0540,x
        inx
        cpx #$27
        bne loop4
        ldy #$00
        lda ($02),y
        beq skip2
        ora #$80
        sta $0567
        inc $02
        bne skip1
        inc $03
skip1:
        jmp $c9dd
skip2:
        lda #$50
        sta $02
        lda #$cb
        sta $03
        jmp $c9c0
skip3:
        ldx #$00
loop6:
        lda $cb30,x
        sta $cb08,x
        inx
        cpx #$08
        bne loop6
        lda #$a2
loop7:
        cmp $d012
        bne loop7
        lda $07
        sta $d016
        ldy #$00
        ldx #$01
        lda #$aa
loop8:
        cmp $d012
        bne loop8
        ldy #$08
        jsr sub_cad5
        nop
        lda txt_cb00
        sta $d021
        sta $d020
        ldy #$00
        ldx #$01
        nop
        nop
        nop
loop9:
        lda txt_cb00,x
        sta $d020
        sta $d021
        ldy $cb18,x
loop10:
        dey
        bne loop10
        inx
        cpx #$18
        bne loop9
        nop
        nop
        lda #$00
        sta $d020
        sta $d021
        lda #$07
        sta $d016
        dec $07
        lda $07
        cmp #$ff
        bne skip6
        lda #$07
        sta $07
        ldx #$00
loop11:
        lda $0681,x
        sta $0680,x
        inx
        cpx #$27
        bne loop11
        ldy #$00
        lda ($05),y
        beq skip5
        ora #$80
        sta $06a7
        inc $05
        bne skip4
        inc $06
skip4:
        jmp $ca72
skip5:
        lda #$50
        sta $05
        lda #$cd
        sta $06
        jmp $ca55
skip6:
        lda #$0f
        sta $d019
        lda #$1b
        sta $d011
        dec $02aa
        lda $02aa
        beq skip7
        nop
        nop
        nop
        jmp loc_ea31
skip7:
        jsr sub_ca95
        lda #$04
        sta $02aa
        jmp loc_ea31
}

// Referenced by: jsr from $ca8a
sub_ca95: {
        ldx #$00
        lda txt_cb00
        tay
loop1:
        lda $cb01,x
        sta txt_cb00,x
        inx
        cpx #$07
        bne loop1
        tya
        sta $cb07
        ldx #$06
        lda $cb17
        tay
loop2:
        lda $cb10,x
        sta $cb11,x
        dex
        cpx #$ff
        bne loop2
        tya
        sta $cb10
        ldx #$17
        lda $cb47
        tay
loop3:
        lda $cb30,x
        sta $cb31,x
        dex
        cpx #$ff
        bne loop3
        tya
        sta $cb30
        rts
}
// Referenced by: jsr from $c952, $c96c, $ca03; branch from $cad6

sub_cad5:
        dey
        bne sub_cad5
        rts

main_cad9:
        lda #$00
        sta $d020
        sta $d021
        lda #$00
        sta $0286
        lda #$93
        jsr $ffd2
        lda #$a0
        ldx #$00

loc_caef:
        sta $0540,x
        sta $0680,x
        inx
        cpx #$28
        bne loc_caef
        jsr sub_c900
        jmp loc_cf5e

txt_cb00:
        .encoding "screencode_mixed"
        .text "kl"
        .encoding "petscii_upper"

// --- Region $cf5e-$cf83 ---
.pc = $cf5e "loc_cf5e"

loc_cf5e:
        jsr $ffe4
        cmp #$20
        bne loc_cf5e
        sei
        lda #$ea
        sta $0315
        lda #$31
        sta $0314
        cli
        jsr $ff84
        jsr $ff81
        jsr $fd15
        lda #$f0
        sta $d01a
        jmp loc_fce2

dat_cf82:
        .byte $4c,$ae                               // L.

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

loc_ea31:
        brk

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

// --- Region $fce2-$fce7 ---
.pc = $fce2 "loc_fce2"

loc_fce2:
        ora ($01,x)
        .byte $0f,$0c,$0b                           // slo $0b0c // ILLEGAL
        .byte $02                                   // jam // ILLEGAL

// --- Region $fd15-$fd1a ---
.pc = $fd15 "Segment $fd15"
        ora #$a7
        .byte $e3,$20                               // isc ($20,x) // ILLEGAL
        rts

txt_fd1a:
        .encoding "screencode_mixed"
        .byte $22                                   // double quote
        .encoding "petscii_upper"

// --- Region $ff39-$ff8a ---
.pc = $ff39 "loc_ff39"

loc_ff39:
        jsr sub_0f19
        ora $12,x
        jsr $0117
        ora $e921,y
        jsr $0022
        ldy #$81
        and $6020,x
        lda ($00),y
        jsr $00a2

loc_ff51:
        lda $e000,x
        sta sub_c900,x
        inx
        cpx #$4a
        bne loc_ff51

loc_ff5c:
        jsr $ffe4
        cmp #$20
        bne loc_ff5c
        sei
        lda #$ea
        sta $0315
        lda #$31
        sta $0314
        cli
        jsr $ff84
        jsr $ff81
        jsr $fd15
        lda #$f0
        sta $d01a
        jmp loc_fce2

dat_ff80:
        .byte $4c                                   // L
        ldx.abs $00a7
        .byte $37,$61                               // rla $61,x // ILLEGAL
        ror
        .byte $64,$6f                               // nop $6f // ILLEGAL
        .byte $02                                   // jam // ILLEGAL

dat_ff8a:
        .byte $b8                                   // .

// --- Region $ffd2-$fff0 ---
.pc = $ffd2 "Segment $ffd2"
        .byte $04,$78                               // nop $78 // ILLEGAL
        .byte $4b,$44                               // alr #$44 // ILLEGAL
        eor $0921,x
        .byte $54,$3d                               // nop $3d,x // ILLEGAL
        eor #$55
        .byte $27,$0a                               // rla $0a // ILLEGAL
        and ($52,x)
        .byte $27,$c2                               // rla $c2 // ILLEGAL
        .byte $57,$c2                               // sre $c2,x // ILLEGAL
        eor #$49
        .byte $4b,$31                               // alr #$31 // ILLEGAL
        ldy #$96
        .byte $5c,$47,$7c                           // nop $7c47,x // ILLEGAL
        .byte $07,$43                               // slo $43 // ILLEGAL

dat_fff0:
        .byte $82                                   // .

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

// --- Region $0801-$0e5e ---
.pc = $0801 "dat_0801"

dat_0801:
        // === BASIC loader stub ===
        .byte $0d,$08                                                     // [corrected] was: .byte $0c,$08                               // next line pointer ($080c)
        .byte $ce,$07                                                     // [corrected] was: .byte $00,$00                               // line number 0
        .byte $9e                                   // SYS token
        .byte $20,$28,$32,$30,$36
        .byte $34                                                         // [corrected] was: .byte $00                                   // end of line
        .byte $29,$00                                                     // [corrected] was: .byte $00,$00                               // end of BASIC program
        .byte $00,$00,$78,$a9,$34,$85,$01,$a2,$05,$bd,$42,$08,$9d,$2d,$00,$ca // ..x.4.....B..-..
        .byte $10,$f7,$9a,$a0,$00,$c6,$32,$ce,$2c,$08,$b1,$31,$99,$00,$fa,$c8 // ......2.,..1....
        .byte $d0,$f8,$a5,$32,$c9,$08,$d0,$ed,$b9,$48,$08,$99,$00,$01,$c8,$d0 // ...2.....H......
        .byte $f7
        .byte $4c,$00,$01,$00,$c9,$da,$fa,$5f,$0e,$b1
        .text "/****"
        .byte $29,$07,$aa,$bd,$1a,$01,$8d,$18,$01,$b1,$2f,$29,$1f,$aa,$20,$22 // )........./).. "
        .byte $01
        .byte $4c,$ff,$01,$a4
        .byte $43,$ab,$79
        .text "X;?)"
        .byte $e6
        .byte $2f,$d0,$02
        .byte $e6,$30,$60,$b1,$2f,$20,$22,$01,$91,$2d,$e6,$2d,$d0,$02,$e6,$2e // .0`./ "..-.-....
        .byte $ca,$d0,$f5,$f0,$c5,$a9,$00,$f0,$ef,$a9,$ff,$d0,$eb,$b1,$2f,$91 // ............../.
        .byte $2d,$e6,$2f,$d0,$02,$e6,$30,$e6,$2d,$d0,$02,$e6,$2e,$ca,$d0,$ed // -./...0.-.......
        .byte $f0,$a8,$20,$71,$01,$b1,$2f,$20,$22,$01,$91,$2d,$e6,$2d,$d0,$02 // .. q../ "..-.-..
        .byte $e6,$2e,$ca,$d0,$f5,$c6,$39,$10,$f1,$30,$8f,$86,$39,$b1,$2f,$aa // ......9..0..9./.
        .byte $4c,$22,$01,$20,$71,$01,$b1,$2f,$91,$2d,$e6,$2f,$d0,$02,$e6,$30 // L". q../.-./...0
        .byte $e6,$2d,$d0,$02,$e6,$2e,$ca,$d0,$ed,$c6,$39,$10,$e9,$4c,$00,$01 // .-........9..L..
        .byte $2c,$da,$01,$a9,$37,$85,$01,$58,$20,$d9,$ca,$4c,$ae,$a7,$e0,$00 // ,...7..X ..L....
        .byte $f0,$ee,$a9,$04,$2c,$a9,$08,$85,$ff,$b1,$2f,$91,$2d,$c8,$c4,$ff // ....,...../.-...
        .byte $d0,$f7,$18,$a5,$2d,$65,$ff,$85,$2d,$a5,$2e,$69,$00,$85,$2e,$a0 // ....-e..-..i....
        .byte $00,$ca,$d0,$e5,$18,$a5,$2f,$65,$ff,$85,$2f,$a5,$30,$69,$00,$85 // ....../e../.0i..
        .byte $30,$4c,$00,$01,$b9,$00,$ef,$99,$00,$ff,$c8,$d0,$f7,$ce,$dc,$01 // 0L..............
        .byte $ce,$df,$01,$ad,$df,$01,$c9,$df,$d0,$ea,$60,$60,$43,$78,$a9,$7f // ..........``Cx..
        .byte $8d,$0d,$dc,$a9,$01,$8d,$1a,$d0,$a9,$1b,$8d,$11,$d0,$a9,$62,$8d // ..............b.
        .byte $12,$d0,$a9,$50,$85,$02,$a9,$cb,$85,$03,$a9,$07,$85,$04,$a9,$50 // ...P...........P
        .byte $85,$05,$a9,$cd,$85,$06,$a9,$50,$8d,$14,$03,$a9,$c9,$8d,$15,$03 // .......P........
        .byte $a9,$07,$85,$07,$a9,$04,$8d,$aa,$02,$a9,$c1,$8d,$18,$03,$58,$60 // ..............X`
        .byte $ad,$60,$2d,$a0,$08,$20,$d5,$ca,$a5,$04,$8d,$16,$d0,$a9,$15,$8d // .`-.. ..........
        .byte $18,$d0,$a0,$00,$a2,$01,$a9,$6a,$cd,$12,$d0,$d0,$fb,$a0,$08,$20 // .......j....... 
        .byte $d5,$ca,$ea,$ad,$00,$cb,$8d,$21,$d0,$8d,$20,$d0,$a0,$00,$a2,$01 // .......!.. .....
        .byte $e3,$ea,$60,$94,$bd,$00,$cb,$8d,$21,$d0,$8d,$20,$d0,$bc,$18,$cb // ..`.....!.. ....
        .byte $88,$d0,$fd,$e8,$e0,$18,$d0,$ec,$ea,$ea,$a9,$00,$8d,$20,$d0,$8d // ............. ..
        .byte $21,$d0,$a9,$07,$8d,$16,$d0,$c6,$04,$c6,$04,$a5,$04,$c9,$ff,$d0 // !...............
        .byte $30,$a9,$07,$85,$04,$a2,$00,$bd,$41,$05,$9d,$40,$05,$e8,$e0,$27 // 0.......A..@...'
        .byte $d0,$f5,$a0,$00,$b1,$02,$f0,$0e,$09,$80,$8d,$67,$05,$e6,$02,$d0 // ...........g....
        .byte $02,$e6,$03,$4c,$dd,$c9,$a9,$50,$85,$02,$a9,$cb,$85,$03,$4c,$c0 // ...L...P......L.
        .byte $c9,$a2,$00,$bd,$30,$cb,$9d,$08,$cb,$e8,$e0,$08,$d0,$f5,$a9,$a2 // ....0...........
        .byte $cd,$12,$d0,$d0,$fb,$a5,$07,$8d,$16,$d0,$a0,$00,$a2,$01,$a9,$aa // ................
        .byte $cd,$12,$d0,$d0,$fb,$a0,$08,$20,$d5,$ca,$ea,$ad,$00,$cb,$8d,$21 // ....... .......!
        .byte $d0,$8d,$20,$d0,$a0,$00,$a2,$01,$e3,$ea,$60,$6d,$bd,$00,$cb,$8d // .. .......`m....
        .byte $20,$d0,$8d,$21,$d0,$bc,$18,$cb,$88,$d0,$fd,$e8,$e0,$18,$d0,$ec //  ..!............
        .byte $ea,$ea,$a9,$00,$8d,$20,$d0,$8d,$21,$d0,$a9,$07,$8d,$16,$d0,$c6 // ..... ..!.......
        .byte $07,$a5,$07,$c9,$ff,$d0,$30,$a9,$07,$85,$07,$a2,$00,$bd,$81,$06 // ......0.........
        .byte $9d,$80,$06,$e8,$e0,$27,$d0,$f5,$a0,$00,$b1,$05,$f0,$0e,$09,$80 // .....'..........
        .byte $8d,$a7,$06,$e6,$05,$d0,$02,$e6,$06,$4c,$72,$ca,$a9,$50,$85,$05 // .........Lr..P..
        .byte $a9,$cd,$85,$06,$4c,$55,$ca,$a9,$0f,$8d,$19,$d0,$a9,$1b,$8d,$11 // ....LU..........
        .byte $d0,$ce,$aa,$02,$ad,$aa,$02,$f0,$06,$e3,$ea,$60,$81,$4c,$31,$ea // ...........`.L1.
        .byte $20,$95,$ca,$a9,$04,$8d,$aa,$02,$4c,$31,$ea,$a2,$00,$ad,$00,$cb //  .......L1......
        .byte $a8,$bd,$01,$cb,$9d,$00,$cb,$e8,$e0,$07,$d0,$f5,$98,$8d,$07,$cb // ................
        .byte $a2,$06,$ad,$17,$cb,$a8,$bd,$10,$cb,$9d,$11,$cb,$ca,$e0,$ff,$d0 // ................
        .byte $f5,$98,$8d,$10,$cb,$a2,$17,$ad,$47,$cb,$a8,$bd,$30,$cb,$9d,$31 // ........G...0..1
        .byte $cb,$ca,$e0,$ff,$d0,$f5,$98,$8d,$30,$cb,$60,$88,$d0,$fd,$60,$a9 // ........0.`...`.
        .byte $00,$8d,$20,$d0,$8d,$21,$d0,$a9,$00,$8d,$86,$02,$a9,$93,$20,$d2 // .. ..!........ .
        .byte $ff,$a9,$a0,$a2,$00,$9d,$40,$05,$9d,$80,$06,$e8,$e0,$28,$d0,$f5 // ......@......(..
        .byte $20,$00,$c9,$4c,$5e,$cf,$0b,$0c,$0f,$01,$01,$0f,$0c,$0b,$a8,$28 //  ..L^..........(
        .byte $0b,$0c,$0f,$01,$01,$0f,$0c,$0b,$02,$09,$09,$08,$08,$2c,$01,$09 // .............,..
        .byte $08,$09,$08,$08,$09,$09,$01,$08,$09,$09,$e3,$08,$3a,$09,$09,$06 // ............:...
        .byte $0e,$03,$01,$01,$03,$0e,$06,$0b,$0c,$0f,$01,$01,$0f,$0c,$0b,$09 // ................
        .byte $08,$0a,$01,$01,$0a,$08,$09,$a7,$e3,$20,$60,$22,$05,$10,$09,$03 // ......... `"....
        .byte $20,$02,$12,$09,$0e,$07,$13,$20,$19,$0f,$15,$20,$01,$07,$01,$09 //  ...... ... ....
        .byte $0e,$20,$01,$0e,$0f,$14,$08,$05,$12,$20,$07,$01,$0d,$05,$e8,$20 // . ....... ..... 
        .byte $60,$3b,$0c,$05,$07,$05,$0e,$04,$20,$0f,$06,$20,$02,$01,$14,$08 // `;...... .. ....
        .byte $20,$09,$0d,$10,$0f,$12,$14,$05,$04
        .byte $20,$0f,$0e
        .text " 07/"
        .text "12/88  -  "
        .byte $13,$15,$10,$10,$0c,$09
        .byte $05,$04,$20,$02,$19,$20,$1a,$05,$0e,$09,$14,$08,$2e,$e7,$20,$60 // .. .. ........ `
        .byte $2e,$07,$12,$05,$05,$14,$13,$20,$03,$0f,$0d,$09,$0e,$07,$20,$15 // ....... ...... .
        .byte $10,$20,$13,$0f,$0f,$0e,$20,$02,$15,$14,$20,$06,$09,$12,$13,$14 // . .... ... .....
        .byte $20,$03,$01,$0c,$0c,$20,$14,$08,$05,$13,$05,$20,$02,$02,$13,$e4 //  .... ..... ....
        .byte $20,$3b,$17,$01,$12,$05,$1a,$20,$14,$0f,$20,$07,$0f,$3a,$20,$28 //  ;..... .. ..: (
        .text "408)/243-4856"
        .byte $e9
        .byte $20,$39
        .byte $14,$05,$12,$0d,$09,$0e,$01,$0c,$20,$16,$05,$0c,$0f,$03,$09,$14 // ........ .......
        .byte $19
        .text ": (615)/"
        .byte $e3
        .text "3%-338"
        .byte $31,$e8,$20,$36,$14,$08,$05,$20,$04,$05,$13,$05,$12,$14,$20,$09 // 1. 6... ...... .
        .byte $0e,$0e
        .text ": (615)/"
        .byte $e3
        .text "3%-65"
        .byte $36,$31,$e9,$20,$60,$32,$15,$13,$01,$20,$07,$12,$05,$05,$14,$09 // 61. `2... ......
        .byte $0e,$07,$13,$20,$14,$0f,$3a,$20,$09,$0c,$0c,$15,$13,$09,$0f,$0e // ... ..: ........
        .byte $20,$2d,$20,$05,$13,$09,$20,$2d,$20,$06,$02,$12,$20,$2d,$20,$01 //  - ... - ... - .
        .byte $14,$03,$20,$2d,$20,$0e,$06,$0c,$ea,$20,$60,$38,$0f,$16,$05,$12 // .. - .... `8....
        .byte $13,$05,$01,$13,$20,$07,$12,$05,$05,$14,$13,$3a,$20,$1a,$05,$0e // .... ......: ...
        .byte $09,$14,$08,$20,$2d,$20,$06,$01,$03,$20,$2d,$20,$04,$03,$13,$20 // ... - ... - ... 
        .byte $2d,$20,$13,$14,$12,$09,$0b,$05,$20,$06,$0f,$12,$03,$05,$20,$2d // - ...... ..... -
        .byte $20,$12,$14,$09,$f1,$20,$3d,$0e,$0f,$17,$20,$02,$0f,$04,$19,$2d //  .... =... ....-
        .byte $13,$0c,$01,$0d,$20,$14,$08,$01,$14,$20,$13,$10,$01,$03,$05,$20 // .... .... ..... 
        .byte $02,$01,$12,$21,$ee,$20,$22,$00,$a0,$80,$38,$20,$a1,$e4,$20,$60 // ...!. "...8 .. `
        .text "#-*> "
        .byte $05,$10,$09,$03
        .text " <*- "
        .byte $0d,$05
        .byte $0d,$02,$05,$12,$13,$20,$01,$12,$05,$3a,$20,$20,$09,$0e,$06,$05 // ..... ...:  ....
        .byte $12,$0e,$01,$0c,$e7,$20,$2a,$10,$0c,$01,$19,$05,$12,$20,$2d,$31 // ..... *...... -1
        .byte $2d,$e7,$20,$2d,$10,$13,$19,$03,$08,$0f,$20,$10,$09,$12,$01,$14 // -. -...... .....
        .byte $05,$e6,$20,$27,$16,$09,$0c,$0c,$01,$09,$0e,$e7,$20,$29,$04,$05 // .. '........ )..
        .byte $14,$0f,$0e,$01,$14,$0f,$12,$e6,$20,$27,$06,$01,$0e,$14,$01,$13 // ........ '......
        .byte $19,$e6,$20,$28,$03,$01,$0e,$04,$19,$0d,$01,$0e,$ef,$20,$60,$24 // .. (......... `$
        .byte $17,$01,$14,$03,$08,$20,$06,$0f,$12,$20,$0d,$01,$0e,$19,$20,$0d // ..... ... .... .
        .byte $0f,$12,$05,$20,$03,$0f,$0d,$09,$0e,$07,$20,$19,$0f,$15,$12,$20 // ... ...... .... 
        .byte $17,$01,$19,$21,$e9,$20,$22,$00,$a0,$81,$3d,$20,$60,$b1,$00,$20 // ...!. "...= `.. 
        .byte $a2,$00,$bd,$00,$e0,$9d,$00,$c9,$e8,$e0,$4a,$d0,$f5,$20,$e4,$ff // ..........J.. ..
        .byte $c9,$20,$d0,$f9,$78,$a9,$ea,$8d,$15,$03,$a9,$31,$8d,$14,$03,$58 // . ..x......1...X
        .byte $20,$84,$ff,$20,$81,$ff,$20,$15,$fd,$a9,$f0,$8d,$1a,$d0,$4c,$e2 //  .. .. .......L.
        .byte $fc,$4c,$ae,$a7,$00,$37,$61,$6a,$64,$6f,$02,$b8,$07,$61,$65,$d4 // .L...7ajdo...ae.
        .byte $b6,$20,$0a,$60,$75,$c1,$18,$76,$48,$81,$20,$61,$20,$63,$5c,$78 // . .`u..vH. a c\x
        .byte $64,$79,$63,$7a,$d0,$02,$03,$6e,$64,$65,$43,$7b,$27,$82,$83,$84 // dycz...ndeC{'...
        .byte $20,$85,$20,$20,$86,$20,$00,$03,$06,$09,$0c,$0f,$12,$15,$18,$1b //  .  . ..........
        .byte $1e
        .text "!$'*-0369<?BEHK"
        .byte $4e,$51,$c0,$04,$78
        .byte $4b,$44,$5d
        .byte $21,$09
        .text "T=IU'"
        .byte $0a
        .byte $21,$52,$27,$c2
        .byte $57,$c2
        .text "IIK1"
        .byte $a0,$96
        .byte $5c,$47,$7c,$07
        .byte $43,$82,$b4
        .text "CEPT"
        .byte $5c                                   // backslash
        .byte $69,$07
        .byte $4d,$49,$4b,$8f
        .byte $2e,$00
        .byte $20                                   //  

// --- Region $c943-$c94f ---
.pc = $c943 "dat_c943"

dat_c943:
        .fill 13, $00

// --- Region $cb02-$cf5d ---
.pc = $cb02 "Segment $cb02"
        .byte $0f,$01,$01,$0f,$0c,$0b,$00,$00,$00,$00,$00,$00,$00,$00,$0b,$0c // ................
        .byte $0f,$01,$01,$0f,$0c,$0b,$09,$09,$08,$08,$09,$09,$08,$08,$01,$09 // ................
        .byte $08,$09,$08,$08,$09,$09,$01,$08,$09,$09,$08,$08,$08,$09,$09,$06 // ................
        .byte $0e,$03,$01,$01,$03,$0e,$06,$0b,$0c,$0f,$01,$01,$0f,$0c,$0b,$09 // ................
        .byte $08,$0a,$01,$01,$0a,$08,$09,$00,$00,$00,$00,$00,$00,$00,$20,$20 // ..............  
        .byte $20,$05,$10,$09,$03,$20,$02,$12,$09,$0e,$07,$13,$20,$19,$0f,$15 //  .... ...... ...
        .byte $20,$01,$07,$01,$09,$0e,$20,$01,$0e,$0f,$14,$08,$05,$12,$20,$07 //  ..... ....... .
        .byte $01,$0d,$05                           // ...

txt_cb75:
        .text "        "

txt_cb7d:
        .encoding "screencode_mixed"
        .text "legend of bath imported on"
        .encoding "petscii_upper"

txt_cb97:
        .text " 07/12/88  -  "

txt_cba5:
        .encoding "screencode_mixed"
        .text "supplied by zenith"
        .encoding "petscii_upper"

txt_cbb7:
        .text ".       "

txt_cbbf:
        .encoding "screencode_mixed"
        .text "greets coming up soon but first call these bbs"
        .encoding "petscii_upper"

txt_cbed:
        .text "    "

txt_cbf1:
        .encoding "screencode_mixed"
        .text "warez to go"
        .encoding "petscii_upper"

txt_cbfc:
        .text ": (408)/243-4856         "
        .byte $14,$05,$12,$0d,$09,$0e,$01,$0c,$20,$16,$05,$0c,$0f,$03,$09,$14 // ........ .......
        .byte $19                                   // .

txt_cc26:
        .text ": (615)/333-3381        "

txt_cc3e:
        .encoding "screencode_mixed"
        .text "the desert inn"
        .encoding "petscii_upper"

txt_cc4c:
        .text ": (615)/333-6561         "

txt_cc65:
        .encoding "screencode_mixed"
        .text "usa greetings to: illusion - esi - fbr - atc - nfl"
        .encoding "petscii_upper"

txt_cc97:
        .text "          "

txt_cca1:
        .encoding "screencode_mixed"
        .text "overseas greets: zenith - fac - dcs - strike force - rti"
        .encoding "petscii_upper"

txt_ccd9:
        .text "                 "

txt_ccea:
        .encoding "screencode_mixed"
        .text "now body-slam that space bar"
        .encoding "petscii_upper"

txt_cd06:
        .text "!              "
        .byte $00                                   // string terminator
        .byte $a0                                   // .

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

txt_cd50:
        .text "    -*> "
        .byte $05,$10,$09,$03                       // ....

txt_cd5c:
        .text " <*- "
        .byte $0d                                   // string terminator

txt_cd62:
        .encoding "screencode_mixed"
        .text "embers are:  infernal"
        .encoding "petscii_upper"

txt_cd77:
        .text "       "
        .byte $10,$0c,$01,$19,$05,$12               // ......

txt_cd84:
        .text " -1-       "
        .byte $10,$13,$19,$03,$08,$0f,$20,$10,$09,$12,$01,$14,$05 // ...... ......

txt_cd9c:
        .text "      "
        .byte $16,$09,$0c,$0c,$01,$09,$0e           // .......

txt_cda9:
        .text "       "
        .byte $04,$05,$14,$0f,$0e,$01,$14,$0f,$12   // .........

txt_cdb9:
        .text "      "
        .byte $06,$01,$0e,$14,$01,$13,$19           // .......

txt_cdc6:
        .text "      "
        .byte $03,$01,$0e,$04,$19,$0d,$01,$0e       // ........

txt_cdd4:
        .text "               "

txt_cde3:
        .encoding "screencode_mixed"
        .text "watch for many more coming your way"
        .encoding "petscii_upper"

txt_ce06:
        .text "!         "
        .byte $00                                   // string terminator
        .byte $a0                                   // .

dat_ce12:
        .text "                                                                                                                                                                                                                                                                                                                             "
        .byte $00                                   // string terminator
        .byte $20,$a2,$00,$bd,$00,$e0,$9d,$00,$c9,$e8,$e0,$4a,$d0,$f5 //  ..........J..

// --- Region $cf84-$d000 ---
.pc = $cf84 "Segment $cf84"
        .byte $a7,$00,$37,$61,$6a,$64,$6f,$02,$b8,$07,$61,$65,$d4,$b6,$20,$0a // ..7ajdo...ae.. .
        .byte $60,$75,$c1,$18,$76,$48,$81,$20,$61,$20,$63,$5c,$78,$64,$79,$63 // `u..vH. a c\xdyc
        .byte $7a,$d0,$02,$03,$6e,$64,$65,$43,$7b,$27,$82,$83,$84,$20,$85,$20 // z...ndeC{'... . 
        .byte $20,$86,$20,$00,$03,$06,$09,$0c,$0f,$12,$15,$18,$1b,$1e //  . ...........

txt_cfc2:
        .text "!$'*-0369<?BEHKNQ"
        .byte $c0                                   // '@' | $80 (end-of-string marker)
        .byte $04,$78
        .byte $4b,$44,$5d
        .byte $21,$09
        .text "T=IU'"
        .byte $0a

txt_cfe1:
        .text "!R'"
        .byte $c2                                   // 'B' | $80 (end-of-string marker)
        .byte $57,$c2                               // W.

txt_cfe7:
        .text "IIK1"
        .byte $a0                                   // ' ' | $80 (end-of-string marker)
        .byte $96
        .byte $5c,$47,$7c,$07
        .byte $43,$82,$b4
        .text "CEPT"
        .byte $5c                                   // backslash
        .byte $69,$07
        .byte $4d
        .byte $49,$4b,$8f,$2e                       // IK..

dat_d000:
        // === Fill data (1 bytes, $d000-$d000) ===
        .byte $00                                   // .

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

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

// --- Region $f9d1-$f9d1 ---
.pc = $f9d1 "dat_f9d1"

dat_f9d1:
        // === Fill data (1 bytes, $f9d1-$f9d1) ===
        .byte $00                                   // .

// --- Region $fa00-$fce1 ---
.pc = $fa00 "dat_fa00"

dat_fa00:
        .byte $4c,$ff,$01,$a4
        .byte $43,$ab,$79
        .text "X;?)"
        .byte $e6
        .byte $2f,$d0,$02,$e6
        .byte $30,$60,$b1,$2f,$20,$22,$01,$91,$2d,$e6,$2d,$d0,$02,$e6,$2e,$ca // 0`./ "..-.-.....
        .byte $d0,$f5,$f0,$c5,$a9,$00,$f0,$ef,$a9,$ff,$d0,$eb,$b1,$2f,$91,$2d // ............./.-
        .byte $e6,$2f,$d0,$02,$e6,$30,$e6,$2d,$d0,$02,$e6,$2e,$ca,$d0,$ed,$f0 // ./...0.-........
        .byte $a8,$20,$71,$01,$b1,$2f,$20,$22,$01,$91,$2d,$e6,$2d,$d0,$02,$e6 // . q../ "..-.-...
        .byte $2e,$ca,$d0,$f5,$c6,$39,$10,$f1,$30,$8f,$86,$39,$b1,$2f,$aa,$4c // .....9..0..9./.L
        .byte $22,$01,$20,$71,$01,$b1,$2f,$91,$2d,$e6,$2f,$d0,$02,$e6,$30,$e6 // ". q../.-./...0.
        .byte $2d,$d0,$02,$e6,$2e,$ca,$d0,$ed,$c6,$39,$10,$e9,$4c,$00,$01,$2c // -........9..L..,
        .byte $da,$01,$a9,$37,$85,$01               // ...7..

txt_fa86:
        .text "X "
        .byte $d9                                   // 'Y' | $80 (end-of-string marker)
        .byte $ca,$4c,$ae,$a7,$e0,$00,$f0,$ee,$a9,$04,$2c,$a9,$08,$85,$ff,$b1 // .L........,.....
        .byte $2f,$91,$2d,$c8,$c4,$ff,$d0,$f7,$18,$a5,$2d,$65,$ff,$85,$2d,$a5 // /.-.......-e..-.
        .byte $2e,$69,$00,$85,$2e,$a0,$00,$ca,$d0,$e5,$18,$a5,$2f,$65,$ff,$85 // .i........../e..
        .byte $2f,$a5,$30,$69,$00,$85,$30,$4c,$00,$01,$b9,$00,$ef,$99,$00,$ff // /.0i..0L........
        .byte $c8,$d0,$f7,$ce,$dc,$01,$ce,$df,$01,$ad,$df,$01,$c9,$df,$d0,$ea // ................
        .byte $60,$60,$43,$78,$a9,$7f,$8d,$0d,$dc,$a9,$01,$8d,$1a,$d0,$a9,$1b // ``Cx............
        .byte $8d,$11,$d0,$a9,$62,$8d,$12,$d0,$a9,$50,$85,$02,$a9,$cb,$85,$03 // ....b....P......
        .byte $a9,$07,$85,$04,$a9,$50,$85,$05,$a9,$cd,$85,$06,$a9,$50,$8d,$14 // .....P.......P..
        .byte $03,$a9,$c9,$8d,$15,$03,$a9,$07,$85,$07,$a9,$04,$8d,$aa,$02,$a9 // ................
        .byte $c1,$8d,$18,$03,$58,$60,$ad,$60,$2d,$a0,$08,$20,$d5,$ca,$a5,$04 // ....X`.`-.. ....
        .byte $8d,$16,$d0,$a9,$15,$8d,$18,$d0,$a0,$00,$a2,$01,$a9,$6a,$cd,$12 // .............j..
        .byte $d0,$d0,$fb,$a0,$08,$20,$d5,$ca,$ea,$ad,$00,$cb,$8d,$21,$d0,$8d // ..... .......!..
        .byte $20,$d0,$a0,$00,$a2,$01,$e3,$ea,$60,$94,$bd,$00,$cb,$8d,$21,$d0 //  .......`.....!.
        .byte $8d,$20,$d0,$bc,$18,$cb,$88,$d0,$fd,$e8,$e0,$18,$d0,$ec,$ea,$ea // . ..............
        .byte $a9,$00,$8d,$20,$d0,$8d,$21,$d0,$a9,$07,$8d,$16,$d0,$c6,$04,$c6 // ... ..!.........
        .byte $04,$a5,$04,$c9,$ff,$d0,$30,$a9,$07,$85,$04,$a2,$00,$bd,$41,$05 // ......0.......A.
        .byte $9d,$40,$05,$e8,$e0,$27,$d0,$f5,$a0,$00,$b1,$02,$f0,$0e,$09,$80 // .@...'..........
        .byte $8d,$67,$05,$e6,$02,$d0,$02,$e6,$03,$4c,$dd,$c9,$a9,$50,$85,$02 // .g.......L...P..
        .byte $a9,$cb,$85,$03,$4c,$c0,$c9,$a2,$00,$bd,$30,$cb,$9d,$08,$cb,$e8 // ....L.....0.....
        .byte $e0,$08,$d0,$f5,$a9,$a2,$cd,$12,$d0,$d0,$fb,$a5,$07,$8d,$16,$d0 // ................
        .byte $a0,$00,$a2,$01,$a9,$aa,$cd,$12,$d0,$d0,$fb,$a0,$08,$20,$d5,$ca // ............. ..
        .byte $ea,$ad,$00,$cb,$8d,$21,$d0,$8d,$20,$d0,$a0,$00,$a2,$01,$e3,$ea // .....!.. .......
        .byte $60,$6d,$bd,$00,$cb,$8d,$20,$d0,$8d,$21,$d0,$bc,$18,$cb,$88,$d0 // `m.... ..!......
        .byte $fd,$e8,$e0,$18,$d0,$ec,$ea,$ea,$a9,$00,$8d,$20,$d0,$8d,$21,$d0 // ........... ..!.
        .byte $a9,$07,$8d,$16,$d0,$c6,$07,$a5,$07,$c9,$ff,$d0,$30,$a9,$07,$85 // ............0...
        .byte $07,$a2,$00,$bd,$81,$06,$9d,$80,$06,$e8,$e0,$27,$d0,$f5,$a0,$00 // ...........'....
        .byte $b1,$05,$f0,$0e,$09,$80,$8d,$a7,$06,$e6,$05,$d0,$02,$e6,$06,$4c // ...............L
        .byte $72,$ca,$a9,$50,$85,$05,$a9,$cd,$85,$06 // r..P......

txt_fc43:
        .text "LU"
        .byte $ca                                   // 'J' | $80 (end-of-string marker)
        .byte $a9,$0f,$8d,$19,$d0,$a9,$1b,$8d,$11,$d0,$ce,$aa,$02,$ad,$aa,$02 // ................
        .byte $f0,$06,$e3,$ea,$60,$81,$4c,$31,$ea,$20,$95,$ca,$a9,$04,$8d,$aa // ....`.L1. ......
        .byte $02,$4c,$31,$ea,$a2,$00,$ad,$00,$cb,$a8,$bd,$01,$cb,$9d,$00,$cb // .L1.............
        .byte $e8,$e0,$07,$d0,$f5,$98,$8d,$07,$cb,$a2,$06,$ad,$17,$cb,$a8,$bd // ................
        .byte $10,$cb,$9d,$11,$cb,$ca,$e0,$ff,$d0,$f5,$98,$8d,$10,$cb,$a2,$17 // ................
        .byte $ad,$47,$cb,$a8,$bd,$30,$cb,$9d,$31,$cb,$ca,$e0,$ff,$d0,$f5,$98 // .G...0..1.......
        .byte $8d,$30,$cb,$60,$88,$d0,$fd,$60,$a9,$00,$8d,$20,$d0,$8d,$21,$d0 // .0.`...`... ..!.
        .byte $a9,$00,$8d,$86,$02,$a9,$93,$20,$d2,$ff,$a9,$a0,$a2,$00,$9d,$40 // ....... .......@
        .byte $05,$9d,$80,$06,$e8,$e0,$28,$d0,$f5,$20,$00,$c9,$4c,$5e,$cf,$0b // ......(.. ..L^..
        .byte $0c,$0f,$01,$01,$0f,$0c,$0b,$a8,$28,$0b,$0c,$0f // ........(...

// --- Region $fce8-$fd14 ---
.pc = $fce8 "dat_fce8"

dat_fce8:
        .byte $09,$09,$08,$08,$2c,$01,$09,$08,$09,$08,$08,$09,$09,$01,$08,$09 // ....,...........
        .byte $09,$e3,$08,$3a,$09,$09,$06,$0e,$03,$01,$01,$03,$0e,$06,$0b,$0c // ...:............
        .byte $0f,$01,$01,$0f,$0c,$0b,$09,$08,$0a,$01,$01,$0a,$08 // .............

// --- Region $fd1b-$ff38 ---
.pc = $fd1b "Segment $fd1b"
        .byte $05,$10,$09,$03,$20,$02,$12,$09,$0e,$07,$13,$20,$19,$0f,$15,$20 // .... ...... ... 
        .byte $01,$07,$01,$09,$0e,$20,$01,$0e,$0f,$14,$08,$05,$12,$20,$07,$01 // ..... ....... ..
        .byte $0d,$05,$e8,$20,$60                   // ... `

txt_fd40:
        .encoding "screencode_mixed"
        .text ";legend of bath imported on"
        .encoding "petscii_upper"

txt_fd5b:
        .text " 07/12/88  -  "

txt_fd69:
        .encoding "screencode_mixed"
        .text "supplied by zenith."
        .encoding "petscii_upper"
        .byte $e7,$20,$60                           // . `

txt_fd7f:
        .encoding "screencode_mixed"
        .text ".greets coming up soon but first call these bbs"
        .encoding "petscii_upper"
        .byte $e4                                   // .

txt_fdaf:
        .encoding "screencode_mixed"
        .text " ;warez to go"
        .encoding "petscii_upper"

txt_fdbc:
        .text ": (408)/243-4856"
        .byte $e9,$20,$39,$14,$05,$12,$0d,$09,$0e,$01,$0c,$20,$16,$05,$0c,$0f // . 9........ ....
        .byte $03,$09,$14,$19                       // ....

txt_fde0:
        .text ": (615)/"
        .byte $e3                                   // .

txt_fde9:
        .text "3%-3381"
        .byte $e8                                   // .

txt_fdf1:
        .encoding "screencode_mixed"
        .text " 6the desert inn"
        .encoding "petscii_upper"

txt_fe01:
        .text ": (615)/"
        .byte $e3                                   // .

txt_fe0a:
        .text "3%-6561"
        .byte $e9,$20,$60                           // . `

txt_fe14:
        .encoding "screencode_mixed"
        .text "2usa greetings to: illusion - esi - fbr - atc - nfl"
        .encoding "petscii_upper"
        .byte $ea,$20,$60                           // . `

txt_fe4a:
        .encoding "screencode_mixed"
        .text "8overseas greets: zenith - fac - dcs - strike force - rti"
        .encoding "petscii_upper"
        .byte $f1                                   // .

txt_fe84:
        .encoding "screencode_mixed"
        .text " =now body-slam that space bar!"
        .encoding "petscii_upper"
        .byte $ee,$20,$22,$00,$a0,$80               // . "...

txt_fea9:
        .text "8 "
        .byte $a1                                   // '!' | $80 (end-of-string marker)
        .byte $e4,$20,$60                           // . `

txt_feaf:
        .text "#-*> "
        .byte $05,$10,$09,$03                       // ....

txt_feb8:
        .text " <*- "
        .byte $0d                                   // string terminator

txt_febe:
        .encoding "screencode_mixed"
        .text "embers are:  infernal"
        .encoding "petscii_upper"
        .byte $e7,$20,$2a,$10,$0c,$01,$19,$05,$12   // . *......

txt_fedc:
        .text " -1-"
        .byte $e7,$20,$2d,$10,$13,$19,$03,$08,$0f,$20,$10,$09,$12,$01,$14,$05 // . -...... ......
        .byte $e6,$20,$27,$16,$09,$0c,$0c,$01,$09,$0e,$e7,$20,$29,$04,$05,$14 // . '........ )...
        .byte $0f,$0e,$01,$14,$0f,$12,$e6,$20,$27,$06,$01,$0e,$14,$01,$13,$19 // ....... '.......
        .byte $e6,$20,$28,$03,$01,$0e,$04,$19,$0d,$01,$0e,$ef,$20,$60 // . (......... `

txt_ff1e:
        .encoding "screencode_mixed"
        .text "$watch for many more coming"
        .encoding "petscii_upper"

// --- Region $ff8b-$ffd1 ---
.pc = $ff8b "Segment $ff8b"
        .byte $07,$61,$65,$d4,$b6,$20,$0a,$60,$75,$c1,$18,$76,$48,$81,$20,$61 // .ae.. .`u..vH. a
        .byte $20,$63,$5c,$78,$64,$79,$63,$7a,$d0,$02,$03,$6e,$64,$65,$43,$7b //  c\xdycz...ndeC{
        .byte $27,$82,$83,$84,$20,$85,$20,$20,$86,$20,$00,$03,$06,$09,$0c,$0f // '... .  . ......
        .byte $12,$15,$18,$1b,$1e                   // .....

txt_ffc0:
        .text "!$'*-0369<?BEHKNQ"
        .byte $c0                                   // '@' | $80 (end-of-string marker)

// --- Region $fff1-$ffff ---
.pc = $fff1 "Segment $fff1"
        .byte $b4
        .text "CEPT"
        .byte $5c                                   // backslash
        .byte $69,$07
        .byte $4d,$49,$4b,$8f
        .byte $2e,$00
        .byte $20