// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:26
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $0818 (2072)
// IRQ handler:  $0c00 (irq_0c00)
// IRQ handler:  $1280 (irq_1280)
// IRQ handler:  $0c1f (irq_0c1f)
// IRQ handler:  $0c39 (irq_0c39)
// IRQ handler:  $0c05 (irq_0c05)
//
// Code: 2280 bytes, Data: 61208 bytes
// Labels: 268, Subroutines: 20
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0814-$081c ---
.pc = $0814 "sub_0814"
// Referenced by: jsr from $fdcb

sub_0814:
        sta ($00),y
        brk

dat_0817:
        .byte $00                                   // .

main_0818:
        jmp loc_0d11

dat_081b:
        .byte $00,$00                               // ..

// --- Region $0906-$0911 ---
.pc = $0906 "sub_0906"
// Referenced by: jsr from $fda9

sub_0906:
        .byte $ff,$ff,$ff                           // isc $ffff,x // ILLEGAL
        sbc $e3f1,y
        .byte $e7,$9f                               // isc $9f // ILLEGAL
        .byte $9f,$ff,$e7                           // sha $e7ff,y // ILLEGAL

dat_0911:
        .byte $cf                                   // .

// --- Region $094c-$095d ---
.pc = $094c "sub_094c"
// Referenced by: jsr from $125e

sub_094c:
        .byte $ff,$ff,$ff                           // isc $ffff,x // ILLEGAL
        .byte $ff,$ff,$ff                           // isc $ffff,x // ILLEGAL
        lda $c3
        sta ($c3,x)
        lda $ff
        .byte $ff,$ff,$af                           // isc $afff,x // ILLEGAL
        .byte $87,$87                               // sax $87 // ILLEGAL

dat_095d:
        .byte $87                                   // .

// --- Region $0a80-$0aa7 ---
.pc = $0a80 "loc_0a80"

loc_0a80:
        lda $0f4f
        sta tbl_lo_0f2e
        ldx #$20

loc_0a88:
        lda tbl_lo_0f2e,x
        sta $0f2f,x
        dex
        bpl loc_0a88
        lda $0f57
        sta $0f77
        ldx #$00

loc_0a99:
        lda tbl_hi_0f58,x
        sta $0f57,x
        inx
        cpx #$20
        bne loc_0a99
        jmp sub_0b98

dat_0aa7:
        .byte $00                                   // .

// --- Region $0ab0-$0b88 ---
.pc = $0ab0 "loc_0ab0"

loc_0ab0:
        inc $10
        lda $10
        bne loc_0ab8
        inc $11

loc_0ab8:
        jmp loc_0b07

dat_0abb:
        .fill 8, $00
// Referenced by: jsr from $0c05, $f8fb

sub_0ac3:
        lda #$13
        sta $d018
        lda $12
        clc
        adc #$00
        sta $d016
        bit $02
        bit $02
        bit $02
        ldy #$00

loc_0ad8:
        cpy #$27
        bcs $0b06
        ldx #$07

loc_0ade:
        lda $0388,y
        sta $d021
        iny
        dex
        bmi loc_0ad8
        lda $0f28,y
        sta $d022
        lda $0f50,y
        sta $d023
        bit $02
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        bit $02
        bit $02
        sec
        bcs loc_0ade
        rts

loc_0b07:
        lda #$00
        ldx #$03

loc_0b0b:
        asl $03
        rol
        dex
        bne loc_0b0b
        clc
        adc #$d0
        sta $04
        lda #$00
        sta $dc0e
        lda #$33
        sta $01
        lda #$00
        sta $07
        lda #$05
        sta $02
        ldy #$00

loc_0b29:
        lda ($03),y
        sta $05
        iny
        lda ($03),y
        sta $06
        iny
        dec $02
        beq $0b57
        ldx #$04

loc_0b39:
        lda #$00
        asl $06
        rol
        asl $06
        rol
        asl $05
        rol
        asl $05
        rol
        sty $09
        ldy $07
        sta $0230,y
        inc $07
        ldy $09
        dex
        bne loc_0b39
        beq loc_0b29
        lda #$37
        sta $01
        lda #$01
        sta $dc0e
        lda #$00
        sta $08
        ldx #$00

loc_0b66:
        lda #$04
        sta $06

loc_0b6a:
        lda $0230,x
        tay
        lda txt_0b88,y
        sta $05
        nop
        nop
        nop
        nop
        lda #$00
        clc
        adc $05
        sta $30,x
        inx
        dec $06
        bne loc_0b6a
        cpx #$10
        bne loc_0b66
        rts

txt_0b88:
        .byte $40                                   // @ character

// --- Region $0b98-$0be4 ---
.pc = $0b98 "sub_0b98"
// Referenced by: jsr from $0cd8, $f9ce; jmp from $0aa4, $f7b9

sub_0b98:
        dec $12
        lda $12
        cmp #$0f
        beq loc_0ba4
        bit $d016
        rts

loc_0ba4:
        lda #$17
        sta $12
        bit $d016
        ldx #$00

loc_0bad:
        lda $04f1,x
        sta $04f0,x
        inx
        cpx #$a0
        bne loc_0bad
        ldx $13
        lda $30,x
        sta $0517
        lda $34,x
        sta $053f
        lda $38,x
        sta $0567
        lda $3c,x
        sta $058f
        inx
        cpx #$04
        beq loc_0bd6
        stx $13
        rts

loc_0bd6:
        ldx #$00
        stx $13

loc_0bda:
        ldy #$00
        lda ($10),y
        beq loc_0bf0
        sta $03
        jmp loc_0ab0

// --- Region $0bf0-$0e68 ---
.pc = $0bf0 "loc_0bf0"

loc_0bf0:
        lda #$a8
        sta $10
        lda #$0f
        sta $11
        jmp loc_0bda

dat_0bfb:
        .byte $00,$00,$00,$00,$00                   // .....

irq_0c00:
        nop
        nop
        nop
        nop
        nop

irq_0c05:
        jsr sub_0ac3
        lda #$1f
        sta $0314
        lda #$0c
        sta $0315
        lda #$89
        sta $d012
        lda #$01
        sta $d019
        jmp loc_ea81

irq_0c1f:
        jsr sub_0f80
        lda #$39
        sta $0314
        lda #$0c
        sta $0315
        lda #$ff
        sta $d012
        lda #$01
        sta $d019
        jmp loc_ea81

irq_0c39:
        lda #$15
        sta $d018
        lda #$18
        sta $d011
        lda #$08
        sta $d016
        lda #$05
        sta $0314
        lda #$0c
        sta $0315
        lda #$57
        jsr sub_0cd0
        lda $d019
        sta $d019
        jmp loc_ea31
// Referenced by: jsr from $0f85, $fc24

sub_0c60:
        dec $48
        lda $48
        cmp #$4f
        bne loc_0c75
        lda #$57
        sta $48
        sta $d011
        jsr sub_0f9f
        jmp loc_0c7c

loc_0c75:
        sta $d011
        jsr sub_0f9f
        rts

loc_0c7c:
        lda #$bb
        sta $2d
        lda #$05
        sta $2e
        sta $2c
        lda #$e4
        sta $2b
        ldx #$0d

loc_0c8c:
        ldy #$00
        lda ($2b),y
        sta ($2d),y
        ldy #$14
        sta ($2d),y
        lda $2d
        clc
        adc #$29
        sta $2d
        bcc loc_0ca1
        inc $2e

loc_0ca1:
        lda $2b
        clc
        adc #$29
        sta $2b
        bcc loc_0cac
        inc $2c

loc_0cac:
        dex
        bne loc_0c8c
        nop
        nop
        ldy #$00
        lda ($29),y
        bne loc_0cc1
        ldx #$ff
        stx $29
        ldx #$0f
        stx $2a
        lda #$20

loc_0cc1:
        sta ($2d),y
        ldy #$14
        sta ($2d),y
        inc $29
        lda $29
        bne $0ccf
        inc $2a
        rts
// Referenced by: jsr from $0c54, $f94a, $fbdb

sub_0cd0:
        sta $d012
        lda #$00
        sta $d021
        jsr sub_0b98
        jmp loc_0a80
// Referenced by: jsr from $0f8e, $fc2d

sub_0cde:
        ldx #$27

loc_0ce0:
        lda $0f00,x
        sta $0388,x
        dex
        bpl loc_0ce0
        inc $14
        dec $15
        ldy #$00
        ldx $14

