// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:44
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $07ee  End: $0d21  (1332 bytes)
// Crunched with Beta Dynamic v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $0811 (2065)
//
// Code: 833 bytes, Data: 499 bytes
// Labels: 82, Subroutines: 7
//
// Cross-references: all OK
// ============================================


// --- Region $0811-$089e ---
.pc = $0811 "main_0811"

main_0811:
        jmp loc_0a90
        nop
        nop
        lda #$36
        sta $01
        jmp loc_09f2

dat_081d:
        .byte $05,$05,$05,$43,$2e,$00,$0e,$05       // ...C....

loc_0825:
        lda #$00
        sta $d020
        sta $d021
        lda #$0f
        ldx #$08
        tay
        jsr $ffba
        lda #$08
        ldx #$54
        ldy #$08
        jsr $ffbd
        jsr $ffc0
        lda #$0f
        jsr $ffc3
        jmp loc_085c

dat_0849:
        .byte $4d,$2d,$57,$6a,$00                   // M-Wj.

loc_084e:
        ora ($06,x)
        ora $08a9
        tax
        tay
        jsr $ffba
        lda #$03
        ldx #$b0

loc_085c:
        ldy #$08
        jsr $ffbd
        lda #$00
        jsr sub_08a8
        lda #$93
        jsr $ffd2
        lda #$9f
        jsr $ffd2
        lda #$19
        sta $d018
        lda #$3b
        sta $d011
        lda #$00
        sta $a2

loc_087e:
        lda $a2
        cmp #$c0
        bne loc_087e
        lda #$04
        ldx #$b8
        ldy #$08
        jsr $ffbd
        lda $d011
        and #$ef
        sta $d011
        lda #$00
        jsr $ffd5
        jmp $ce40

dat_089d:
        .byte $20,$d5                               //  .

// --- Region $08a8-$08b3 ---
.pc = $08a8 "sub_08a8"
// Referenced by: jsr from $0863

sub_08a8:
        nop
        ora $05
        .byte $53,$4b                               // sre ($4b),y // ILLEGAL
        eor $ea30,y
        .byte $04,$05                               // nop $05 // ILLEGAL
        php
        rti

// --- Region $091d-$0926 ---
.pc = $091d "loc_091d"

loc_091d:
        sta ($ff),y
        iny
// Referenced by: jsr from $0bbe

sub_0920:
        bne loc_091d
        inc $00
        bne loc_091d
        .byte $02                                   // jam // ILLEGAL

// --- Region $09f2-$0a13 ---
.pc = $09f2 "loc_09f2"

loc_09f2:
        sei
        ldx #$00
        ldy #$00
        stx $14
        sty $15
        ldx #$f1
        ldy #$09
        stx $fc
        sty $fd
        ldy #$00
        ldx #$7b

loc_0a07:
        lda $0a12,x
        sta $0333,x
        dex
        bne loc_0a07
        jmp $0384

dat_0a13:
        .byte $23                                   // #

// --- Region $0a30-$0bc5 ---
.pc = $0a30 "loc_0a30"

loc_0a30:
        eor #$4e

loc_0a32:
        dey
        cpy #$ff
        bne loc_0a39
        dec $fd

loc_0a39:
        lda ($fc),y
        sta $ff
        dey
        cpy #$ff
        bne loc_0a44
        dec $fd

loc_0a44:
        lda ($fc),y
        cmp #$05
        beq loc_0a79

loc_0a4a:
        sta $0a40,x
        dex
        cpx #$ff
        bne loc_0a58
        dec $036d
        dec $038c

loc_0a58:
        dec $ff
        bne loc_0a4a

loc_0a5c:
        dey
        cpy #$ff
        bne loc_0a63
        dec $fd

loc_0a63:
        lda ($fc),y
        cmp #$05
        beq loc_0a32
        sta $0a40,x
        dex
        cpx #$ff
        bne loc_0a5c
        dec $036d
        dec $038c
        bne loc_0a5c

