#937

1001 Crew 03

1001 Crew

1.760 lines of code

MusicSIDScrollerSCRLSpritesSPRTBitmapBMAP

History

Group
1001 Crew — Netherlands, founded 1985

This is the third numbered crack intro from the 1001 Crew, a Dutch group founded in 1985 that became one of the Netherlands' notable cracking operations. The CSDb catalogue contains at least sixteen 1001 Crew crack intros under group ID #81, alongside joint releases with Future Projects and The Stars. No individual credits for code or music are recorded for this particular intro. The group also released under the related name "1001 and the Cracking Crew," suggesting an evolving roster or alliance structure typical of the era. At rank #937 on intros.c64.org, this sits below the group's higher-ranked entries at #255 1001 Crew Intro #1 and #578 1001 Crew Intro #4. Comments from ZTH of Abnormal and Conrad in 2007 and 2008 confirm ongoing community engagement with the preserved intro.

Sources: CSDb · CSDb Group · intros.c64.org

1001-03.asm 1.760 lines
// ============================================
// output - Part 1 of 2
// ============================================
// 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: $0700  End: $d011  (51474 bytes)
// Crunched with Exomizer — depacked by emulation
// Packer entry: $082a (via BASIC SYS 2090)
// Entry point:  $1000 (4096)
// IRQ handler:  $11c8 (irq_11c8)
// IRQ handler:  $121d (irq_121d)
// IRQ handler:  $10d8 (irq_10d8)
//
// Code: 2130 bytes, Data: 49344 bytes
// Labels: 197, Subroutines: 18
//
// Cross-references: all OK
// ============================================


// --- Region $0812-$08e1 ---
.pc = $0812 "loc_0812"

loc_0812:
        sed
        cpy $fece
        inc $7cfc,x
        inc $c0
        cpy #$e6
        inc $7cfe,x
        sei
        cpx $e6e6
        inc $fefe
.label loc_0828 = * + 1
        .byte $fc,$78,$e0                           // nop $e078,x // ILLEGAL
        .byte $fc,$e0,$e0                           // nop $e0e0,x // ILLEGAL
        inc $fefe,x
        ror $f0f0,x
        .byte $fc,$f0,$f0                           // nop $f0f0,x // ILLEGAL
        beq loc_0828
        .byte $7c,$e0,$e0                           // nop $e0e0,x // ILLEGAL
        cpx $fee6
        inc $667c,x
        inc $e6
        inc $e6e6,x
        inc $e6
        inc $3838,x
        sec
        sec
        inc $fefe,x
        asl $06
        asl $e6
        inc $fe
        inc $647c,x
        cpx $f8f8
        .byte $fc,$ee,$ee                           // nop $eeee,x // ILLEGAL
        inc $c0c0
        cpy #$c0
        cpy #$fe
        inc $c6fe,x
        inc $fefe
        inc $e6e6,x
        inc $66
        inc $f6
        inc $eefe,x
        inc $e6
        .byte $7c,$e6,$e6                           // nop $e6e6,x // ILLEGAL
        inc $e6
        inc $7cfe,x
        .byte $7c,$e6,$e6                           // nop $e6e6,x // ILLEGAL
        inc $fe
        .byte $fc,$f0,$f0                           // nop $f0f0,x // ILLEGAL
        .byte $7c,$e6,$e6                           // nop $e6e6,x // ILLEGAL
        inc $ee
        .byte $fc,$fe,$7e                           // nop $7efe,x // ILLEGAL
        .byte $7c,$e6,$e6                           // nop $e6e6,x // ILLEGAL
        inc $fe
        .byte $fc,$ee,$ee                           // nop $eeee,x // ILLEGAL
        .byte $7c,$e0,$7c                           // nop $7ce0,x // ILLEGAL
        asl $fe0e
        inc $fefc,x
        inc $3838,x
        sec
        sec
        sec
        sec
        ror $e6
        inc $e6
        inc $fe
        inc $66fe,x
        inc $e6
        inc $e6
        .byte $7c,$7c,$38                           // nop $387c,x // ILLEGAL
        ror $e6
        inc $e6
        inc $eefe,x
        dec $66
        inc $7c
        sec
        .byte $7c,$e6,$e6                           // nop $e6e6,x // ILLEGAL
        inc $66
        inc $e6
        inc $387c,x
        sec
        sec
        ror $1c0e,x
        sec

loc_08d4:
        bvs loc_08d4
        inc $07fe,x
        ora $3319
        .byte $67,$cd                               // rra $cd // ILLEGAL
        sta.abs $00ff,y
        brk

// --- Region $09d8-$09f0 ---
.pc = $09d8 "sub_09d8"
// Referenced by: jsr from $1009, $10c7

sub_09d8:
        sty $fb
        sta $fc
        sty $fd
        stx $fe
        ldx #$10

loc_09e2:
        lda ($fb),y
        sta ($fd),y
        iny
        bne loc_09e2
        inc $fc
        inc $fe
        dex
        bne loc_09e2
        rts

// --- Region $0b80-$0bf4 ---
.pc = $0b80 "sub_0b80"
// Referenced by: jsr from $0d19

sub_0b80:
        lda $40
        ldx $43
        sta $43
        stx $40
        lda $41