loc_0cf1:
        lda $0f78,y
        sta $0380,x
        inx
        iny
        cpy #$08
        bne loc_0cf1
        ldx $15
        ldy #$00

loc_0d01:
        lda $0f78,y
        sta $0388,x
        inx
        iny
        cpy #$08
        bne loc_0d01
        rts

dat_0d0e:
        .byte $00,$00,$00                           // ...

loc_0d11:
        ldx #$27

loc_0d13:
        lda $0918,x
        sta $0800,x
        dex
        bpl loc_0d13
        nop
        nop
        nop
        nop
        jsr $e544
        ldx #$6d
        stx $04a0
        inx
        stx $0427
        inx
        inx
        stx $0400
        ldx #$7d
        stx $04c7
        lda #$5d
        sta $0428
        sta $049f
        ldx #$01

loc_0d40:
        sta $044f,x
        sta $0477,x
        dex
        bpl loc_0d40
        ldx #$25

loc_0d4b:
        lda #$40
        sta $0401,x
        sta $04a1,x
        dex
        bpl loc_0d4b
        ldx #$00
        txa

loc_0d59:
        sta $04c8,x
        inx
        cpx #$c8
        bne loc_0d59
        ldx #$00

loc_0d63:
        lda #$01
        sta $d800,x
        lda #$00
        sta $d990,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_0d63
        ldx #$00
        ldy #$30
        stx $14
        sty $15
        ldx #$a8
        ldy #$0f
        stx $10
        sty $11
        lda #$17
        sta $12
        ldx #$07
        lda #$0d

loc_0d8e:
        sta $07f8,x
        dex
        bpl loc_0d8e
        ldx #$00
        lda #$ff

loc_0d98:
        cpx #$2a
        bne loc_0d9e

dat_0d9c:
        .byte $a9,$00                               // ..

loc_0d9e:
        sta $0340,x
        inx
        cpx #$40
        bne loc_0d98
        ldx #$26

loc_0da8:
        lda dat_0fa7,x
        sta $0428,x
        lda $0fcd,x
        sta $0478,x
        dex
        bne loc_0da8
        nop
        nop
        lda #$0a

loc_0dbb:
        sta $d8f0,x
        inx
        cpx #$a0
        bne loc_0dbb
        ldx #$0f

loc_0dc5:
        lda $0e68,x
        sta $d000,x
        dex
        bpl loc_0dc5
        lda #$00
        sta $d020
        jsr sub_0ff8
        lda #$00
        ldx #$0c

loc_0dda:
        sta $d023,x
        dex
        bne loc_0dda
        lda #$e0
        sta $d010
        lda #$ff
        sta $d015
        sta $d01d
        lda #$03
        sta $d024
        sta $29
        lda #$10
        sta $2a
        sei
        lda #$7f
        sta $dc0d
        lda #$81
        sta $d01a
        lda #$00
        sta $0314
        lda #$0c
        sta $0315
        lda #$ff
        sta $d012
        lda #$18
        sta $d011
        lda #$57
        sta $48
        sta $49
        cli

loc_0e1e:
        lda $dc01
        cmp #$ff
        beq loc_0e1e
        sta $03
        sei
        lda #$1b
        sta $d011
        jmp loc_12f8

dat_0e30:
        .byte $40                                   // @

loc_0e31:
        lda dat_0e3d,x
        sta $033d,x
        dex
        bpl loc_0e31
        jmp $033d

dat_0e3d:
        .byte $a9,$34,$85,$01,$a0,$d1,$a2,$00       // .4......

loc_0e45:
        lda $1400,x
        sta dat_0801,x
        inx
        bne loc_0e45
        inc $0347
        inc $034a
        dey
// Referenced by: jsr from $1254

sub_0e55:
        bne loc_0e45
        lda #$37
        sta $01
        ldx #$0d
        ldy #$d8
        stx $ae
        sty $af
        cli
        jmp loc_fce2

dat_0e67:
        .byte $00,$10                               // ..

// --- Region $0e80-$0ea9 ---
.pc = $0e80 "loc_0e80"

loc_0e80:
        inc $0e7f
        lda $0e7f
        cmp #$03
        beq loc_0e8b
        rts

loc_0e8b:
        lda #$00
        sta $0e7f
        ldx $0e7e
        cpx #$40
        bne loc_0e99
        ldx #$00

loc_0e99:
        ldy #$25
        lda $0eb0,x

loc_0e9e:
        sta $d879,y
        dey
        bpl loc_0e9e
        inx
        stx $0e7e
        rts

dat_0ea9:
        // === Sine/lookup table (215 bytes, range $00-$d0) ===
        .byte $00                                   // .

// --- Region $0f80-$0fa6 ---
.pc = $0f80 "sub_0f80"
// Referenced by: jsr from $0c1f, $f915

sub_0f80:
        lda #$01
        sta $d021
        jsr sub_0c60
        jsr sub_0f8e
        jmp loc_0e80

// Referenced by: jsr from $0f88, $fc27
sub_0f8e: {
        jsr sub_0cde
        lda $15
        beq skip
        rts
skip:
        ldx #$00
        ldy #$28
        stx $14
        sty $15
        rts
}
// Referenced by: jsr from $0c6f, $0c78, $f965, $f96e

sub_0f9f:
        sec
        sbc #$50
        sta $d016
        clc
        rts

// --- Region $0ff8-$1000 ---
.pc = $0ff8 "sub_0ff8"
// Referenced by: jsr from $0dd3, $fac8

sub_0ff8:
        ldx #$0f

loc_0ffa:
        sta $30,x
        dex
        bpl loc_0ffa
        rts

txt_1000:
        .encoding "screencode_mixed"
        .text " "
        .encoding "petscii_upper"

// --- Region $1201-$1240 ---
.pc = $1201 "Segment $1201"
        ora ($85,x)
.label loc_1204 = * + 1
        .byte $04,$20                               // nop $20 // ILLEGAL
        cpx $ff
        cmp #$0d
        beq loc_1237
        cmp #$20
        bne loc_1204
        lda $04
        beq loc_1225
        lda #$00
        sta $04
        ldx #$10

loc_1219:
        lda $1243,x
        sta $052b,x
        dex
        bpl loc_1219
        jmp loc_1204

loc_1225:
        lda #$01
        sta $04
        ldx #$10

loc_122b:
        lda $1254,x
        sta $052b,x
        dex
        bpl loc_122b
        jmp loc_1204

loc_1237:
        lda $04
        beq loc_1240
        lda #$2c
        sta $15d5

loc_1240:
        rts

// --- Region $1254-$1325 ---
.pc = $1254 "Segment $1254"
        jsr sub_0e55
        .byte $0c,$09,$0d                           // nop $0d09 // ILLEGAL
        ora #$14
        ora $04
        jsr sub_094c
        asl $05,x
        .byte $13,$20                               // slo ($20),y // ILLEGAL
        brk

dat_1266:
        .byte $00,$00                               // ..

loc_1268:
        sei
        lda #$80
        sta $0314
        lda #$12
        sta $0315
        ldx #$27

loc_1275:
        lda $1388,x
        sta $d828,x
        dex
        bpl loc_1275
        cli
        rts

irq_1280:
        lda $d019
        sta $d019
        inc $03
        lda $03
        cmp #$02
        bne loc_12ac
        lda #$00
        sta $03
        ldy $d828
        ldx #$00

loc_1297:
        lda $d829,x
        sta $d828,x
        inx
        bne loc_1297
        sty $d84f
        tya
        ldx #$10

loc_12a6:
        sta $d92b,x
        dex
        bpl loc_12a6

loc_12ac:
        jmp loc_ea31

dat_12af:
        .byte $00                                   // .

loc_12b0:
        jsr $e544
        lda #$00
        sta $d020
        sta $d021
        jsr sub_1300
        lda #$17
        sta $d018
        lda #$08
        jsr $ffd2
        ldx #$27

loc_12ca:
        lda txt_1310,x
        sta $0428,x
        lda $1338,x
        sta $0518,x
        lda $1360,x
        sta $05e0,x
        dex
        bpl loc_12ca
        lda dat_1200
        sei
        jsr $ff5b
        jsr $fda3
        ldx #$ea
        ldy #$31
        sty $0314
        stx $0315
        ldx #$40
        jmp loc_0e31

loc_12f8:
        lda #$08
        sta $d016
        jmp loc_12b0
// Referenced by: jsr from $12bb

