// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:05
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $0c5a  (1114 bytes)
// Entry point:  $0811 (via BASIC SYS 2065)
// IRQ handler:  $0907 (irq_0907)
//
// Code: 691 bytes, Data: 423 bytes
// Labels: 55, Subroutines: 0
//
// Cross-references: all OK
// ============================================


// --- Region $0811-$0ac8 ---
.pc = $0811 "main_0811"

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

loc_0835:
        sta $40,x
        sta $0100,x
        dex
        bpl loc_0835
        lda #$80
        sta $47
        lda #$03
        sta $4b
        ldx #$95
        ldy #$0b
        stx $48
        sty $49
        ldx #$07

loc_084f:
        lda $0ae2,x
        sta $0108,x
        dex
        bpl loc_084f
        ldx #$a0

loc_085a:
        lda #$a0
        sta $06f7,x
        lda #$09
        sta $d84f,x
        sta $d8ef,x
        dex
        bne loc_085a

loc_086a:
        lda $d011
        bpl loc_086a
        ldx #$18

loc_0871:
        lda txt_0ac9,x
        sta $0637,x
        lda #$01
        sta $da37,x
        dex
        bpl loc_0871
        lda #$7f
        sta $dc0d
        and $d011
        sta $d011
        lda #$01
        sta $d019
        sta $d01a
        lda #$39
        sta $d012
        ldx #$07
        ldy #$09
        stx $0314
        sty $0315
        cli

loc_08a2:
        jsr $ffe4
        cmp #$20
        bne loc_08a2
        sei
        jsr $ff81
        jsr $ff8a
        jsr $ff84
        ldx #$45

loc_08b5:
        lda loc_08c1,x
        sta $02b0,x
        dex
        bpl loc_08b5
        jmp $02b0

loc_08c1:
        sei
        lda #$30
        sta $01
        ldx #$01
        ldy #$08
        stx $2d
        sty $2e
        ldx #$5b
        ldy #$0c
        stx $4a
        sty $4b
        ldx #$60
        ldy #$21
        stx $4c
        sty $4d
        ldy #$00

loc_08e0:
        lda ($4a),y
        sta ($2d),y
        inc $2d
        bne loc_08ea

loc_08e8:
        inc $2e

loc_08ea:
        inc $4a
        bne loc_08f0
        inc $4b

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

irq_0907:
        lda #$01
        sta $d019
        ldx $42
        dex
        bpl loc_0913
        ldx #$02

loc_0913:
        stx $42
        cpx #$01
        beq loc_0923
        cpx #$02
        beq loc_0920

dat_091d:
        .byte $4c,$c7,$09                           // L..

loc_0920:
        jmp loc_0a2e

loc_0923:
        lda #$10
        sta $d018
        lda $45
        ora #$d0
        sta $d016
        lda $4a
        sec
        sbc #$03
        sta $4a
        bmi loc_093b
        jmp loc_09bf

loc_093b:
        and #$07
        sta $4a
        ldx #$00

loc_0941:
        lda $06f9,x
        sta $06f8,x
        inx
        cpx #$9f
        bne loc_0941
        inc $4b
        lda $4b
        and #$03
        sta $4b
        bne loc_095c
        inc $48
        bne loc_095c
        inc $49

loc_095c:
        ldy #$00
        lda ($48),y
        bne loc_096c
        ldx #$96
        ldy #$0b
        stx $48
        sty $49
        bne loc_095c

loc_096c:
        ldx #$6a
        stx $4d
        asl
        asl
        asl
        rol $4d
        sta $4c
        ldy #$06

loc_0979:
        tya
        pha
        lda #$31
        sta $01
        lda ($4c),y
        sta $4e
        iny
        lda ($4c),y
        sta $4f
        ldx $4b

loc_098a:
        lda #$00
        asl $4f
        rol
        asl $4f
        rol
        asl $4e
        rol
        asl $4e
        rol
        dex
        bpl loc_098a
        tax
        lda #$37
        sta $01
        lda #$00
        sta $4e

loc_09a4:
        dey
        dey
        bmi $09b1
        lda $4e
        clc
        adc #$28
        sta $4e
        bne loc_09a4
        ldy $4e
        lda $0af2,x
        sta $071f,y
        pla
        tay
        dey
        dey
        bpl loc_0979

loc_09bf:
        lda #$81
        sta $d012
        jmp $ea81

loc_09c7:
        ldx #$0b

loc_09c9:
        dex
        bne loc_09c9
        lda #$14
        sta $d018
        ldy $0b6a
        ldx #$00

loc_09d6:
        lda $0b6b,x
        sta $0b6a,x
        inx
        cpx #$2b
        bne loc_09d6
        sty $0b95
        lda #$a2

loc_09e6:
        cmp $d012
        bne loc_09e6
        ldx #$02

loc_09ed:
        dex
        bne loc_09ed
        ldx #$07

