#459

Dominators, The [DOM] 12

Dominators, The [DOM]

4.550 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

History

Released
24 October 1989
Group
The Dominators — Denmark, founded 1986

Released 24 October 1989, this Dominators intro was coded by Mitch with music from Laxity — the prolific SID musician from Starion and The Flexible Arts. Laxity's "Public Enemy" provided the soundtrack, while Map of World Wide Expressive contributed the graphics. The appearance of Laxity's music in a Dominators production underscores how top SID composers supplied material to multiple groups simultaneously — Laxity's tunes appear in intros from Doughnut Cracking Service, Ikari, and many others. Mitch was one of several Dominators coders alongside Animal, Jade, and Drake, reflecting the group's deep bench of programming talent. Comments on intros.c64.org from Tricket of DOM and members of Paramount and The Wanderer Group show cross-group engagement with the archived production. The Dominators were founded in Denmark in 1986 and operated until August 1993, with CSDb documenting over 1,100 releases.

Sources: CSDb

dom-12.asm 4.550 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:  $1a88 (6792)
// IRQ handler:  $1b24 (irq_1b24)
//
// Code: 4959 bytes, Data: 58529 bytes
// Labels: 512, Subroutines: 8
//
// Cross-references: all OK
// ============================================


// --- Region $090e-$0918 ---
.pc = $090e "loc_090e"

loc_090e:
        cpx $39
        eor $aa,x
        rol
        dec $32
        jmp loc_34d3

dat_0918:
        .byte $55                                   // U

// --- Region $0948-$0950 ---
.pc = $0948 "loc_0948"

loc_0948:
        eor $aa,x
        rol
        cmp #$32
        jmp loc_34d3

dat_0950:
        .byte $55                                   // U

// --- Region $0bf0-$0bf4 ---
.pc = $0bf0 "Program $0bf0"
        .byte $93,$53                               // sha ($53),y // ILLEGAL
        .byte $43,$13                               // sre ($13,x) // ILLEGAL

dat_0bf4:
        .byte $43                                   // C

// --- Region $0f0c-$0f10 ---
.pc = $0f0c "Program $0f0c"
        inc $e8
        ror $00,x
        brk

// --- Region $1000-$15aa ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $1f71, $f9d8

sub_1000:
        jmp loc_1594

dat_1003:
        .byte $4c,$a2,$15                           // L..
// Referenced by: jsr from $1b7b, $f633

sub_1006:
        lda $01cb
        cmp #$02
        beq loc_1014
        cmp #$01
        bne loc_1015
        jmp loc_1574

loc_1014:
        rts

loc_1015:
        inc $0199
        inc $019a
        inc $019b
        lda #$1f
        sta $d418
        ldx #$02
        dec $01ca
        bpl loc_1030
        lda $16e8
        sta $01ca

loc_1030:
        stx $ff
        lda $16e9,x
        sta $01ad
        tay
        lda $01ca
        cmp $16e8
        bne loc_1053
        lda $16ec,x
        sta $fb
        lda $16ef,x
        sta $fc
        dec $017e,x
        bmi loc_1056
        jmp loc_11dd

loc_1053:
        jmp loc_11ed

loc_1056:
        ldy $0178,x
        lda ($fb),y
        cmp #$fe
        beq loc_1074
        cmp #$ff
        bne loc_1077
        lda #$00
        sta $017e,x
        sta $0178,x
        sta $017b,x
        sta $01c9
        jmp loc_1056

loc_1074:
        jmp loc_15a2

loc_1077:
        sta $01be
        and #$80
        beq loc_108c
        lda $01be
        and #$1f
        sta $01a6,x
        inc $0178,x
        jmp loc_1056

loc_108c:
        lda $01be
        and #$40
        beq loc_10a1
        lda $01be
        and #$3f
        sta $01cd,x
        inc $0178,x
        jmp loc_1056

loc_10a1: