#488

Dominators, The [DOM] 03

Dominators, The [DOM]

3.844 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLBitmapBMAP

History

Released
May 1990
Group
The Dominators — Denmark, founded 1986

An external link on intros.c64.org points to CSDb release 96763, which documents a Dominators intro from 12 May 1990 coded by Drake of Contex. The music features two composers — Slaygon of Censor Design contributing "Overture '90" and Stein Pedersen of Prosonix providing "Oxygene IV," a tune that recurs across several Dominators productions. Unitrax of SHAPE provided the charset. Drake's involvement connects the Dominators to Contex, another Danish group, illustrating the collaborative networks within the Scandinavian scene. Stein Pedersen's "Oxygene IV" also appears in #42 DOM-05 and the March 1990 Dominators intro, making it one of the group's most reused SID tunes. The Dominators operated from 1986 until August 1993, producing over 1,100 releases during their seven-year run — one of the largest catalogues in the Danish cracking scene.

Sources: CSDb

dom-03.asm 3.844 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:16
// 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:  $2000 (8192)
// IRQ handler:  $206c (irq_206c)
// IRQ handler:  $21bb (irq_21bb)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 4576 bytes, Data: 58912 bytes
// Labels: 424, Subroutines: 11
//
// Cross-references: all OK
// ============================================


// --- Region $0f0a-$0f50 ---
.pc = $0f0a "sub_0f0a"
// Referenced by: jsr from $22eb, $fc56

sub_0f0a:
        lda $0f08
        sbc #$03
        bcc loc_0f15
        sta $0f08
        rts

loc_0f15:
        eor #$f8
        sta $0f08
        jmp loc_0f1d

loc_0f1d:
        ldy #$00

loc_0f1f:
        lda $04c9,y
        sta $04c8,y
        clc
        adc #$40
        sta $04f0,y
        iny
        cpy #$28
        bne loc_0f1f
.label smc_0f31 = * + 1
.label smc_0f32 = * + 2
        lda $2599                                   // !SMC: modified by $0f41, $0f46
        inc smc_0f31
        bne loc_0f3b
        inc smc_0f32

loc_0f3b:
        cmp #$ff
        bne loc_0f4b
// Referenced by: jsr from $2004, $f973

sub_0f3f:
        lda #$38
        sta smc_0f31                                // SMC: modifies $0f31
        lda #$24
        sta smc_0f32                                // SMC: modifies $0f32
        lda #$20

loc_0f4b:
        and #$3f
        sta $04ef
        rts

// --- Region $0f76-$0f89 ---
.pc = $0f76 "sub_0f76"
// Referenced by: jsr from $205f, $f9ce

sub_0f76:
        ldx dat_0f89
        cpx #$02
        bne loc_0f85
        lda #$00
        sta dat_0f89
        jsr sub_2303

loc_0f85:
        inc dat_0f89
        rts

dat_0f89:
        .byte $01                                   // .

// --- Region $0fa7-$0fcf ---
.pc = $0fa7 "loc_0fa7"

loc_0fa7:
        sei
        jsr $ff81
        jsr $ff84
        lda #$31
        ldy #$ea
        sta $0314
        sty $0315
        lda $0f9d
        sta $3fff
        ldx #$00

loc_0fc0:
        lda dat_0fcf,x
        sta $03b7,x
        inx
        cpx #$28
        bne loc_0fc0
        cli
        jmp $03b7

dat_0fcf:
        .byte $78                                   // x

// --- Region $1000-$1009 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $200f, $f97e

sub_1000:
        jmp loc_1936

loc_1003:
        jmp loc_1953
// Referenced by: jsr from $22ee, $fc59

sub_1006:
        jmp loc_13a8

dat_1009:
        .byte $4c                                   // L

// --- Region $13a8-$17d4 ---
.pc = $13a8 "loc_13a8"

loc_13a8:
        lda $100c
        beq loc_13b3
        bpl loc_13b0
        rts

loc_13b0:
        jmp loc_1912

loc_13b3: