#609

AEK Crackware Essen 2099 02

AEK Crackware Essen 2099

902 lines of code

RasterbarsRSTRSpritesSPRT

History

Group
AEK Crackware Essen 2099 — Germany (Essen)

The second numbered intro from AEK Crackware Essen 2099, a group whose name clearly identifies origins in the German city of Essen. The CSDb search under the full group name returned no direct matching releases, placing this group among the less-documented operations in the archive. No individual credits for code, music, or graphics have been identified across any searched source. The group does not appear on Doc Snyder's page, Demozoo, Pouet, or in any of the major scene history resources. The "2099" suffix was a stylistic convention used by some late-1980s groups, evoking a futuristic identity. The intros.c64.org listing attracted a single comment from Rough in September 2010, indicating the intro was catalogued as part of broader preservation efforts. The Essen connection places AEK within the Rhine-Ruhr region — one of the most active areas for C64 groups in West Germany, home to numerous cracking and demo formations.

Sources: intros.c64.org

aek-02.asm 902 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:07
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $1dff  (5632 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $0f20 (3872)
// IRQ handler:  $101c (irq_101c)
//
// Code: 686 bytes, Data: 4946 bytes
// Labels: 110, Subroutines: 4
//
// Verification: 6 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $085a-$0860 ---
.pc = $085a "loc_085a"

loc_085a:
        sei
        bvs loc_08d5
        ror.abs $0063
        rti

// --- Region $0890-$0897 ---
.pc = $0890 "loc_0890"

loc_0890:
        bvs loc_08fe
        ror $7c
        sei
        jmp ($0063)

// --- Region $08d5-$08d5 ---
.pc = $08d5 "loc_08d5"

loc_08d5:
        rts

// --- Region $08fe-$08fe ---
.pc = $08fe "loc_08fe"

loc_08fe:
        rts

// --- Region $0a0a-$0a19 ---
.pc = $0a0a "Program $0a0a"
        .byte $ff,$fe,$7f                           // isc $7ffe,x // ILLEGAL
        .byte $ff,$fe,$7f                           // isc $7ffe,x // ILLEGAL
        eor $fe,x
        .byte $7f,$81,$fe                           // rra $fe81,x // ILLEGAL
        .byte $7f,$81,$fe                           // rra $fe81,x // ILLEGAL

dat_0a18:
        .byte $7f,$aa                               // ..

// --- Region $0da9-$0da9 ---
.pc = $0da9 "Program $0da9"
        brk

// --- Region $0f20-$0f43 ---
.pc = $0f20 "main_0f20"

main_0f20:
        lda #$07
        ldx #$00

loc_0f24:
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_0f24
        lda #$00
        sta $d020
        sta $d021
        lda #$38
        sta $0800
        jmp loc_1050

dat_0f43:
        // === Sine/lookup table (93 bytes, range $00-$30) ===
        .byte $00                                   // .

// --- Region $1000-$1046 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $10e2

sub_1000:
        sei
        lda #$7f
        sta $dc0d
        lda #$81
        sta $d01a
        lda #$1b
        sta $d011
        lda #$1c
        sta $0314
        lda #$10
        sta $0315
        cli
        rts
// Referenced by: branch from $1021

irq_101c:
        lda $d019
        and #$01
        beq irq_101c
        sta $d019
        inc $a0
        lda $a0
        cmp #$01
        bne loc_1031
        jmp loc_1100

loc_1031:
        cmp #$02
        bne loc_1038
        jmp loc_1200

loc_1038:
        cmp #$03
        bne loc_103f
        jmp loc_1480

loc_103f:
        lda #$00
        sta $a0
        jmp loc_14a0

dat_1046:
        .byte $00                                   // .

// --- Region $1050-$10ee ---
.pc = $1050 "loc_1050"

loc_1050:
        ldx #$00

loc_1052:
        lda dat_15a0,x
        sta $0400,x