History
- Released
- c. 1986-1988
- Group
- The Krabat Crew (TKC) — Germany, founded 1986
This intro was produced by The Krabat Crew, a German demo, cracker, and swapping group founded in 1986 and dissolved in 1988. CSDb lists the group under the abbreviation TKC with five documented members — CI5, ICI (cracker), Krabat (organizer, original supplier, swapper), Master Hoko, and Phoenix — all joining at the group's founding. During its brief two-year existence, the group released 56 titles including cracks, intros, and music. The name "Krabat" references a figure from Sorbian folklore, particularly well-known in the Lusatia region of eastern Germany. A separate CSDb entry titled "Krabat Crew 1986" catalogues a one-file demo featuring Jonathan Dunn's "Forever Autumn" performed by Choroid, though it is unclear whether this corresponds to the intro archived here. The specific credits for code and music in this particular intro remain unattributed.
Sources: CSDb · intros.c64.org
// ============================================ // output - Part 1 of 2 // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:53 // https://restore64.dev by datucker / Rabenauge // // Load address: $0801 End: $ffff (63487 bytes) // Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation // Packer entry: $0810 (via BASIC SYS 2064) // Entry point: $3800 (14336) // IRQ handler: $3855 (irq_3855) // IRQ handler: $ea31 (irq_ea31) // IRQ handler: $fe47 (nmi_fe47) // // Code: 4278 bytes, Data: 59209 bytes // Labels: 668, Subroutines: 32 // // Verification: 5 line(s) auto-corrected to .byte for exact byte matching // // Cross-references: all OK // ============================================ // --- Region $1179-$1181 --- .pc = $1179 "loc_1179" loc_1179: .byte $c3,$24 // dcp ($24,x) // ILLEGAL ldx $68 .byte $83,$3f // sax ($3f,x) // ILLEGAL .byte $c3,$25 // dcp ($25,x) // ILLEGAL dat_1181: .byte $f3 // . // --- Region $118d-$11b2 --- .pc = $118d "Segment $118d" bit $65 adc $5a bvc loc_1179 .byte $4f,$23,$a5 // sre $a523 // ILLEGAL rol cpy #$c4 bit $f3 .byte $5a // nop // ILLEGAL ldy #$0f cmp $22 .byte $83,$3f // sax ($3f,x) // ILLEGAL dec $29 dex iny iny cmp #$29 and $29 and #$00 .byte $c2,$e5 // nop #$e5 // ILLEGAL .byte $3f,$22,$aa // rla $aa22,x // ILLEGAL brk // --- Region $20a5-$20a7 --- .pc = $20a5 "$20a5" .byte $80,$0a // nop #$0a // ILLEGAL rti // --- Region $3800-$3987 --- .pc = $3800 "main_3800" main_3800: jsr sub_3c62 sei lda #$00 sta $d020 sta $d021 jsr sub_3b3f jsr sub_3ebb jsr sub_3bf0 lda #$fe sta $d012 lda $d011 and #$7f sta $d011 lda #$81 sta $d01a lda #$55 sta $0314 lda #$38 sta $0315 lda $d016 and #$f7 ora #$10 sta $d016 lda #$02 sta $dd00 lda #$82 sta $d018 lda #$60 sta $0288 loc_384a: lda $d012 cmp #$b4 bne loc_384a cli jmp loc_3cd5 irq_3855: lda $d019 sta $d019 and #$01 bne loc_3862 jmp loc_38a0 loc_3862: lda $d012 cmp #$fe bcs loc_38a3 cmp #$e9 bcs loc_388a lda $d011 and #$df sta $d011 lda $d016 and #$ef sta $d016 lda #$8e sta $d018 lda #$e9 sta $d012 jmp loc_38a0 loc_388a: lda $d011 and #$df sta $d011 lda $d016 ora scr_3ec8 sta $d016 lda #$fe sta $d012 loc_38a0: jmp loc_ea7e loc_38a3: lda #$80 sta $d018 lda #$d1 sta $d012 lda $d011