#247

Avantgarde 03

Avantgarde

1.862 lines of code

RasterbarsRSTRMusicSIDSpritesSPRT

History

Released
October 1993
Group
Avantgarde [AVT] — Germany, founded October 1993
Code
Magic Man (Stephan Schloepke)
Graphics
Mac
Music
Xayne (Giuseppe Musardo) — X-Glusif

This crack intro from the German group Avantgarde is catalogued on CSDb as release #69916, titled "Avantgarde Intro (Diagonal scroll)" and dated October 1993 — the same month the group was founded. Code is credited to Magic Man (Stephan Schloepke), graphics to Mac, and music to Italian composer Xayne (Giuseppe Musardo) using his SID tune "X-Glusif," preserved in the HVSC. The scrolltext announces a release of "Fields of Hades" by Weasel and includes an apology to member Skywolf for being omitted from a previous release's credits. The text also references the arrest of a friend named Grego whose BBS "In Livingcolor" was seized by police. Avantgarde adopted the tagline "The Leaders of new Movements." This is the highest-ranked Avantgarde intro at position 247, above #652 AVT-01 and #670 AVT-04.

Sources: CSDb · intros.c64.org · docsnyderspage

avt-03.asm 1.862 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:16
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $0c00 (3072)
// IRQ handler:  $0c7f (irq_0c7f)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 1381 bytes, Data: 62107 bytes
// Labels: 196, Subroutines: 16
//
// Cross-references: all OK
// ============================================


// --- Region $0c00-$0d4f ---
.pc = $0c00 "main_0c00"

main_0c00:
        jsr sub_102c
        jsr sub_0e19
        nop
        nop
        ldx #$00
        lda #$00

loc_0c0c:
        sta $0400,x
        sta $0500,x
        sta $0600,x
        sta $0700,x
        inx
        bne loc_0c0c
        ldy #$28
        lda #$00

loc_0c1f:
        sta $d9b8,y
        sta $d9e0,y
        sta $da08,y
        sta $da30,y
        dey
        bpl loc_0c1f
        ldx #$00

loc_0c30:
        lda $1900,x
        sta $0450,x
        sta $0680,x
        inx
        bne loc_0c30
        ldy #$34

loc_0c3e:
        lda $1a00,y
        sta $0550,y
        sta $0780,y
        dey
        bpl loc_0c3e
        sei
        lda #$7f
        sta $dc0d
        lda #$01
        sta $d01a
        lda #$1b
        sta $d011
        lda #$89
        sta $d012
        lda #$7f
        sta $0314
        lda #$0c
        sta $0315
        jsr sub_0e0e
        lda #$0c
        sta $d022
        lda #$0b
        sta $d023
        lda #$01
        jsr sub_100e
        cli
        jmp loc_1041

irq_0c7f:
        inc $d019

smc_0c82:
        nop                                         // !SMC: modified by $0e20
        nop
        lda #$12
        sta $d018
        ldx #$00
        jsr sub_0d43
        jsr sub_0d4c
        ora $01
        jsr sub_0cd3
        jsr sub_0d49
        cmp $01
.label smc_0c9c = * + 1
        lda #$c3                                    // !SMC: modified by $0d85
        sta $d016
        jsr sub_0cd3
        jsr sub_0d46
        cmp $01
        jsr sub_0cd3
        jsr sub_0d46
        cmp $01
        jsr sub_0cd3
        jsr sub_0d45
        cmp $01
        lda #$00
        sta $d020
        sta $d020
        lda #$d8
        sta $d016
        lda #$18
        sta $d018
        jsr sub_1000
        jsr sub_0d70
        jmp loc_febc
// Referenced by: jsr from $0c93, $0ca0, $0ca8, $0cb0

sub_0cd3:
        lda dat_0d50,x
        sta $d021
        sta $d021
        nop
        nop
        nop
        inx
        lda dat_0d50,x
        sta $d021
        sta $d021
        jsr sub_0d3b
        inx
        lda dat_0d50,x
        sta $d021
        sta $d021
        jsr sub_0d3b
        inx
        lda dat_0d50,x
        sta $d021
        sta $d021
        jsr sub_0d3b
        inx