// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:14
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $0c52  (1106 bytes)
// Entry point:  $0811 (via BASIC SYS 2065)
// IRQ handler:  $0983 (irq_0983)
//
// Code: 571 bytes, Data: 535 bytes
// Labels: 41, Subroutines: 0
//
// Cross-references: all OK
// ============================================


// --- Region $0811-$0996 ---
.pc = $0811 "main_0811"

main_0811:
        jsr $ff84
        jsr $ff5b
        jsr $ff8a
        sei
        lda #$c1
        sta $0318
        lda #$05
        sta $d022
        lda #$0d
        sta $d023
        lda #$80
        sta $d020
        sta $d021
        sta $0286
        sta $0291
        jsr $e544
        ldx #$0f
        lda #$00

loc_083f:
        sta $40,x
        dex
        bpl loc_083f
        lda #$30
        sta $01
        ldy #$00
        sty $46
        sty $48
        lda #$20
        sta $47
        lda #$f8
        sta $49
        ldx #$05

loc_0858:
        lda ($46),y
        sta ($48),y
        lda #$ff
        sta ($46),y
        lda #$00
        sta $2000,y
        iny
        bne loc_0858
        inc $47
        inc $49
        dex
        bne loc_0858
        lda #$37
        sta $01
        ldx #$07

loc_0875:
        lda #$00
        sta $2100,x
        lda $0ad1,x
        sta $2108,x
        dex
        bpl loc_0875
        ldx #$0f

loc_0885:
        lda $0ad9,x
        sta $0420,x
        dex
        bne loc_0885
        ldx #$00
        ldy #$00

loc_0892:
        lda $0ae9,x
        sta $46

loc_0897:
        asl $46
        bcc loc_08a5
        lda #$21
        sta $04c8,y
        lda #$09
        sta $d8c8,y

loc_08a5:
        iny
        tya
        and #$07
        bne loc_0897
        inx
        cpx #$19
        bne loc_0892
        ldx #$18

loc_08b2:
        lda txt_0b02,x
        sta $060f,x
        lda #$01
        sta $da0f,x
        dex
        bpl loc_08b2
        ldx #$77

loc_08c2:
        txa
        clc
        adc #$22
        sta $06d0,x
        dex
        bpl loc_08c2
        ldx #$1b
        ldy #$0b
        stx $42
        sty $43
        sei
        lda #$7f
        sta $dc0d
        and $d011
        sta $d011
        lda #$01
        sta $d019
        sta $d01a
        lda #$00
        sta $d012
        ldx #$83
        ldy #$09
        stx $0314
        sty $0315
        cli

loc_08f8:
        jsr $ffe4
        cmp #$20
        bne loc_08f8
        sei
        jsr $e518
        lda #$30
        sta $01
        ldy #$00
        sty $46
        sty $48
        lda #$f8
        sta $47
        lda #$20
        sta $49
        ldx #$05

loc_0917:
        lda ($46),y
        sta ($48),y
        iny
        bne loc_0917
        inc $47
        inc $49
        dex
        bne loc_0917
        lda #$37
        sta $01
        jsr $ff8a
        jsr $ff84
        ldx #$45

loc_0931:
        lda loc_093d,x
        sta $02b0,x
        dex
        bpl loc_0931
        jmp $02b0

loc_093d:
        sei
        lda #$30
        sta $01
        ldx #$01
        ldy #$08
        stx $ae
        sty $af
        ldx #$53
        ldy #$0c
        stx $4a
        sty $4b
        ldx #$7a
        ldy #$95
        stx $4c
        sty $4d
        ldy #$00

loc_095c:
        lda ($4a),y
        sta ($ae),y
        inc $ae
        bne loc_0966

loc_0964:
        inc $af

loc_0966:
        inc $4a
        bne loc_096c
        inc $4b

loc_096c:
        lda $4a
        cmp $4c
        bne loc_095c
        lda $4b
        cmp $4d
        bne loc_095c
        lda #$37
        sta $01
        cli
        jsr $e3bf
        jmp $fce2

irq_0983:
        lda #$01
        sta $d019
        ldx $40
        inx
        cpx #$03
        bne loc_0991
        ldx #$00

loc_0991:
        stx $40
        cpx #$00
        beq loc_09a1

// --- Region $09a1-$0a57 ---
.pc = $09a1 "loc_09a1"

loc_09a1:
        lda #$d8
        sta $d016
        lda $41
        sec
        sbc #$02
        sta $41
        bmi loc_09b2
        jmp loc_0a50

loc_09b2:
        and #$07
        sta $41
        lda $06d0
        pha
        lda $06f8
        pha
        lda $0720
        pha
        ldx #$00

