← #930 Top 1024 #932 →
#931

Avantgarde 28

Avantgarde

3.471 lines of code

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

History

Released
24 December 1993
Code
Maduplec
Graphics
Mac
Music
Drax (Thomas Mogensen) — "Avenge"
Group
Avantgarde — Germany, founded October 1993

CSDb catalogues this as the "Avantgarde Intro (Pond)," released on Christmas Eve 1993 — just two months after the group was founded in October of that year. Maduplec coded the intro, Mac provided the graphics, and the legendary Drax (Thomas Mogensen) contributed "Avenge" as the soundtrack, preserved in the HVSC. Drax was one of the most prolific and respected SID composers of the era, contributing music to numerous groups across the European scene. Avantgarde was a German group that used the motto "The Leaders of New Movements" and remained active into the mid-1990s. Their catalogue on Doc Snyder's page reveals a diverse roster of coders and musicians across their numbered intros, including other entries like #247 avt-03 and #429 avt-27. The rapid production of this intro so soon after the group's founding reflects the experienced sceners who formed the crew.

Sources: CSDb · docsnyderspage

avt-28.asm 3.471 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: $47ff  (16384 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $4000 (16384)
// IRQ handler:  $424f (irq_424f)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 2855 bytes, Data: 13529 bytes
// Labels: 333, Subroutines: 6
//
// Cross-references: all OK
// ============================================


// --- Region $086f-$0874 ---
.pc = $086f "loc_086f"

loc_086f:
        .byte $e3,$ff                               // isc ($ff,x) // ILLEGAL
        .byte $ff,$ff,$00                           // isc $00ff,x // ILLEGAL
        rti

// --- Region $088d-$0898 ---
.pc = $088d "Program $088d"
        beq loc_086f
        cpx #$ff
        .byte $ff,$ff,$e0                           // isc $e0ff,x // ILLEGAL
        cpx #$e0
        .byte $e3,$e7                               // isc ($e7,x) // ILLEGAL
        rti

// --- Region $08c9-$08d0 ---
.pc = $08c9 "Program $08c9"
        beq loc_0943
        .byte $3c,$1e,$0f                           // nop $0f1e,x // ILLEGAL
        .byte $07,$03                               // slo $03 // ILLEGAL

dat_08d0:
        .byte $7f                                   // .

// --- Region $0a8d-$0a98 ---
.pc = $0a8d "Program $0a8d"
        asl $0e0e,x
        cpx #$f8
        .byte $fc,$1c,$0e                           // nop $0e1c,x // ILLEGAL
        .byte $1c,$fc,$f8                           // nop $f8fc,x // ILLEGAL
        brk

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

sub_1000:
        jmp loc_1040
// Referenced by: jsr from $4144, $431b

sub_1003:
        jmp loc_10c1

dat_1006:
        .byte $01                                   // .

// --- Region $1030-$1277 ---
.pc = $1030 "sub_1030"
// Referenced by: jsr from $1a29

sub_1030:
        jsr $5244
        eor ($58,x)
        .byte $2f,$56,$49                           // rla $4956 // ILLEGAL
        .byte $42                                   // jam // ILLEGAL

txt_1039:
        .text "RANTS!-"

loc_1040:
        asl
        asl
        asl
        tay
        ldx #$00

loc_1046:
        lda $17cb,y
        sta $172e,x
        sta $1734,x
        lda $17cc,y
        sta $1731,x
        sta $1737,x
        iny
        iny
        inx
        cpx #$03
        bne loc_1046
        lda $17cb,y
        sta $1747
        lda txt_1020
        beq loc_1095
        ldx #$02

loc_106c:
        lda $17cc,y
        sta $100b
        and $173a,x
        sta dat_1006,x
        dex
        bpl loc_106c
        bit $100b
        bpl loc_1095
        ldx #$00

loc_1082:
        lda $17cd,y
        sta $1734,x
        lda $17ce,y
        sta $1737,x
        iny
        iny
        inx
        cpx #$03
        bne loc_1082

loc_1095:
        ldy #$00
        tya

loc_1098:
        sta $d400,y
        iny
        cpy #$17
        bne loc_1098
        tay

loc_10a1:
        sta $1014,y
        iny
        cpy #$0c
        bne loc_10a1
        ldy #$14

loc_10ab:
        sta $1748,y
        dey