← #648 Top 1024 #650 →
#649

Warriors of Darkness [WOD] 01

Warriors of Darkness [WOD]

1.167 lines of code

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

History

Released
21 January 1988
Group
Warriors of Darkness [WOD] — Germany, CSDb group ID #713

This crack intro from Warriors of Darkness — a German cracking group — dates to 21 January 1988 and is catalogued on CSDb as release #53556 under the title "WOD Intro." No individual credits for code, graphics, or music are listed on CSDb for this specific release, and Doc Snyder's page likewise lists no credited contributors for Crack Intro #01. The scrolltext describes a training session completed on 21 January 1988 and delivers extensive greetings to Beastie Boys, The Wanderer Group, Triad, Ikari, Gizmo the Gremlin, Hotline, ACE, C64CG, Triangle, WOW, Strike Force, CPS, Razor Express, FAC, Darkness, 2000 A.D., The BOS Team, Dominators, and many others. A separate scrolltext provides contact phone numbers across West German cities and welcomes American traders. The group also announces a party on 26 March 1988 in Bonn. Doc Snyder's page documents two WOD intros, with the second featuring a ripped Rob Hubbard SID.

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

wod-01.asm 1.167 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:37:01
// 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:  $1040 (4160)
// IRQ handler:  $11b4 (irq_11b4)
//
// Code: 589 bytes, Data: 62899 bytes
// Labels: 101, Subroutines: 1
//
// Cross-references: all OK
// ============================================


// --- Region $1040-$115a ---
.pc = $1040 "main_1040"

main_1040:
        lda #$08
        jsr $ffd2
        lda #$90
        jsr $ffd2
        lda #$13
        sta $d018
        jsr $e544
        ldx #$00
        txa

loc_1055:
        sta $0400,x
        sta $0500,x
        sta $0600,x
        sta $0700,x
        inx
        bne loc_1055
        lda #$03
        sta $d015
        sta $d01d
        sta $d01b
        sta $d01c
        lda #$0a
        sta $d027
        sta $d028
        lda #$01
        sta $d025
        lda #$02
        sta $d026
        lda #$78
        sta $d001
        sta $d003
        lda #$80
        sta $d000
        lda #$b0
        sta $d002
        lda #$00
        sta $d010
        lda #$3c
        sta $07f8
        sta $07f9
        ldx #$00

loc_10a5:
        lda $0f40,x
        sta $042f,x
        inx
        bne loc_10a5
        sei
        lda #$01
        sta $d01a
        lda #$00
        sta $dc0e
        lda #$37
        sta $d012
        lda #$1b
        sta $d011
        lda #$b4
        sta $0314
        lda #$11
        sta $0315
        lda #$02
        sta $02
        lda #$07
        sta $1374
        lda #$10
        sta $1320
        lda #$14
        sta $1321
        lda #$fd
        sta $13bc
        lda #$14
        sta $13bd
        ldx #$00

loc_10ec:
        lda txt_1184,x
        sec
        sbc #$40
        clc
        adc #$3d
        sta $0578,x
        clc
        adc #$40
        sta $05a0,x
        inx
        cpx #$08
        bne loc_10ec
        ldx #$00

loc_1105:
        lda $118c,x
        cmp #$40
        bcc loc_110f
        sec
        sbc #$40

loc_110f:
        clc
        adc #$3d
        sta $0608,x
        clc
        adc #$40
        sta $0630,x
        inx
        cpx #$27
        bne loc_1105
        ldx #$08
        txa

loc_1123:
        sta $d828,x
        inx
        bne loc_1123
        cli
        lda #$ef

loc_112c:
        cmp $dc01
        bne loc_112c
        lda #$00
        sta dat_0800
        sei
        jsr $fda3
        jsr $fd15
        jsr $ff5b