← #137 Top 1024 #139 →
#138

Dynamic Technology [DYTEC] 05

Dynamic Technology [DYTEC]

4.027 lines of code

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

History

Released
March 1990
Code
A.C.E.
Music
Michael Hendriks, Holger Knipping — "The Chambers of Shaolin"
Charset
Thomas Heinrich, Conan
Group
Dynamic Technology — Germany, founded 1990

A collaborative German production with dual composers and dual charset artists — unusual complexity for a crack intro. A.C.E. coded while Michael Hendriks and Holger Knipping jointly composed "The Chambers of Shaolin," a martial arts-themed piece preserved in the HVSC. Thomas Heinrich and Conan shared charset duties. Dynamic Technology (DYTEC) was founded in Germany in 1990, and this March release appeared the same year — indicating the group launched with an immediate push for visibility. The two-person composition credit is rare in the SID world where musicians typically worked solo. Hendriks was one of the most prolific Dutch-German scene composers, his work appearing across numerous groups. The intro represents the late German scene's continued investment in production quality even as the platform was declining commercially.

Sources: CSDb

dytec-05.asm 4.027 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:19
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ecff  (58624 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1350 (4944)
// IRQ handler:  $291c (nmi_291c)
//
// Code: 2226 bytes, Data: 56398 bytes
// Labels: 435, Subroutines: 10
//
// Cross-references: all OK
// ============================================


// --- Region $0e8d-$0e90 ---
.pc = $0e8d "Program $0e8d"
        jmp ($f0dc)

chr_0e90:
        // === Charset data (1 bytes, $0e90-$0e90) ===
        .byte $f0                                   // char 0 (partial)

// --- Region $1000-$10ef ---
.pc = $1000 "loc_1000"

loc_1000:
        jsr $ff81
        lda #$18
        sta $d018
        ldx #$08
        txa

loc_100b:
        sta $d7ff,x
        sta $d8ff,x
        sta $d9ff,x
        sta $daff,x
        inx
        bne loc_100b
        stx $27ff
        lda #$00
        sta $60
        sta $61
        sta $62
        sta $63
        sta $64
        sta $d020
        sta $d021
        dec $01
        dec $01
        jsr $e173
        inc $01
        inc $01
        nop
        nop
        nop
        nop
        nop
        jsr sub_11cb
        lda #$d8
        sta $d016
        ldx #$00

loc_1049:
        lda dat_4812,x
        sta $042b,x
        lda dat_4852,x
        sta $0453,x
        lda txt_4892,x
        sta $047b,x
        lda dat_48d2,x
        sta $04a3,x
        lda dat_4912,x
        sta $04cb,x
        lda dat_4952,x
        sta $04f3,x
        lda dat_4992,x
        sta $051b,x
        lda txt_49d2,x
        sta $0543,x
        inx
        cpx #$28
        bne loc_1049

loc_107e:
        ldx $27ff
        inx
        cpx #$08
        beq loc_10b0
        stx $27ff
        lda $1200,x
        sta $d022
        lda $1208,x
        sta $d023
        lda $1210,x
        ldx #$00

loc_109a:
        sta $d800,x
        sta $d868,x
        inx
        bne loc_109a
        ldx #$30
        ldy #$10

loc_10a7:
        dey
        bne loc_10a7
        dex
        bne loc_10a7
        jmp loc_107e

loc_10b0:
        lda #$00
        sta $27ff
        jmp loc_2805
// Referenced by: jsr from $283c

sub_10b8:
        lda $27ff
        beq loc_10c8
        cmp #$01
        beq loc_111c
        cmp #$02
        beq loc_1119
        jmp loc_10dd

loc_10c8:
        inc scr_2800
        lda scr_2800
.label smc_10cf = * + 1
        cmp #$00                                    // !SMC: modified by $10d8, $1360
        bne loc_10dd
        lda $90
        bne loc_10de
        lda #$8d
        sta smc_10cf                                // SMC: modifies $10cf
        inc $90

loc_10dd:
        rts

loc_10de:
        lda #$00