#374

Success+Ruling Company, The 12

Success+Ruling Company, The

2.862 lines of code

MusicSIDSpritesSPRT

History

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

The twelfth crack intro from Success+The Ruling Company — subtitled "Cursor" on CSDb (release 79894) and dated to September 1995. The code is by Rage of Hardcore, graphics by Zore of Hardcore and Warriors of the Wasteland, and the music is Jeff's "Tanzen Jahh" from Camelot and Cyberzound Productions. User comments on CSDb highlight the intro's "randomized background colours" and describe the production as having "a real sense of urgency to it." The intro was subsequently used in seven different crack releases. SCS*TRC (CSDb group ID 133) was a Dutch cracker and fixing group founded on 1 January 1994 by Nightshade, CBA, Moren, Burglar, and Action Jackson. Comments on intros.c64.org from Digger and scene archivist iAN CooG confirm the intro's preservation status. The partnership produced approximately 367 releases and is described on CSDb as "the longest running co-op in C64 scene history." Other SCS*TRC intros appear at #606 SCS_TRC-03, #575 SCS_TRC-04, #673 SCS_TRC-07, and #630 SCS_TRC-10.

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

scs_trc-12.asm 2.862 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: $07ee  End: $4801  (16404 bytes)
// Crunched with Beta Dynamic v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $2e00 (11776)
//
// Code: 2071 bytes, Data: 14333 bytes
// Labels: 348, Subroutines: 13
//
// Cross-references: all OK
// ============================================


// --- Region $10d0-$10d6 ---
.pc = $10d0 "Segment $10d0"
        .byte $7b,$91,$a9                           // rra $a991,y // ILLEGAL
        .byte $c3,$dd                               // dcp ($dd,x) // ILLEGAL

dat_10d5:
        .byte $fa,$18                               // ..

// --- Region $11aa-$17e2 ---
.pc = $11aa "sub_11aa"
// Referenced by: jsr from $2e3e

sub_11aa:
        asl
        tay
        lda $10b2,y
        sta $1081
        lda $10b3,y
        sta $1082
        lda $10ba,y
        sta $1088
        lda $10bb,y
        sta $1089
        lda $10c2,y
        sta $108f
        lda $10c3,y
        sta $1090
        lda $1006
        sta $10ae
        lda #$01
        sta smc_12ef                                // SMC: modifies $12ef
        sta $10af
        lda $10b1
        sta $10b0
        ldx #$00
        txa
        jsr sub_12f2
        jsr sub_11f4
        ldx #$07
        jsr sub_11f4
        ldx #$0e
// Referenced by: jsr from $11ea, $11ef

sub_11f4:
        lda #$03
        sta $106b,x
        lda #$09
        sta $d404,x
        lda #$ff
        sta $d405,x
        lda #$00
        sta $107f,x
        sta $106e,x
        sta $1080,x
        sta $1045,x
        sta $106c,x
        sta $1056,x
        lda #$01
        sta $106a,x
        sta $10a9
        sta $109a,x
        rts

loc_1223:
        cpx #$07
        bpl loc_1266
        lda $10a9
        beq loc_1266
        lda #$00
        sta $10ac
        sta $10ad
        lda $1045
        asl
        asl
        asl
        sta $1046
        tay
        lda $183c,y
        sta $100a
        asl
        tay
        lda $1801,y
        sta $fb
        lda $1802,y
        sta $fc
        ldy #$00
        sty $10aa
        lda ($fb),y
        sta $10ab
        sta $d416
        ldy $1046
        lda $183e,y
        sta $d417

loc_1266:
        lda #$09
        sta $d404,x
        lda #$00
        sta $1011,x
        sta $1055,x
        sta $1058,x
        sta $1059,x
        sta $1044,x
        sta $1098,x
        sta $100b,x
        sta $100c,x
        lda $1045,x
        asl
        asl
        asl
        sta $1046,x
        tay
        lda $183a,y
        sta $1010,x
        lda $109a,x
        beq loc_12c7
        lda #$00
        sta $1042,x
        sta $1043,x
        lda $183b,y
        sta dat_1041,x
        asl
        tay
        lda $17f9,y
        sta $fb
        lda $17fa,y
        sta $fc
        ldy #$00
        lda ($fb),y
        sta $100d,x
        sta $d402,x