← #237 Top 1024 #239 →
#238

Genesis Project [G*P] 02

Genesis Project [G*P]

801 lines of code

ScrollerSCRL
Disassemble Download .asm Download .prg intros.c64.org

History

Code
HCL
Music
Defbeat (Yavuz Sukur)
Music
Rob Hubbard
Music
Fred Gray
Music
Demon (Neil Baldwin)
Released
24 February 1994
Group
Genesis Project [G*P] -- Germany, founded 1986

Genesis Project Crack Intro #02 -- titled "HCL Intro 2" on CSDb -- is a C64 crack intro released on 24 February 1994 by the German cracking group Genesis Project. The intro was coded by HCL and features an unusually large music selection with five SID tunes from four different composers: Defbeat's "September Celebration (tune 8)," Rob Hubbard's "Thanatos," Fred Gray's "ShadowFire" and "Legend of Kage," and Demon's (Neil Baldwin) "Shadow Skimmer." Both CSDb and Doc Snyder confirm HCL and Defbeat as Genesis Project contributors. The multi-tune approach was characteristic of later-era intros, offering variety that earlier single-tune productions lacked. Genesis Project was founded in 1986 and remained active into the 2020s -- one of the longest-running groups in scene history. The release is preserved on CSDb as release #97448, verified through the Doc Snyder link.

Sources: CSDb · CSDb Group · intros.c64.org · Doc Snyder

gp-02.asm 801 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:22
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0200  End: $ffff  (65024 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $0c05 (3077)
//
// Code: 500 bytes, Data: 64524 bytes
// Labels: 96, Subroutines: 5
//
// Cross-references: all OK
// ============================================


// --- Region $0a31-$0bbe ---
.pc = $0a31 "sub_0a31"
// Referenced by: jsr from $0b7f; branch from $0a34

sub_0a31:
        cmp $d012
        bne sub_0a31
        rts

// Referenced by: jsr from $0b87
sub_0a37: {
        dec $07e8
        bmi skip
        rts
skip:
        lda #$07
        sta $07e8
        ldx #$00
loop:
        lda $0799,x
        sta $0798,x
        lda $07c1,x
        sta $07c0,x
        inx
        cpx #$27
        bne loop
        jsr sub_0a92
        jsr sub_0a64
        sta $07bf
        ora #$40
        sta $07e7
        rts
}

// Referenced by: jsr from $0a58
sub_0a64: {
        cmp #$00
        beq done1
        cmp #$1b
        beq done3
        cmp #$1c
        beq done4
        cmp #$1d
        beq done5
        cmp #$1e
        beq done6
        cmp #$1f
        beq done7
        cmp #$1b
        bmi done2
done1:
        lda #$40
done2:
        rts
done3:
        lda #$21
        rts
done4:
        lda #$2c
        rts
done5:
        lda #$2e
        rts
done6:
        lda #$27
        rts
done7:
        lda #$3a
        rts
}
// Referenced by: jsr from $0a55

sub_0a92:
        ldy #$00
        lda ($02),y
        ldx $04
        bne loc_0ab0
        lsr
        lsr
        lsr
        lsr
        lsr
        sta $07f9
        ldy #$01
        lda ($02),y
        lsr
        lsr
        and #$18
        ora $07f9
        inc $04
        rts

loc_0ab0:
        dex
        bne loc_0abe
        and #$1f
        inc $04

loc_0ab7:
        inc $02
        bne loc_0abd
        inc $03

loc_0abd:
        rts

loc_0abe:
        sta $07f9
        and #$80
        bne loc_0ad0
        lda $07f9
        and #$1f
        ldx #$00
        stx $04
        beq loc_0ab7

loc_0ad0:
        ldx #$51
        stx $02
        ldx #$5f
        stx $03
        ldx #$00
        stx $04
        lda $07f9
        and #$1f
        rts
// Referenced by: jsr from $0c16

sub_0ae2:
        lda $07ff
        cmp #$04