#429

Avantgarde 27

Avantgarde

2.573 lines of code

MusicSIDScrollerSCRL

History

Released
December 1994
Code
Thorn
Music
Henning Rokling — "Illusion Crack Intro"
Graphics
Unitrax
Group
Avantgarde — Germany, founded October 1993

CSDb describes this as the "Illusion Tribute" intro — Avantgarde paying homage to the Norwegian group Illusion by reusing their crack intro music. Thorn coded the intro, and Henning Rokling's "Illusion Crack Intro" composition is preserved in the HVSC. Unitrax contributed the graphics. Released in December 1994, this came just over a year after Avantgarde's founding in October 1993, during a period of prolific output documented in their other ranked entry, #247 AVT-03. The tribute concept — explicitly acknowledging another group's influence through music choice — was an occasional practice in the scene, functioning as both homage and competitive positioning. Doc Snyder's page documents Avantgarde intros with a roster of coders including Suicide, Dave, Magic Man, and Jack Alien, suggesting a group with substantial membership for the mid-1990s period. Their tagline "The Leaders of new Movements" reflected ambitions that matched their output.

Sources: CSDb · docsnyderspage

avt-27.asm 2.573 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:09
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $3c5f  (13408 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $37a0 (14240)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 1768 bytes, Data: 11640 bytes
// Labels: 338, Subroutines: 16
//
// Cross-references: all OK
// ============================================


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

sub_1000:
        jmp loc_14f8

loc_1003:
        jmp loc_35e0

dat_1006:
        .byte $00                                   // .

// --- Region $1093-$152f ---
.pc = $1093 "loc_1093"

loc_1093:
        jsr sub_148a
        lda $10b3
        eor #$01
        sta $10b3
        ldx #$02

loc_10a0:
        jsr sub_10a6
        dex
        bne loc_10a0
// Referenced by: jsr from $10a0

sub_10a6:
        stx $fe
        lda dat_1530,x
        sta $ff
        lda $102a,x
        bne loc_10f2
        lda #$01
        beq loc_10b9

loc_10b6:
        jmp loc_1295

loc_10b9:
        dec $1039,x
        bpl loc_10b6
        lda $1021,x
        sta $fa
        lda $1024,x
        sta $fb

loc_10c8:
        ldy $1027,x
        lda ($fa),y
        bpl loc_1119
        cmp #$ff
        bne loc_10eb
        iny
        lda ($fa),y
        sta $1027,x
        lda #$0f
        sta $1092
        lda #$00
        sta dat_1006
        sta $1091
        sta $1030,x
        beq loc_10c8

loc_10eb:
        cmp #$fe
        bne loc_10f3

dat_10ef:
        .byte $fe                                   // .

loc_10f0:
        rol
.label loc_10f2 = * + 1
        bpl loc_1153

loc_10f3:
        cmp #$fd
        bne loc_1103
        inc $1027,x
        iny
        lda ($fa),y
        sta dat_1006
        jmp loc_110d

loc_1103:
        cmp #$c0
        bcc loc_1112
        clc
        adc #$20
        sta $1030,x

loc_110d:
        inc $1027,x
        bne loc_10c8

loc_1112:
        and #$3f
        sta $102d,x
        bpl loc_110d

loc_1119:
        tay
        lda $16b7,y
        sta $fc
        lda $16d3,y
        sta $fd

loc_1124:
        ldy $1036,x
        lda ($fc),y
        bmi loc_112e
        jmp loc_11b5

loc_112e:
        cmp #$c0
        bcc loc_115a
        and #$3f
        sta $1039,x
        sta $103c,x
        inc $1036,x
        iny
        lda ($fc),y
        cmp #$c0
        bcs loc_1155
        cmp #$bf
        bne loc_1124
// Referenced by: jsr from $11af