#785

Success+Ruling Company, The 14

Success+Ruling Company, The

2.005 lines of code

RasterbarsRSTRMusicSIDBitmapBMAP

History

Released
September 1996
Code
Baldhead
Graphics
Shaggy
Music
Echo (Kay Tichelmann) — "Katakis"
Group
Success+The Ruling Company — Germany/Netherlands

The fourteenth intro from the joint alliance of Success and The Ruling Company — commonly abbreviated SCS+TRC. CSDb titles this the "No Design Intro," a self-deprecating label suggesting a deliberately minimalist visual approach. Released in September 1996, the code is by Baldhead, graphics by Shaggy, and the music uses Echo's "Katakis" — a Kay Tichelmann composition preserved in the HVSC and named after the Rainbow Arts shoot-em-up. CSDb associates this release with Fatum, a Polish group, though the intro bears the SCS+TRC branding. An earlier joint intro appears at #374 SCS_TRC-12. The SCS+TRC partnership was one of the C64 scene's most productive cracking alliances, combining the German Success crew with the Dutch Ruling Company. Their shared website at scs-trc.net documents the collaboration's longevity. The self-aware "No Design" subtitle hints at the practical realities of maintaining a steady release pace.

Sources: CSDb · HVSC

scs_trc-14.asm 2.005 lines
// ============================================
// output - Disassembled Source
// ============================================
// 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: $0700  End: $29ff  (8960 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $0a00 (2560)
// IRQ handler:  $ea31 (irq_ea31)
// IRQ handler:  $0c3f (irq_0c3f)
//
// Code: 2441 bytes, Data: 6519 bytes
// Labels: 175, Subroutines: 18
//
// Cross-references: all OK
// ============================================


// --- Region $0a00-$0c92 ---
.pc = $0a00 "main_0a00"

main_0a00:
        sei
        lda $d012
        adc $dc01
        eor $dc02
        adc $dc03
        eor $dc04
        and #$03
        sta smc_0a6c                                // SMC: modifies $0a6c
        lda #$00
        jsr sub_1000
        jsr sub_0cdb

loc_0a1d:
        lda $d011
        bpl loc_0a1d
        lda #$00
        sta $d011
        ldx #$00

loc_0a29:
        ldy #$0a
        jsr sub_0baa
        lda #$32

loc_0a30:
        cmp $d012
        bne loc_0a30
        lda chr_0d2d,x
        sta $d020
        inx
        cpx #$08
        bne loc_0a29
        sta $d021
        lda #$0c
        jsr sub_0c1b
        lda #$00
        jsr sub_0c2d
        lda #$3f
        ldy #$0c
        sta $0314
        sty $0315
        lda #$7f
        sta $dc0d
        ldx #$00
        stx $dc0e
        inx
        stx $d01a
        lda #$1b
        sta $d011
        cli
.label smc_0a6c = * + 1
        ldx #$00                                    // !SMC: modified by $0a12
        jsr sub_0bb5

loc_0a70:
        ldy #$01
        jsr sub_0baa
        ldy #$13
        lda #$0b
        jsr sub_0b8a
        ldy #$14
        lda #$0b
        jsr sub_0b8a
        inc $0a7d
        dec $0a76
        lda $0a76
        bpl loc_0a70
        ldx #$07

loc_0a90:
        ldy #$06
        jsr sub_0baa
        lda chr_0d2d,x
        sta smc_0c45                                // SMC: modifies $0c45
        dex
        bpl loc_0a90
        lda #$01
        jsr sub_0c13
        lda #$20
        sta smc_0c74                                // SMC: modifies $0c74

loc_0aa8:
        lda $dc01
        cmp #$ef
        bne loc_0aa8
        lda #$0f
        jsr sub_0c13
        ldy #$10
        jsr sub_0baa
        lda #$0c
        jsr sub_0c13
        ldx #$04

loc_0ac0:
        ldy #$0a
        jsr sub_0baa
        lda smc_0c45
        tay
        lda $0d35,y
        sta smc_0c45                                // SMC: modifies $0c45
        jsr sub_0c13
        dex
        bne loc_0ac0
        lda #$2c
        sta smc_0c74                                // SMC: modifies $0c74

loc_0ada:
        ldy #$01
        jsr sub_0baa
        ldy #$00
        lda #$0c
        jsr sub_0b8a
        ldy #$28
        lda #$0c
        jsr sub_0b8a
        lda #$00
        jsr sub_0c13
        inc $0ae0
        dec $0ae7
        lda $0ae7
        cmp #$13
        bne loc_0ada
        lda #$00
        jsr sub_0c2d
        lda #$00