← #352 Top 1024 #354 →
#353

Ruling Company, The+Blasters Incorporated, The 10

Ruling Company, The+Blasters Incorporated, The

2.915 lines of code

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

History

Group
The Ruling Company — Netherlands, founded September 1988
Group
The Blasters Inc. — Spain, founded June 1988

A joint crack intro from The Ruling Company and The Blasters Inc. — two groups whose cooperation is well documented on CSDb. The Ruling Company (group ID 878) was a Dutch cracker, demo, and import group founded in September 1988 by three former I.C.E. Squad members, active until 1997. The Blasters Inc. (group ID 186) was a Spanish group founded on 18 June 1988 by JR Predator, ACM, and BSR, who described themselves as "Number one in Spain." CSDb records confirm the TRC–TBI cooperation ran from 1990 to 1991, ending in September 1991 following the death of JR Predator — a rare and sombre event in scene history. TRC’s notable members included Action Jackson, CBA, and Trax, while TBI fielded Black Hole, AMD, and musician Narciso. The intros.c64.org listing generated an active comment thread with seven entries from scene members including iAN CooG of Hokuto Force, and a standalone TBI intro also appears at position #716.

Sources: CSDb · CSDb · intros.c64.org

t_b-10.asm 2.915 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:47
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $3a36  (12855 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $3200 (12800)
// IRQ handler:  $32b0 (irq_32b0)
// IRQ handler:  $32c8 (irq_32c8)
// IRQ handler:  $32ec (irq_32ec)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 3436 bytes, Data: 9419 bytes
// Labels: 286, Subroutines: 27
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1006 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $3236, $3966

sub_1000:
        jmp loc_1040
// Referenced by: jsr from $33e7

sub_1003:
        jmp loc_10c8

dat_1006:
        .byte $01                                   // .

// --- Region $1040-$12b6 ---
.pc = $1040 "loc_1040"

loc_1040:
        asl
        asl
        asl
        tay
        ldx #$00

loc_1046:
        lda $177b,y
        sta $1014,x
        sta $101a,x
        lda $177c,y
        sta $1017,x
        sta $101d,x
        iny
        iny
        inx
        cpx #$03
        bne loc_1046
        ldx #$00
        stx $16e2
        lda $177b,y
        sta $16e1

loc_106a:
        sta $1765,x
        inc $16e2
        lda $16e1
        clc
        adc $177b,y
        sta $16e1
        clc
        adc $16e2
        inx
        cpx #$10
        bne loc_106a
        lda txt_1020
        beq loc_10b3
        ldx #$02

loc_108a:
        lda $177c,y
        sta $16e2
        and $16e3,x
        sta dat_1006,x
        dex
        bpl loc_108a
        bit $16e2
        bpl loc_10b3
        ldx #$00

loc_10a0:
        lda $177d,y
        sta $101a,x
        lda $177e,y
        sta $101d,x
        iny
        iny
        inx
        cpx #$03
        bne loc_10a0

loc_10b3:
        ldy #$00
        tya

loc_10b6:
        sta $d400,y
        sta $16ec,y
        iny
        cpy #$1b
        bne loc_10b6
        lda $1009
        sta $d418
        rts

loc_10c8:
        lda $fb
        pha
        lda $fc
        pha
        ldx #$02

loc_10d0:
        lda dat_1006,x
        bne loc_10d8

loc_10d5:
        jmp loc_1614

loc_10d8:
        lda $1701,x
        beq loc_10e5
        dec $1701,x
        bne loc_10d5
        jmp loc_1255

loc_10e5:
        txa
        tay
        lda $16fe,x
        beq loc_110f
        cmp $17d7,y
        bne loc_1109
        sta $16e2
        ldy $16f2,x
        lda $180a,y
        and #$f0
        cmp #$f0
        bne loc_1109