← #672 Top 1024 #674 →
#673

Success+Ruling Company, The 07

Success+Ruling Company, The

5.318 lines of code

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

History

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

The seventh crack intro from Success+The Ruling Company — subtitled "Big Scroll" on CSDb (release 59432) and dated to May 1994, just months after the alliance's formation. The code is by Rap of Authentic Arts, with music by Sphere and graphics by Extreme Efforts — all three credited as Authentic Arts members, indicating external talent contributed to this early SCS*TRC production. The intro was reused in five crack releases, including Entity+F and Troddlers Preview V2. CSDb (group ID 133) classifies SCS*TRC as a cracker group and fixing group based in the Netherlands, founded on 1 January 1994 by Nightshade, CBA, Moren, Burglar, and Action Jackson. The partnership produced approximately 367 releases and maintained an FTP archive called The Digital Dungeon. Comments on intros.c64.org from Rough and Daison confirm the intro's preservation status. Other SCS*TRC entries in this collection include #606 SCS_TRC-03, #575 SCS_TRC-04, #630 SCS_TRC-10, and #374 SCS_TRC-12.

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

scs_trc-07.asm 5.318 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:43
// 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:  $1900 (6400)
//
// Code: 3030 bytes, Data: 60458 bytes
// Labels: 539, Subroutines: 11
//
// Cross-references: all OK
// ============================================


// --- Region $0803-$080a ---
.pc = $0803 "sub_0803"
// Referenced by: jsr from $ff81

sub_0803:
        .byte $ff,$ff,$ff                           // isc $ffff,x // ILLEGAL
        .byte $ff,$ff,$ff                           // isc $ffff,x // ILLEGAL

dat_0809:
        .byte $ff,$ff                               // ..

// --- Region $1021-$1080 ---
.pc = $1021 "sub_1021"
// Referenced by: jsr from $4e2c, $4f91, $fd3c

sub_1021:
        ldx #$00
        dec $1090
        bmi loc_1034
        jsr sub_1226
        jsr sub_1225
        jmp sub_1225

dat_1031:
        .byte $ff,$fe,$ff                           // ...

loc_1034:
        lda #$05
        sta $1090
        jsr sub_1040
        jsr sub_103f
// Referenced by: jsr from $103c

sub_103f:
        inx
// Referenced by: jsr from $1039

sub_1040:
        dec $108a,x
        bmi loc_1091
        jmp sub_1226
// Referenced by: jsr from $4c87, $fa60

sub_1048:
        lda #$1f
        sta $d418
        lda #$f0
        sta $d417
        and #$0f
        sta smc_1262                                // SMC: modifies $1262
        ldx #$0f

loc_1059:
        sta dat_1081,x
        dex
        bpl loc_1059
        ldx #$02

loc_1061:
        lda $14b9,x
        sta $fa
        lda $14bc,x
        sta $fb
        ldy #$00
        lda ($fa),y
        sta $108d,x
        iny
        lda ($fa),y
        sta $10e6,x
        and #$0f
        sta $10e9,x
        dex
        bpl loc_1061
        rts

// --- Region $1091-$10c6 ---
.pc = $1091 "loc_1091"

loc_1091:
        ldy $108d,x
        cpy #$fe
        bne loc_10a1
// Referenced by: jsr from $10c0

sub_1098:
        lda $1084,x
        and #$fe
        sta $1084,x
        rts

loc_10a1:
        lda $1784,y
        sta $fa
        lda $1777,y
        sta $fb
        ldy dat_1081,x
        lda ($fa),y
        bmi loc_10d2
        cmp #$60
        bcc loc_10f9

loc_10b6:
        and #$1f
        sta $108a,x
        lda #$fe
        sta dat_1031,x
        jsr sub_1098

loc_10c3:
        jmp loc_1187

dat_10c6:
        .byte $00                                   // .

// --- Region $10d2-$10dd ---
.pc = $10d2 "loc_10d2"

loc_10d2:
        cmp #$a0
        bcc loc_10ec
        and #$1f
        sta $108a,x
        bcs loc_10c3
        brk

// --- Region $10ec-$1141 ---
.pc = $10ec "loc_10ec"

loc_10ec:
        asl
        asl