History
- Released
- 1987
- Group
- The Detonator / 4001 Team — Germany
The Detonator was a German scener who operated as coder, cracker, and swapper, releasing a series of intros under the name "Detonator 4001" throughout 1987. He founded the 4001 Team and was also a member of United Cracker Corporation. CSDb documents three distinct Detonator 4001 intros — from March, July, and December 1987 — each coded and graphically designed by The Detonator himself. He was active on the German copy party circuit, attending FCS Copy Party 1987, Danish Gold Copy Party 1987, and AEK Copy-Party 1986. CSDb records over 70 releases associated with The Detonator, spanning cracks, tools, demos, and music — an unusually diverse output for a single scener. A comment on intros.c64.org from the Detonator himself confirms the intro's provenance within the scene's archival community.
Sources: CSDb · intros.c64.org
// ============================================ // output - Part 1 of 2 // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:40 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $ffff (63488 bytes) // Crunched with Exomizer — depacked by emulation // Packer entry: $0812 (via BASIC SYS 2066) // Entry point: $0334 (820) // // Code: 963 bytes, Data: 62525 bytes // Labels: 172, Subroutines: 2 // // Cross-references: all OK // ============================================ // --- Region $08d0-$08d8 --- .pc = $08d0 "Program $08d0" inc $180c,x bmi loc_0935 cpy #$fe brk dat_08d8: .byte $00 // . // --- Region $092a-$0938 --- .pc = $092a "loc_092a" loc_092a: jsr $ff81 jmp loc_1400 dat_0930: .byte $20,$00,$11,$20,$40 // .. @ loc_0935: ora #$20 brk dat_0938: .byte $16 // . // --- Region $0e32-$0e49 --- .pc = $0e32 "loc_0e32" loc_0e32: brk dat_0e33: .byte $00 // . loc_0e34: brk dat_0e35: .byte $00,$00,$c0 // ... loc_0e38: ora $19,x asl $1a,x ora $1a16,y ora $9f5f,y .byte $9f,$5f,$9f // sha $9f5f,y // ILLEGAL .byte $9f,$5f,$9f // sha $9f5f,y // ILLEGAL brk dat_0e49: .byte $00 // . // --- Region $0e8a-$0eaf --- .pc = $0e8a "loc_0e8a" loc_0e8a: .label loc_0e8b = * + 1 sbc $f6,x .label loc_0e8d = * + 1 inc $f5,x inc $f6,x .byte $57,$67 // sre $67,x // ILLEGAL lda $9a adc #$a6 txs adc #$d5 .byte $da // nop // ILLEGAL .byte $5a // nop // ILLEGAL adc #$a6 txs adc #$a6 bvc loc_0e32 bvc loc_0e34 bcc loc_0ef6 bcc loc_0e38 .byte $0f,$0f,$0f // slo $0f0f // ILLEGAL .byte $0f,$0f,$0f // slo $0f0f // ILLEGAL dat_0eae: .byte $0f,$0f // .. // --- Region $0ef6-$0efe --- .pc = $0ef6 "loc_0ef6" loc_0ef6: txs .label loc_0ef8 = * + 1 adc #$50 bcc loc_0e8b bvc loc_0e8d rti rti // --- Region $0f3e-$0f4c --- .pc = $0f3e "loc_0f3e" loc_0f3e: asl $15,x .byte $9f,$5f,$9f // sha $9f5f,y // ILLEGAL .byte $9f,$5f,$9f // sha $9f5f,y // ILLEGAL dat_0f46: .byte $9c,$50,$00,$00,$00,$00 // .P.... loc_0f4c: brk // --- Region $0fcd-$0fef --- .pc = $0fcd "loc_0fcd" loc_0fcd: txs adc #$55 inc $f6,x eor $a6,x txs adc #$a6 loc_0fd7: eor $94,x .byte $64,$a4 // nop $a4 // ILLEGAL sty $64,x ldy $94 bvc loc_0fd7 sbc $f6,x inc $f5,x inc $f6,x and $65,x lda $97