loc_09f2:
        txa
        ora #$c0
        sta $d016
        ldy #$0a

loc_09fa:
        dey
        bne loc_09fa
        dex
        bpl loc_09f2
        dec $44
        bpl loc_0a26
        ldy #$7f
        lda $43
        tax
        and #$07
        cmp #$07
        beq loc_0a11
        ldy #$03

loc_0a11:
        sty $44
        lda $0b4a,x
        sta $d023
        dex
        bpl loc_0a1e
        ldx #$1f

loc_0a1e:
        stx $43
        lda $0b4a,x
        sta $d022

loc_0a26:
        lda #$c9
        sta $d012
        jmp $ea81

loc_0a2e:
        lda $4a
        sta $d016
        ldx #$07

loc_0a35:
        dex
        bne loc_0a35
        ldy #$00
        ldx #$00

loc_0a3c:
        lda $0b6a,y
        sta $d021
        lda $0aea,x
        sec

loc_0a46:
        sbc #$01
        bne loc_0a46
        iny
        inx
        cpx #$08
        bne loc_0a52

dat_0a50:
        .byte $a2,$00                               // ..

loc_0a52:
        cpy #$20
        bne loc_0a3c
        lda #$00
        sta $d021
        lda $45
        sec
        sbc #$01
        sta $45
        bpl loc_0ac1
        and #$07
        sta $45
        ldx #$00

loc_0a6a:
        lda $0451,x
        sta $0450,x
        lda $04f1,x
        sta $04f0,x
        inx
        cpx #$9f
        bne loc_0a6a
        ldx #$77
        ldy #$04
        stx $4e
        sty $4f
        ldx $46
        ldy #$08

loc_0a87:
        tya
        pha
        lda $0b02,x
        and $47
        beq loc_0a93
        lda #$21
.label loc_0a93 = * + 1
        bit $20a9
        ldy #$00
        sta ($4e),y
        lda $4e
        clc
        adc #$28
        sta $4e
        bcc loc_0aa4
        inc $4f

loc_0aa4:
        txa
        clc
        adc #$09
        tax
        pla
        tay
        dey
        bne loc_0a87
        lsr $47
        bne loc_0ac1
        lda #$80
        sta $47
        ldx $46
        inx
        cpx #$09
        bcc loc_0abf
        ldx #$00

loc_0abf:
        stx $46

loc_0ac1:
        lda #$39
        sta $d012
        jmp $ea31

// ============================================
// 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 $0ac9-$0c59 ---
.pc = $0ac9 "txt_0ac9"

txt_0ac9:
        .encoding "screencode_mixed"
        .text "state of the art software"
        .encoding "petscii_upper"
        .byte $ff,$fd,$e9,$e9,$e9,$e9,$d5,$55,$01,$06,$07,$07,$07,$07,$07,$07 // .......U........
        .byte $20,$7c,$7e,$e2,$6c,$e1,$7f,$fb,$7b,$ff,$61,$ec,$62,$fe,$fc,$a0 //  |~.l...{.a.b...
        .byte $7c,$7c,$7c,$7c,$03,$e0,$fc,$00,$00,$fe,$fe,$fe,$fe,$07,$f0,$fe // ||||............
        .byte $00,$00,$06,$c6,$c6,$c6,$06,$30,$c6,$00,$00,$7e,$c6,$c6,$c6,$06 // .......0...~....
        .byte $f0,$c6,$00,$00,$fc,$c6,$c6,$c6,$06,$f0,$c6,$00,$00,$c0,$c6,$c6 // ................
        .byte $c6,$06,$30,$c6,$00,$00,$fe,$fe,$fe,$fe,$06,$36,$de,$c0,$00,$fe // ..0........6....
        .byte $7c,$7c,$7c,$06,$36,$dc,$c0,$00,$03,$01,$03,$0e,$06,$00,$0b,$0c // |||.6...........
        .byte $0f,$01,$0f,$0c,$0b,$00,$05,$0d,$07,$01,$07,$0d,$05,$00,$02,$0a // ................
        .byte $07,$01,$07,$0a,$02,$00,$06,$0e,$06,$0e,$04,$03,$0e,$01,$03,$01 // ................
        .byte $03,$01,$0e,$03,$04,$0e,$06,$04,$00,$06,$00,$02,$00,$08,$02,$0a // ................
        .byte $08,$07,$0a,$01,$07,$01,$07,$01,$0a,$07,$08,$0a,$02,$08,$00,$02 // ................
        .byte $00,$06,$00,$04                       // ....

txt_0b96:
        .text "       LITEACE OF 2000 A.D. PRESENTS: SINUS SCULPT V1.0 ... NO GREETINGS ... RIGHT NOW I'M SITTING AT THE DEXION PARTY, HAVING A GREAT FUN, MEETING A LOT OF NEW FRIENDS... SEE YA LATER...         "