← #21 Top 1024 #23 →
#22

Movers, The 01

Movers, The

2.585 lines of code

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

History

Released
June 1987
Code
General Zoff
Group
The Movers — Germany, founded April 1987

Ranked #22 on intros.c64.org, this release is catalogued on CSDb as "The Movers Intro (Zoff Serial No.001)" — the serial-number subtitle suggesting General Zoff maintained a personal numbered series within the group. General Zoff handled the code, with no music or graphics handles attached to the release on CSDb. The Movers were a German group founded in April 1987, placing this intro only about two months after the group's formation. Doc Snyder's page for The Movers exists but carries no section confirmed to match this specific intro. The "Serial No.001" label points to a systematic approach to intro production — an attempt to run a numbered template series, parallel to how larger cracking groups tracked their own numbered intro releases.

Sources: CSDb · docsnyderspage

movers-01.asm 2.585 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:26
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $2700  (7937 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1e00 (7680)
// IRQ handler:  $1d17 (irq_1d17)
//
// Code: 848 bytes, Data: 7089 bytes
// Labels: 138, 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