#600

Movers, The+Strike Force, The 03

Movers, The+Strike Force, The

2.202 lines of code

RasterbarsRSTRMusicSID

History

Released
c. 1987-1988
Group
The Movers [!] + Strike Force (SF) — Germany

This crack intro is a joint release from The Movers and Strike Force, two German cracking groups that maintained a well-documented partnership during the late 1980s. The Movers were founded in April 1987, with members including General Zoff (coder, cracker), Skylab (sysop), and Scanner (coder, cracker), and dissolved on 7 December 1988 after producing approximately 188 releases. Strike Force was founded in September 1987 by Conan, Drago, and Pershy — born from the German Cracking Company. The group dissolved on the same date as The Movers when police confiscated Conan's computer equipment, after which remaining members founded Elite. CSDb describes the two groups as maintaining a "fantastic cooperation." The specific credits for code and music in this intro remain unattributed. CSDb documents multiple "Strike Force & The Movers Intro" releases from 1988-1989.

Sources: CSDb · CSDb · intros.c64.org

m_sf-03.asm 2.202 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:55
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0700  End: $2fff  (10496 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $11c7 (4551)
// IRQ handler:  $101a (irq_101a)
//
// Code: 1818 bytes, Data: 8678 bytes
// Labels: 245, Subroutines: 13
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1180 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $1129

sub_1000:
        sei
        ldy #$1a
        ldx #$10
        lda #$01
        sty $0314
        stx $0315
        sta $d032
        sta $d01a
        lda #$7f
        sta $dc0d
        cli
        rts                                         // !SMC: modified by $167d

irq_101a:
        ldy #$01
.label smc_101d = * + 1
        ldx #$12                                    // !SMC: modified by $2f00, $2f12
        sty $d019
        sty $d01a
        stx $d018
        lda #$32
        sta $d012
.label smc_102d = * + 1
        ldx #$07                                    // !SMC: modified by $1070

loc_102e:
        lda $d012

loc_1031:
        cmp $d012
        beq loc_1031
        and #$07
        ora #$10
        sta $d011
        lda $1300,y
        nop
        nop
        nop
        iny
        dex
        bne loc_102e
        lda $d012
        clc
        adc #$40

loc_104d:
        cmp $d012
        bne loc_104d
.label smc_1053 = * + 1
        ldx #$49                                    // !SMC: modified by $108b

loc_1054:
        lda $d012

loc_1057:
        cmp $d012
        beq loc_1057
        and #$07
        ora #$10
        sta $d011
        dex
        bne loc_1054
        ldx $02c0
        inx
        stx $02c0
        lda dat_1200,x
        sta smc_102d                                // SMC: modifies $102d
        ldx #$01
        jmp loc_107b

dat_1078:
        .byte $ea,$ea,$ea                           // ...

loc_107b:
        lda #$18
        sta $d018
.label smc_1081 = * + 1
        lda #$d0                                    // !SMC: modified by $135c, $138c, $13bb, $13c9
        sta $d016
        lda #$50
        sec
        sbc smc_102d
        sta smc_1053                                // SMC: modifies $1053
        ldx #$9b

loc_1090:
        dex
        bne loc_1090
        lda #$00
        sta $d020
        ldx #$0b

loc_109a:
        dex
        bne loc_109a
        lda #$00
        sta $d020
        ldx #$01

loc_10a4:
        dex
        bne loc_10a4
        ldx #$00

loc_10a9:
        ldy #$08
        lda $1300,x

loc_10ae:
        sta $d020
        sta $d021
        inx
        dey
        beq loc_10a9
        cpx #$24
        bcs $10cb
        jsr sub_10ef
        lda $1330,x
        sta $d023
        lda $1300,x
        clc
        bcc loc_10ae
        lda #$00
        sta $d020
        sta $d021