sub_1300:
        ldx #$00
        lda #$01

loc_1304:
        sta $d818,x
        sta $d918,x
        inx
        bne loc_1304
        jmp loc_1268

txt_1310:
        .text "   *"
// Referenced by: jsr from $fdbb

sub_1314:
        rol
        rol
        rol
        jsr sub_454e
        .byte $57,$20                               // sre $20,x // ILLEGAL
        eor $44
        eor #$54
        eor #$4f
        lsr $5420
        .byte $12                                   // jam // ILLEGAL

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

// --- Region $2e34-$2e37 ---
.pc = $2e34 "sub_2e34"
// Referenced by: jsr from $fdc8

sub_2e34:
        brk
// Referenced by: jsr from $fdc0

sub_2e35:
        brk
// Referenced by: jsr from $fdb8

sub_2e36:
        brk
// Referenced by: jsr from $fdb0

sub_2e37:
        brk

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

// --- Region $454e-$454e ---
.pc = $454e "sub_454e"
// Referenced by: jsr from $1317

sub_454e:
        brk

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

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

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

loc_ea31:
        brk

// --- Region $ea81-$ea81 ---
.pc = $ea81 "loc_ea81"

loc_ea81:
        brk

// --- Region $f5d0-$f5eb ---
.pc = $f5d0 "Segment $f5d0"
        stx $33
        .byte $7f,$c2,$60                           // rra $60c2,x // ILLEGAL
        lsr $81fb
        .byte $1c,$3e,$33                           // nop $333e,x // ILLEGAL
        and $c793,y
        .byte $f7,$e7                               // isc $e7,x // ILLEGAL
        .byte $cf,$86,$24                           // dcp $2486 // ILLEGAL
        adc $e7f3,y
        .byte $ff,$f9,$f1                           // isc $f1f9,x // ILLEGAL
        .byte $e3,$c3                               // isc ($c3,x) // ILLEGAL

dat_f5eb:
        .byte $87                                   // .

// --- Region $f795-$f7c9 ---
.pc = $f795 "loc_f795"

loc_f795:
        lda $0f4f
        sta tbl_lo_0f2e
        ldx #$20

loc_f79d:
        lda tbl_lo_0f2e,x
        sta $0f2f,x
        dex
        bpl loc_f79d
        lda $0f57
        sta $0f77
        ldx #$00

loc_f7ae:
        lda tbl_hi_0f58,x

loc_f7b1:
        sta $0f57,x
        inx
        cpx #$20
        bne loc_f7ae
        jmp sub_0b98

loc_f7bc:
        lda #$2b
        inc $10
        lda $10
        bne loc_f7c6
        inc $11

loc_f7c6:
        jmp loc_0b07

dat_f7c9:
        .byte $a8                                   // .

// --- Region $f7f6-$f88c ---
.pc = $f7f6 "loc_f7f6"

loc_f7f6:
        bne loc_f7b1
        bvc loc_f809
        sta $d023
        bit $02
        sbc #$ea
        rts

dat_f802:
        .byte $74,$24,$02,$24,$02,$38,$b0           // t$.$.8.

loc_f809:
        cld
        rts

loc_f80b:
        lda #$00
        ldx #$03

loc_f80f:
        asl $03
        rol
        dex
        bne loc_f80f
        clc
        adc #$d0
        sta $04
        lda #$00
        sta $dc0e
        lda #$33
        sta $01
        lda #$00
        sta $07
        lda #$05
        sta $02
        ldy #$00

loc_f82d:
        lda ($03),y
        sta $05
        iny
        lda ($03),y
        sta $06
        iny
        dec $02
        beq $f85b
        ldx #$04

loc_f83d:
        lda #$00
        asl $06
        rol
        asl $06
        rol
        asl $05
        rol
        asl $05
        rol
        sty $09
        ldy $07
        sta $0230,y
        inc $07
        ldy $09
        dex
        bne loc_f83d
        beq loc_f82d
        lda #$37
        sta $01
        lda #$01
        sta $dc0e
        lda #$00
        sta $08
        ldx #$00

loc_f86a:
        lda #$04
        sta $06

loc_f86e:
        lda $0230,x
        tay
        lda txt_0b88,y
        sta $05
        cpx $ea
        rts

loc_f87a:
        ror.abs $00a9
        clc
        adc $05
        sta $30,x
        inx
        dec $06
        bne loc_f86e
        cpx #$10
        bne loc_f86a
        rts

txt_f88c:
        .byte $40                                   // @ character

// --- Region $f8da-$f9d3 ---
.pc = $f8da "loc_f8da"

loc_f8da:
        ldx #$00
        stx $13
        ldy #$00
        lda ($10),y
        beq loc_f8f4
        sta $03
        jmp loc_0ab0

dat_f8e9:
        .byte $ab,$2b                               // .+

loc_f8eb:
        lda #$a8
        sta $10
        lda #$0f
        sta $11
.label loc_f8f4 = * + 1
        jmp loc_0bda
        lda $e5
        nop
        adc ($09,x)
        jsr sub_0ac3
        lda #$1f
        sta $0314
        lda #$0c
        sta $0315
        lda #$89
        sta $d012
        lda #$01
        sta $d019
        jmp loc_ea81

loc_f915:
        jsr sub_0f80
        lda #$39
        sta $0314
        lda #$0c
        sta $0315
        lda #$ff
        sta $d012
        lda #$01
        sta $d019
        jmp loc_ea81

loc_f92f:
        lda #$15
        sta $d018
        lda #$18
        sta $d011
        lda #$08
        sta $d016
        lda #$05
        sta $0314
        lda #$0c
        sta $0315
        lda #$57
        jsr sub_0cd0
        lda $d019
        sta $d019
        jmp loc_ea31

loc_f956:
        dec $48
        lda $48
        cmp #$4f
        bne loc_f96b
        lda #$57
        sta $48
        sta $d011
        jsr sub_0f9f
        jmp loc_0c7c

loc_f96b:
        sta $d011
        jsr sub_0f9f
        rts

loc_f972:
        lda #$bb
        sta $2d
        lda #$05
        sta $2e
        sta $2c
        lda #$e4
        sta $2b
        ldx #$0d

loc_f982:
        ldy #$00
        lda ($2b),y
        sta ($2d),y
        ldy #$14
        sta ($2d),y
        lda $2d
        clc
        adc #$29
        sta $2d
        bcc loc_f997
        inc $2e

loc_f997:
        lda $2b
        clc
        adc #$29
        sta $2b
        bcc loc_f9a2
        inc $2c

loc_f9a2:
        dex
        bne loc_f982
        nop
        nop
        ldy #$00
        lda ($29),y
        bne loc_f9b7
        ldx #$ff
        stx $29
        ldx #$0f
        stx $2a
        lda #$20

loc_f9b7:
        sta ($2d),y
        ldy #$14
        sta ($2d),y
        inc $29
        lda $29
        bne $f9c5
        inc $2a
        rts

loc_f9c6:
        sta $d012
        lda #$00
        sta $d021
        jsr sub_0b98
        jmp loc_0a80

// --- Region $fa06-$fb24 ---
.pc = $fa06 "loc_fa06"

loc_fa06:
        ldx #$27

loc_fa08:
        lda $0918,x
        sta $0800,x
        dex
        bpl loc_fa08
        cpx $ea
        adc ($58,x)
        jsr $e544
        ldx #$6d
        stx $04a0
        inx
        stx $0427
        inx
        inx
        stx $0400
        ldx #$7d
        stx $04c7
        lda #$5d
        sta $0428
        sta $049f
        ldx #$01

loc_fa35:
        sta $044f,x
        sta $0477,x
        dex
        bpl loc_fa35
        ldx #$25

loc_fa40:
        lda #$40
        sta $0401,x
        sta $04a1,x
        dex
        bpl loc_fa40
        ldx #$00
        txa

loc_fa4e:
        sta $04c8,x
        inx
        cpx #$c8
        bne loc_fa4e
        ldx #$00

loc_fa58:
        lda #$01
        sta $d800,x
        lda #$00
        sta $d990,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_fa58
        ldx #$00
        ldy #$30
        stx $14
        sty $15
        ldx #$a8
        ldy #$0f
        stx $10
        sty $11
        lda #$17
        sta $12
        ldx #$07
        lda #$0d

loc_fa83:
        sta $07f8,x
        dex
        bpl loc_fa83
        ldx #$00
        lda #$ff

loc_fa8d:
        cpx #$2a
        bne loc_fa93

loc_fa91:
        lda #$00

loc_fa93:
        sta $0340,x
        inx
        cpx #$40
        bne loc_fa8d
        ldx #$26

loc_fa9d:
        lda dat_0fa7,x
        sta $0428,x
        lda $0fcd,x
        sta $0478,x
        dex
        bne loc_fa9d
        nop
        nop
        lda #$0a

loc_fab0:
        sta $d8f0,x
        inx
        cpx #$a0
        bne loc_fab0
        ldx #$0f

loc_faba:
        lda $0e68,x
        sta $d000,x
        dex
        bpl loc_faba
        lda #$00
        sta $d020
        jsr sub_0ff8
        lda #$00
        ldx #$0c

loc_facf:
        sta $d023,x
        dex
        bne loc_facf
        lda #$e0
        sta $d010
        lda #$ff
        sta $d015
        sta $d01d
        lda #$03
        sta $d024
        sta $29
        lda #$10
        sta $2a
        sei
        lda #$7f
        sta $dc0d
        lda #$81
        sta $d01a
        lda #$00
        sta $0314
        lda #$0c
        sta $0315
        lda #$ff
        sta $d012
        lda #$18
        sta $d011
        lda #$57
        sta $48
        sta $49
        cli

loc_fb13:
        lda $dc01
        cmp #$ff
        beq loc_fb13
        sta $03
        sei
        lda #$1b
        sta $d011
        jmp loc_12f8

// --- Region $fb3a-$fb5d ---
.pc = $fb3a "loc_fb3a"

loc_fb3a:
        lda $1400,x
        sta dat_0801,x
        inx
        bne loc_fb3a
        inc $0347
        inc $034a

loc_fb49:
        dey
        bne loc_fb3a
        lda #$37
        sta $01
        ldx #$0d
        ldy #$d8
        stx $ae
        sty $af
        cli
        jmp loc_fce2

dat_fb5c:
        .byte $00,$10                               // ..

// --- Region $fb7b-$fb9b ---
.pc = $fb7b "loc_fb7b"

loc_fb7b:
        ora ($60,x)
        lda #$00
        sta $0e7f
        ldx $0e7e
        cpx #$40
        bne loc_fb8b
        ldx #$00

loc_fb8b:
        ldy #$25
        lda $0eb0,x

loc_fb90:
        sta $d879,y
        dey
        bpl loc_fb90
        inx
        stx $0e7e
        rts

dat_fb9b:
        .byte $a9                                   // .

// --- Region $fbd7-$fbe2 ---
.pc = $fbd7 "loc_fbd7"

loc_fbd7:
        php
        php
        ora #$09
        jsr sub_0cd0
        jmp loc_0e80

dat_fbe1:
        .byte $ab,$21                               // .!

// --- Region $fc1b-$fc3d ---
.pc = $fc1b "loc_fc1b"

loc_fc1b:
        ora ($03,x)
        asl $a906
        ora ($8d,x)
        and ($d0,x)
        jsr sub_0c60
        jsr sub_0f8e
        jmp loc_0e80

loc_fc2d:
        jsr sub_0cde
        lda $15
        beq loc_fc35
        rts

loc_fc35:
        ldx #$00
        ldy #$28
        stx $14
        sty $15
        rts

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

loc_fce2:
        sta $84
        .byte $89,$94                               // nop #$94 // ILLEGAL
        .byte $89,$8f                               // nop #$8f // ILLEGAL
        stx $0120
        .byte $12                                   // jam // ILLEGAL

// --- Region $fda3-$fdd6 ---
.pc = $fda3 "Segment $fda3"
        .byte $0f,$0c,$2b                           // slo $2b0c // ILLEGAL
        ora $2e12
        jsr sub_0906
        ora $0e
        .byte $04,$2c                               // nop $2c // ILLEGAL
        jsr sub_2e37
        jsr $0314
        .byte $13,$2c                               // slo ($2c),y // ILLEGAL
        jsr sub_2e36
        jsr sub_1314
        .byte $0b,$2c                               // anc #$2c // ILLEGAL
        jsr sub_2e35
        jsr $0306
        .byte $13,$2c                               // slo ($2c),y // ILLEGAL
        jsr sub_2e34
        jsr sub_0814
        ora $20
        .byte $0c,$01,$13                           // nop $1301 // ILLEGAL
        .byte $14,$20                               // nop $20,x // ILLEGAL

txt_fdd5:
        .encoding "screencode_mixed"
        .text "sc"
        .encoding "petscii_upper"

// --- Region $ff5b-$ff62 ---
.pc = $ff5b "Segment $ff5b"
        clc
        cmp $d0e8,y
        .byte $f7,$4c                               // isc $4c,x // ILLEGAL
        pla
        .byte $12                                   // jam // ILLEGAL

// --- Region $ffd2-$ffd5 ---
.pc = $ffd2 "Segment $ffd2"
        .byte $14,$2e                               // nop $2e,x // ILLEGAL
        .byte $02                                   // jam // ILLEGAL

dat_ffd5:
        .byte $04                                   // .

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

dat_ffe9:
        .byte $0c,$0b                               // ..

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

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

dat_0801:
        // === BASIC loader stub ===
        .byte $16,$08                                                     // [corrected] was: .byte $0b,$08                               // next line pointer ($080b)
        .byte $c3,$07                                                     // [corrected] was: .byte $00,$00                               // line number 0
        .byte $9e                                   // SYS token
        .byte $28,$32,$30,$37
        .byte $32                                                         // [corrected] was: .byte $00                                   // end of line
        .byte $29,$20                                                     // [corrected] was: .byte $00,$00                               // end of BASIC program
        .byte $a2                                   // .

txt_080e:
        .text " EDITI"

// --- Region $081d-$0905 ---
.pc = $081d "Program $081d"
        .fill 11, $00
        .byte $c3,$81
        .text "<.7;"
        .byte $9f,$cf,$f3,$e1,$cc,$86
        .byte $33,$7f,$ff,$ff
        .byte $fb,$81,$1c,$3e,$33,$39,$93,$c7,$f7,$e7,$cf,$86,$24,$79,$f3,$e7 // ...>39......$y..
        .byte $ff,$f9,$f1,$e3,$c3,$87,$8f,$ff,$fb,$f9,$fc,$9c,$39,$33,$87,$cf // ............93..
        .byte $f3,$e7,$cf,$99,$30,$67,$e7,$e7,$f3,$e7,$cf,$9f,$1f,$3f,$9f,$cf // ....0g.......?..
        .byte $f3,$e5,$c8,$92,$3c,$f9,$f3,$e7,$e7,$c7,$93,$39,$79,$f3,$e7,$cf // ....<......9y...
        .byte $f3,$e1,$cc,$8c,$19,$33,$87,$cf,$fb,$f1,$f8,$cc,$80,$31,$ff,$ff // .....3.......1..
        .byte $f7,$e3,$c9,$9c,$29,$83,$c7,$ef,$fb,$f9,$fc,$cc,$80,$27,$e7,$e7 // ....)........'..
        .byte $f7,$e3,$e1,$e5,$67,$27,$87,$c7,$e7,$f3,$f1,$e4,$ce,$9f,$ff,$ff // ....g'..........
        .byte $f3,$e7,$ce,$9c,$39,$33,$87,$cf,$e7,$ef,$cf,$de,$98,$a3,$8f,$ff // ....93..........
        .byte $f7,$e7,$cf,$9e,$2c,$49,$93,$c7,$e7,$e7,$e7,$00,$00,$e7,$e7,$e7 // ....,I..........
        .byte $e7,$e7,$e7,$e0,$c0,$8f,$9f,$ff,$f3,$f9,$fc,$00,$00,$3f,$9f,$cf // .............?..
        .byte $f3,$e0,$cc,$9f,$3f,$3f,$9f,$df,$ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff // ....??..........
        .byte $fb,$f9,$fc,$fc,$f9,$b3,$87,$cf,$ff,$ff,$ff,$ff,$ff,$ff,$ff,$ff // ................
        .fill 14, $ff

// --- Region $0912-$094b ---
.pc = $0912 "Program $0912"
        .byte $fd,$f9,$fb,$ff,$ff,$ff,$00,$00,$00,$00,$00,$00,$00,$00,$ff,$e3 // ................
        .byte $c9,$8c,$24,$f9,$f3,$e7,$f3,$e1,$cc,$84,$30,$39,$83,$c3,$fb,$81 // ..$.......09....
        .byte $1c,$3e,$3f,$3f,$9f,$cf,$f3,$f1,$d8,$9c,$3c,$3c,$80,$c1,$ff,$ff // .>??......<<....
        .fill 10, $ff

