History
- Group
- Fantastic 4 Cracking Group — Italy, founded 1983
The seventeenth numbered crack intro from Fantastic 4 Cracking Group, ranking 377th overall. No CSDb match has been confirmed and no individual credits are available for code, music, or graphics. Comments on intros.c64.org from Ze Smasher (2004) and Sander (2011) confirm the intro was known to the preservation community. F4CG was founded in Italy in 1983, making them one of the longest-running cracking operations on the Commodore 64 — their activity spanning the platform's entire commercial life cycle and well beyond. The group developed extensive international connections through BBS networks and mail-trading, regularly employing Scandinavian and Dutch musicians on their later productions. Their numbered intro series eventually exceeded ninety entries, a volume few contemporaries could match. This seventeenth entry falls in the middle portion of the sequence. Other F4CG intros in this collection include #88 F4CG-15, #163 F4CG-09, and #30 F4CG-08.
Sources: intros.c64.org
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:28 // 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: $19e0 (6624) // IRQ handler: $1b23 (irq_1b23) // // Code: 5709 bytes, Data: 57779 bytes // Labels: 503, Subroutines: 18 // // Cross-references: all OK // ============================================ // --- Region $0907-$0909 --- .pc = $0907 "sub_0907" // Referenced by: jsr from $fd33 sub_0907: bcs loc_0909 loc_0909: brk // --- Region $093a-$093a --- .pc = $093a "Program $093a" brk // --- Region $09d0-$09d3 --- .pc = $09d0 "Program $09d0" .byte $82,$c2 // nop #$c2 // ILLEGAL .byte $c2,$02 // nop #$02 // ILLEGAL // --- Region $0ab0-$0ab3 --- .pc = $0ab0 "Program $0ab0" ldy.abs $0000 brk // --- Region $0c8d-$0c92 --- .pc = $0c8d "Program $0c8d" rol $0c3b cpy #$00 brk // --- Region $0f00-$0f25 --- .pc = $0f00 "sub_0f00" // Referenced by: jsr from $1ba1, $f231 sub_0f00: jmp loc_0fdb // Referenced by: jsr from $1914, $1a26, $f0bc sub_0f03: jmp loc_0fe9 dat_0f06: .byte $01,$00,$00,$00,$00,$0b,$4f // ......O // Referenced by: jsr from $ff5b sub_0f0d: .byte $1b,$ff,$00 // slo $00ff,y // ILLEGAL brk dat_0f11: .byte $81,$60,$60 // .`` // Referenced by: jsr from $fd15 sub_0f14: rti dat_0f15: .byte $0b,$0b,$02,$05,$05 // ..... .byte $ff,$00,$07 // isc $0700,x // ILLEGAL asl $0800 ora ($05,x) php asl $24,x brk // --- Region $0fdb-$1659 --- .pc = $0fdb "loc_0fdb" loc_0fdb: lda dat_0f06 cmp #$01 beq loc_1059 cmp #$02 bne loc_1025 jmp loc_104e loc_0fe9: tax lda $18f7,x sta $0f47 sta $0f7c txa sta $0f7e ldx #$00 asl asl clc adc $0f7e adc $0f7e tay loc_1003: lda $178b,y sta $1785,x iny inx cpx #$06 bne loc_1003 ldy #$00 lda $0f7e asl adc $0f7e tax loc_1019: lda $0f07,y sta $0f07,y inx iny cpy #$03 bne loc_1019 loc_1025: ldx #$02 lda #$00 loc_1029: sta $0f31,x sta $0f2b,x sta $0f28,x sta $0f1f,x sta $0f82,x sta $0f22,x sta $0f85,x sta $0f25,x dex bpl loc_1029 lda #$1f sta $105a lda #$01