History
- Graphics
- The Elegance
- Music
- Markus Schneider (Diflex)
- Released
- December 1992
- Group
- Enigma -- CSDb group ID #601, Germany, founded May 1991
Enigma Crack Intro #01 is a December 1992 release from the German cracking group Enigma, founded in May 1991. The intro features graphics by The Elegance and music by Markus Schneider -- better known as Diflex -- whose SID track "Think Cross" is preserved in the High Voltage SID Collection. No code credit is recorded on CSDb for this specific intro. Doc Snyder credits Diflex for the music and preserves the scrolltext, which announces a crack of "First Samurai" from Image Works/Ubi Soft by Chrysagon -- Enigma's primary cracker. Greetings are sent to Empire, HOK/Arcade, Red Sector, Fairlight, and TSM. The scroll characterizes the release as a Christmas present, placing it firmly in December 1992. Enigma operated under the tagline "Cult of coolness" and Doc Snyder's page catalogues three intros for the group, with code by Frank and Trigger across different entries. The release is preserved on CSDb as entry #106869.
Sources: CSDb Release · Doc Snyder · intros.c64.org
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59: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: $34a0 (13472) // IRQ handler: $0900 (irq_0900) // IRQ handler: $0947 (irq_0947) // IRQ handler: $0991 (irq_0991) // IRQ handler: $09db (irq_09db) // IRQ handler: $0a25 (irq_0a25) // IRQ handler: $0be0 (irq_0be0) // IRQ handler: $0c2a (irq_0c2a) // IRQ handler: $0c74 (irq_0c74) // IRQ handler: $0cbe (irq_0cbe) // // Code: 5965 bytes, Data: 57523 bytes // Labels: 743, Subroutines: 40 // // Cross-references: all OK // ============================================ // --- Region $0820-$08e7 --- .pc = $0820 "loc_0820" loc_0820: lda #$00 sta $d011 sta $d021 sta $d020 lda #$01 tax tay sta smc_106d // SMC: modifies $106d ldx #$00 lda #$01 loc_0836: sta $d800,x sta $d900,x sta $da00,x sta $db00,x inx bne loc_0836 lda #$00 sta $d017 sta $d01c sta $d01d lda #$ff sta $d015 sta $d01b sei lda #$01 sta $d019 lda #$01 sta $d01a lda #$7f sta $dc0d lda #$10 sta $d012 ldx #$00 ldy #$09 stx $0314 sty $0315 jsr sub_0892 cli jmp loc_3500 // Referenced by: jsr from $33da, $33dd, $33e0, $33e3, $3507, $353b, $3580; branch from $0881 sub_087e: lda $0810 beq sub_087e lda #$00 sta $0810 jsr sub_3550 jsr sub_106c jsr sub_3560 rts // Referenced by: jsr from $0877 sub_0892: lda #$18 sta $0817 .label loc_0899 = * + 2 sta $0818 sta $0819 lda #$a0 sta $081c sta $081d sta $081e ldx #$08 lda #$00 loc_08ac: sta $d026,x dex bne loc_08ac lda $d012 and #$0f sta $0edb lda #$00 sta $0ed9 lda #$09 sta $0eda ldx #$00 lda #$00 loc_08c8: sta $0400,x sta $0500,x sta $0600,x sta $06f8,x inx bne loc_08c8 lda #$04 sta $081f lda #$10 sta smc_090a // SMC: modifies $090a lda #$00 sta $394f rts dat_08e7: .byte $00 // . // --- Region $0900-$0a6e --- .pc = $0900 "irq_0900" irq_0900: inc $d019 .label smc_0904 = * + 1 jsr sub_0adb // !SMC: modified by $0eee lda $081f .label smc_090a = * + 1 ora #$10 // !SMC: modified by $08de, $3967 sta $d011 lda $081d sta $d016 lda $0818 sta $d018 lda $081a clc adc #$1a jsr sub_0b28