← #633 Top 1024 #635 →
#634

Elysium 01

Elysium

4.318 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRTBitmapBMAP
Disassemble Download .asm Download .prg intros.c64.org

History

Group
Elysium — Poland

A crack intro from Elysium, a Polish group catalogued on CSDb under group ID 197 with a substantial release history. CSDb documents over a dozen Elysium crack intros alongside the group's "Cruel" packer tool in multiple versions (V2.8 and V2.9+), disk covers, and demo productions including "Awesome Elysium" and "Voxelysium." The group also co-organized the Elysium and Antia Demo Party, documented in a party identifiers collection on CSDb. No individual credits for code, music, or graphics have been identified for this specific intro. The development of their own cracking tools — the Cruel packer series — indicates a technically capable group that contributed to scene infrastructure beyond pure cracking. Elysium's presence in the Polish scene places them in an Eastern European C64 community that was smaller but dedicated compared to Scandinavia or Germany. This intro sits alongside #710 ESM-02 and #635 ESM-05 in the collection.

Sources: CSDb group · intros.c64.org

esm-01.asm 4.318 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:21
// 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:  $3880 (14464)
// IRQ handler:  $0c11 (irq_0c11)
//
// Code: 3594 bytes, Data: 59894 bytes
// Labels: 490, Subroutines: 8
//
// Cross-references: all OK
// ============================================


// --- Region $0a00-$0e5a ---
.pc = $0a00 "loc_0a00"

loc_0a00:
        jsr sub_0e38
        lda #$00
        ldx #$00

loc_0a07:
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta dat_db00,x
        sta $0400,x
        sta $0468,x
        inx
        bne loc_0a07
        stx $d020
        stx $d021

loc_0a22:
        lda txt_0fb0,x
        sta $0590,x
        lda #$00
        sta $d990,x
        inx
        cpx #$50
        bne loc_0a22
        jsr sub_1000
        lda #$18
        sta $07
        sei
        lda #$7f
        sta $dc0d
        lda #$01
        sta $02
        sta $05
        sta $d01a
        lda #$1b
        sta $d011
        lda #$30
        sta $d012
        lda #$11
        sta $0314
        lda #$0c
        sta $0315
        lda #$ff
        sta $02
        cli
        ldx #$10

loc_0a63:
        lda #$00
        sta $0f

loc_0a67:
        lda $0f
        beq loc_0a67
        dex
        bne loc_0a63
        lda #$00
        sta $30
        lda #$2f
        sta $31

loc_0a76:
        ldx #$02

loc_0a78:
        lda #$00
        sta $0f

loc_0a7c:
        lda $0f
        beq loc_0a7c
        dex
        bne loc_0a78

loc_0a83:
        ldy $2b40,x
        lda ($30),y
        sta $0400,x
        ldy $2d00,x
        lda ($30),y
        sta $d800,x
        inx
        bne loc_0a83

loc_0a96:
        ldy $2c40,x
        lda ($30),y
        sta $0500,x
        ldy $2e00,x
        lda ($30),y
        sta $d900,x
        inx
        cpx #$68
        bne loc_0a96
        inc $31
        lda $31
        cmp #$36
        bne loc_0a76
        ldx #$20

loc_0ab5:
        lda #$00
        sta $0f

loc_0ab9:
        lda $0f
        beq loc_0ab9
        dex
        bne loc_0ab5

loc_0ac0:
        lda $0e89,x
        sta dat_0e5b,x
        lda $0e90,x
        sta $0e62,x
        ldy #$03

loc_0ace:
        lda #$00
        sta $0f

loc_0ad2:
        lda $0f
        beq loc_0ad2
        dey
        bne loc_0ace