History
- Released
- 5 October 1990
- Code
- Ecstasy
- Music
- Sphere (Michael Kugel) — "Bomb or Not?"
- Group
- Brainbombs — Germany, founded 1990
Ecstasy coded this Brainbombs intro, released on 5 October 1990, with music by Sphere (Michael Kugel) performing his original composition "Bomb or Not?" — preserved in the HVSC. Brainbombs were a German group founded in 1990, operating under the abbreviation "Bomz." Their output was modest but well-documented. Doc Snyder's page catalogues three intros from the group, showing Sphere as a recurring musician alongside contributions from JCH and Drax in other entries. The scrolltext from their third intro reveals a combative attitude typical of the era, trash-talking rival sceners while sending greetings to Destiny, Crazy, Censor, Ikari+Talent, and X-Factor. This is the second Brainbombs entry in the rankings, alongside #279 Brainbombs-02. The group's brief but documented existence in 1990 places them squarely in the late golden age of C64 cracking.
Sources: CSDb · Doc Snyder
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:11 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $28ff (8448 bytes) // Crunched with Cruncher AB — depacked by emulation // Packer entry: $080d (via BASIC SYS 2061) // Entry point: $0e88 (3720) // // Code: 1877 bytes, Data: 6571 bytes // Labels: 194, Subroutines: 10 // // Cross-references: all OK // ============================================ // --- Region $0e88-$0f4b --- .pc = $0e88 "main_0e88" main_0e88: lda #$00 jsr sub_2748 sei ldx #$27 ldy #$67 sty $53 stx $54 ldx #$27 ldy #$b7 sty $5b stx $5c ldx #$d0 stx $50 stx $58 stx $51 stx $59 lda #$e0 sta $6d ldx #$02 stx $6f ldx #$01 stx $52 stx $55 stx $56 stx $5a stx $5d stx $5e dex stx $6e stx $6c loc_0ec3: lda #$2d sta $0400,x sta $0500,x sta $0600,x sta $06e8,x lda #$f8 sta $d800,x sta $d900,x sta $da00,x sta $dae8,x inx bne loc_0ec3 dex stx scr_0800 ldx #$07 loc_0ee8: txa sta $60,x dex bpl loc_0ee8 ldx #$34 lda #$00 loc_0ef2: sta $0300,x inx bne loc_0ef2 ldx #$01 stx $d019 stx $d01a stx $dc0d ldx #$4a stx $d012 ldx #$1b stx $d011 ldx #$1a ldy #$fe sty $0314 stx $0315 ldx #$ea ldy #$86 sty $0318 stx $0319 cli loc_0f22: ldx #$2c loc_0f24: cpx $d012 bne loc_0f24 lda $d011 bmi loc_0f24 lda #$13 sta $d018 lda $51 sta $d016 lda #$f9 ldx #$f8 ldy #$ff sta $d021 stx $d022 sty $d023 dec $58 bne loc_0f5e chr_0f4b: // === Charset data (1 bytes, $0f4b-$0f4b) === .byte $e6 // char 0 (partial) // --- Region $0f5e-$0f60 --- .pc = $0f5e "loc_0f5e" loc_0f5e: jmp loc_1854 // --- Region $1021-$1080 --- .pc = $1021 "sub_1021" // Referenced by: jsr from $1ab8 sub_1021: ldx #$00 dec $1090 bmi loc_1034 jsr sub_1226 jsr sub_1225 jmp sub_1225 dat_1031: .byte $ff,$ff,$ff // ... loc_1034: lda #$02 sta $1090