#297

Exodus 04

Exodus

2.165 lines of code

RasterbarsRSTR

History

Released
21 October 1989
Code
Stormbringer
Group
Exodus — United States, founded June 1988

Exodus Intro #4, released on 21 October 1989, is a crack intro from the American group Exodus. The code is by Stormbringer, who also handled the NTSC fix. According to Doc Snyder's Page, the scrolltext accompanies a crack of Leonardo, which was cracked by Crazy, imported by Warewolf, and NTSC-fixed by Stormbringer. Exodus was founded in June 1988 with the motto "The future is ours" and operated several BBS boards including Wild Wares, Wares Galore, and Fabulous Disaster, along with voice mailboxes. The group's roster included Cult, Flyboy, Gazoo, Jimmy'z, Stormbringer, and Warewolf. Exodus also appears at #40 Exodus Intro #3, their highest-ranked entry. The group maintained connections to both American and European groups, importing cracks from European outfits like Crazy for North American distribution.

Sources: CSDb · intros.c64.org · Doc Snyder's Page

exodus-04.asm 2.165 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:19
// 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:  $1000 (4096)
// IRQ handler:  $11c8 (irq_11c8)
// IRQ handler:  $ea86 (nmi_ea86)
// IRQ handler:  $ea31 (irq_ea31)
// IRQ handler:  $fe47 (nmi_fe47)
//
// Code: 2014 bytes, Data: 61474 bytes
// Labels: 252, Subroutines: 22
//
// Cross-references: all OK
// ============================================


// --- Region $0814-$081f ---
.pc = $0814 "Program $0814"
        dec $dc
.label sub_0817 = * + 1
        cpy #$c0
        brk
        ror $c0c0,x
        cpy #$7e
        brk

dat_081f:
        .byte $00                                   // .

// --- Region $0d08-$0d08 ---
.pc = $0d08 "sub_0d08"
// Referenced by: jsr from $fe05

sub_0d08:
        brk

// --- Region $0e05-$0e23 ---
.pc = $0e05 "Program $0e05"
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_4847
        eor #$49
        eor #$49
        eor #$49
        eor #$49
        lsr
        .byte $4b,$44                               // alr #$44 // ILLEGAL
        jmp loc_4e4d

txt_0e22:
        .text "OP"

// --- Region $0f03-$0f03 ---
.pc = $0f03 "sub_0f03"
// Referenced by: jsr from $fe19

sub_0f03:
        .byte $42                                   // jam // ILLEGAL

// --- Region $0f13-$0f28 ---
.pc = $0f13 "sub_0f13"
// Referenced by: jsr from $fdd9

sub_0f13:
.label sub_0f14 = * + 1
        rol $3d3e,x
        and $3c3c,x
        .byte $3b,$3b,$3a                           // rla $3a3b,y // ILLEGAL
        .byte $3a                                   // nop // ILLEGAL
        and $3839,y
        sec
        .byte $37,$36                               // rla $36,x // ILLEGAL
        rol $35,x
        .byte $34,$34                               // nop $34,x // ILLEGAL
        .byte $33,$32                               // rla ($32),y // ILLEGAL

// --- Region $1000-$1003 ---
.pc = $1000 "main_1000"

main_1000:
        jmp loc_1424

dat_1003:
        .byte $00                                   // .

// --- Region $10b8-$11d7 ---
.pc = $10b8 "loc_10b8"

loc_10b8:
        ldy #$08
        ldx #$01
        bne loc_10c0

loc_10be:
        ldx #$08

loc_10c0:
        lda dat_0d68,y
        sta $d018
        lda $0d10,y
        sta $d020
        sta $d021
        iny
        dex
        beq loc_10be
        cpy #$50
        beq loc_10e4
        pha
        pla
        pha
        pla
        pha
        pla
        pha
        pla
        lda $00
        jmp loc_10c0

loc_10e4:
        ldx #$05
        jsr sub_10f7
        lda #$13
        sta $d018
        lda #$00
        sta $d020
        sta $d021
        rts
// Referenced by: jsr from $10e6, $f950, $fa4b; branch from $10f8

sub_10f7:
        dex
        bne sub_10f7
        rts

// Referenced by: jsr from $1424
sub_10fb: {
        sei
        jsr $e544
        lda #$00
        sta $d012
        lda #$c8