← #913 Top 1024 #915 →
#914

Survivors 2019, The [TS] 19

Survivors 2019, The [TS]

3.878 lines of code

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

History

Group
The Survivors — United States, dissolved 1990

The Survivors — abbreviated TS, with the "2019" suffix derived from the alphabetical positions of T (20th letter) and S (19th letter) — were an American cracking and import group that dissolved in 1990. The group operated multiple bulletin board systems across the United States and functioned as both a demo group and import operation. Members included Badd Boy, Black Beard, Devastator, Extremist, Hitman, Kid Quick, Satan, Silver Surfer, and others. A 1990 revival briefly reunited members including Pathfinder, Villain, Illusionist, Wanderer, and Scatterbrain. CSDb catalogues several Survivors intros, including "Survivors Intro 13 — Raster Effects" coded by Satan with music by The Sad Sausage. The group collaborated with Ikari on crack releases such as Lazer Tag and Prometheus, connecting the American import scene with one of Europe's most prominent cracking operations.

Sources: CSDb — Group

ts-19.asm 3.878 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:54
// 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:  $2800 (10240)
// IRQ handler:  $2919 (irq_2919)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 3254 bytes, Data: 60234 bytes
// Labels: 424, Subroutines: 14
//
// Cross-references: all OK
// ============================================


// --- Region $0814-$0814 ---
.pc = $0814 "sub_0814"
// Referenced by: jsr from $ffb0

sub_0814:
        brk

// --- Region $090c-$090c ---
.pc = $090c "Program $090c"
        brk

// --- Region $0917-$0917 ---
.pc = $0917 "sub_0917"
// Referenced by: jsr from $ffbd

sub_0917:
        brk

// --- Region $0b0f-$0b0f ---
.pc = $0b0f "Program $0b0f"
        brk

// --- Region $0ed0-$0ed0 ---
.pc = $0ed0 "loc_0ed0"

loc_0ed0:
        brk

// --- Region $0f13-$0f14 ---
.pc = $0f13 "sub_0f13"
// Referenced by: jsr from $ffa4

sub_0f13:
        brk
// Referenced by: jsr from $ffa1

sub_0f14:
        brk

// --- Region $113c-$144c ---
.pc = $113c "sub_113c"

// Referenced by: jsr from $1347, $e637
sub_113c: {
        lda $1056,x
        beq skip1
        dec $1056,x
        rts
skip1:
        ldy $1009
        lda $1026,x
        tax
        lda $1012,x
        sta $a3
        lda $1013,x
        sta $a4
        lda ($a3),y
        sta $107a
        lda $100e,x
        sta $a3
        lda $100f,x
        sta $a4
        lda $1010,x
        sta $a5
        lda $1011,x
        sta $a6
        lda ($a3),y
        sta $a3
        lda ($a5),y
        sta $a4
        stx $a6
        ldx $100c
        ldy $1067,x
        iny
        lda ($a3),y
        sta $a5
        and #$0f
        bne skip2
        lda $a5
        lsr
        lsr
        lsr
        lsr
        sta $1056,x
        iny
        tya
        sta $1067,x
        rts
skip2:
        lda $a5
        lsr
        lsr
        lsr
        lsr
        sta $1056,x
        iny
        tya
        sta $1067,x
        dey
        dey
        lda ($a3),y
        sta $a3
        bit $a3
        bmi skip3
        clc
        adc $107a
skip3:
        and #$7f
        sta $102c,x
        lda #$00
        sta $d404,x
        sta $1028,x
        sta $1029,x
        lda $a5
        asl
        asl
        asl
        asl
        tay
        ldx $a6
        lda $1014,x
        sta $a3
        lda $1015,x
        sta $a4
        ldx $100c
        lda ($a3),y
        iny
        sta $d405,x
        lda ($a3),y