#432

Flash Cracking Group [FCG] 03

Flash Cracking Group [FCG]

4.879 lines of code

SpritesSPRT

History

Code
Cracking Force Berlin
Group
Flash Cracking Group — Germany, founded 20 April 1985

CSDb identifies this as "CFB's FCG Intro" — coded by Cracking Force Berlin for Flash Cracking Group. The CFB attribution suggests a collaboration between two Berlin-based cracking operations, or possibly that CFB was a sub-group or member handle within FCG. No release date is recorded, and no music credits have been identified, suggesting the intro may rely on a simple sound effect or silence rather than a SID composition. Flash Cracking Group was founded on 20 April 1985 in Germany, making them one of the earliest organized cracking groups on the C64. The founding date places FCG among the first wave of groups that formed as the C64's software library began to grow rapidly. No coverage exists on Doc Snyder's page, Demozoo, or in scene archives, indicating a group that left a relatively modest archival footprint despite their early founding. The Berlin connection places them in one of the most active cities for C64 scene activity in Germany.

Sources: CSDb

fcg-03.asm 4.879 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:40
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0700  End: $d011  (51474 bytes)
// Crunched with Exomizer — depacked by emulation
// Packer entry: $082a (via BASIC SYS 2090)
// Entry point:  $0a00 (2560)
// IRQ handler:  $0b49 (irq_0b49)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 4849 bytes, Data: 46625 bytes
// Labels: 106, Subroutines: 6
//
// Cross-references: all OK
// ============================================


// --- Region $0a00-$0b03 ---
.pc = $0a00 "main_0a00"

main_0a00:
        jsr $e518
        jsr sub_0d9d
        jsr sub_0d6b
        ldx #$00

loc_0a0b:
        lda $0e12,x
        sta $07f8,x
        inx
        cpx #$08
        bne loc_0a0b
        ldx #$00
        ldy #$00

loc_0a1a:
        lda $0e1a,x
        sta $d000,y
        lda #$92
        sta $d001,y
        iny
        iny
        inx
        cpx #$08
        bne loc_0a1a
        lda #$50
        sta $d00d
        sta $d00f
        lda #$ff
        sta $d015
        sta $d01d
        lda #$20
        sta $d010
        lda #$18
        sta $d018
        lda #$00
        sta $d020
        sta $d021
        sta $9e
        sta $9f
        sta $ff
        sta $fe
        sta $fd
        sta $c6
        ldy #$ad
        ldx #$00

loc_0a5e:
        tya
        sta $0400,x
        sta $07c0,x
        inx
        iny
        cpx #$28
        bne loc_0a5e
        ldx #$00

loc_0a6d:
        lda $0df9,x
        sta $d400,x
        inx
        cpx #$19
        bne loc_0a6d
        lda #$20
        ldy #$0f
        jsr sub_ab1e
        sei
        lda #$49
        sta $0314
        lda #$0b
        sta $0315
        lda #$7f
        sta $dc0d
        lda #$01
        sta $d01a
        lda #$1b
        sta $d011
        cli

loc_0a9a:
        lda $dc01
        cmp #$ff
        beq loc_0a9a

loc_0aa1:
        jsr sub_0b3e
        dec $d001
        dec $d003
        dec $d005
        dec $d007
        dec $d009
        dec $d00b
        lda $d001
        cmp #$64
        bne loc_0aa1

loc_0abd:
        jsr sub_0b3e
        inc $d001
        inc $d003
        inc $d005
        inc $d007
        inc $d009
        inc $d00b
        bne loc_0abd

loc_0ad4:
        ldx #$07
        ldy #$07

loc_0ad8:
        dex
        bne loc_0ad8
        dey
        bne loc_0ad8
        dec $0b4a
        bne loc_0ad4
        lda #$31
        sta $0314
        lda #$ea
        sta $0315
        jsr $ff5b
        jsr sub_0d9d
        sei
        ldx #$a0