#89

Dominators, The [DOM] 05

Name: Dominators, The [DOM] 05
Availability: InStock
Author: Dominators, The

Dominators, The [DOM]

4.097 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

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

History

Released: March 1989
Code: Animal
Music: JCH (Jens-Christian Huus) — "Nilfisk"
Charset: Kevin Bulmer
Group: The Dominators — Denmark, founded 1986

The same team and tune as #46 DOM-09 — Animal coding, JCH providing "Nilfisk," Kevin Bulmer on charset. The reuse of JCH's "Nilfisk" across multiple Dominators intros made it effectively the group's theme tune — much as #2 Fairlight became synonymous with the Druid II SID. The Dominators were founded in Denmark in 1986 and maintained a remarkably stable production team throughout their active years. CSDb lists the same March 1989 release date as DOM-09, suggesting these were alternate visual configurations of the same underlying production distributed with different cracks. The HVSC preserves Huus's composition. The Dominators' consistent quality — same team, same music, multiple visual variants — reflects a professional approach to group identity.

Sources: CSDb

dom-05.asm 4.097 lines

// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:18
// 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:  $21a0 (8608)
// IRQ handler:  $1998 (irq_1998)
//
// Code: 3575 bytes, Data: 59913 bytes
// Labels: 370, Subroutines: 10
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1003 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $1988, $f203

sub_1000:
        jmp loc_159e

dat_1003:
        .byte $13                                   // .

// --- Region $10a0-$14bb ---
.pc = $10a0 "sub_10a0"
// Referenced by: jsr from $19c4, $f23f

sub_10a0:
        lda $104b
        bpl loc_10a6
        rts

loc_10a6:
        dec $1081
        bpl loc_10b1
        lda $1080
        sta $1081

loc_10b1:
        ldx #$02

loc_10b3:
        lda $1081
        bne loc_10c2
        dec $104c,x
        lda $104c,x
        beq loc_110d
        bmi loc_10c5

loc_10c2:
        jmp loc_1210

loc_10c5:
        jmp loc_1176
// Referenced by: jsr from $110d, $118b, $ea10, $ea8f; jmp from $10e0, $e9e3; branch from $110a

sub_10c8:
        ldy $1062,x
        lda $109a,x
        sta $fa
        lda $109d,x
        sta $fb
        lda ($fa),y
        cmp #$ff
        bne loc_10e3
        lda #$00
        sta $1062,x
        jmp sub_10c8

loc_10e3:
        cmp #$fe
        bne loc_10ee
        ldx #$80
        pla
        pla
        jmp loc_159e

loc_10ee:
        tay
        lda dat_15d2,y
        sta $fa
        lda $15ea,y
        sta $fb
        ldy $105f,x
        lda ($fa),y
        cmp #$ff
        bne loc_110c
        inc $1062,x
        lda #$00
        sta $105f,x
        beq sub_10c8

loc_110c:
        rts

loc_110d:
        jsr sub_10c8
        sta $fc
        and #$1f
        sta $1068,x
        lda $fc
        and #$e0
        cmp #$c0
        bne loc_112f
        iny
        tya
        sta $105f,x
        lda $1068,x
        clc
        adc #$01
        sta $104c,x
        bne loc_116e

loc_112f:
        and #$20
        sta $1094,x
        lda $fc
        and #$40
        beq loc_1149
        iny
        lda ($fa),y
        sta $106b,x
        iny
        lda ($fa),y
        sta $106e,x
        jmp loc_115f

loc_1149:
        sta $106b,x
        lda $fc
        and #$80
        bmi loc_1156
        lda #$ff
        bmi loc_115c

loc_1156:
        iny
        lda ($fa),y
        asl
        asl
        asl

loc_115c: