← #31 Top 1024 #33 →
#32

Dynamic Duo [DD] 02

Dynamic Duo [DD]

950 lines of code

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

History

Released
January 1986
Music
Commodore 64 Music Examples by Rob Hubbard (ripped)
Group
Dynamic Duo — Germany, founded 1985

Ranked #32 on intros.c64.org, this is catalogued on CSDb as "The Dynamic-Duo International Intro" and dated January 1986 — placing it eight months earlier than the better-known #3 DD-01 and among the earliest entries in the entire archive. CSDb credits Rob Hubbard for the music; Doc Snyder's verified section for this intro confirms the same credit, though the SID download link on that page points specifically to "Synth sample III" while CSDb catalogues the tune as "Commodore 64 Music Examples." No code credit is attached to this release on either source. The scrolltext identifies the crack as "an uncomplete preview copy supplied by the beach-boys," greeting Headbanger, Syntax 2001, Eaglesoft Inc., Starforce, Master, Radwar and Ratt — a snapshot of the active groups in early 1986. Dynamic Duo were a German group founded in 1985.

Sources: CSDb · docsnyderspage

dd-02.asm 950 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:17
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $10ff  (2303 bytes)
// Entry point:  $082a (via BASIC SYS 2090)
// IRQ handler:  $0a00 (irq_0a00)
//
// Code: 1038 bytes, Data: 1265 bytes
// Labels: 112, Subroutines: 27
//
// Cross-references: all OK
// ============================================


// --- Region $082a-$0857 ---
.pc = $082a "main_082a"

main_082a:
        lda #$37
        sta $01
        lda #$0f
        sta $0286
        jsr sub_0900
        jsr sub_097e
        jsr sub_0860
        jsr sub_09a5
        jsr sub_09bb
        jsr sub_089b
        jsr sub_08de
        jsr sub_09db
        nop
        nop
        nop
        jsr sub_0d00
        jsr sub_0d82
        jmp loc_0b64

dat_0857:
        .byte $ea                                   // .

// --- Region $0860-$09ee ---
.pc = $0860 "sub_0860"
// Referenced by: jsr from $0839

sub_0860:
        lda #$b3
        sta $cff8
        lda #$b4
        sta $cff9
        lda #$03
        sta $d015
        lda #$a0
        sta $d000
        lda #$60
        sta $d001
        lda #$ad
        sta $d002
        lda #$70
        sta $d003
        lda #$03
        sta $d017
        sta $d01d
        lda #$0b
        sta $d027
        lda #$02
        sta $d028
        rts

dat_0896:
        .byte $ea,$ea,$ea,$ea,$ea                   // .....

// Referenced by: jsr from $0842
sub_089b: {
        sei
        lda #$35
        sta $01
        ldx #$00
        ldy #$10
        lda #$20
loop1:
        sta $f000,x
        inx
        bne loop1
        inc $08a8
        dey
        bne loop1
        sei
        lda #$35
        sta $01
        ldx #$00
loop2:
        lda scr_0c00
        sta $f028,x
        clc
        adc #$80
        sta $f029,x
        inc $08ba
        inx
        inx
        bne loop2
        inc $08be
        inc $08c4
        lda $08c4
        cmp #$f2
        bne loop2
        lda #$37
        sta $01
        rts
}
// Referenced by: jsr from $0845

sub_08de:
        sei
        lda #$7f
        sta $dc0d
        lda #$00
        sta $0314
        lda #$0a
        sta $0315
        lda #$81
        sta $d01a
        lda $d011
        and #$7f
        sta $d011
        cli
        rts

dat_08fd:
        .byte $ea,$ea,$ea                           // ...

// Referenced by: jsr from $0833
sub_0900: {
        sei
        lda $01
        and #$fb
        sta $01
        lda #$00
        sta $4b
        sta $50
        sta $52
        lda #$d0
        sta $4c
        clc
        lda #$e0
        sta $51
        adc #$04