History
- Released
- September 1987
- Group
- C64 Comics Group — Belgium, founded 1987
CSDb identifies this as C64 Comics Group's primary intro (release 59199), released in September 1987 with a charset by Damon Redmond. Despite external database credits suggesting otherwise, disassembly of the binary reveals no SID register writes — the intro runs silent. The intro saw extensive reuse across at least 14 C64CG crack releases including Anarchy, Bubble Bobble, IK+, and Spore. C64 Comics Group was a Belgian collective founded in 1987 that dissolved the following year, with members regrouping to form Transcom. The charset work and text scroller form the core of the visual presentation — a straightforward design that prioritized function over flash. Reusing a single intro template across numerous cracks was standard practice for groups focused primarily on cracking rather than demo-style presentation. The group's brief lifespan — roughly one year — makes their 14-release catalogue a concentrated burst of activity within Belgium's small but active C64 scene.
Sources: CSDb · CSDb Group · 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:13 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $efff (59392 bytes) // Crunched with Cruncher AB — depacked by emulation // Packer entry: $080d (via BASIC SYS 2061) // Entry point: $0c88 (3208) // IRQ handler: $1180 (irq_1180) // IRQ handler: $0da0 (irq_0da0) // IRQ handler: $1200 (irq_1200) // IRQ handler: $125a (irq_125a) // IRQ handler: $127e (irq_127e) // IRQ handler: $12a1 (irq_12a1) // IRQ handler: $0d00 (irq_0d00) // IRQ handler: $0d24 (irq_0d24) // IRQ handler: $0d47 (irq_0d47) // IRQ handler: $0d83 (irq_0d83) // // Code: 1728 bytes, Data: 57664 bytes // Labels: 188, Subroutines: 16 // // Cross-references: all OK // ============================================ // --- Region $0a99-$0aa4 --- .pc = $0a99 "loc_0a99" loc_0a99: rol $fc7c,x sty $1818 clc bmi loc_0ad2 bmi loc_0b04 rts // --- Region $0acb-$0ad2 --- .pc = $0acb "loc_0acb" loc_0acb: clc clc bmi loc_0aff bmi loc_0b31 rts loc_0ad2: rts // --- Region $0aff-$0b09 --- .pc = $0aff "loc_0aff" loc_0aff: .byte $0f,$07,$07 // slo $0707 // ILLEGAL .byte $03,$03 // slo ($03,x) // ILLEGAL loc_0b04: .byte $03,$07 // slo ($07,x) // ILLEGAL .byte $07,$0c // slo $0c // ILLEGAL dat_0b08: .byte $3c,$3c // << // --- Region $0b31-$0b31 --- .pc = $0b31 "loc_0b31" loc_0b31: brk // --- Region $0c88-$0ddf --- .pc = $0c88 "main_0c88" main_0c88: sei lda #$35 sta $01 ldx #$00 loc_0c8f: lda $1a00,x sta $e000,x lda $1b00,x sta $e100,x lda $1c00,x sta $e200,x lda $1d00,x sta $e300,x lda $1e00,x sta $e400,x lda $1f00,x sta $e500,x lda $2000,x sta $e600,x lda $2100,x sta $e700,x lda $2200,x sta $e800,x lda $2300,x sta $e900,x lda $2400,x sta $ea00,x lda $2500,x sta $eb00,x lda $2600,x sta $ec00,x lda $2700,x sta $ed00,x lda $2800,x sta $ee00,x lda $2900,x sta $ef00,x inx bne loc_0c8f lda #$00 jsr $e55f lda #$37 sta $01 cli jmp loc_0e00 dat_0cff: .byte $00 // . irq_0d00: nop pha pha pla pla lda #$01 sta $d020 sta $d021 lda #$01 sta $d019 lda #$ca sta $d012 lda #$24 ldy #$0d sta $0314 sty $0315 jmp loc_ea81 irq_0d24: pha pha pla