← #190 Top 1024 #192 →
#191

Excalibur 02

Excalibur

2.074 lines of code

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

History

Code
Burglar
Graphics
Artix
Music
Martijn Schutten
Released
2 December 1991
Group
Excalibur -- CSDb release group: Success, group ID #913 (USA)

Excalibur Crack Intro #02 is a December 1991 release coded by Burglar, with graphics by Artix and music by Martijn Schutten, whose SID track "Spooky" is preserved in the High Voltage SID Collection. Doc Snyder credits the musician as Junebug (Martijn Schutten). The CSDb entry #54696 lists the release group as Success rather than Excalibur -- indicating Excalibur's close relationship with the Success cracking group, with Burglar appearing as a shared member. Doc Snyder catalogues the group as US-based under the motto "Glory is for the few." The scrolltext -- signed by Massive Onslaught -- announces a crack of "Reckless Rufus+3" imported and fixed from Success, and sends greetings to Success, Legend, ARC+DL, Offense, Censor, and TSM. This is the higher-ranked of two Excalibur entries on intros.c64.org. Burglar's code and Artix's graphical work provide the visual presentation, while Schutten's "Spooky" adds an atmospheric SID soundtrack.

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

exc-02.asm 2.074 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:47
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $fbff  (62464 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $2900 (10496)
// IRQ handler:  $2945 (irq_2945)
//
// Code: 1087 bytes, Data: 61377 bytes
// Labels: 199, Subroutines: 4
//
// Cross-references: all OK
// ============================================


// --- Region $1b8c-$1bbf ---
.pc = $1b8c "sub_1b8c"
// Referenced by: jsr from $2918

sub_1b8c:
        jsr $ff5b
        lda $02a6
        bne loc_1bbd
        inc $1c18
        inc $1c1c
        inc $1c1d
        inc $1c23
        inc $1c24
        inc $1c25
        inc $1c2b
        inc $1c2c
        inc $1c2d
        inc $1c33
        inc $1c34
        inc $1c35
        lda #$06
        sta $65c6

loc_1bbd:
        jmp loc_2c58

// --- Region $2900-$2903 ---
.pc = $2900 "main_2900"

main_2900:
        jmp loc_2918

bmp_2903:
        // === Bitmap data (1 bytes, $2903-$2903) ===
        .byte $20                                   //  

// --- Region $2918-$2c2d ---
.pc = $2918 "loc_2918"

loc_2918:
        jsr sub_1b8c
        sei
        lda #$35
        sta $01
        lda #$01
        sta $d019
        sta $d01a
        lda #$7f
        sta $dc0d
        lda #$30
        sta $d012
        lda #$1b
        sta $d011
        lda #$45
        ldx #$29
        sta $fffe
        stx $ffff
        cli
        jmp loc_2bd3

irq_2945:
        php
        pha
        tya
        pha
        txa
        pha
        lda #$1b
        sta $d011
        lda #$09
        sta $d021
        lda #$19
        sta $d018
.label smc_295b = * + 1
        lda #$d0                                    // !SMC: modified by $2b13
        sta $d016
        lda #$0c
        sta $d022
        lda #$0d
        sta $d023
        dec $2d47
        bne loc_2991
        lda #$0a
        sta $2d47
        inc bmp_2d45
        dec $2d46
        lda bmp_2d45
        cmp #$be
        bne loc_2982
        lda #$b8

loc_2982:
        sta bmp_2d45
        lda $2d46
        cmp #$b7
        bne loc_298e
        lda #$bd

loc_298e:
        sta $2d46

loc_2991:
        lda bmp_2d45
        sta $07f8
        sta $07fc
        sta $07fe
        lda $2d46
        sta $07f9
        sta $07fd
        sta $07ff
        ldx $2a46
        lda $1e00,x
        clc
        adc #$ac
        sta $d001
        sta $d003
        ldx $2a46
        txa
        clc
        adc #$1f
        tax
        lda $1e00,x
        clc
        adc #$40
        sta $d00f
        sta $d00d
        ldx smc_2abc
        lda spr_1f00,x
        cmp #$00
        bcs loc_29d8