// --- Region $095e-$0a7f ---
.pc = $095e "Program $095e"
        .byte $d7,$ff,$ff,$ff,$ff,$ff,$df,$1f,$3f,$ff,$ff,$ff,$bf,$9f,$cf,$e7 // ........?.......
        .byte $f7,$ff,$ff,$ff,$ff,$ff,$ff,$9f,$9f,$ff,$ff,$ff,$ff,$ff,$00,$ff // ................
        .byte $ff,$ff,$f3,$e1,$cc,$9c,$39,$33,$87,$cf,$f9,$f1,$e3,$c7,$87,$8f // ......93........
        .byte $df,$ff,$f3,$e1,$f8,$fc,$00,$01,$9f,$cf,$f3,$f9,$fc,$e4,$71,$33 // ..............q3
        .byte $87,$cf,$f3,$e7,$cf,$c9,$e3,$e3,$c9,$df,$f3,$e1,$cc,$ce,$e7,$33 // ...............3
        .byte $93,$c3,$fb,$f1,$e4,$ce,$87,$33,$93,$c7,$f3,$f9,$fc,$00,$ff,$ff // .......3........
        .byte $ff,$ff,$f3,$e1,$cc,$84,$21,$33,$87,$cf,$f3,$e1,$cc,$e4,$f1,$e3 // ......!3........
        .byte $c7,$cf,$ff,$ff,$f3,$f3,$ff,$9f,$9f,$ff,$ff,$f9,$f9,$ff,$ef,$cf // ................
        .byte $9f                                   // .

dat_09df:
        // === Fill data (33 bytes, $09df-$09ff) ===
        .fill 33, $ff
        .fill 8, $00
        .byte $0a,$09,$05,$06,$00,$00,$00,$00,$50,$60,$a0,$90,$00,$00,$00,$00 // ........P`......
        .byte $00,$00,$00,$00,$5a,$69,$a5,$96,$00,$00,$00,$00,$0a,$09,$05,$06 // ....Zi..........
        .byte $50,$60,$a0,$90,$50,$60,$a0,$90,$50,$60,$a0,$90,$0a,$09,$05,$06 // P`..P`..P`......
        .byte $00,$00,$00,$00,$50,$60,$a0,$90,$5a,$69,$a5,$96,$0a,$09,$05,$06 // ....P`..Zi......
        .byte $0a,$09,$05,$06,$50,$60,$a0,$90,$0a,$09,$05,$06,$0a,$09,$05,$06 // ....P`..........
        .byte $5a,$69,$a5,$96,$50,$60,$a0,$90,$5a,$69,$a5,$96,$00,$00,$00,$00 // Zi..P`..Zi......
        .byte $0a,$09,$05,$06,$5a,$69,$a5,$96,$50,$60,$a0,$90,$5a,$69,$a5,$96 // ....Zi..P`..Zi..
        .byte $5a,$69,$a5,$96,$5a,$69,$a5,$96       // Zi..Zi..

// --- Region $0aa8-$0aaf ---
.pc = $0aa8 "Program $0aa8"
        .fill 8, $00

// --- Region $0b89-$0b97 ---
.pc = $0b89 "Program $0b89"
        .text "ABLDJFHGIEKCMNO"

// --- Region $0be5-$0bef ---
.pc = $0be5 "dat_0be5"

dat_0be5:
        .fill 11, $00

// --- Region $0e69-$0e7f ---
.pc = $0e69 "Program $0e69"
        .byte $83,$40,$83,$70,$83,$a0,$83,$d0,$83,$00,$83,$30,$83,$60,$83,$00 // .@.p.......0.`..
        .byte $00,$00,$00,$00,$00,$40,$01           // .....@.

// --- Region $0eaa-$0f7f ---
.pc = $0eaa "Program $0eaa"
        .fill 8, $00
        .byte $0b,$0b,$0c,$0c,$0f,$0f,$01,$01,$0f,$0f,$0c,$0c,$0b,$0b,$00,$00 // ................
        .byte $06,$06,$0e,$0e,$03,$03,$01,$01,$03,$03,$0e,$0e,$06,$06,$00,$00 // ................
        .byte $05,$05,$03,$03,$0d,$0d,$01,$01,$0d,$0d,$03,$03,$05,$05,$00,$00 // ................
        .byte $09,$09,$08,$08,$07,$07,$01,$01,$07,$07,$08,$08,$09,$09,$20,$d0 // .............. .
        .byte $0c,$4c,$80,$0e,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$08 // .L..............
        .byte $07,$01,$07,$08,$09,$00,$09,$08,$07,$01,$07,$08,$09,$00,$09,$08 // ................
        .byte $07,$01,$07,$08,$09,$00,$09,$08,$07,$01,$07,$08,$09,$00,$09,$08 // ................
        .byte $07,$01,$07,$08,$09,$00,$00,$00,$00,$00,$00,$00 // ............

tbl_lo_0f2e:
        .byte $03,$03,$03,$03,$0d,$0d,$0d,$0d,$01,$01,$01,$01,$0d,$0d,$0d,$0d,$03,$03,$03,$03,$03,$05,$05,$05,$05,$00,$00,$00,$00,$00,$05,$05,$05,$03,$00,$00,$00,$00,$00,$00,$00,$0c // address table low bytes

tbl_hi_0f58:
        .byte $0c,$0c,$0c,$0f,$0f,$0f,$0f,$01,$01,$01,$01,$0f,$0f,$0f,$0f,$0c,$0c,$0c,$0c,$0b,$0b,$0b,$0b,$00,$00,$00,$00,$0b,$0b,$0b,$0b,$0b,$00,$06,$0e,$03,$01,$03,$0e,$06 // address table high bytes

// --- Region $0fa7-$0ff7 ---
.pc = $0fa7 "dat_0fa7"

dat_0fa7:
        .byte $00                                   // .

txt_0fa8:
        .encoding "screencode_mixed"
        .text "  new edition"
        .encoding "petscii_upper"

txt_0fb5:
        .text " 1987 "
        .byte $10,$12,$0f,$15,$04,$0c,$19,$20,$10,$12,$05,$13,$05,$0e,$14,$13 // ....... ........

txt_0fcb:
        .text ":    ******    "
        .byte $02,$15,$02,$02,$0c,$05,$20,$02,$0f,$02,$02,$0c,$05 // ...... ......

txt_0fe7:
        .text "+    ******     "
        .byte $00                                   // string terminator

// --- Region $1001-$11d2 ---
.pc = $1001 "Segment $1001"
        .byte $20,$20,$14,$08,$09,$13,$20,$07,$01,$0d,$05,$20,$17,$01,$13,$20 //   .... .... ... 
        .byte $14,$12,$01,$09,$0e,$05,$04,$20,$0f,$0e // ....... ..

txt_101b:
        .text " 03-10-87 "
        .byte $02,$19                               // ..

txt_1027:
        .text " PARADROID "
        .byte $0f,$06,$20,$8e,$85,$97,$20,$85,$84,$89,$94,$89,$8f,$8e // .. ... .......

txt_1040:
        .encoding "screencode_mixed"
        .text ". members of "
        .encoding "petscii_upper"
        .byte $8e,$85,$97,$20,$85,$84,$89,$94,$89,$8f,$8e,$20,$01,$12,$05 // ... ....... ...

txt_105c:
        .text ": IPS, MASH, PARADROID "
        .byte $01,$0e,$04                           // ...

txt_1076:
        .text " WGCA. "
        .byte $14,$0f,$10,$20,$14,$17,$05,$0e,$19   // ... .....

txt_1086:
        .text " (40"
        .byte $14,$08,$20,$17,$05,$05,$0b           // .. ....

txt_1091:
        .text ") : 20. "
        .byte $03,$06,$12                           // ...

txt_109c:
        .text ", 19. "
        .byte $10,$0f,$10,$05,$19,$05               // ......

txt_10a8:
        .text ", 18. 1001, 17. "
        .byte $14,$14,$17                           // ...

txt_10bb:
        .text ", 16. "
        .byte $14,$17,$07,$09                       // ....

txt_10c5:
        .text ", 15. "
        .byte $14,$13,$14                           // ...

