← #603 Top 1024 #605 →
#604

Enigma 02

Enigma

5.360 lines of code

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

History

Code
Trigger
Graphics
Jatagan
Music
The Beasty Boy / TBB (Tero Hilpinen)
Released
October 1992
Group
Enigma -- CSDb group ID #601, Germany, founded May 1991

Enigma Crack Intro #02 is an October 1992 release from the German cracking group Enigma, preserved on CSDb as entry #96966. The intro was coded by Trigger, with graphics by Jatagan and music by The Beasty Boy / TBB (Tero Hilpinen), whose SID track "Griffie" is preserved in the High Voltage SID Collection. Doc Snyder confirms Trigger as coder and TBB as musician for this specific intro. The scrolltext announces a crack of "Enforcer" from Golden Disk by Chrysagon -- Enigma's regular cracker -- and sends greetings to TSM, Empire, Illusion, Talent, RSI, and Sierra. The scroll notably ends with the remark "i stop now and better play Dune on the PC," reflecting the era's ongoing migration of sceners away from the C64 to PC gaming. Enigma operated under the tagline "Cult of coolness" and was founded in May 1991. The Finnish composer TBB's involvement reflects the international reach of the C64 SID music community.

Sources: CSDb Release · Doc Snyder · intros.c64.org

enigma-02.asm 5.360 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:19
// 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:  $259b (9627)
// IRQ handler:  $241c (irq_241c)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 5205 bytes, Data: 58283 bytes
// Labels: 603, Subroutines: 28
//
// Cross-references: all OK
// ============================================


// --- Region $0bc0-$0c57 ---
.pc = $0bc0 "sub_0bc0"

// Referenced by: jsr from $24a4
sub_0bc0: {
        inc $d000
        lda $d000
        cmp #$00
        bne skip1
        lda $d010
        eor #$01
        sta $d010
skip1:
        inc $d002
        lda $d002
        cmp #$00
        bne skip2
        lda $d010
        eor #$02
        sta $d010
skip2:
        inc $d004
        lda $d004
        cmp #$00
        bne done
        lda $d010
        eor #$04
        sta $d010
done:
        rts
}

// Referenced by: jsr from $24a7, $24aa
sub_0bf7: {
        inc $d006
        lda $d006
        cmp #$00
        bne skip
        lda $d010
        eor #$08
        sta $d010
skip:
        inc $d008
        lda $d008
        cmp #$00
        bne done
        lda $d010
        eor #$10
        sta $d010
done:
        rts
}

// Referenced by: jsr from $24ad, $24b0, $24b3, $f838, $f83b
sub_0c1c: {
        inc $d00a
        lda $d00a
        cmp #$00
        bne skip
        lda $d010
        eor #$20
        sta $d010
skip:
        inc $d00c
        lda $d00c
        cmp #$00
        bne done
        lda $d010
        eor #$40
        sta $d010
done:
        rts
}
// Referenced by: jsr from $24b6, $f83e

sub_0c41:
.label smc_0c42 = * + 1
        lda chr_0c57                                // !SMC: modified by $0c53
        sta $d02e
        inc smc_0c42
        lda smc_0c42
        cmp #$80
        bne loc_0c56
        lda #$57
        sta smc_0c42                                // SMC: modifies $0c42

loc_0c56:
        rts

chr_0c57:
        // === Charset data (1 bytes, $0c57-$0c57) ===
        .byte $02                                   // char 0 (partial)

// --- Region $0c80-$0cb9 ---
.pc = $0c80 "sub_0c80"
// Referenced by: jsr from $2465

sub_0c80:
.label smc_0c81 = * + 1
        lda $0cc8                                   // !SMC: modified by $0c99
        ldx #$00

loc_0c85:
        sta $dad0,x
        inx
        cpx #$28
        bne loc_0c85
        inc smc_0c81
        lda smc_0c81
        cmp #$e0
        bne loc_0c9c
        lda #$b9
        sta smc_0c81                                // SMC: modifies $0c81

loc_0c9c:
.label smc_0c9d = * + 1
        lda $0cfa                                   // !SMC: modified by $0cb5
        ldx #$00

loc_0ca1:
        sta $db20,x
        inx
        cpx #$28
        bne loc_0ca1
        inc smc_0c9d
        lda smc_0c9d
        cmp #$ff
        bne loc_0cb8
        lda #$e0