← #516 Top 1024 #518 →
#517

Warriors of the Wasteland [WOW] 01

Warriors of the Wasteland [WOW]

1.215 lines of code

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

History

Released
15 December 2018
Group
Warriors of the Wasteland [WOW] — Belgium, CSDb group ID #277
Code
xIII
Graphics
xIII
Music
Nantco Bakker — "Panic in Hell"

This intro from Warriors of the Wasteland — a Belgian group — was released on 15 December 2018 and holds a CSDb rating of 7.14, catalogued as release #172614 under the title "Black and White Intro." The coding, logo, and charset were all created by xIII, with music by Nantco Bakker using the SID tune "Panic in Hell" from the HVSC. CSDb also credits Dr. Science for help and xIII for bug-fixing. Doc Snyder's page confirms these credits for the "Black and White" Crack Intro #01 and maps it to CSDb release #172614. The scrolltext reveals this was submitted to the ICC 2018 intro competition and acknowledges help from the Atlantis crew with a ghostbyte issue. The text notes that "the WOW is not back but will never be forgotten" — framing this as a nostalgic one-off rather than a full group revival. Greetings go to former members and groups including Atlantis, F4CG, Triad, Delysid, Role, Padua, Genesis Project, Hokuto Force, Excess, and Laxity.

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

wow-01.asm 1.215 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:37:02
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $ffff  (63487 bytes)
// Crunched with Exomizer — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $cd00 (52480)
// IRQ handler:  $cd70 (irq_cd70)
//
// Code: 621 bytes, Data: 62866 bytes
// Labels: 115, Subroutines: 2
//
// Verification: 4 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $8dd0-$8dd0 ---
.pc = $8dd0 "Segment $8dd0"
        brk

// --- Region $c948-$c95f ---
.pc = $c948 "loc_c948"

loc_c948:
        ldx #$ff
        sei
        txs
        cld
        stx $d016
        jsr $fda3
        jsr $fd50
        jsr $fd15
        jsr $ff5b
        cli
        jmp loc_ca40

// --- Region $ca40-$ca51 ---
.pc = $ca40 "loc_ca40"

loc_ca40:
        ldx #$00

loc_ca42:
        lda txt_ca50,x
        sta.abs $002d,x
        inx
        cpx #$08
        bne loc_ca42
        jmp loc_fce2

txt_ca50:
        .text "$V"

// --- Region $ca8b-$caec ---
.pc = $ca8b "loc_ca8b"

loc_ca8b:
        lda dat_c960,x
        ldy $d012

loc_ca91:
        cpy $d012
        beq loc_ca91
        sta $d020
        sta $d021
        inx
        cpx #$20
        bcc loc_caa3
        ldx #$00

loc_caa3:
        dec $27
        bpl loc_ca8b
        lda $d012

loc_caaa:
        cmp $d012
        beq loc_caaa
        lda #$00
        sta $d020
        sta $d021
        inc $fc
        bne loc_caca
        lda #$fe
        sta $fc
        ldx $fb
        inx
        cpx #$20
        bcc loc_cac8
        ldx #$00

loc_cac8:
        stx $fb

loc_caca:
        rts

dat_cacb:
        .byte $31,$ea,$00,$00,$00                   // 1....

loc_cad0:
        jsr sub_ce8b
        ldx #$00

loc_cad5:
        ldy #$00

loc_cad7:
        iny
        bne loc_cad7
        inx
        cpx #$04
        bne loc_cad5
        jsr $ffe4
        cmp #$00
        sta $caef
        beq loc_cad0
        jmp loc_c948

dat_caec:
        .byte $00                                   // .

// --- Region $cd00-$cd98 ---
.pc = $cd00 "main_cd00"

main_cd00:
        lda $dd02
        ora #$03
        sta $dd02
        lda $dd00
        and #$fc
        sta $dd00
        ldx #$2f

loc_cd12:
        lda $cfc0,x
        sta $d000,x
        dex
        bpl loc_cd12
        lda #$00
        ldx #$ff

loc_cd1f:
        sta $d800,x