← #923 Top 1024 #925 →
#924

Dominators, The [DOM] 50

Dominators, The [DOM]

2.404 lines of code

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

History

Released
May 1992
Group
The Dominators — Denmark, founded 1986

The fiftieth numbered intro from The Dominators — a testament to the extraordinary volume of the group's output across their 1986–1993 lifespan. CSDb credits Panther with the graphics, though the coder and musician are not documented. Panther was a long-standing Dominators member who contributed to the group's later-period productions. Released in May 1992, this intro arrived during the twilight of the C64 cracking golden age, when the platform was giving way to the Amiga and PC. The Dominators' catalogue on CSDb spans over 1,100 releases, making them one of the most prolific Danish groups of the era. By intro number 50, the group had been producing sequentially numbered intros for approximately four years — an almost unmatched run in the C64 cracking scene. Comments on intros.c64.org from Tricket confirm ongoing engagement with the group's legacy.

Sources: CSDb · intros.c64.org

dom-50.asm 2.404 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: $3cff  (13568 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1000 (4096)
// IRQ handler:  $10f0 (irq_10f0)
//
// Code: 2154 bytes, Data: 11414 bytes
// Labels: 259, Subroutines: 6
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$11ef ---
.pc = $1000 "main_1000"

main_1000:
        lda #$00
        sta $d020
        sta $d021
        lda #$f7
        sta spr_0800
        lda #$f5
        sta $0801
        lda #$f8
        sta $0802
        lda $3fff
        sta smc_10e6                                // SMC: modifies $10e6
        lda #$00
        sta $3fff
        lda #$30
        sta $d015
        lda #$00
        sta $d017
        sta $d01c
        lda #$20
        sta $d010
        lda #$3f
        sta $07fc
        lda #$3e
        sta $07fd
        lda #$00
        sta $d02b
        sta $d02c
        lda #$1f
        sta $d008
        lda #$37
        sta $d00a
        lda #$00
        sta $3f
        lda #$19
        sta $40
        lda #$88
        sta $41
        lda #$18
        sta $42
        lda #$00
        sta $3d
        lda #$28
        sta $3e
        lda #$01
        sta $11f8
        sta $12b6
        lda #$08
        sta smc_1179                                // SMC: modifies $1179
        sta smc_1235                                // SMC: modifies $1235
        lda #$00
        sta dat_1169
        sta dat_1224
        sta smc_116e                                // SMC: modifies $116e
        sta smc_1229                                // SMC: modifies $1229
        lda #$67
        sta dat_11f0
        lda #$60
        sta dat_12ae
        jsr $e544
        ldx #$00

loc_1095:
        lda #$08
        sta $d800,x
        sta $d868,x
        lda #$0f
        sta $d990,x
        lda $146b,x
        sta $0400,x
        lda $14d3,x
        sta $0468,x
        inx
        bne loc_1095
        ldx #$00

loc_10b3:
        lda #$01
        sta $da58,x
        inx
        cpx #$50
        bne loc_10b3
        lda #$00
        jsr sub_301a
        sei
        lda #$7f
        sta $dc0d
        lda #$1b
        sta $d011
        lda #$01
        sta $d01a
        lda #$f0
        sta $0314
        lda #$10
        sta $0315
        lda #$1f
        sta $d418
        cli

loc_10e2:
        jmp loc_10e2

loc_10e5:
.label smc_10e6 = * + 1
        lda #$00                                    // !SMC: modified by $101a
        sta $3fff
        jmp loc_1700

dat_10ed:
        .byte $00,$00,$00                           // ...

irq_10f0:
        lda $dc01
        cmp #$ef
        beq loc_10e5
        lda #$7e

loc_10f9:
        cmp $d012
        bne loc_10f9
        ldx #$09

loc_1100:
        dex
        bne loc_1100
        lda dat_12ae
        sta $d016