txt_10ce:
        .text ", 14. "
        .byte $12,$05,$0c,$01,$18                   // .....

txt_10d9:
        .text ", 13. "
        .byte $12,$04,$09                           // ...

txt_10e2:
        .text ", 12. "
        .byte $01,$05,$0b                           // ...

txt_10eb:
        .text ", 11. "
        .byte $13,$10,$03                           // ...

txt_10f4:
        .text ", 10. "
        .byte $01,$0e,$03,$0f,$12                   // .....

txt_10ff:
        .text ", 9. "
        .byte $08,$14,$0c                           // ...

txt_1107:
        .text ", 8. "

txt_110c:
        .encoding "screencode_mixed"
        .text "joe cool+mr. fiend"
        .encoding "petscii_upper"

txt_111e:
        .text ", 7. "
        .byte $14,$03,$13                           // ...

txt_1126:
        .text ", 6. "
        .byte $14,$13,$0b                           // ...

txt_112e:
        .text ", 5. "
        .byte $06,$03,$13                           // ...

txt_1136:
        .text ", 4. "

txt_113b:
        .encoding "screencode_mixed"
        .text "the last science, 3rd decibel, 2nd beastie boys and 1st"
        .encoding "petscii_upper"

txt_1172:
        .text " MMX.    "

txt_117b:
        .encoding "screencode_mixed"
        .text "thanx to decibel for the crack"
        .encoding "petscii_upper"

txt_1199:
        .text ".    "

txt_119e:
        .encoding "screencode_mixed"
        .text "special regards to stoffel"
        .encoding "petscii_upper"

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

// --- Region $1200-$1200 ---
.pc = $1200 "dat_1200"

dat_1200:
        .byte $a9                                   // .

// --- Region $1241-$1253 ---
.pc = $1241 "dat_1241"

dat_1241:
        .byte $00,$00,$4e,$0f,$12,$0d,$01,$0c,$20,$43,$0f,$0e,$04,$09,$14,$09 // ..N..... C......
        .byte $0f,$0e,$13                           // ...

// --- Region $1326-$13af ---
.pc = $1326 "dat_1326"

dat_1326:
        // === Data block (138 bytes, $1326-$13af) ===
        .byte $01,$09,$0e,$05,$12,$2d,$4d,$05,$0e,$15 // .....-M...

txt_1330:
        .text " ****       T"
        .byte $08,$09,$13,$20,$07,$01,$0d,$05,$20,$08,$01,$13,$3a,$20,$4e,$0f // ... .... ...: N.
        .byte $12,$0d,$01,$0c,$20,$43,$0f,$0e,$04,$09,$14,$09,$0f,$0e,$13 // .... C.........

txt_135c:
        .text "    P"
        .byte $12,$05,$13,$13,$20,$13,$10,$01,$03,$05,$20,$14,$0f,$20,$13,$05 // .... ..... .. ..
        .byte $0c,$05,$03,$14,$2c,$20,$12,$05,$14,$15,$12,$0e,$20,$14,$0f,$20 // ...., ...... .. 
        .byte $01,$03,$03,$05,$10,$14,$2e,$02,$04,$0a,$01,$0a,$04,$02,$00,$09 // ................
        .byte $08,$07,$01,$07,$08,$09,$00,$0b,$0c,$0f,$01,$0f,$0c,$0b,$00,$05 // ................
        .byte $03,$0d,$01,$0d,$03,$05,$00,$06,$0e,$03,$01,$03,$0e,$06 // ..............

dat_13af:
        // === Fill data (1 bytes, $13af-$13af) ===
        .byte $00                                   // .

// --- Region $160a-$160a ---
.pc = $160a "dat_160a"

dat_160a:
        // === Fill data (1 bytes, $160a-$160a) ===
        .byte $00                                   // .

// --- Region $2000-$2000 ---
.pc = $2000 "bmp_2000"

bmp_2000:
        .byte $00                                   // .

// --- Region $2e38-$2e38 ---
.pc = $2e38 "dat_2e38"

dat_2e38:
        // === Fill data (1 bytes, $2e38-$2e38) ===
        .byte $00                                   // .

// --- Region $3800-$3800 ---
.pc = $3800 "chr_3800"

chr_3800:
        .byte $00                                   // .

// --- Region $3c00-$3c00 ---
.pc = $3c00 "scr_3c00"

scr_3c00:
        .byte $00                                   // .

// --- Region $4446-$4446 ---
.pc = $4446 "dat_4446"

dat_4446:
        // === Fill data (1 bytes, $4446-$4446) ===
        .byte $00                                   // .

// --- Region $454f-$454f ---
.pc = $454f "dat_454f"

dat_454f:
        // === Fill data (1 bytes, $454f-$454f) ===
        .byte $00                                   // .

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

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

// --- Region $e545-$e545 ---
.pc = $e545 "dat_e545"

dat_e545:
        // === Fill data (1 bytes, $e545-$e545) ===
        .byte $00                                   // .

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

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

// --- Region $ea82-$ea82 ---
.pc = $ea82 "dat_ea82"

dat_ea82:
        // === Fill data (1 bytes, $ea82-$ea82) ===
        .byte $00                                   // .

// --- Region $f500-$f5cf ---
.pc = $f500 "dat_f500"

dat_f500:
        .byte $d0,$02,$e6,$30,$e6,$2d,$d0,$02,$e6,$2e,$ca,$d0,$ed,$f0,$a8,$20 // ...0.-......... 
        .byte $71,$01,$b1,$2f,$20,$22,$01,$91,$2d,$e6,$2d,$d0,$02,$e6,$2e,$ca // q../ "..-.-.....
        .byte $d0,$f5,$c6,$39,$10,$f1,$30,$8f,$86,$39,$b1,$2f,$aa,$4c,$22,$01 // ...9..0..9./.L".
        .byte $20,$71,$01,$b1,$2f,$91,$2d,$e6,$2f,$d0,$02,$e6,$30,$e6,$2d,$d0 //  q../.-./...0.-.
        .byte $02,$e6,$2e,$ca,$d0,$ed,$c6,$39,$10,$e9,$4c,$00,$01,$2c,$da,$01 // .......9..L..,..
        .byte $a9,$37,$85,$01,$58,$20,$18,$08,$4c,$ae,$a7,$e0,$00,$f0,$ee,$a9 // .7..X ..L.......
        .byte $04,$2c,$a9,$08,$85,$ff,$b1,$2f,$91,$2d,$c8,$c4,$ff,$d0,$f7,$18 // .,...../.-......
        .byte $a5,$2d,$65,$ff,$85,$2d,$a5,$2e,$69,$00,$85,$2e,$a0,$00,$ca,$d0 // .-e..-..i.......
        .byte $e5,$18,$a5,$2f,$65,$ff,$85,$2f,$a5,$30,$69,$00,$85,$30,$4c,$00 // .../e../.0i..0L.
        .byte $01,$b9,$00,$ef,$99,$00,$ff,$c8,$d0,$f7,$ce,$dc,$01,$ce,$df,$01 // ................
        .byte $ad,$df,$01,$c9,$df,$d0,$ea,$60,$35,$00,$16,$08,$c3,$07,$9e // .......`5......

txt_f5af:
        .text "(2072) "
        .byte $a2                                   // '"' | $80 (end-of-string marker)

txt_f5b7:
        .text " EDITI"
        .byte $91,$a3
        .byte $23,$4c,$11,$0d,$ad
        .byte $2e,$c3,$81
        .text "<.7;"
        .byte $9f,$cf
        .byte $f3,$e1,$cc                           // ...

// --- Region $f5ec-$f794 ---
.pc = $f5ec "Segment $f5ec"
        .byte $8f,$ff,$fb,$f9,$fc,$9c,$39,$33,$87,$cf,$f3,$e7,$cf,$99,$30,$67 // ......93......0g
        .byte $e7,$e7,$f3,$e7,$cf,$9f,$1f,$3f,$9f,$cf,$f3,$e5,$c8,$92,$3c,$f9 // .......?......<.
        .byte $f3,$e7,$e7,$c7,$93,$39,$79,$f3,$e7,$cf,$f3,$e1,$cc,$8c,$19,$33 // .....9y........3
        .byte $87,$cf,$fb,$f1,$f8,$cc,$80,$31,$c2,$3e,$f7,$e3,$c9,$9c,$29,$83 // .......1.>....).
        .byte $c7,$ef,$fb,$f9,$fc,$cc,$80,$27,$e7,$e7,$f7,$e3,$e1,$e5,$67,$27 // .......'......g'
        .byte $87,$c7,$e7,$f3,$f1,$e4,$ce,$9f,$c2,$38,$f3,$e7,$ce,$9c,$39,$33 // .........8....93
        .byte $87,$cf,$e7,$ef,$cf,$de,$98,$a3,$8f,$ff,$f7,$e7,$cf,$9e,$2c,$49 // ..............,I
        .byte $93,$c7,$e3,$e7,$a2,$e6,$e7,$28,$e0,$c0,$8f,$9f,$ff,$f3,$f9,$fc // .......(........
        .byte $a2,$2b,$3f,$9f,$cf,$f3,$e0,$cc,$9f,$3f,$3f,$9f,$df,$c8,$28,$fb // .+?......??...(.
        .byte $f9,$fc,$fc,$f9,$b3,$87,$cf,$d9,$2c,$f9,$f1,$e3,$e7,$9f,$9f,$ff // ........,.......
        .byte $e7,$cf,$fd,$f9,$fb,$c3,$a8,$60,$20,$ff,$e3,$c9,$8c,$24,$f9,$f3 // .......` ....$..
        .byte $e7,$f3,$e1,$cc,$84,$30,$39,$83,$c3,$fb,$81,$1c,$3e,$3f,$3f,$9f // .....09.....>??.
        .byte $cf,$f3,$f1,$d8,$9c,$3c,$3c,$80,$c1,$d2,$25,$a5,$c3,$81,$c3,$a5 // .....<<...%.....
        .byte $c3,$21,$af,$e3,$87,$21,$d7,$c5,$23,$df,$1f,$3f,$c3,$25,$bf,$9f // .!...!..#..?.%..
        .byte $cf,$e7,$f7,$c6,$22,$9f,$9f,$c5,$a1,$c3,$60,$3c,$f3,$e1,$cc,$9c // ....".....`<....
        .byte $39,$33,$87,$cf,$f9,$f1,$e3,$c7,$87,$8f,$df,$ff,$f3,$e1,$f8,$fc // 93..............
        .byte $00,$01,$9f,$cf,$f3,$f9,$fc,$e4,$71,$33,$87,$cf,$f3,$e7,$cf,$c9 // ........q3......
        .byte $e3,$e3,$c9,$df,$f3,$e1,$cc,$ce,$e7,$33,$93,$c3,$fb,$f1,$e4,$ce // .........3......
        .byte $87,$33,$93,$c7,$f3,$f9,$fc,$00,$c4,$30,$f3,$e1,$cc,$84,$21,$33 // .3.......0....!3
        .byte $87,$cf,$f3,$e1,$cc,$e4,$f1,$e3,$c7,$cf,$c2,$25,$f3,$f3,$ff,$9f // ...........%....
        .byte $9f,$c2,$26,$f9,$f9,$ff,$ef,$cf,$9f,$80,$21,$ff,$a8,$24,$0a,$09 // ..&.......!..$..
        .byte $05,$06,$a4,$24,$50,$60,$a0,$90,$a8,$24,$5a,$69,$a5,$96,$a4,$24 // ...$P`...$Zi...$
        .byte $0a,$09,$05,$06,$03,$50,$60,$a0,$90,$24,$0a,$09,$05,$06,$a4,$28 // .....P`..$.....(
        .byte $50,$60,$a0,$90,$5a,$69,$a5,$96,$02,$0a,$09,$05,$06,$24,$50,$60 // P`..Zi.......$P`
        .byte $a0,$90,$02,$0a,$09,$05,$06,$2c,$5a,$69,$a5,$96,$50,$60,$a0,$90 // .......,Zi..P`..
        .byte $5a,$69,$a5,$96,$a4,$2c,$0a,$09,$05,$06,$5a,$69,$a5,$96,$50,$60 // Zi...,....Zi..P`
        .byte $a0,$90,$03,$5a,$69,$a5,$96,$60,$27   // ...Zi..`'

// --- Region $f7ca-$f7f5 ---
.pc = $f7ca "Segment $f7ca"
        .byte $60,$33,$a9,$13,$8d,$18,$d0,$a5,$12,$18,$69,$00,$8d,$16,$d0,$24 // `3........i....$
        .byte $02,$24,$02,$24,$02,$a0,$00,$c0,$27,$b0,$2a,$a2,$07,$b9,$88,$03 // .$.$....'.*.....
        .byte $8d,$21,$d0,$c8,$ca,$30,$f0,$b9,$28,$0f,$8d,$22 // .!...0..(.."

// --- Region $f88d-$f8d9 ---
.pc = $f88d "Segment $f88d"
        .text "ABLDJFHGIEKCMNO"
        .byte $c6
        .byte $12,$a5,$12,$c9,$0f,$f0,$04,$2c,$16,$d0,$60,$a9,$17,$85,$12,$2c // .......,..`....,
        .byte $16,$d0,$a2,$00,$bd,$f1,$04,$9d,$f0,$04,$e8,$e0,$a0,$d0,$f5,$a6 // ................
        .byte $13,$b5,$30,$8d,$17,$05,$b5,$34,$8d,$3f,$05,$b5,$38,$8d,$67,$05 // ..0....4.?..8.g.
        .byte $b5,$3c,$8d,$8f,$05,$e8,$e0,$04,$f0,$03,$86,$13,$60 // .<..........`

// --- Region $f9d4-$fa05 ---
.pc = $f9d4 "dat_f9d4"

dat_f9d4:
        .byte $a2,$27,$bd,$00,$0f,$9d,$88,$03,$ca,$10,$f7,$e6,$14,$c6,$15,$a0 // .'..............
        .byte $00,$a6,$14,$b9,$78,$0f,$9d,$80,$03,$e8,$c8,$c0,$08,$d0,$f4,$a6 // ....x...........
        .byte $15,$a0,$00,$b9,$78,$0f,$9d,$88,$03,$e8,$c8,$c0,$08,$d0,$f4,$60 // ....x..........`
        .byte $a3,$2b                               // .+

// --- Region $fb25-$fb39 ---
.pc = $fb25 "dat_fb25"

dat_fb25:
        .byte $40,$bd,$3d,$0e,$9d,$3d,$03,$ca,$10,$f7,$4c,$3d,$03,$a9,$34,$85 // @.=..=....L=..4.
        .byte $01,$a0,$d1,$a2,$00                   // .....

// --- Region $fb5e-$fb7a ---
.pc = $fb5e "Segment $fb5e"
        .byte $83,$40,$83,$70,$83,$a0,$83,$d0,$83,$00,$83,$30,$83,$60,$83,$a6 // .@.p.......0.`..
        .byte $60,$2b,$40,$01,$ee,$7f,$0e,$ad,$7f,$0e,$c9,$03,$f0 // `+@..........

// --- Region $fb9c-$fbd6 ---
.pc = $fb9c "Segment $fb9c"
        .byte $2e,$0b,$0b,$0c,$0c,$0f,$0f,$01,$01,$0f,$0f,$0c,$0c,$0b,$0b,$a2 // ................
        .byte $2e,$06,$06,$0e,$0e,$03,$03,$01,$01,$03,$03,$0e,$0e,$06,$06,$a2 // ................
        .byte $2e,$05,$05,$03,$03,$0d,$0d,$01,$01,$0d,$0d,$03,$03,$05,$05,$a2 // ................
        .byte $34,$09,$09,$08,$08,$07,$07,$01,$01,$07,$07 // 4..........

// --- Region $fbe3-$fc1a ---
.pc = $fbe3 "Segment $fbe3"
        .byte $08,$44,$07,$01,$07,$08,$09,$00,$09,$08,$25,$07,$01,$07,$08,$09 // .D........%.....
        .byte $a7,$e4,$03,$e4,$0d,$e4,$01,$e4,$0d,$e5,$03,$e4,$05,$a5,$e3,$05 // ................
        .byte $21,$03,$a7,$e4,$0c,$e4,$0f,$e4,$01,$e4,$0f,$e4,$0c,$e4,$0b,$a4 // !...............
        .byte $e5,$0b,$60,$54,$00,$06,$0e,$03       // ..`T....

// --- Region $fc3e-$fce1 ---
.pc = $fc3e "dat_fc3e"

dat_fc3e:
        .byte $38,$e9,$50,$8d,$16,$d0,$18,$60,$00   // 8.P....`.

