History
- Group
- Fantastic 4 Cracking Group — Italy, founded 1983
The forty-first numbered crack intro from Fantastic 4 Cracking Group. On intros.c64.org, staff member iAN CooG linked this to a release by Detonator, suggesting the coder's identity. An earlier commenter, Belphegor, noted the intro featured "nice color-cycling" with reused character elements — a common practice in crack intros of the era where groups recycled proven visual components. F4CG was founded in Italy in 1983 by Ricky and is documented on CSDb as one of the most long-lived groups on the Commodore 64, with over 1,600 releases spanning from the early 1980s through to the present day. No music or graphics credits have been identified. The group's Italian origin made them a distinctive presence in a scene dominated by Scandinavian, German, and British operations. Other F4CG intros in this collection range from the top-ranked #14 F4CG-32 to #865 F4CG-47.
Sources: intros.c64.org · CSDb
// ============================================ // output - Part 1 of 2 // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:33 // 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: $1450 (5200) // IRQ handler: $163e (irq_163e) // IRQ handler: $ea31 (loc_ea31) // // Code: 1298 bytes, Data: 62190 bytes // Labels: 154, Subroutines: 8 // // Cross-references: all OK // ============================================ // --- Region $1000-$1075 --- .pc = $1000 "sub_1000" // Referenced by: jsr from $1458 sub_1000: ldx #$00 loc_1002: lda txt_10a0,x sta $04a0,x inx cpx #$a0 bne loc_1002 ldx #$00 loc_100f: lda $1140,x sta $0608,x lda $1168,x sta $0658,x inx cpx #$28 bne loc_100f nop nop nop nop nop nop nop lda #$01 ldx #$00 loc_102b: sta $d800,x sta $d900,x sta $da00,x sta $db00,x inx cpx #$00 bne loc_102b ldx #$00 lda #$01 loc_1040: sta $d8f0,x inx cpx #$78 bne loc_1040 lda #$00 sta $d020 sta $d021 lda #$01 sta $d022 lda #$0e sta $d023 lda #$12 sta $d018 lda #$4d sta $a0 ldx #$00 loc_1065: lda $a0 nop sta $0748,x inc $a0 inx cpx #$28 bne loc_1065 jmp loc_1191 dat_1075: // === Fill data (1 bytes, $1075-$1075) === .byte $00 // . // --- Region $1191-$11ea --- .pc = $1191 "loc_1191" loc_1191: ldx #$00 loc_1193: lda #$07 sta $d9b8,x sta $daa8,x lda #$08 sta $d9e0,x sta $dad0,x inx cpx #$28 bne loc_1193 jsr sub_13f0 rts dat_11ac: .byte $00,$01,$08,$03 // .... loc_11b0: inc $11af ldx $11af cpx #$05 beq loc_11bd jmp loc_1300 loc_11bd: lda #$00 sta $11af lda $11ae cmp #$08 bne loc_11ce lda #$00 sta $11ae loc_11ce: ldy $11ae lda $11f0,y sta $11ad inc $11ae ldx #$00 lda $11ad loc_11df: sta $d8a0,x inx cpx #$a0 bne loc_11df jmp loc_1300