#408

Endless Piracy 01

Endless Piracy

2.993 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

History

Released
December 1996
Code
Skid Row
Music
Markus Schneider — "Blind Guard"
Group
Endless Piracy (EP) — Germany, founded 27 December 1996

This crack intro from Endless Piracy was coded by Skid Row, with music by Markus Schneider — his SID composition "Blind Guard" preserved in the HVSC. CSDb dates the release to December 1996, coinciding with the group's founding at The Party 1996. Endless Piracy was an exceptionally short-lived German cracking group, founded on 27 December 1996 and dissolving by January 1997 — a lifespan of mere days. The group's eleven members included cracker Paracrax, musician Diflex (Schneider under his scene handle), coder Zorlac, and organizer The Management. Their headquarters was the BBS "The Dragon's Tower." After the group's rapid dissolution, members regrouped to form Disorder. Despite its fleeting existence, Endless Piracy left behind this documented intro, a snapshot of the late-era C64 scene when new groups could form and collapse within weeks.

Sources: CSDb — Endless Piracy Intro · CSDb — Endless Piracy Group · intros.c64.org

ep-01.asm 2.993 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:20
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $67ff  (24576 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $4778 (18296)
// IRQ handler:  $4863 (irq_4863)
// IRQ handler:  $4882 (irq_4882)
// IRQ handler:  $48bd (irq_48bd)
// IRQ handler:  $9000 (nmi_9000)
//
// Code: 2478 bytes, Data: 22098 bytes
// Labels: 345, Subroutines: 7
//
// Cross-references: all OK
// ============================================


// --- Region $0a8d-$0a92 ---
.pc = $0a8d "Program $0a8d"
        .byte $57,$57                               // sre $57,x // ILLEGAL
        .byte $47,$bf                               // sre $bf // ILLEGAL

chr_0a91:
        // === Charset data (2 bytes, $0a91-$0a92) ===
        .byte $6f,$5f                               // char 0 (partial)

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

sub_1000:
        jmp loc_15ca
// Referenced by: jsr from $4868

sub_1003:
        jmp loc_1086

dat_1006:
        .byte $00                                   // .

// --- Region $1086-$11f0 ---
.pc = $1086 "loc_1086"

loc_1086:
.label smc_1087 = * + 1
        ldy #$00                                    // !SMC: modified by $15d1
        beq loc_108b

dat_108a:
        .byte $60                                   // `

loc_108b:
        dec dat_1006
        bpl loc_1095
        lda #$02
        sta dat_1006

loc_1095:
        ldx #$00
        jsr sub_10b1
        ldx #$07
        jsr sub_10b1
        ldx #$0e
        jsr sub_10b1
.label smc_10a5 = * + 1
        lda #$30                                    // !SMC: modified by $13f6, $15da
        ora #$0f
        sta $d418
.label smc_10ac = * + 1
        lda #$7c                                    // !SMC: modified by $13ec
        sta $d416
        rts
// Referenced by: jsr from $1097, $109c, $10a1

sub_10b1:
        lda dat_1006
        cmp #$02
        bne loc_10d1
        dec $1008,x
        beq loc_10cc
        bpl loc_10c2
        jmp loc_1491

loc_10c2:
        ldy $1007,x
        lda $1704,y
        and #$08
        bne loc_10d1

loc_10cc:
        lda #$fe
        sta $1047,x

loc_10d1:
        ldy $1007,x
        sty $f8
        lda $1031,x
        bne loc_10fc
        sta $1070,x
        sta $1033,x
        sta $1034,x
        sta $104a,x
        sta $105f,x
        lda $1766,y
        sta $104b,x
        lda $17ba,y
        sta $1075,x
        lda $17c8,y
        sta $1076,x

loc_10fc:
        lda $101c,x
        cmp $101d,x
        beq loc_1157
        bcs loc_1122
        lda $104c,x
        clc
        adc $101e,x
        sta $104c,x
        lda $1037,x
        adc #$00
        sta $1037,x
        ldy $101d,x
        cmp $161a,y
        bcc loc_1154
        bcs loc_113c

loc_1122:
        lda $104c,x
        sec
        sbc $101e,x
        sta $104c,x
        lda $1037,x
        sbc #$00
        sta $1037,x
        ldy $101d,x
        cmp $161a,y
        bcs loc_1154

loc_113c:
        lda $1049,x
        and #$7f
        sta $1049,x
        tya