← #106 Top 1024 #108 →
#107

Robert King 01

Robert King

1.916 lines of code

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

History

Code
Mahoney
Music
Jeroen Tel — "Noisy Pillars" (ripped)
Group
Robert King

A mysterious entry — CSDb records no release date, and the group "Robert King Corp. Ltd" has no founding date or country listed. Mahoney coded while Jeroen Tel's "Noisy Pillars" (tune 1) provides the ripped music — one of Tel's most widely-distributed compositions that appears in multiple crack intros. The corporate-sounding group name ("Corp. Ltd") is unusual and suggests either irony or a deliberate attempt to sound legitimate. The complete absence of metadata — no date, no country, no founding information — makes this one of the more enigmatic entries in the collection. Tel's "Noisy Pillars" also appears in #53 DCS and other intros, making it one of the most-reused compositions in cracking history. The HVSC preserves the tune.

Sources: CSDb

rking-01.asm 1.916 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:30
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0700  End: $21ff  (6912 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $1000 (4096)
// IRQ handler:  $1100 (irq_1100)
//
// Code: 2093 bytes, Data: 4819 bytes
// Labels: 212, Subroutines: 10
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$10b0 ---
.pc = $1000 "main_1000"

main_1000:
        lda #$93
        jsr $ffd2
        sei
        lda #$11
        sta $0315
        ldx #$00
        stx $0314
        stx $dc0e
        inx
        stx $d01a
        nop
        ldx #$00

loc_101a:
        lda $1250,x
        sta $0340,x
        inx
        cpx #$08
        bne loc_101a
        lda #$00
        sta $033c
        lda #$01
        sta $02
        lda #$01
        sta $51
        lda #$d1
        sta $50
        lda #$15
        sta $c4
        lda #$00
        sta $c3
        ldx #$00

loc_1040:
        lda #$09
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta $dae8,x
        inx
        bne loc_1040
        lda #$12
        sta $d018
        jsr sub_119d
        jsr sub_1800
        cli

loc_105d:
        lda $dc01
        and #$10
        cmp #$00
        bne loc_105d
        sei
        jsr $fda3
        jsr $fd15
        jsr $ff5b
        lda #$00
        sta $d020
        sta $d021
        ldx #$00
        lda #$00

loc_107c:
        sta $d400,x
        inx
        cpx #$30
        bne loc_107c
        lda #$01
        sta $02

loc_1088:
        ldx #$00

loc_108a:
        lda $1900,x
        sta $d418
        ldy $02

loc_1092:
        dey
        bne loc_1092
        inx
        bne loc_108a
        inc $02
        lda $02
        cmp #$40
        bne loc_1088
        ldx #$00

loc_10a2:
        lda dat_10b0,x
        sta $033c,x
        inx
        cpx #$60
        bne loc_10a2
        jmp $033c

dat_10b0:
        .byte $78                                   // x

// --- Region $10e7-$10f6 ---
.pc = $10e7 "loc_10e7"

loc_10e7:
        lda $0384,x
.label loc_10ec = * + 2
        sta $0687,x
        inx
        cpx #$08
        bne loc_10e7
        jmp $fce2

txt_10f5:
        .text "  "

// --- Region $1100-$1192 ---
.pc = $1100 "irq_1100"

irq_1100:
        lda #$01
        sta $d019
        ldx #$00

loc_1107:
        ldy dat_1200,x