← #747 Top 1024 #749 →
#748

Dominators, The [DOM] 22

Dominators, The [DOM]

2.867 lines of code

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

History

Released
12 August 1991
Group
The Dominators — Denmark, founded 1986

This Dominators intro from 12 August 1991 features a Rob Hubbard SID composition — "Thanatos" — one of the legendary British composer's game soundtracks repurposed as intro music. Derbyshire Ram provided the charset, his second documented contribution to Dominators intros alongside the February 1991 production. Hubbard's music was among the most frequently ripped material in crack intros, with his game soundtracks prized for their melodic complexity and technical sophistication on the SID chip. The Dominators sourced music from a wide range of composers across their catalogue — from in-house talent like JCH to external contributors and ripped game music. CSDb records the intro being reused in cracks of American 3D Pool, Cubulus, and Panic Dizzy. This entry arrives during Derbyshire Ram's membership period with the group, which ran from May 1990 to November 1991 according to his CSDb profile.

Sources: CSDb

dom-22.asm 2.867 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: $07ee  End: $3c01  (13332 bytes)
// Crunched with Beta Dynamic v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $29e0 (10720)
// IRQ handler:  $2a90 (irq_2a90)
//
// Code: 2016 bytes, Data: 11316 bytes
// Labels: 250, Subroutines: 12
//
// Cross-references: all OK
// ============================================


// --- Region $0f00-$0f1f ---
.pc = $0f00 "loc_0f00"

loc_0f00:
        nop
        nop
        nop
        sei
        jsr $fda3
        jsr $fd15
        jsr $ff5b
        lda #$34
        sta $01
        ldx #$00

loc_0f13:
        lda dat_0f1f,x
        sta $0600,x
        inx
        bne loc_0f13
        jmp $0600

dat_0f1f:
        .byte $a2                                   // .

// --- Region $1000-$1080 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $1007, $2a6f

sub_1000:
        jmp loc_1048
// Referenced by: jsr from $1011, $2c42

sub_1003:
        jmp loc_1021

loc_1006:
        sei
        jsr sub_1000

loc_100a:
        lda #$ff

loc_100c:
        cmp $d012
        bne loc_100c
        jsr sub_1003
        lda $dc01
        and #$10
        bne loc_100a
        sta $d418
        cli
        rts

dat_1020:
        .byte $00                                   // .

loc_1021:
        ldx #$00
        dec $1090
        bmi loc_1034
        jsr sub_1226
        jsr sub_1225
        jmp sub_1225

dat_1031:
        .byte $ff,$ff,$ff                           // ...

loc_1034:
        lda #$02
        sta $1090
        jsr sub_1040
        jsr sub_103f
// Referenced by: jsr from $103c

sub_103f:
        inx
// Referenced by: jsr from $1039

sub_1040:
        dec $108a,x
        bmi loc_1091
        jmp sub_1226

loc_1048:
        lda #$1f
        sta $d418
        lda #$f0
        sta $d417
        and #$0f
        sta smc_1262                                // SMC: modifies $1262
        ldx #$0f

loc_1059:
        sta dat_1081,x
        dex
        bpl loc_1059
        ldx #$02

loc_1061:
        lda $14b9,x
        sta $fa
        lda $14bc,x
        sta $fb
        ldy #$00
        lda ($fa),y
        sta $108d,x
        iny
        lda ($fa),y
        sta $10e6,x
        and #$0f
        sta $10e9,x
        dex
        bpl loc_1061
        rts

// --- Region $1091-$10c6 ---
.pc = $1091 "loc_1091"

loc_1091:
        ldy $108d,x
        cpy #$fe
        bne loc_10a1
// Referenced by: jsr from $10c0

sub_1098:
        lda $1084,x
        and #$fe
        sta $1084,x
        rts