#193

Fantastic 4 Cracking Group [F4CG] 91

Fantastic 4 Cracking Group [F4CG]

442 lines of code

History

Group
Fantastic 4 Cracking Group — Italy, founded 1983

The ninety-first numbered intro from Fantastic 4 Cracking Group — among the highest sequence numbers in the group's catalogue and a testament to their extraordinary productivity. Staff member Zyron on intros.c64.org noted the intro "seems to be ripped from Dire Breaks," suggesting visual elements were borrowed from another production. The discussion also reveals a naming history — the group initially signed as "F4" before adding "CG" to their name, with an Italian ex-scener confirming that F4 and F4CG are the same outfit. Ricky, the group's founder, is reportedly visible on the intro screen. F4CG was founded in Italy in 1983 and is documented on CSDb with over 1,600 releases. The group's evolution from early Italian roots to an international operation is one of the most documented trajectories in C64 scene history. Other F4CG intros in this collection include #14 F4CG-32, #54 F4CG-43, and #118 F4CG-63.

Sources: intros.c64.org · CSDb

f4cg-91.asm 442 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:20
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Idiots Packer v2.1 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $09bb (2491)
//
// Code: 196 bytes, Data: 63292 bytes
// Labels: 58, Subroutines: 4
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $081f-$0866 ---
.pc = $081f "loc_081f"

loc_081f:
        sei
        ldx #$ff
        txs
        cld
        lda #$06
        sta $01
        stx $0291
        inx
        stx $d020
        stx $d021
        lda #$15
        sta $d018

loc_0837:
.label smc_0838 = * + 1
.label smc_0839 = * + 2
        lda $09ba                                   // !SMC: modified by $09c7, $09cc
        beq loc_0849
        jsr $ffd2
        inc smc_0838
        bne loc_0837
        inc smc_0839
        bne loc_0837

loc_0849:
        cli
        jsr $f13e
        cmp #$20
        beq loc_085d
        cmp #$59
        bne loc_0849
        lda #$2c
        sta $4529
        jmp loc_fce2

loc_085d:
        lda #$ce
        sta $4529
        jmp loc_fce2

dat_0865:
        .byte $93,$11                               // ..

// --- Region $09bb-$09d2 ---
.pc = $09bb "main_09bb"

main_09bb:
        lda #$37
        sta $01
        jsr $ff81
        jsr $ff84
        lda #$65
        sta smc_0838                                // SMC: modifies $0838
        lda #$08
        sta smc_0839                                // SMC: modifies $0839
        jmp loc_081f

dat_09d2:
        // === Fill data (1 bytes, $09d2-$09d2) ===
        .byte $00                                   // .

// --- Region $0cf0-$0cf0 ---
.pc = $0cf0 "Program $0cf0"
        brk

// --- Region $3446-$3446 ---
.pc = $3446 "Segment $3446"
        brk

// --- Region $4145-$4147 ---
.pc = $4145 "Segment $4145"
        brk

dat_4146:
        .byte $00                                   // .
        brk

// --- Region $4843-$4843 ---
.pc = $4843 "sub_4843"
// Referenced by: jsr from $ff8f

sub_4843:
        brk

// --- Region $4952-$4952 ---
.pc = $4952 "sub_4952"
// Referenced by: jsr from $ffd9

sub_4952:
        brk

// --- Region $4d49-$4d49 ---
.pc = $4d49 "loc_4d49"

loc_4d49:
        brk

// --- Region $4e55-$4e55 ---
.pc = $4e55 "sub_4e55"
// Referenced by: jsr from $ffa5

sub_4e55:
        brk

// --- Region $4f46-$4f4d ---
.pc = $4f46 "Segment $4f46"
        brk

dat_4f47:
        .byte $00,$00,$00,$00,$00,$00               // ......
        brk

// --- Region $509a-$509a ---
.pc = $509a "Segment $509a"
        brk

// --- Region $5942-$5942 ---
.pc = $5942 "sub_5942"
// Referenced by: jsr from $ffd6

sub_5942:
        brk

// --- Region $8ed0-$8ed0 ---
.pc = $8ed0 "Segment $8ed0"