← #740 Top 1024 #742 →
#741

Epic (US) 02

Epic (US)

1.001 lines of code

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

History

Released
July 1988
Group
Epic — United States, founded 1988

This crack intro from the American group Epic dates to mid-1988, during the group's brief period of activity. CSDb documents three Epic (US) intros from 1988, with releases used in cracks of Call Me Psycho and Katakis among others. No individual credits for code, music, or graphics have been preserved. Epic (US) was a short-lived American cracking, import, and fixing group — entirely distinct from the later Danish group of the same name. Founded in 1988, the group dissolved by October of that year after members Jazzy and Candyman departed. CSDb explicitly notes the two Epic groups should not be confused. The American Epic included coders Player =1=, Minotaur, and The Pimp, and was focused on importing and fixing PAL games for the NTSC market. Despite producing only three documented intros before disbanding, the group's existence reflects the active American C64 cracking scene of the late 1980s.

Sources: CSDb — Epic Intro · CSDb — Epic (US) Group · intros.c64.org

epic_us-02.asm 1.001 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: $0801  End: $ffff  (63487 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $cad9 (51929)
// IRQ handler:  $c950 (irq_c950)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 664 bytes, Data: 62823 bytes
// Labels: 106, Subroutines: 4
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0f19-$0f19 ---
.pc = $0f19 "sub_0f19"
// Referenced by: jsr from $ff39

sub_0f19:
        brk

// --- Region $2260-$2260 ---
.pc = $2260 "Segment $2260"
        brk

// --- Region $8dd0-$8dd0 ---
.pc = $8dd0 "Segment $8dd0"
        brk

// --- Region $a0d0-$a0d0 ---
.pc = $a0d0 "Segment $a0d0"
        brk

// --- Region $b160-$b160 ---
.pc = $b160 "Segment $b160"
        brk

// --- Region $bcd0-$bcd0 ---
.pc = $bcd0 "Segment $bcd0"
        brk

// --- Region $c900-$c942 ---
.pc = $c900 "sub_c900"
// Referenced by: jsr from $cafa

sub_c900:
        sei
        lda #$7f
        sta $dc0d
        lda #$01
        sta $d01a
        lda #$1b
        sta $d011
        lda #$62
        sta $d012
        lda #$50
        sta $02
        lda #$cb
        sta $03
        lda #$07
        sta $04
        lda #$50
        sta $05
        lda #$cd
        sta $06
        lda #$50
        sta $0314
        lda #$c9
        sta $0315
        lda #$07
        sta $07
        lda #$04
        sta $02aa
        lda #$c1
        sta $0318
        cli
        rts

// --- Region $c950-$cb01 ---
.pc = $c950 "irq_c950"
irq_c950: {
        ldy #$08
        jsr sub_cad5
        lda $04
        sta $d016
        lda #$15
        sta $d018
        ldy #$00
        ldx #$01
        lda #$6a
loop1:
        cmp $d012
        bne loop1
        ldy #$08
        jsr sub_cad5
        nop
        lda txt_cb00
        sta $d021
        sta $d020
        ldy #$00
        ldx #$01
        nop
        nop
        nop
loop2:
        lda txt_cb00,x
        sta $d021
        sta $d020
        ldy $cb18,x
loop3:
        dey
        bne loop3
        inx
        cpx #$18
        bne loop2
        nop
        nop
        lda #$00
        sta $d020
        sta $d021
        lda #$07
        sta $d016
        dec $04
        dec $04
        lda $04
        cmp #$ff
        bne skip3
        lda #$07
        sta $04
        ldx #$00
loop4:
        lda $0541,x
        sta $0540,x
        inx
        cpx #$27
        bne loop4
        ldy #$00
        lda ($02),y
        beq skip2
        ora #$80
        sta $0567