#339

5211 01

5211

1.605 lines of code

ScrollerSCRLSpritesSPRTBitmapBMAP

History

Group
5211 — Germany, CSDb group ID #759

This crack intro from 5211 is catalogued on CSDb as "5211 Intro 02" (release #68611), one of at least nine numbered intros and specialty releases from this German group. The CSDb search returns entries ranging from the original "5211 Intro" through Intro 09, plus a joint release with Commando Frontier and a "5211 Wants You" recruitment intro — indicating the group actively sought new members. The associated scener ID #11211 is tagged to Germany, confirming the group's origin. No individual credits for code or music appear on the matched CSDb release. The group also released a one-file demo titled "Contact 5211," showing they ventured beyond pure cracking into demo production. At rank #339 on intros.c64.org, this intro attracted comments from Rough, ZeSmasher of F4CG, and ZZAP of SCC between 2004 and 2010. The 5211 name — like #11 Seven Eleven — follows the numeric naming convention popular among European cracking groups.

Sources: CSDb · intros.c64.org

5211-01.asm 1.605 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:05
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $1000 (4096)
// IRQ handler:  $1121 (irq_1121)
// IRQ handler:  $11e1 (irq_11e1)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 1081 bytes, Data: 62407 bytes
// Labels: 174, Subroutines: 5
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1185 ---
.pc = $1000 "main_1000"

main_1000:
        jsr sub_117a
        jsr sub_117a
        jsr sub_11cd
        jsr sub_11a6
        jsr sub_1104
        lda #$17
        sta $1297
        lda #$00
        sta $d020
        sta $d021
        lda #$80
        sta $0291
        lda #$d8
        sta $d016
        lda #$13
        sta $d018
        lda #$c7
        sta $dd00
        lda #$d8
        sta $d016
        lda #$00
        sta dat_109d
        sta dat_1373
        lda #$00
        sta $d022
        lda #$00
        sta $d023
        sta dat_1321
        ldx #$07
        lda #$a5

loc_104e:
        sta chr_0800,x
        dex
        bpl loc_104e
        lda #$02
        sta $1322
        lda #$27
        sta $109e
        lda #$1b
        sta $d011
        lda #$00
        sta $ae
        lda #$19
        sta $af

loc_106b:
        lda #$00
        ldx dat_109d
        sta $0450,x
        sta $04a0,x
        inx
        stx dat_109d
        ldx $109e
        sta $0428,x
        sta $0478,x
        sta $04c8,x
        dex
        stx $109e
        cpx #$ff
        beq loc_109f
        ldx #$00
        ldy #$00

loc_1092:
        inx
        bne loc_1092
        iny
        cpy #$13
        bne loc_1092
        jmp loc_106b

dat_109d:
        .byte $ff,$28                               // .(

loc_109f:
        ldx #$00
        ldy #$00

loc_10a3:
        inx
        bne loc_10a3
        iny
        cpy #$f0
        bne loc_10a3
        lda #$27
        sta dat_109d
        lda #$00
        sta $109e

loc_10b5:
        ldx dat_109d
        lda $1450,x
        sta $0450,x
        lda $14a0,x
        sta $04a0,x
        dex
        stx dat_109d
        ldx $109e
        lda $1428,x
        sta $0428,x
        lda $1478,x
        sta $0478,x
        lda $14c8,x
        sta $04c8,x
        inx
        stx $109e
        cpx #$28
        beq loc_10f4
        ldx #$00
        ldy #$00

loc_10e9:
        inx
        bne loc_10e9
        iny
        cpy #$13
        bne loc_10e9
        jmp loc_10b5

loc_10f4:
        lda #$00
        sta $c6