#473

Epic 03

Epic

4.850 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRTBitmapBMAP

History

Released
October 1993
Group
Epic — Denmark, founded 15 September 1992

This October 1993 crack intro from the Danish group Epic was coded by Crossfire, one of the group's three founders, with graphics by Doom and an NTSC fix by Eddie of Motiv 8. The soundtrack features Drax's "Avenge" — a composition by Thomas Mogensen of the Vibrants and Crest, one of the C64's most prolific SID musicians. Doc Snyder's page documents the group's scrolltext referencing Detroit Invader and the Epic HQ Dreamline BBS. Epic was founded on 15 September 1992 by Mason, Faith, and Crossfire, with the Power Surge BBS serving as their world headquarters. The group maintained a cooperation with Device and produced 283 documented releases before disbanding on 7 January 1994. The NTSC fix credit reflects Epic's efforts to ensure compatibility with North American hardware, important for a group with transatlantic trading connections.

Sources: CSDb — Epic Intro · CSDb — Epic Group · docsnyderspage · intros.c64.org

epic-03.asm 4.850 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:20
// 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:  $3000 (12288)
//
// Code: 5175 bytes, Data: 58313 bytes
// Labels: 490, Subroutines: 16
//
// Cross-references: all OK
// ============================================


// --- Region $0803-$0803 ---
.pc = $0803 "sub_0803"
// Referenced by: jsr from $090c

sub_0803:
        brk

// --- Region $0814-$0814 ---
.pc = $0814 "Program $0814"
        brk

// --- Region $089d-$089d ---
.pc = $089d "Program $089d"
        brk

// --- Region $090c-$091e ---
.pc = $090c "sub_090c"
// Referenced by: jsr from $0cd0

sub_090c:
        jsr sub_0803
        ora ($0e,x)
        .byte $07,$05                               // slo $05 // ILLEGAL
        .byte $04,$2e                               // nop $2e // ILLEGAL
        rol $1320
        .byte $14,$09                               // nop $09,x // ILLEGAL
        .byte $0c,$0c,$20                           // nop $200c // ILLEGAL

txt_091d:
        .encoding "screencode_mixed"
        .text "th"
        .encoding "petscii_upper"

// --- Region $0cd0-$0cd8 ---
.pc = $0cd0 "Program $0cd0"
        jsr sub_090c
        .byte $07,$08                               // slo $08 // ILLEGAL
        .byte $14,$20                               // nop $20,x // ILLEGAL
        brk

dat_0cd8:
        // === Data block (1 bytes, $0cd8-$0cd8) ===
        .byte $20                                   //  

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

sub_1000:
        jmp loc_18ea
// Referenced by: jsr from $30de

sub_1003:
        jmp loc_14ea

txt_1006:
        .text "B"

// --- Region $1185-$1227 ---
.pc = $1185 "loc_1185"

loc_1185:
        lda $1065,x
        sta $1062,x
        tay
        lda dat_10c5,y
        sta $1026,x
        lda $1125,y
        sta $1029,x
        lda $1086,x
        sta $1056,x
        ldy $101d,x
        clc
        asl
        asl
        asl
        asl
        sta $fc
        lda $1014
        adc #$00
        sta $fd
        ldy #$00
        lda ($fc),y
        pha
        iny
        lda ($fc),y
        ldy $101d,x
        sta $d406,y
        pla
        sta $d405,y
        lda #$ff
        sta $1074,x
        sta $1077,x
        ldy #$0f
        lda ($fc),y
        sta $10b6
        ldy #$02
        lda ($fc),y
        sta $1053,x
        lda #$00
        sta $1089,x
        ldy $101d,x
        lda $10b6
        and #$01
        beq loc_11f1
        lda #$ff
        sta $d401,y
        lda #$81
        sta $d404,y
        rts

loc_11f1:
        lda $1053,x
        sta $d404,y
        lda $1026,x
        sta $d400,y
        lda $1029,x
        sta $d401,y
        rts
// Referenced by: jsr from $14fd, $1501, $1505, $e8eb, $e8f1

sub_1204:
        ldy $101d,x
        lda $1056,x
        clc
        asl
        asl
        asl
        asl
        sta $fc
        lda $1014