Dominators, The [DOM] 04

Dominators, The [DOM]

1.178 lines of code

ScrollerSCRLBitmapBMAP

History

Released
28 April 1988
Code
Scorpio (2000 A.D.)
Music
Matt Gray — Hunter's Moon
Graphics
Uncredited
Group
The Dominators — Denmark, founded 1986

One of the earliest and most enduring Dominators intros, this 1988 production showcases a striking bitmap display: four stacked renderings of the DOMINATOR. logo, each in a different colour scheme — blue, green, orange, and silver — separated by raster colour switching. Guest coder Scorpio, then a member of the Danish group 2000 A.D. rather than a full DOM member, underlines how the scene's best talent was shared across groups regardless of formal affiliation. Matt Gray's iconic Hunter's Moon theme gave the intro an immediate air of prestige, and it was attached to at least 18 cracked releases including Batman the Movie, Cybernoid, and Bombuzal.

Sources: CSDb · CSDb group · docsnyderspage

dom-04.asm 1.178 lines
// ============================================
// dom-04 - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 vdisasm-one 1.0 build 1, 2026-03-29 17:54:12
// 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:  $15a0 (5536)
// IRQ handler:  $0f19 (irq_0f19)
//
// Code: 761 bytes, Data: 62727 bytes
// Labels: 121, Subroutines: 3
//
// Cross-references: all OK
// ============================================


// --- Region $0814-$0816 ---
.pc = $0814 "Program $0814"
        .byte $c2,$08                               // nop #$08 // ILLEGAL
        .byte $22                                   // jam // ILLEGAL

// --- Region $0e80-$108d ---
.pc = $0e80 "loc_0e80"

loc_0e80:
        jsr $e544
        ldx #$00

loc_0e85:
        lda #$08
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_0e85
        lda #$ff
        sta $0800
        sta $0801
        sta dat_0802
        sta $0803
        ldx #$00

loc_0ea6:
        lda #$01
        sta $d9e1,x
        inx
        cpx #$26
        bne loc_0ea6
        lda #$09
        sta $d9e0
        sta $da07
        lda #$0b
        sta $d9e1
        sta $da06
        lda #$08
        sta $d9e2
        sta $da05
        lda #$0c
        sta $d9e3
        sta $da04
        lda #$0f
        sta $d9e4
        sta $da03
        lda #$07
        sta $d9e5
        sta $da02
        lda #$00
        sta $5f
        lda #$14
        sta $60
        sei
        lda #$7f                                    // disable all CIA1 interrupts
        sta $dc0d                                   // disable all CIA IRQs
        lda #$19
        sta $0314                                   // set IRQ handler low byte
        lda #$0f
        sta $0315                                   // set IRQ handler high byte
        lda #$01
        sta $d01a                                   // raster IRQ on
        lda #$1b
        sta $d011                                   // text mode, screen on, 25 rows, Y-scroll=3
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        cli

loc_0f0e:
        jmp loc_0f0e

loc_0f11:
        lda #$00
        sta $0800
        jmp loc_1180

// ============================================
// IRQ handler
// ============================================

irq_0f19:
        lda $dc01
        cmp #$ef
        beq loc_0f11
        lda #$00
        sta $d020
        lda #$38

loc_0f27:
        cmp $d012
        bne loc_0f27
        jsr sub_1052
        lda #$60

loc_0f31:
        cmp $d012
        bne loc_0f31
        lda #$09
        sta $d021
        lda #$05
        sta $d023
        lda #$0d
        sta $d022
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        lda #$92

loc_0f52:
        cmp $d012
        bne loc_0f52