← #59 Top 1024 #61 →
#60

Excess 10

Excess

3.362 lines of code

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

History

Code
Twilight
Graphics
Facet
Music
Jammer (Kamil Wolnikowski)
Released
25 January 2020
Rating
9.8
Group
Excess -- CSDb group ID #185, Germany, founded 25 October 1991

Excess Crack Intro #10 -- titled "2k20 Intro" -- is a January 2020 release from the German group Excess, preserved on CSDb as entry #187137 with an outstanding 9.8 user rating. The intro was coded by Twilight, with graphics by Facet and music by Jammer (Kamil Wolnikowski), whose SID track "Stay Forever" accompanies the display. Excess was founded on 25 October 1991 under the motto "More than you deserve," making this production a testament to nearly three decades of continuous activity on the C64 platform. The 2020 release date places this firmly in the modern retro era, when dedicated sceners continue producing original work for vintage hardware. Doc Snyder's page catalogues over twenty Excess intros spanning from the early 1990s to the 2020s, with Twilight serving as the group's primary coder across many later entries. The high CSDb rating reflects the scene community's appreciation for Excess's sustained commitment to quality C64 productions.

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

excess-10.asm 3.362 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:19
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0700  End: $3fff  (14592 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $3440 (13376)
// IRQ handler:  $34e9 (irq_34e9)
// IRQ handler:  $3554 (irq_3554)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 2375 bytes, Data: 12217 bytes
// Labels: 308, Subroutines: 12
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1003 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $3475

sub_1000:
        jmp loc_1048

dat_1003:
        .byte $4c                                   // L

// --- Region $1048-$1080 ---
.pc = $1048 "loc_1048"

loc_1048:
        lda #$1f
        sta $d418
        lda #$f0
        sta $d417
        and #$0f
        sta $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 $108c-$10df ---
.pc = $108c "loc_108c"

loc_108c:
        asl $04
        ora $06
        ora ($bc,x)
        sta $c010
        inc $09d0,x
// Referenced by: jsr from $10c0

sub_1098:
.label loc_109a = * + 2
        lda $1084,x
        and #$fe
        sta $1084,x
        rts
        lda $17f2,y
        sta $fa
        lda $17b4,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 $1031,x
        jsr sub_1098

loc_10c3:
.label loc_10c5 = * + 2
        jmp loc_1187
        brk
        .byte $07,$0e                               // slo $0e // ILLEGAL
        .byte $1b,$27,$33                           // slo $3327,y // ILLEGAL
        bit $af57
        ora $0a
.label loc_10d2 = * + 1
        .byte $14,$c9                               // nop $c9,x // ILLEGAL
        ldy #$90
        asl $29,x
        .byte $1f,$9d,$8a                           // slo $8a9d,x // ILLEGAL
        bpl loc_108c
        inc $07
        brk
        brk

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

loc_10ec:
        asl
        asl
        asl
        sta dat_13d9,x
        iny
        lda ($fa),y
        cmp #$60
        bcs loc_10b6

loc_10f9:
        sta $fc
        iny
        lda $10e6,x
        lsr
        lsr

loc_1101:
        lsr
        lsr
        clc
        adc $fc
        sta $10c9,x
        sty $fc
        tay
        lda dat_1437,y
        sta $10cc,x
        sta $13e2,x