← #944 Top 1024 #946 →
#945

Druids, The [TDS] 02

Druids, The [TDS]

1.965 lines of code

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

History

Group
Druids (TDS) — Germany, founded 1988

This crack intro was produced by the Druids, a German cracking and demo group active from 1988 to mid-1989, also known as The Druids of Stonehenge. Poison handled the coding, while the soundtrack uses JCH's "Shorty" — one of several Jens-Christian Huus compositions that circulated widely across the scene. The charset was contributed by Moonray of The Shadows and Tob of Pixel Developments, indicating cross-group collaboration typical of the era. CSDb documents multiple Druids intros from 1988, several produced jointly with their allies The Devils. The group was founded by Lawyer and based in Germany, disbanding in June 1989 when members merged into Dynamix alongside former members of Beastie Boys, The Sharks, and Paramount. Despite their brief existence, the Druids accumulated 114 documented releases across cracks, demos, and intros.

Sources: CSDb — Druids Intro · CSDb — Druids Group · intros.c64.org

druids-02.asm 1.965 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: $32ff  (11008 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1e00 (7680)
// IRQ handler:  $2900 (irq_2900)
// IRQ handler:  $ea31 (loc_ea31)
// IRQ handler:  $1869 (irq_1869)
//
// Code: 2033 bytes, Data: 8975 bytes
// Labels: 202, Subroutines: 5
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$14e4 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $1851, $1e35

sub_1000:
        jmp loc_14a2

dat_1003:
        .byte $4c,$d5,$14                           // L..
// Referenced by: jsr from $1870, $288a

sub_1006:
        lda #$1f
        sta $d418
        bit $14f5
        bmi loc_1011
        rts

loc_1011:
        lda #$00
        sta $156f
        ldx #$02

loc_1018:
        lda $14f1,x
        sta $fb
        tay
        lda $1511,x
        beq loc_1087
        cmp #$01
        bne loc_103c
        lda $156b,x
        beq loc_103c
        lda $1508,x
        bne loc_103c
        lda $1559,x
        and #$fe
        sta $d404,y
        jmp loc_11c9

loc_103c:
        dec $154a,x
        bpl loc_1060
        inc $154a,x
        dec $1562,x
        bmi loc_1054
        lda $1559,x
        ora #$01
        sta $d404,y
        jmp loc_11c9

loc_1054:
        inc $1562,x
        lda $1559,x
        sta $d404,y
        jmp loc_11c9

loc_1060:
        lda $1532,x
        and #$10
        beq loc_1084
        lda #$81
        sta $d404,y
        lda $14f4
        asl
        tay
        lda $1570,y
        pha
        lda $1571,y
        ldy $fb
        sta $d401,y
        pla
        sta $d400,y
        jmp loc_1346

loc_1084:
        jmp loc_11c9

loc_1087:
        lda $1517,x
        sta $fc
        lda $151a,x
        sta $fd
        lda #$00
        sta $14f8
        ldy $1514,x
        lda #$00
        sta $1508,x
        lda ($fc),y
        cmp #$ff
        bne loc_10a7
        jmp loc_145b

loc_10a7:
        pha
        and #$20
        beq loc_10b1
        lda #$01
        sta $14f8

loc_10b1:
        pla
        cmp #$80
        bcc loc_10b9
        jmp loc_13c1

loc_10b9:
        and #$1f
        clc
        adc #$01
        sta $1511,x

loc_10c1:
        iny
        lda ($fc),y
        pha
        iny
        tya
        sta $1514,x
        pla
        bne loc_10d8
        lda $153e,x
        and #$fe
        sta $1559,x
        jmp loc_132c

loc_10d8:
        clc