#314

Danish Crackers [DC] 02

Danish Crackers [DC]

515 lines of code

SpritesSPRT

History

Released
1984
Group
Danish Crackers — Denmark, founded 1984

Danish Crackers were the first cracking group in Denmark, founded in 1984 by PMK and Jellyfish. PMK coded the group's intros, which were among the earliest Scandinavian crack intros on the Commodore 64. This particular intro accompanied the crack of Decathlon 2 and is preserved on the Internet Archive. The group was inspired by GCS to begin adding intros to their cracks — a practice that would become standard across the European scene. Danish Crackers dissolved in 1985, but their brief existence left a lasting mark on the Danish C64 scene. Several groups that followed — including The Dominators, founded just a year later — built on the template DC established. CSDb records four distinct Danish Crackers intros from 1984–1985, all coded by PMK, making the group's output remarkably compact yet historically significant.

Sources: CSDb · Demozoo

dc-02.asm 515 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:15
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $0eff  (1791 bytes)
// Entry point:  $0828 (via BASIC SYS 2088)
//
// Code: 362 bytes, Data: 1429 bytes
// Labels: 68, Subroutines: 5
//
// Cross-references: all OK
// ============================================


// --- Region $0828-$082a ---
.pc = $0828 "main_0828"

main_0828:
        jmp loc_0841

// --- Region $0841-$0968 ---
.pc = $0841 "loc_0841"

loc_0841:
        lda #$02
        sta $d025
        lda #$07
        sta $d017
        lda #$00
        sta $d015
        sta $d01d
        sta $d020
        sta $d021
        lda #$69
        ldy #$09
        jsr $ab1e
        ldy #$00

loc_0862:
        lda $0a67,y
        jsr $ffd2
        lda #$2a
        sta $af
        jsr sub_0aa0
        iny
        cpy #$14
        bne loc_0862
        lda #$9e
        sta $d001
        sta $d003
        sta $d005
        lda #$91
        sta $d000
        lda #$a8
        sta $d002
        lda #$c3
        sta $d004
        ldx #$02

loc_0890:
        lda #$05
        sta $d027,x
        lda #$32
        sta $07f8,x
        dex
        bpl loc_0890
        lda #$07
        sta $d015
        lda #$00
        sta $02
        lda #$38
        sta $03
        lda #$01
        sta $04
        jsr sub_0a7c
        lda #$01
        sta $02
        lda #$39
        sta $03
        lda #$02
        sta $04
        jsr sub_0a7c
        lda #$02
        sta $02
        lda #$3a
        sta $03
        lda #$04
        sta $04
        jsr sub_0a7c
        lda #$f0
        sta $af
        jsr sub_0aa0
        jsr sub_0950
        jsr sub_0950
        lda #$00
        sta $d015
        sta $d017
        sta $d01d
        sta $d025
        ldx #$06

loc_08ec:
        sta $d000,x
        dex
        bne loc_08ec
        lda #$93
        jsr $ffd2
        lda #$ff
        sta $f7
        lda #$0e
        sta $f8
        lda #$01
        sta $f9
        lda #$6f
        sta $fa
        lda #$01
        sta $fb
        lda #$a0
        sta $fc
        ldx #$00

loc_0911:
        lda loc_091f,x
        sta $033c,x
        inx
        cpx #$30
        bne loc_0911
        jmp $033c

loc_091f:
        ldx #$00

loc_0921:
        lda ($f9,x)
        sta ($fb,x)
        sec
        lda $fb
        sbc #$01
        sta $fb
        lda $fc
        sbc #$00
        sta $fc
        sec
        lda $f9
        sbc #$01
        sta $f9
        lda $fa