#630

Success+Ruling Company, The 10

Success+Ruling Company, The

4.917 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRTBitmapBMAP

History

Released
January 1994
Group
Success+The Ruling Company — Netherlands, founded January 1994

The tenth crack intro from Success+The Ruling Company — a technically ambitious production dated to January 1994, the very month of the alliance's formation. CSDb (release 53440) credits the code, graphics, and charset to Trax of SCS*TRC and Tropic, while the music draws from an unusually deep pool of six SID compositions by seven different musicians — Brian of Graffity, Dane of Triad, Defbeat, JCH of Vibrants, Morbid of Warriors of the Wasteland, Red Devil of Fairlight, and Trident of Triad. This intro template was deployed across more than 40 cracked game releases, making it one of SCS*TRC's most widely used productions. CSDb (group ID 133) identifies the Dutch partnership as "the longest running co-op in C64 scene history," producing approximately 367 releases from 1994 to 2025. Other SCS*TRC intros in this collection include #606 SCS_TRC-03, #575 SCS_TRC-04, #673 SCS_TRC-07, and #374 SCS_TRC-12.

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

scs_trc-10.asm 4.917 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:44
// 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:  $2408 (9224)
// IRQ handler:  $ea86 (nmi_ea86)
// IRQ handler:  $252c (irq_252c)
//
// Code: 5308 bytes, Data: 58180 bytes
// Labels: 528, Subroutines: 26
//
// Cross-references: all OK
// ============================================


// --- Region $0a00-$0a3b ---
.pc = $0a00 "smc_0a00"

smc_0a00:
        nop                                         // !SMC: modified by $0c00, $2485
.label smc_0a02 = * + 1
        lda #$06                                    // !SMC: modified by $0a08, $0a0e
        sec
        sbc #$02
        bcc loc_0a0c
        sta smc_0a02                                // SMC: modifies $0a02
        rts

loc_0a0c:
        and #$07
        sta smc_0a02                                // SMC: modifies $0a02
        ldx #$00

loc_0a13:
        lda $0749,x
        sta $0748,x
        inx
        cpx #$26
        bne loc_0a13

loc_0a1e:
.label smc_0a1f = * + 1
.label smc_0a20 = * + 2
        lda $3385                                   // !SMC: modified by $0a25, $0a2a, $2478, $247d
        bne loc_0a30
        lda #$33
        sta smc_0a20                                // SMC: modifies $0a20
        lda #$00
        sta smc_0a1f                                // SMC: modifies $0a1f
        jmp loc_0a1e

loc_0a30:
        sta $076e
        inc smc_0a1f
        bne loc_0a3b
        inc smc_0a20

loc_0a3b:
        rts

// --- Region $0a87-$0afe ---
.pc = $0a87 "sub_0a87"
// Referenced by: jsr from $25b4, $f30b

sub_0a87:
.label smc_0a88 = * + 1
        lda #$02                                    // !SMC: modified by $245f
        beq loc_0a8f
        dec smc_0a88
        rts

loc_0a8f:
        lda #$04
        sta smc_0a88
        lda $0a80
        sta tbl_0a7f
        sta $0a85
        sta smc_255e
        lda $0a81
        sta $0a80
        sta $0a84
        sta smc_2559
        ldx #$00
        lda dat_0aff,x
        sta $0a81
        sta $0a83
        sta smc_2551
        lda dat_0c93
        bne loc_0aca
        inx
        cpx #$0c
        bne loc_0ac6

dat_0ac4:
        .byte $a2,$00                               // ..

loc_0ac6:
        stx $0aad
        rts

loc_0aca:
        inx
        cpx #$12
        beq loc_0ad3
        stx $0aad
        rts

loc_0ad3:
        lda #$18
        beq dat_0adb
        dec $0ad4
        rts

dat_0adb:
        .byte $4c,$00,$34                           // L.4
// Referenced by: jsr from $26b1, $f408

sub_0ade:
        lda dat_0c93
        bne loc_0ae4
        rts

loc_0ae4:
.label smc_0ae5 = * + 1
        lda #$00                                    // !SMC: modified by $0aee, $244f
        beq loc_0aec

dat_0ae8:
        .byte $ce,$e5,$0a,$60                       // ...`

loc_0aec:
        lda #$06
        sta smc_0ae5                                // SMC: modifies $0ae5
.label smc_0af2 = * + 1
        ldy #$1f                                    // !SMC: modified by $0afb, $245a
        sty $d418
        dey
        cpy #$0f
        beq $0afe
        sty smc_0af2                                // SMC: modifies $0af2
        rts

// --- Region $0b11-$0c2e ---
.pc = $0b11 "smc_0b11"