#216

Antitrax 01

Antitrax

399 lines of code

ScrollerSCRL

History

Released
26 September 1987
Group
Antitrax — Germany, founded 1987

Antitrax's first intro, released on 26 September 1987 and catalogued on CSDb as "Antitrax 2010 Intro." The group was founded in Germany in 1987, placing them in the heart of the era's most active C64 scene. No individual credits for code, music, or graphics are listed on CSDb, and no Doc Snyder page exists for the group. The "2010" in the CSDb title likely refers to an internal designation rather than a year. As a first numbered intro, this represents the group's earliest known intro production — the foundational release from which subsequent efforts would build. The September 1987 date places it in a transitional period for crack intros, as productions were moving from simple text displays toward more sophisticated presentations with custom music and graphics. Antitrax's abbreviated handle on CSDb is ATX. The intro survives through both CSDb and intros.c64.org, though broader documentation of the group remains sparse.

Sources: CSDb · intros.c64.org

antitrax-01.asm 399 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:15
// 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:  $0d00 (3328)
//
// Code: 281 bytes, Data: 63207 bytes
// Labels: 49, Subroutines: 3
//
// Cross-references: all OK
// ============================================


// --- Region $0d00-$0d7e ---
.pc = $0d00 "main_0d00"

main_0d00:
        jsr $e518
        lda #$0e
        jsr $ffd2
        sei
        ldy #$04

loc_0d0b:
        lda dat_0800,x
        sta $0400,x
        inx
        bne loc_0d0b
        inc $0d0d
        inc $0d10
        dey
        bne loc_0d0b
        lda #$20
        sta $0400
        ldy #$04

loc_0d24:
.label loc_0d25 = * + 1
        lda #$07

loc_0d26:
        sta $d800,x
        inx
        bne loc_0d26
        inc $0d28
        dey
        bne loc_0d24
        jsr sub_0d55
        cli

loc_0d36:
        lda $dc01
        cmp #$ff
        beq loc_0d36
        sei
        jsr $ff8a
        jsr $fda3
        jsr $e518
        ldx #$27

loc_0d49:
        lda dat_0e12,x
        sta $0400,x
        dex
        bpl loc_0d49
        jmp $0400
// Referenced by: jsr from $0d32

sub_0d55:
        lda #$1b
        sta $d011
        ldx #$01
        stx $d01a
        dex
        stx $dc0e
        stx $02
        stx $d020
        stx $d021
        ldy #$0d
        lda #$7f
        sta $0314
        sty $0315
        jsr sub_0e09
        lda #$f0
        sta $d012
        cli
        rts

// --- Region $0d96-$0e12 ---
.pc = $0d96 "loc_0d96"

loc_0d96:
        bne loc_0d25
        and ($d0,x)
        lda $0dc5,y
        sta $d016
        lda $0dc8,y
        sta $d012
        iny
        cpy #$03
        beq loc_0db3
        sty $02

loc_0dad:
        pla
        tay
        pla
        tax
        pla
        rti

loc_0db3:
        lda #$00
        sta $02
        jsr sub_0dcb
        lda #$f0
        sta $d012
        jmp loc_0dad

dat_0dc2:
        .byte $00,$06,$00,$c8,$c7,$c8,$f1,$fa,$fc   // .........
// Referenced by: jsr from $0db7

sub_0dcb:
        dec $0dc6
        dec $0dc6
        lda $0dc6
        cmp #$bf
        beq loc_0dd9
        rts

loc_0dd9:
        ldx #$00

loc_0ddb:
        lda $07c1,x
        sta $07c0,x
        inx
        cpx #$27
        bne loc_0ddb

loc_0de6:
        ldy #$00
        lda ($fe),y