← #571 Top 1024 #573 →
#572

Ruling Company, The+Blasters Incorporated, The 02

Ruling Company, The+Blasters Incorporated, The

862 lines of code

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

History

Released
December 1990
Code
Trax
Group
The Ruling Company + The Blasters Incorporated — Netherlands, founded September 1988

The second joint intro from The Ruling Company (TRC) and The Blasters Incorporated (TBI). Released in December 1990, it was coded by Trax with no additional credits documented on CSDb. The Ruling Company was founded in September 1988 in the Netherlands and would later merge with Success to form the well-known SCS+TRC partnership — one of the C64 scene's most prolific cracking alliances. This earlier TRC+TBI collaboration predates the SCS+TRC era and reveals the group's pattern of cooperative releases. An existing TRC+TBI joint intro appears at #353 T_B-10, suggesting the two groups maintained a sustained working relationship. The Ruling Company's website at scs-trc.net documents their later incarnation. No music credits are listed on CSDb, which is unusual for a 1990 intro — possibly indicating a silent intro or missing attribution. A comment on intros.c64.org from GoTchA (2006) confirms community awareness of the release.

Sources: CSDb

t_b-02.asm 862 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:48
// 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:  $0990 (2448)
//
// Code: 790 bytes, Data: 62698 bytes
// Labels: 122, Subroutines: 6
//
// Cross-references: all OK
// ============================================


// --- Region $0990-$0a8a ---
.pc = $0990 "main_0990"

main_0990:
        lda #$0f
        sta $0286
        jsr $e544
        ldx #$00
        stx $d020
        stx $d021

loc_09a0:
        lda $0868,x
        sta $04a0,x
        lda $0880,x
        sta $04b8,x
        inx
        bne loc_09a0
        lda #$06

loc_09b1:
        sta $0400,x
        inx
        cpx #$a0
        bne loc_09b1
        ldx #$00

loc_09bb:
        lda dat_0a8b,x
        jsr sub_0a37
        sta $05ee,x
        inx
        cpx #$0b
        bne loc_09bb

loc_09c9:
        sei
        lda #$30

loc_09cc:
        cmp $d012
        bne loc_09cc
        lda #$13
        sta $d018
        lda #$c8
        sta $d016
        jsr sub_0a50
        jsr sub_0a45
        lda #$8a

loc_09e3:
        cmp $d012
        bne loc_09e3
        ldx #$0a

loc_09ea:
        dex
        bne loc_09ea
        lda #$17
        sta $d018
        lda #$a2

loc_09f4:
        cmp $d012
        bne loc_09f4
.label smc_09fa = * + 1
        lda #$00                                    // !SMC: modified by $0a5b
        sta $d016
        jsr sub_0a04
        jmp loc_09c9
// Referenced by: jsr from $09fe, $fe16

sub_0a04:
.label smc_0a05 = * + 1
        lda #$00                                    // !SMC: modified by $0a0e
        beq loc_0a0c

dat_0a08:
        .byte $ce,$05,$0a,$60                       // ...`

loc_0a0c:
        lda #$03
        sta smc_0a05                                // SMC: modifies $0a05
.label smc_0a12 = * + 1
        ldx #$00                                    // !SMC: modified by $0a33
        ldy #$00

loc_0a15:
        lda $0838,x
        sta $0800,y
        inx
        cpx #$30
        bne loc_0a22

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

loc_0a22:
        iny
        cpy #$30
        bne loc_0a15
        lda smc_0a12
        clc
        adc #$08
        cmp #$30
        bne loc_0a33
        lda #$00

loc_0a33:
        sta smc_0a12                                // SMC: modifies $0a12
        rts
// Referenced by: jsr from $09be, $0a7c, $fdd6, $fe94

sub_0a37:
        cmp #$80
        bpl loc_0a42
        cmp #$40
        bmi loc_0a41
        and #$3f

loc_0a41:
        rts

loc_0a42:
        and #$7f
        rts
// Referenced by: jsr from $09de, $fdf6

sub_0a45:
        lda $dc01
        cmp #$ef