#508

Varsity 05

Varsity

3.551 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRTBitmapBMAP

History

Released
November 1992
Code
Charlie
Music
A-Man (Steven Diemer) — "Hi-Tek"
Graphics
2hip
Group
Varsity — Austria, founded 1 January 1992

A crack intro from the Austrian group Varsity, coded by Charlie with graphics by 2hip and music from A-Man (Steven Diemer) — his "Hi-Tek" composition preserved in the HVSC. Released in November 1992, this arrived less than a year after Varsity's founding on 1 January 1992 in Austria. The group operated under the tagline "Face the reality" and earned a reputation in the central European scene. Doc Snyder's page documents multiple Varsity intros with a roster including coders Vector (Eddy Scholten) and Exorcist, graphicians Calypso (Terry Wentinck) and B.A., and musicians including Zyron (Johan Astrand), EVS (Edwin van Santen), and Fly (Marc Bramer). This intro features a different team from those other productions — Charlie and 2hip appear exclusively in this entry. Varsity's scrolltexts greet a wide array of European groups including Chromance, Faces, Brutal, TRC, Triad, and Genesis Project, reflecting the Austrian group's international network.

Sources: CSDb · docsnyderspage

varsity-05.asm 3.551 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:59
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0700  End: $4dff  (18176 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $2800 (10240)
// IRQ handler:  $2970 (irq_2970)
// IRQ handler:  $2cf5 (irq_2cf5)
// IRQ handler:  $29aa (irq_29aa)
// IRQ handler:  $29f1 (irq_29f1)
// IRQ handler:  $2a39 (irq_2a39)
// IRQ handler:  $2a88 (irq_2a88)
// IRQ handler:  $3438 (irq_3438)
// IRQ handler:  $3480 (irq_3480)
//
// Code: 5073 bytes, Data: 13103 bytes
// Labels: 327, Subroutines: 15
//
// Cross-references: all OK
// ============================================


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

sub_1000:
        jmp loc_101d
// Referenced by: jsr from $2973, $29ba, $2a02, $2a3f, $2ae2, $2cfb, $3449, $3490

sub_1003:
        jmp loc_1093

txt_1006:
        .text "H"

// --- Region $101d-$10c9 ---
.pc = $101d "loc_101d"

loc_101d:
        asl
        asl
        asl
        tay
        lda $1988,y
        sta $10d0
        and #$0f
        sta smc_10a2                                // SMC: modifies $10a2
        lda $1989,y
        sta smc_1098                                // SMC: modifies $1098
        eor #$0f
        sta $182a
        lda #$0f
        sta smc_10bd                                // SMC: modifies $10bd
        ldx #$00
        stx $d416
        stx smc_1094                                // SMC: modifies $1094
        stx $1823
        stx smc_10c7                                // SMC: modifies $10c7
        stx $1822
        stx $1824
        stx $d417
        stx smc_10bb                                // SMC: modifies $10bb

loc_1056:
        lda $1982,y
        sta $182d,x
        lda $1983,y
        sta $182e,x
        lda #$00
        sta $182f,x
        sta $1830,x
        sta $1831,x
        sta $186d,x
        sta $1895,x
        sta $182c,x
        sta $182b,x
        sta $186c,x
        sta $185b,x
        sta $d404,x
        lda #$ff
        sta $1898,x
        clc
        txa
        adc #$07
        tax
        iny
        iny
        cpx #$15
        bcc loc_1056
        rts

loc_1093:
.label smc_1094 = * + 1
        ldy #$00                                    // !SMC: modified by $1041, $165c
        bne loc_10dc
.label smc_1098 = * + 1
        lda #$07                                    // !SMC: modified by $102f
        sta spr_1821
        dec $1823
        bpl loc_10a6
.label smc_10a2 = * + 1
        lda #$01                                    // !SMC: modified by $1029
        sta $1823

loc_10a6:
        ldx #$00
        txa

loc_10a9:
        lsr spr_1821
        bcc loc_10dd
        jsr sub_10eb

loc_10b1:
        clc
        txa
        adc #$07
        tax
        cpx #$15
        bcc loc_10a9
.label smc_10bb = * + 1
        lda #$30                                    // !SMC: modified by $1053, $14e5
.label smc_10bd = * + 1
        ora #$0f                                    // !SMC: modified by $1039, $164b
        sta $d418
.label smc_10c2 = * + 1
        lda #$e0                                    // !SMC: modified by $14db
        sta $d416
.label smc_10c7 = * + 1
        lda #$00                                    // !SMC: modified by $1047, $1655, $1675
        beq loc_10dc

// --- Region $10dc-$1244 ---
.pc = $10dc "loc_10dc"

loc_10dc:
        rts

loc_10dd:
        lda $1824
        and $186a,x
        beq loc_10b1
        jsr sub_10eb
        jmp loc_10b1