← #363 Top 1024 #365 →
#364

Xades Society 03

Xades Society

3.259 lines of code

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

History

Released
1988
Group
Xades Society [XDS] — Germany, CSDb group ID #688
Music
Michael Hendriks — "Sphinx (2)"

This crack intro from Xades Society — a German cracking group — dates to 1988 and is catalogued on CSDb as release #165673 under the title "Xades Intro." The music is by Michael Hendriks, using the SID tune "Sphinx (2)" from the HVSC. Doc Snyder's page confirms the music credit to Mike (Michael Hendriks) for Crack Intro #03 and maps it to CSDb release #165673. No individual coder is credited on either CSDb or Doc Snyder's page. The scrolltext contains a member-status update listing The Blot, Mad 1812, Spitfire, The Little Stormtroop, Germany, Shalk, and Anthrax as active members, while declaring Teddy, Alien, Iron Man, and DJKat as departed. A separate scrolltext presents the group's scene rankings — headed by Dominators, Strike Force, and Orion. The third scrolltext provides a contact address for Spitfire and a US voice mailbox number. This is one of three Xades Society intros documented on Doc Snyder's page.

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

xades-03.asm 3.259 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:37:02
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $2fff  (10240 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1800 (6144)
// IRQ handler:  $1900 (irq_1900)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 2071 bytes, Data: 8169 bytes
// Labels: 328, Subroutines: 9
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1009 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $1865

sub_1000:
        jmp loc_107c

scr_1003:
        // === Screen RAM (3 bytes, $1003-$1005) ===
        .encoding "screencode_mixed"
        .byte $4c,$b4                               // scrcode: ..
        .text "p"
        .encoding "petscii_upper"
// Referenced by: jsr from $1e44

sub_1006:
        jmp loc_10ba

spr_1009:
        // === Screen RAM (1 bytes, $1009-$1009) ===
        .byte $ff                                   // scrcode: .

// --- Region $107c-$1481 ---
.pc = $107c "loc_107c"

loc_107c:
        ldx #$00
        txa

loc_107f:
        lda #$00
        sta $102c,x
        sta $1063,x
        sta $d415
        lda #$f1
        sta $d417
        lda #$01
        sta $1029,x
        lda #$09
        sta $102f,x
        lda #$10
        sta $1032,x
        inx
        cpx #$03
        bcc loc_107f
        lda $1011
        sta $1013
        lda #$1f
        sta $d418
        lda #$01
        sta $100a
        rts

loc_10b4:
        lda #$00
        sta $100a
        rts

loc_10ba:
        lda $100a
        bne loc_10c0
        rts

loc_10c0:
        ldx #$02

loc_10c2:
        stx $1075
        lda $100e,x
        sta $fb
        tay
        lda $1029,x
        beq loc_110a
        dec $105d,x
        bpl loc_10e1
        inc $105d,x
        lda $106c,x
        sta $d404,y
        jmp loc_123f

loc_10e1:
        lda $1045,x
        and #$10
        beq loc_1107
        lda #$81
        sta $d404,y
        lda $1012
        asl
        tay
        lda scr_1482,y
        pha
        lda $1483,y
        pha
        ldy $fb
        pla
        sta $d401,y
        pla
        sta $d400,y
        jmp loc_139e

loc_1107:
        jmp loc_123f

loc_110a:
        cpx #$00
        bne loc_1116
        lda #$70
        sta $103b
        sta $d416

loc_1116:
        txa
        tay
        lda $102f,y
        sta $fc
        lda $1032,y
        sta $fd
        lda #$00
        sta $100d
        ldy $102c,x
        lda #$00
        sta $1023,x
        lda ($fc),y
        cmp #$ff
        bne loc_1138
        jmp loc_143b

loc_1138:
        pha