#160

Rowdy American Distributors [RAD] 01

Rowdy American Distributors [RAD]

3.183 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRT

History

Group
Rowdy American Distributors [RAD] — United States

This intro from Rowdy American Distributors — typically abbreviated RAD — is the highest-ranked of six RAD entries in the collection. The group's name announces both its national identity and its role as a distribution operation rather than a cracking-focused crew. No individual credits for code, music, or graphics have been identified, and the CSDb search failed to return matching release data. An Atlantis Prophecy interview with Radar references the group, providing one of the few documentary traces of their activity. American distribution groups played a specific role in the C64 ecosystem — importing European cracks to the US market and redistributing them via BBS networks and postal trading. RAD's output of at least thirteen numbered intros indicates sustained operations over a meaningful period. The abbreviation "RAD" carried additional scene cachet as 1980s slang for impressive or excellent. Other RAD entries appear at #258 RAD-03, #433 RAD-06, #497 RAD-12, #549 RAD-07, and #797 RAD-13.

Sources: intros.c64.org · Atlantis Prophecy

rad-01.asm 3.183 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: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $09a9 (2473)
// IRQ handler:  $0df0 (irq_0df0)
// IRQ handler:  $ea31 (loc_ea31)
// IRQ handler:  $0dd0 (irq_0dd0)
// IRQ handler:  $1ab0 (irq_1ab0)
// IRQ handler:  $1af0 (irq_1af0)
//
// Code: 3491 bytes, Data: 59997 bytes
// Labels: 311, Subroutines: 9
//
// Cross-references: all OK
// ============================================


// --- Region $0900-$09b1 ---
.pc = $0900 "sub_0900"
// Referenced by: jsr from $24bb, $ffb9; branch from $0917

sub_0900:
        inc $d000
        inc $d002
        inc $d004
        inc $d006
        inc $d008
        jsr sub_0db0
        lda $d004
        cmp #$ff
        bne sub_0900
        lda #$04
        sta $d010

loc_091e:
        inc $d000
        inc $d002
        inc $d004
        inc $d006
        inc $d008
        jsr sub_0db0
        lda $d002
        cmp #$ff
        bne loc_091e
        lda #$06
        sta $d010

loc_093c:
        inc $d000
        inc $d002
        inc $d004
        inc $d006
        inc $d008
        jsr sub_0db0
        lda $d000
        cmp #$ff
        bne loc_093c
        lda #$07
        sta $d010

loc_095a:
        inc $d000
        inc $d002
        inc $d004
        inc $d006
        inc $d008
        jsr sub_0db0
        lda $d008
        cmp #$ff
        bne loc_095a
        lda #$17
        sta $d010

loc_0978:
        inc $d000
        inc $d002
        inc $d004
        inc $d006
        inc $d008
        jsr sub_0db0
        lda $d006
        cmp #$00
        bne loc_0978
        lda #$ff
        sta $d010
        inc $d000
        inc $d002
        inc $d004
        inc $d006
        inc $d008
        jsr sub_0d80
        rts

main_09a9:
        lda #$c1
        sta $0318
        jmp loc_2410

dat_09b1:
        // === Fill data (1 bytes, $09b1-$09b1) ===
        .byte $00                                   // .

// --- Region $0d00-$0da7 ---
.pc = $0d00 "sub_0d00"
// Referenced by: jsr from $242d, $24a3, $ffa1

sub_0d00:
        lda #$ff
        sta $d015
        sta $d01c
        lda #$00
        sta $d017
        sta $d01d
        lda #$01
        sta $d025
        lda #$06
        sta $d026
        lda #$0e
        sta $d027
        sta $d028
        sta $d029
        sta $d02a
        sta $d02b
        lda #$39
        sta $07f8
        lda #$3a
        sta $07f9
        lda #$3b
        sta $07fa
        lda #$3d
        sta $07fb
        lda #$3e
        sta $07fc

smc_0d44:
        lda #$4e                                    // !SMC: modified by $249b, $24c5, $ff99, $ffc3
        sta $d000
        lda #$66
        sta $d001
        lda #$65
        sta $d002
        lda #$66
        sta $d003