txt_fc47:
        .encoding "screencode_mixed"
        .text "  new edition"
        .encoding "petscii_upper"

txt_fc54:
        .text " 1987 "
        .byte $10,$12,$0f,$15,$04,$0c,$19,$20,$10,$12,$05,$13,$05,$0e,$14,$13 // ....... ........
        .byte $3a,$e4,$20,$e6,$2a,$e4,$20,$2e,$02,$15,$02,$02,$0c,$05,$20,$02 // :. .*. ....... .
        .byte $0f,$02,$02,$0c,$05,$2b,$e4,$20,$e6,$2a,$e5,$20,$29,$00,$a2,$0f // .....+. .*. )...
        .byte $95,$30,$ca,$10,$fb,$60,$e3,$20,$61,$74 // .0...`. at

txt_fc94:
        .encoding "screencode_mixed"
        .text "this game was trained on"
        .encoding "petscii_upper"

txt_fcac:
        .text " 03-10-87 "
        .byte $02,$19                               // ..

txt_fcb8:
        .text " PARADROID "
        .byte $0f,$06,$20,$8e,$85,$97,$20,$85,$84,$89,$94,$89,$8f,$8e // .. ... .......

txt_fcd1:
        .encoding "screencode_mixed"
        .text ". members of "
        .encoding "petscii_upper"
        .byte $8e,$85,$97,$20                       // ... 

// --- Region $fcec-$fda2 ---
.pc = $fcec "dat_fcec"

dat_fcec:
        .byte $05                                   // .

txt_fced:
        .text ": IPS, MASH, PARADROID "
        .byte $01,$0e,$04                           // ...

txt_fd07:
        .text " WGCA. "
        .byte $14,$0f,$10,$20,$14,$17,$05,$0e,$19   // ... .....

txt_fd17:
        .text " (40"
        .byte $14,$08,$20,$17,$05,$05,$0b           // .. ....

txt_fd22:
        .text ") : 20. "
        .byte $03,$06,$12                           // ...

txt_fd2d:
        .text ", 19. "
        .byte $10,$0f,$10,$05,$19,$05               // ......

txt_fd39:
        .text ", 18. 1001, 17. "
        .byte $14,$14,$17                           // ...

txt_fd4c:
        .text ", 16. "
        .byte $14,$17,$07,$09                       // ....

txt_fd56:
        .text ", 15. "
        .byte $14,$13,$14                           // ...

txt_fd5f:
        .text ", 14. "
        .byte $12,$05,$0c,$01,$18                   // .....

txt_fd6a:
        .text ", 13. "
        .byte $12,$04,$09                           // ...

txt_fd73:
        .text ", 12. "
        .byte $01,$05,$0b                           // ...

txt_fd7c:
        .text ", 11. "
        .byte $13,$10,$03                           // ...

txt_fd85:
        .text ", 10. "
        .byte $01,$0e,$03,$0f,$12                   // .....

txt_fd90:
        .text ", 9. "
        .byte $08,$14,$0c                           // ...

txt_fd98:
        .text ", 8. "
        .byte $0a,$0f,$05,$20,$03,$0f               // ... ..

// --- Region $fdd7-$ff5a ---
.pc = $fdd7 "Segment $fdd7"
        .byte $09,$05,$0e,$03,$05,$2c,$20,$33,$12,$04,$20,$04,$05,$03,$09,$02 // ....., 3.. .....
        .byte $05,$0c,$2c,$20,$32,$0e,$04,$20,$02,$05,$01,$13,$14,$09,$05,$20 // .., 2.. ....... 
        .byte $02,$0f,$19,$13,$20,$01,$0e,$04,$20,$31,$13,$14 // .... ... 1..

txt_fe03:
        .text " MMX."
        .byte $e4,$20,$60,$1f                       // . `.

txt_fe0c:
        .encoding "screencode_mixed"
        .text "thanx to decibel for the crack."
        .encoding "petscii_upper"
        .byte $e4                                   // .

txt_fe2c:
        .encoding "screencode_mixed"
        .text " ;special regards to stoffel "
        .encoding "petscii_upper"
        .byte $e5,$21,$f4,$20,$80,$2e,$00,$60,$41,$a9,$01,$85,$04,$20,$e4,$ff // .!. ...`A.... ..
        .byte $c9,$0d,$f0,$2c,$c9,$20,$d0,$f5,$a5,$04,$f0,$12,$a9,$00,$85,$04 // ...,. ..........
        .byte $a2,$10,$bd,$43,$12,$9d,$2b,$05,$ca,$10,$f7,$4c,$04,$12,$a9,$01 // ...C..+....L....
        .byte $85,$04,$a2,$10,$bd,$54,$12,$9d,$2b,$05,$ca,$10,$f7,$4c,$04,$12 // .....T..+....L..
        .byte $a5,$04,$f0,$05,$a9,$2c,$8d,$d5,$15,$60,$a2,$60,$22,$4e,$0f,$12 // .....,...`.`"N..
        .byte $0d,$01,$0c,$20,$43,$0f,$0e,$04,$09,$14,$09,$0f,$0e,$13,$20,$55 // ... C......... U
        .byte $0e,$0c,$09,$0d,$09,$14,$05,$04,$20,$4c,$09,$16,$05,$13,$20,$a3 // ........ L.... .
        .byte $60,$a8,$78,$a9,$80,$8d,$14,$03,$a9,$12,$8d,$15,$03,$a2,$27,$bd // `.x...........'.
        .byte $88,$13,$9d,$28,$d8,$ca,$10,$f7,$58,$60,$ad,$19,$d0,$8d,$19,$d0 // ...(....X`......
        .byte $e6,$03,$a5,$03,$c9,$02,$d0,$1e,$a9,$00,$85,$03,$ac,$28,$d8,$a2 // .............(..
        .byte $00,$bd,$29,$d8,$9d,$28,$d8,$e8,$d0,$f7,$8c,$4f,$d8,$98,$a2,$10 // ..)..(.....O....
        .byte $9d,$2b,$d9,$ca,$10,$fa,$4c,$31,$ea,$00,$20,$44,$e5,$a9,$00,$8d // .+....L1.. D....
        .byte $20,$d0,$8d,$21,$d0,$20,$00,$13,$a9,$17,$8d,$18,$d0,$a9,$08,$20 //  ..!. ......... 
        .byte $d2,$ff,$a2,$27,$bd,$10,$13,$9d,$28,$04,$bd,$38,$13,$9d,$18,$05 // ...'....(..8....
        .byte $bd,$60,$13,$9d,$e0,$05,$ca,$10,$eb,$ad,$00,$12,$78,$20,$5b,$ff // .`..........x [.
        .byte $20,$a3,$fd,$a2,$ea,$a0,$31,$8c,$14,$03,$8e,$15,$03,$a2,$40,$4c //  .....1.......@L
        .byte $31,$0e,$a9,$08,$8d,$16,$d0,$4c,$b0,$12,$a2,$00,$a9,$01,$9d,$18 // 1......L........
        .byte $d8,$9d                               // ..

// --- Region $ff63-$ffd1 ---
.pc = $ff63 "dat_ff63"

dat_ff63:
        .byte $e3,$20,$e4                           // . .

txt_ff66:
        .text "*: NEW EDITION T"
        .byte $12,$01,$09,$0e,$05,$12,$2d,$4d,$05,$0e,$15,$20,$e4,$2a,$e7,$20 // ......-M... .*. 
        .byte $60,$20,$54                           // ` T

txt_ff89:
        .encoding "screencode_mixed"
        .text "his game has: "
        .encoding "petscii_upper"
        .byte $4e,$0f,$12,$0d,$01,$0c,$20,$43,$0f,$0e,$04,$09,$14,$09,$0f,$0e // N..... C........
        .byte $13,$e4,$20,$60,$4f,$50               // .. `OP

txt_ffad:
        .encoding "screencode_mixed"
        .text "ress space to select, return to accep"
        .encoding "petscii_upper"

// --- Region $ffd6-$ffe3 ---
.pc = $ffd6 "Segment $ffd6"
        .byte $0a,$01,$0a,$04,$02,$00,$09,$08,$07,$01,$07,$08,$09,$00 // ..............

// --- Region $ffeb-$ffff ---
.pc = $ffeb "Segment $ffeb"
        .byte $00,$05,$03,$0d,$01,$0d,$03,$05,$00,$06,$0e,$03,$01,$03,$0e,$06 // ................
        .byte $80,$51,$00,$00,$09                   // .Q...