← #526 Top 1024 #528 →
#527

Excess 17

Excess

1.425 lines of code

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

History

Code
Twilight
Graphics
zscs
Music
Nordischsound (Benjamin Dibbert)
Released
3 September 2022
Rating
10
Group
Excess -- CSDb group ID #185, Germany, founded 25 October 1991

Excess Crack Intro #17 -- titled "Pirates of Excess" -- is a September 2022 release from the German group Excess, preserved on CSDb as entry #221579 with a perfect 10 user rating. The intro was coded by Twilight, with graphics by zscs and music by Nordischsound (Benjamin Dibbert). Doc Snyder confirms these credits and catalogues this as intro #17 in the Excess series. Excess was founded on 25 October 1991, making this production a product of over thirty years of continuous group activity on the C64. The perfect CSDb rating -- rare for any production -- marks this as one of the most acclaimed crack intros in the database. Twilight and zscs formed a recurring creative partnership across multiple later Excess intros, while Nordischsound's music contribution adds a fresh compositional voice. The "Pirates" theming suggests a playful visual concept. Excess's extensive catalogue on Doc Snyder's page spans over twenty intros, demonstrating one of the longest-running C64 group legacies in the scene.

Sources: CSDb Release · Doc Snyder · intros.c64.org

excess-17.asm 1.425 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:22
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $1bff  (5120 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $1820 (6176)
// IRQ handler:  $1867 (irq_1867)
// IRQ handler:  $17b0 (irq_17b0)
//
// Code: 1472 bytes, Data: 3648 bytes
// Labels: 180, Subroutines: 16
//
// Cross-references: all OK
// ============================================


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

sub_1000:
        jmp loc_1048
// Referenced by: jsr from $1909

sub_1003:
        jmp loc_1021

dat_1006:
        .byte $00                                   // .

// --- Region $1021-$1080 ---
.pc = $1021 "loc_1021"

loc_1021:
        ldx #$00
        dec $1090
        bmi loc_1034
        jsr sub_1226
        jsr sub_1225
        jmp sub_1225

dat_1031:
        .byte $ff,$ff,$fe                           // ...

loc_1034:
        lda #$03
        sta $1090
        jsr sub_1040
        jsr sub_103f
// Referenced by: jsr from $103c

sub_103f:
        inx
// Referenced by: jsr from $1039

sub_1040:
        dec $108a,x
        bmi loc_1091
        jmp sub_1226

loc_1048:
        lda #$1f
        sta $d418
        lda #$f0
        sta $d417
        and #$0f
        sta smc_1262                                // SMC: modifies $1262
        ldx #$0f

loc_1059:
        sta dat_1081,x
        dex
        bpl loc_1059
        ldx #$02

loc_1061:
        lda $14b9,x
        sta $fa
        lda $14bc,x
        sta $fb
        ldy #$00
        lda ($fa),y
        sta $108d,x
        iny
        lda ($fa),y
        sta $10e6,x
        and #$0f
        sta $10e9,x
        dex
        bpl loc_1061
        rts

// --- Region $1091-$10c6 ---
.pc = $1091 "loc_1091"

loc_1091:
        ldy $108d,x
        cpy #$fe
        bne loc_10a1
// Referenced by: jsr from $10c0

sub_1098:
        lda $1084,x
        and #$fe
        sta $1084,x
        rts

loc_10a1:
        lda $167c,y
        sta $fa
        lda $166d,y
        sta $fb
        ldy dat_1081,x
        lda ($fa),y
        bmi loc_10d2
        cmp #$60
        bcc loc_10f9

loc_10b6:
        and #$1f
        sta $108a,x
        lda #$fe
        sta dat_1031,x
        jsr sub_1098

loc_10c3:
        jmp loc_1187

dat_10c6:
        .byte $00                                   // .

// --- Region $10d2-$10dd ---
.pc = $10d2 "loc_10d2"

loc_10d2:
        cmp #$a0
        bcc loc_10ec
        and #$1f
        sta $108a,x
        bcs loc_10c3
        brk

// --- Region $10ec-$1141 ---
.pc = $10ec "loc_10ec"