loc_09c4:
        lda $06d1,x
        sta $06d0,x
        inx
        cpx #$77
        bne loc_09c4
        pla
        sta $0747
        pla
        sta $071f
        pla
        sta $06f7

loc_09db:
        ldy #$00
        lda ($42),y
        bne loc_09eb
        ldx #$1b
        ldy #$0b
        stx $42
        sty $43
        bne loc_09db

loc_09eb:
        and #$3f
        ldx #$33
        stx $01
        ldx #$1a
        stx $45
        ldx #$03

loc_09f7:
        asl
        rol $45
        dex
        bne loc_09f7
        sta $44
        lda $0747
        ldx #$04

loc_0a04:
        pha
        ldy #$04
        sty $47,x
        ldy #$03

loc_0a0b:
        asl
        rol $47,x
        dey
        bne loc_0a0b
        sta $46,x
        pla
        sec
        sbc #$28
        dex
        dex
        bpl loc_0a04
        ldy #$07
        ldx #$15

loc_0a1f:
        lda ($44),y
        eor #$ff
        sta $0400,x
        sta $0401,x
        sta $0402,x
        dex
        dex
        dex
        dey
        bpl loc_0a1f
        ldy #$07

loc_0a34:
        lda $0400,y
        sta ($46),y
        lda $0408,y
        sta ($48),y
        lda $0410,y
        sta ($4a),y
        dey
        bpl loc_0a34
        lda #$37
        sta $01
        inc $42
        bne loc_0a50

dat_0a4e:
        .byte $e6,$43                               // .C

loc_0a50:
        lda #$99
        sta $d012
        jmp $ea81

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

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

dat_0801:
        // === BASIC loader stub ===
        .byte $0f,$08                               // next line pointer ($080f)
        .byte $e4,$07                               // line number 2020
        .byte $9e                                   // SYS token
        .text "2065 SCE"                            // SYS 2065 → main_0811
        .byte $00                                   // end of line
        .byte $00,$00                               // end of BASIC program

// --- Region $0997-$09a0 ---
.pc = $0997 "dat_0997"

dat_0997:
        .byte $e0,$02,$f0,$03,$4c,$58,$0a,$4c,$78,$0a // ....LX.Lx.

// --- Region $0a58-$0c51 ---
.pc = $0a58 "dat_0a58"

dat_0a58:
        .byte $a9,$15,$8d,$18,$d0,$78,$a2,$07,$8a,$18,$69,$c8,$8d,$16,$d0,$a0 // .....x....i.....
        .byte $09,$88,$d0,$fd,$ca,$10,$f1,$58,$a9,$be,$8d,$12,$d0,$4c,$81,$ea // .......X.....L..
        .byte $a9,$18,$8d,$18,$d0,$a5,$41,$8d,$16,$d0,$a2,$2a,$ca,$d0,$fd,$a2 // ......A....*....
        .byte $00,$8a,$0a,$18,$69,$c2,$cd,$12,$d0,$d0,$fb,$bd,$20,$04,$8d,$21 // ....i....... ..!
        .byte $d0,$e8,$e0,$0d,$d0,$eb,$a9,$00,$8d,$21,$d0,$c6,$4c,$10,$22,$a9 // .........!..L.".
        .byte $02,$85,$4c,$a2,$00,$bd,$21,$04,$9d,$20,$04,$e8,$e0,$0f,$d0,$f5 // ..L...!.. ......
        .byte $a6,$4d,$bd,$d9,$0a,$8d,$2f,$04,$e8,$e0,$10,$d0,$02,$a2,$00,$86 // .M..../.........
        .byte $4d,$a9,$00,$8d,$12,$d0,$4c,$31,$ea,$ff,$fd,$e9,$e9,$e9,$e9,$d5 // M.....L1........
        .byte $55,$06,$0e,$03,$01,$03,$0e,$06,$00,$02,$0a,$07,$01,$07,$0a,$02 // U...............
        .byte $00,$63,$8e,$38,$38,$78,$94           // .c.88x.

txt_0aef:
        .text "QDDD$QD"
        .byte $5c                                   // backslash character
        .text "DDQDDD"
        .byte $f3,$8e,$38,$45,$59                   // ..8EY

txt_0b02:
        .encoding "screencode_mixed"
        .text "state of the art software"
        .encoding "petscii_upper"

txt_0b1b:
        .text "'THUNDERCATS' FROM ELITE. CRACKED AND ADAPTED BY NETWORK TEN ON FRIDAY, 6 NOVEMBER 1987. TODAY'S RANKING : TRIAD - FAIRLIGHT - YETI - DETONATOR - WIZAX - C64CG - TRIANON - SCA - TDT - SHIELD - NETWORK CREW - SOFTWAR TECHNICS - ACE - FUTURE DIVISION - SILENTS - BEASTIE BOYS - TSK - DECIBEL - SPC                "