#332

Krabat Crew 02

Krabat Crew

2.542 lines of code

ScrollerSCRLSpritesSPRT

History

Released
20 February 1988
Code
General Zoff
Charset
Jon Hare
Group
Krabat Crew — released under The Movers, Germany, founded April 1987

An intriguing cross-group production — CSDb lists this under The Movers (founded April 1987 in Germany), while intros.c64.org catalogues it under Krabat Crew, suggesting either a collaboration or a naming transition. General Zoff coded the intro, and Jon Hare contributed the charset — a name shared with the co-founder of Sensible Software, though whether this is the same person remains unconfirmed. Disassembly confirms no writes to SID registers, establishing this as a silent scrolltext presentation. Released on 20 February 1988, this dates from the period when German cracking groups were proliferating rapidly. The Movers maintained a website at the-movers.de, indicating longevity beyond their initial cracking years. The Krabat name — drawn from Sorbian folklore — is an unusual cultural reference for a scene that typically favoured militaristic or futuristic group names. The dual attribution across sources reflects the archival challenges that arise when groups merged, renamed, or shared members.

Sources: CSDb · CSDb (group)

krabat-02.asm 2.542 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:52
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $26ff  (7936 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $1e00 (7680)
// IRQ handler:  $1d17 (irq_1d17)
//
// Code: 848 bytes, Data: 7088 bytes
// Labels: 140, Subroutines: 10
//
// Cross-references: all OK
// ============================================


// --- Region $0a58-$0bed ---
.pc = $0a58 "sub_0a58"
// Referenced by: jsr from $1c80

sub_0a58:
        ldx #$00

loc_0a5a:
        lda txt_0a50,x
        jsr sub_0aca
        inx
        cpx #$08
        bne loc_0a5a
        lda #$00
        sta $d01c
        lda #$06
        sta $d027
        sta $d028
        sta $d029
        sta $d02a
        sta $d02b
        sta $d02c
        sta $d02d
        bit $d02e
        lda #$7f
        sta $d01d
        lda #$7f
        sta $d017
        ldx #$00

loc_0a90:
        lda $0a40,x
        sta $d000,x
        inx
        cpx #$10
        bne loc_0a90
        lda #$7f
        sta $d015
        lda #$60
        sta $d010
        lda #$00
        sta $10
        lda #$0c
        sta $11
        lda #$00
        sta $02
        lda #$07
        sta $ca
        sei
        lda #$00
        sta $01
        tax

loc_0abb:
        sta dat_0800,x
        sta $0900,x
        inx
        bne loc_0abb
        jmp loc_0bbd

chr_0ac7:
        // === Charset data (3 bytes, $0ac7-$0ac9) ===
        .byte $ea,$ea,$ea                           // char 0 (partial)
// Referenced by: jsr from $0a5d

sub_0aca:
        ldy #$34
        sty $01
        sei
        sta $07f8,x
        ldy #$37
        sty $01
        rts
// Referenced by: jsr from $1dc1

sub_0ad7:
        lda #$34
        sta $01
        ldx #$00

loc_0add:
        clc
        rol $09c2,x
        rol $09c1,x
        rol $09c0,x
        rol $0982,x
        rol $0981,x
        rol $0980,x
        rol $0942,x
        rol $0941,x
        rol $0940,x
        rol $0902,x
        rol $0901,x
        rol $0900,x
        rol $08c2,x
        rol $08c1,x
        rol $08c0,x
        rol $0882,x
        rol $0881,x
        rol $0880,x
        rol $0842,x
        rol $0841,x
        rol spr_0840,x
        rol $0802,x
        rol $0801,x
        rol dat_0800,x
        inx
        inx
        inx
        cpx #$18
        bne loc_0add
        inc $02
        lda $02
        cmp #$08
        beq loc_0b38
        jmp loc_0b82

loc_0b38:
        lda #$00
        sta $02
        ldy #$00
        lda ($10),y
        cmp #$ff
        beq loc_0b64
        clc
        asl
        asl
        asl
        tax
        bcs loc_0b6f