History
- Group
- Fantastic 4 Cracking Group — Italy, founded 1983
F4CG's fifteenth numbered intro, ranking 88th overall — among the higher-placed entries from the Italian group's extensive catalogue. No CSDb match has been confirmed and no individual credits survive for code, music, or graphics. Ze Smasher — F4CG's prolific coder — commented on the intros.c64.org page in 2004 and 2008, alongside community members CenTraX, Twoflower, Zyron, and Rough. The volume of discussion activity suggests this intro retained a following among scene veterans long after its original release. F4CG was founded in 1983 and maintained remarkably consistent output through the early 1990s, with Smasher coding many of their later productions including #33 F4CG-20 and #105 F4CG-01. Whether Smasher also coded this fifteenth entry is plausible given its era but remains unconfirmed. The high ranking — 88th among all intros — indicates this was one of F4CG's more widely distributed or visually distinctive productions.
Sources: intros.c64.org
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:19 // 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: $0850 (2128) // IRQ handler: $0917 (irq_0917) // // Code: 1778 bytes, Data: 61710 bytes // Labels: 243, Subroutines: 12 // // Verification: 6 line(s) auto-corrected to .byte for exact byte matching // // Cross-references: all OK // ============================================ // --- Region $0850-$09ed --- .pc = $0850 "main_0850" main_0850: { jsr $e544 lda #$00 sta $d020 sta $d021 tax loop1: lda $0828,x sta $0428,x lda #$20 sta $06f8,x inx cpx #$28 bne loop1 ldx #$00 loop2: lda #$00 sta $d7a0,x sta $db00,x lda #$08 sta $d8a0,x sta $d9a0,x sta $d9f8,x inx bne loop2 lda #$18 sta smc_1001 // SMC: modifies $1001 sbc #$01 sta smc_15c9 // SMC: modifies $15c9 adc #$04 sta smc_100a // SMC: modifies $100a adc #$04 sta smc_1015 // SMC: modifies $1015 adc #$04 sta smc_1020 // SMC: modifies $1020 adc #$04 sta smc_102b // SMC: modifies $102b adc #$04 sta smc_1034 // SMC: modifies $1034 adc #$04 sta smc_103d // SMC: modifies $103d adc #$04 sta smc_1048 // SMC: modifies $1048 adc #$04 sta smc_1053 // SMC: modifies $1053 adc #$04 sta smc_105e // SMC: modifies $105e adc #$04 sta smc_1069 // SMC: modifies $1069 adc #$04 sta smc_1074 // SMC: modifies $1074 adc #$04 sta smc_107f // SMC: modifies $107f adc #$04 sta smc_108a // SMC: modifies $108a adc #$04 sta smc_1095 // SMC: modifies $1095 lda #$02 sta smc_1401 // SMC: modifies $1401 lda #$2d sta smc_1412 // SMC: modifies $1412 ldx #$00 loop3: lda #$00 sta $40,x inx cpx #$11 bne loop3 jsr sub_1573 jsr sub_0dc0 jsr sub_10bf lda #$fc sta smc_14f1 // SMC: modifies $14f1 lda #$82 sta smc_10c0 // SMC: modifies $10c0 jsr sub_0e63 nop sei lda #$01 sta $d01a lda #$7f sta $dc0d lda #$09 sta $0315 lda #$17 sta $0314 cli rts } irq_0917: inc $d019 lda #$3a loc_091c: cmp $d012 bne loc_091c ldx #$08 loc_0923: dex bne loc_0923 lda #$c3 sta $d016 lda #$0d sta $d021 lda #$16 sta $d018 lda #$3e loc_0937: cmp $d012 bne loc_0937 ldx #$0a loc_093e: dex bne loc_093e lda #$05 sta $d021 lda #$c4 sta $d016 lda #$4a loc_094d: cmp $d012