← #75 Top 1024 #77 →
#76

Deadly Friends, The [TDF] 01

Deadly Friends, The [TDF]

4.602 lines of code

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

History

Released
26 December 1987
Code
Human
Music
Demon (Neil Baldwin) — "Snowflakes in Summer"
Group
The Deadly Friends — Norway, founded 1987

Released on Boxing Day 1987 — The Deadly Friends were a Norwegian group, part of the Scandinavian wave that reshaped European cracking in the late 1980s. Human coded the intro while Demon (Neil Baldwin) contributed "Snowflakes in Summer," preserved in the HVSC. Baldwin was a British game composer whose work was widely ripped and occasionally contributed directly to cracking groups. The Deadly Friends represent Norway's contribution to the Nordic scene alongside Swedish giants like Triad and Fairlight. Founded in 1987, TDF operated during the crucial period when Scandinavian groups first asserted dominance. The December 1987 release date suggests this may have been distributed as a Christmas-period release — many groups timed their most polished productions for the holiday season when new game releases peaked.

Sources: CSDb

tdf-01.asm 4.602 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:33
// 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:  $15c0 (5568)
// IRQ handler:  $1063 (irq_1063)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 3923 bytes, Data: 59565 bytes
// Labels: 521, Subroutines: 29
//
// Cross-references: all OK
// ============================================


// --- Region $0814-$0817 ---
.pc = $0814 "sub_0814"
// Referenced by: jsr from $181e

sub_0814:
        dec $fc
        brk

chr_0817:
        // === Charset data (1 bytes, $0817-$0817) ===
        .byte $00                                   // char 0 (partial)

// --- Region $0c01-$0c0e ---
.pc = $0c01 "sub_0c01"
// Referenced by: jsr from $182e

sub_0c01:
        .byte $fc,$00,$ee                           // nop $ee00,x // ILLEGAL
        cpx $bf00
        ldy $ee00,x
        cpx $bb00
        clv
        brk

// --- Region $0e09-$0e0d ---
.pc = $0e09 "sub_0e09"
// Referenced by: jsr from $1811

sub_0e09:
        .byte $e3,$c1                               // isc ($c1,x) // ILLEGAL
        .byte $80,$80                               // nop #$80 // ILLEGAL

chr_0e0d:
        // === Charset data (1 bytes, $0e0d-$0e0d) ===
        .byte $e3                                   // char 0 (partial)

// --- Region $1000-$10ed ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $11de, $e89a

sub_1000:
        sei
        lda #$0f
        sta $d022
        lda #$0e
        sta $d023
        sta $0286
        jsr $e544
        lda #$18

// Referenced by: jsr from $1677
sub_1013: {
        sta $d016
        lda #$1c
        sta $d018
        lda #$00
        sta $d321
        sta $d320
        ldx #$00
loop1:
        lda dat_1c00,x
        sta $0400,x
        lda $1d00,x
        sta $0500,x
        lda $1e00,x
        sta $0600,x
        lda $1f00,x
        sta $0700,x
        inx
        bne loop1
        lda #$01
        sta $dc0d
        sta $d01a
        lda #$1b
        sta $d011
        lda #$63
        sta $0314
        lda #$10
        sta $0315
        lda #$00
        tax
loop2:
        sta $02,x
        inx
        cpx #$10
        bne loop2
        cli
        rts
}

irq_1063:
        inc $d019
        ldx $02
        lda txt_1100,x
        sta $d012
        lda $1200,x
        sta $d016
        lda tbl_13e0,x
        sta $d022
        lda tbl_13e8,x
        sta $d023
        lda tbl_13f0,x
        sta $d018
        inc $02
        lda $02
        cmp #$06
        beq loc_1091
        jmp loc_ea81

loc_1091:
        lda #$00
        sta $02
        jsr sub_109e
        jsr sub_109e
        jmp loc_1450

// Referenced by: jsr from $1095, $1098, $e76d, $e770
sub_109e: {
        dec $1200
        lda $1200
        cmp #$ff
        bne done
        lda #$07
        sta $1200
        jsr sub_10b1
done:
        rts
}
// Referenced by: jsr from $10ad, $e785