#209

Dominators, The [DOM] 11

Dominators, The [DOM]

4.735 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRTBitmapBMAP

History

Released
November 1989
Group
The Dominators — Denmark, founded 1986

The eleventh Dominators intro dates from November 1989 and features music by EVS of 20th Century Composers performing "Amtrak," with graphics by Animal and a charset contribution from 801 DC of Triad. The collaboration with Triad — one of Sweden's most elite groups — exemplifies the cross-border cooperation that characterized the Scandinavian scene. EVS also contributed to another Dominators intro from December 1989, indicating an active working relationship during this period. Comments on intros.c64.org from Dominators members Zoolook and Tricket confirm the intro's provenance within the group's catalogue. The Dominators produced at least 50 numbered intros during their 1986–1993 run, with this November 1989 entry arriving during a particularly prolific stretch. CSDb documents the intro being reused across cracks of games including Double Dragon 2, Fallen Angel, and Snowman.

Sources: CSDb

dom-11.asm 4.735 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:  $1400 (5120)
// IRQ handler:  $1520 (irq_1520)
// IRQ handler:  $1da0 (irq_1da0)
// IRQ handler:  $0d81 (irq_0d81)
// IRQ handler:  $1b00 (irq_1b00)
//
// Code: 5118 bytes, Data: 58370 bytes
// Labels: 577, Subroutines: 39
//
// Cross-references: all OK
// ============================================


// --- Region $0809-$0c0c ---
.pc = $0809 "loc_0809"

loc_0809:
        cmp #$ab
        beq loc_0849
        jmp loc_08b5

loc_0810:
        lda #$00
        ldy #$18

loc_0814:
        sta $d400,y
        dey
        bpl loc_0814
        lda #$0f
        sta $d418
        sta $0d6a
        ldy #$00
        sty $0d68
        sty $0c3b
        sty $0c42
        sty $0c49
        sty $0c3d
        sty $0c44
        sty $0c4b
        sty $0c12
        sty $0c19
        sty smc_0c20                                // SMC: modifies $0c20
        iny
        sty $0c51
        jmp loc_08e5

loc_0849:
        lda $0d68
        beq loc_086c
        cmp $0d69
        bne loc_0869
        dec $0d6a
        lda $0d6a
        sta $d418
        bne loc_0864
        lda #$00
        sta $0c4e
        rts

loc_0864:
        lda #$00
        sta $0d69

loc_0869:
        inc $0d69

loc_086c:
        ldy $0c25,x
        lda $0e04,y
        and #$04
        beq loc_088c
        lda $0c7c,x
        beq loc_0886
        dec $0c7c,x
        lda $0e97,y
        sta $d404,x
        bne loc_088c

loc_0886:
        lda $0dfe,y
        sta $d404,x

loc_088c:
        lda $0e04,y
        and #$10
        beq loc_08a8
        lda $0c7e,x
        beq loc_08a2
        dec $0c7e,x
        lda #$c0
        sta $d401,x
        bne loc_08a8

loc_08a2:
        lda $0c56,x
        sta $d401,x

loc_08a8:
        lda $0c51
        bne loc_08b2
        dec $0c3d,x
        bmi loc_08fa

loc_08b2:
        jmp loc_0a72

loc_08b5:
        ldy $0c4e
        lda $0f61,y
        sta $0c39
        lda $0f65,y
        sta $0c3a
        lda $0f69,y
        sta $0c40
        lda $0f6d,y
        sta $0c41
        lda $0f71,y
        sta $0c47
        lda $0f75,y
        sta $0c48
        lda $0fc8,y
        sta $0c4f
        jmp loc_0810

loc_08e5:
        cpx #$0e
        bne loc_08f4
        dec $0c51
        bpl loc_08f4
        lda $0c4f
        sta $0c51

loc_08f4:
        lda #$ab
        sta $0c4e
        rts

loc_08fa:
        lda $0c39,x