loc_0a79:
        ldx #$1f

loc_0a7b:
        lda $0333,x
        sta $0800,x
        dex
        bne loc_0a7b
        lda #$05
        lda #$37
        sta $01
        cli
        jmp $a8bc

dat_0a8e:
        .byte $00,$00                               // ..

loc_0a90:
        lda #$93
        jsr $ffd2
        lda #$02
        sta $d021
        ldy #$00
        ldx #$00

loc_0a9e:
        lda #$01
        sta $d800,x
        sta $d8f0,x
        sta $d9e0,x
        sta $dad0,x
        lda $0b60,y
        sta $0400,x
        sta $04f0,x
        sta $05e0,x
        sta $06d0,x
        inx
        iny
        cpy #$28
        bne loc_0a9e
        ldy #$00
        cpx #$f0
        bne loc_0a9e
        ldy #$00
        ldx #$00

loc_0acb:
        lda #$01
        sta $dbc0,x
        lda $0b60,x
        sta $07c0,x
        inx
        cpx #$14
        bne loc_0acb
        ldx #$00

loc_0add:
        lda #$01
        sta $d990,x
        inx
        cpx #$a0
        bne loc_0add
        ldx #$00

loc_0ae9:
        lda #$a0
        sta $0590,x
        inx
        cpx #$a0
        bne loc_0ae9
        ldx #$00

loc_0af5:
        lda #$01
        sta $d83d,x
        lda $0b90,x
        sta $043d,x
        inx
        cpx #$0c
        bne loc_0af5
        ldx #$00

loc_0b07:
        lda #$01
        sta $d88f,x
        lda $0ba0,x
        sta $048f,x
        inx
// Referenced by: jsr from $0bae

sub_0b13:
        cpx #$08
        bne loc_0b07
        ldx #$00

loc_0b19:
        lda #$01
        sta $d8d9,x
        lda $0ba8,x
        sta $04d9,x
        inx
        cpx #$14
        bne loc_0b19
        ldx #$00

loc_0b2b:
        lda #$01
        sta $d92b,x
        lda $0bc0,x
        sta $052b,x
        inx
        cpx #$10
        bne loc_0b2b

loc_0b3b:
        lda #$01
        sta $d020
        ldx #$00

loc_0b42:
        inx
        cpx #$ff
        bne loc_0b42
        lda #$02
        sta $d020
        ldx #$00

loc_0b4e:
        inx
        cpx #$fd
        bne loc_0b4e
        jsr $ffe4
        cmp #$00
        beq loc_0b3b
        bne loc_0bd1
        php
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $a020
        ldy #$a0
        ldy #$20
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $2020
        jsr $1420
        php
        ora $20
        .byte $13,$0f                               // slo ($0f),y // ILLEGAL
        asl $14
        .byte $14,$05                               // nop $05,x // ILLEGAL
        ora ($0d,x)
        jsr $2020
        jsr $1210
        ora $13
        ora $0e
        .byte $14,$13                               // nop $13,x // ILLEGAL
        jsr $2020
        jsr $2020
        jsr sub_0b13
        ora $0f06,y
        clc
        jsr $2020
        jsr $2020
        jsr $2020
        jsr sub_0920
        ora $0f10
        .byte $12                                   // jam // ILLEGAL

dat_0bc5:
        .byte $14                                   // .

// --- Region $0bd1-$0cb4 ---
.pc = $0bd1 "loc_0bd1"

loc_0bd1:
        lda #$93
        sta $ffd2                                // SMC: modifies $ffd2
        lda #$01
        sta $d020
        sta $d021
        ldx #$00

loc_0be0:
        lda #$00
        sta $d8fd,x
        lda $0b90,x
        sta $04fd,x
        inx
        cpx #$0c
        bne loc_0be0
        ldx #$00

loc_0bf2:
        lda #$00
        sta $d979,x
        lda txt_0cb5,x
        sta $0579,x
        inx
        cpx #$03
        bne loc_0bf2
        ldx #$00

loc_0c04:
        lda #$00
        sta $d9ea,x
        lda $0cb8,x
        sta $05ea,x
        inx
        cpx #$12
        bne loc_0c04
        ldx #$00

loc_0c16:
        lda #$00
        sta $da63,x
        lda $0ccf,x
        sta $0663,x
        inx
        cpx #$10
        bne loc_0c16
        ldx #$00

loc_0c28:
        lda $0ce0,x
        sta $0340,x
        inx
        cpx #$2a
        bne loc_0c28
        lda #$03
        sta $d01c
        sta $d015
        lda #$02
        sta $d025
        lda #$01
        sta $d026
        lda #$07
        sta $d027
        lda #$0d
        sta $07f8
        sta $07f9
        lda #$03
        sta $d015

loc_0c57:
        lda #$48
        sta $d000
        lda #$ff
        sta $d002
        lda #$b8
        tax
        lda #$50
        tay

loc_0c67:
        dex
        iny
        txa
        sta $d001
        tax
        tya
        sta $d003
        ldy #$00

loc_0c74:
        iny
        cpy #$ff
        bne loc_0c74
        ldy #$00

loc_0c7b:
        iny
        cpy #$77
        bne loc_0c7b
        tay
        cpy #$b8
        bne loc_0c67
        lda #$ff
        tax
        lda #$48
        tay

loc_0c8b:
        iny
        dex
        txa
        sta $d002
        tax
        tya
        sta $d000
        ldy #$00

loc_0c98:
        iny
        cpy #$ff
        bne loc_0c98
        ldy #$00

loc_0c9f:
        iny
        cpy #$77
        bne loc_0c9f
        tay
        cpy #$ff
        bne loc_0c8b
        jsr $ffe4
        cmp #$00
        beq loc_0c57
        jmp loc_0d10

dat_0cb3:
        .byte $00,$00                               // ..

// --- Region $0d09-$0d20 ---
.pc = $0d09 "Program $0d09"
        eor $55,x
        cmp $55,x
        brk

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

loc_0d10:
        jsr $e544
        lda #$00
        sta $d015
        sta $d020
        sta $d021
        jmp $fce2

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

// --- Region $0803-$0810 ---
.pc = $0803 "dat_0803"

dat_0803:
        .byte $cf,$07,$9e                           // ...

txt_0806:
        .text "2065 ABC"
        .byte $00                                   // string terminator
        .byte $00,$00                               // ..

// --- Region $089f-$08a7 ---
.pc = $089f "Program $089f"
        .byte $ff,$4c,$00,$09,$ea,$ea,$45,$53,$49   // .L....ESI

// --- Region $08b4-$091c ---
.pc = $08b4 "dat_08b4"

dat_08b4:
        .byte $05,$a9,$96,$60,$00,$04,$00,$84,$fb,$0c,$d2,$ff,$85,$fc,$51,$fb // ...`..........Q.
        .byte $c8,$04,$56,$d0,$f9,$04,$99,$e6,$fc,$04,$00,$a6,$fc,$0c,$74,$93 // ..V...........t.
        .byte $e0,$40,$04,$93,$d0,$e8,$0c,$69,$38,$c9,$96,$04,$01,$d0,$02,$60 // .@.....i8......`
        .byte $60,$a9,$0f,$a2,$08,$a8,$04,$00,$20,$75,$09,$a9,$2a,$a2,$00,$a0 // `....... u..*...
        .byte $0a,$20,$bd,$ff,$0c                   // . ...

txt_08f9:
        .text "48 "
        .byte $c0                                   // '@' | $80 (end-of-string marker)
        .byte $ff,$a2,$00,$bd,$60,$09,$9d,$00,$01,$0c,$84,$34,$e8,$e0,$15,$0c // ....`......4....
        .byte $18,$47,$d0,$ef,$ea,$4c,$00,$01,$a0,$00,$84,$ff,$a9,$08,$85,$00 // .G...L..........

// --- Region $0927-$09f1 ---
.pc = $0927 "dat_0927"

dat_0927:
        .byte $88,$aa,$00,$0c,$54,$47,$2c,$86,$34,$0c // ....TG,.4.

txt_0931:
        .text "C7 "
        .byte $ba                                   // ':' | $80 (end-of-string marker)
        .byte $ff,$a2,$00,$04,$20,$bd,$00,$0a,$0c,$d2,$ff,$49,$71,$0c,$00,$a9 // .... ......Iq...
        .byte $9d,$00,$0a,$e8,$04,$32,$e0,$30,$04,$a9,$d0,$e9,$04,$33,$60,$aa // .....2.0.....3`.
        .byte $aa,$02,$aa,$02,$aa,$00,$aa,$00,$2a,$02,$aa,$0a,$aa,$d7,$20,$aa // ........*..... .
        .byte $aa,$02,$aa,$02,$aa,$00,$aa,$00,$aa,$02,$aa,$02,$aa,$00,$aa,$ff // ................
        .byte $aa,$00,$aa,$00,$aa,$02,$aa,$02,$aa,$00,$aa,$00,$aa,$aa,$aa,$02 // ................
        .byte $aa,$00,$aa,$00,$aa,$02,$aa,$82,$aa,$00,$aa,$00,$aa,$02,$aa,$0a // ................
        .byte $aa,$00,$aa,$00,$aa,$02,$aa,$02,$aa,$aa,$2a,$00,$aa,$02,$aa,$02 // ..........*.....
        .byte $aa,$00,$aa,$00,$aa,$02,$aa,$02,$aa,$00,$aa,$00,$aa,$0a,$fe,$ff // ................
        .byte $3c,$5c,$34,$74,$73,$df,$7d,$6d,$d3,$bd,$ff,$7d,$6d,$d3,$8e,$ff // <\4ts.}m...}m...
        .byte $72,$6d,$d3,$24,$ff,$70,$6d,$d8,$58,$f4,$79,$d8,$f1,$f4,$70,$d8 // rm.$.pm.X.y...p.
        .byte $70,$f4,$79,$d8,$f1,$f4,$70,$a1,$95,$7c,$08,$07,$05,$88,$08,$88 // p.y...p..|......
        .byte $08,$28,$00,$28,$08,$00,$08,$00,$00,$98,$00,$00,$01 // .(.(.........

// --- Region $0a14-$0a2f ---
.pc = $0a14 "Program $0a14"
        .byte $08,$00,$00,$9e
        .text "2096"
        .byte $14,$14,$14,$14,$14,$14,$14,$14
        .byte $14                                   // .

txt_0a25:
        .text "EAGLE SOFT "

// --- Region $0bc6-$0bd0 ---
.pc = $0bc6 "Program $0bc6"
        .byte $05,$04,$20,$09,$0e                   // .. ..

txt_0bcb:
        .text " 1985 "

// --- Region $0cb5-$0d08 ---
.pc = $0cb5 "txt_0cb5"

txt_0cb5:
        .encoding "screencode_mixed"
        .text "arejudge dredd, daddy"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "@"
        .text "and frankenstein"
        .text "@"
        .encoding "petscii_upper"
        .byte $55,$d5                               // U.

txt_0ce2:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)

txt_0ce5:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)

txt_0ce8:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)

txt_0ceb:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)

txt_0cee:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)
        .byte $55,$ff,$ff,$ff,$ff,$ff,$ff,$55,$d5   // U......U.

txt_0cfa:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)

txt_0cfd:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)

txt_0d00:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)

txt_0d03:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)

txt_0d06:
        .text "UU"
        .byte $d5                                   // 'U' | $80 (end-of-string marker)