#40

Exodus 03

Exodus

1.806 lines of code

RasterbarsRSTRSpritesSPRT

History

Released
27 May 1989
Code
Stormbringer
Music
ShadowFire by Fred Gray (ripped)
Group
Exodus — United States, founded June 1988

Ranked #40 on intros.c64.org, this Exodus release is catalogued on CSDb as "Exodus Intro" and dated 27 May 1989. Stormbringer coded the intro and Fred Gray is credited for the music; the SID is a rip of Gray's "ShadowFire" — the title tune from the Beyond game of the same name — preserved in the HVSC under his composer directory. Doc Snyder's verified section for this intro confirms the same code and music credits. The scrolltext announces a crack of Ninja Commando+ "from NATO," imported by Exodus on 27 May 1989, with greetings to NATO, Hotline, Fairlight, Elite, INC, FBR, NEC, NFI and TSM; the signature is "warewolf." Exodus were a US group founded in June 1988.

Sources: CSDb · docsnyderspage

exodus-03.asm 1.806 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: $26ff  (7936 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1300 (4864)
// IRQ handler:  $ea86 (nmi_ea86)
// IRQ handler:  $1303 (irq_1303)
// IRQ handler:  $fe47 (nmi_fe47)
// IRQ handler:  $ea31 (irq_ea31)
// IRQ handler:  $131a (irq_131a)
//
// Code: 970 bytes, Data: 6966 bytes
// Labels: 148, Subroutines: 11
//
// Cross-references: all OK
// ============================================


// --- Region $1300-$149d ---
.pc = $1300 "main_1300"

main_1300:
        jmp loc_1484

irq_1303:
        inc $02
        lda #$2e
        ldx #$1a
        ldy #$13

loc_130b:
        sta $d012
        stx $0314
        sty $0315
        inc $d019
        jmp $ea7e

irq_131a:
        lda $0335
        and #$07
        eor #$07
        ora #$10
        sta $d011                                // SMC: modifies $d011
        lda $033c
        and #$07
        ora #$d0
        sta $d016
        jsr sub_153a
        jsr sub_1620
        dec $01
        jsr $a403
        inc $01
        lda #$fa
        ldx #$03
        ldy #$13
        jmp loc_130b

// Referenced by: jsr from $1484
sub_1346: {
        sei
        lsr $d011
        lda #$86
        ldx #$ea
        sta $0318
        stx $0319
        jsr sub_1653
        lda #$00
        dec $01
        jsr $a400
        inc $01
        lda #$00
        sta $0334
        sta $033b
        sta $d021
        sta $dc0e
        lda #$0c
        sta $d022
        lda #$06
        sta $d023
        sta $d020
        lda #$13
        sta $d018
        lda #$00
        tay
loop1:
        sta $f000,y
        sta $f100,y
        iny
        bne loop1
        jsr sub_166a
        ldy #$00
loop2:
        lda #$40
        sta $0400,y
        sta $04fa,y
        sta $05f4,y
        sta $06ee,y
        lda #$0b
        sta $d800,y
        sta $d8fa,y
        sta $d9f4,y
        sta $daee,y
        iny
        cpy #$fa
        bne loop2
        jsr sub_14c5
        lda #$81
        sta $d019
        sta $d01a
        lda #$03
        ldx #$13
        sta $0314
        stx $0315
        lda #$fa
        sta $d012
        lda #$1b
        sta $d011                                // SMC: modifies $d011
loop3:
        cmp $d012
        bne loop3
        cli
        rts
}
// Referenced by: jsr from $1494

sub_13d8:
        inc $0334
        ldy $0334
        lda $1200,y
        bne loc_13eb
        lda #$00
        sta $0334
        lda $1200

loc_13eb:
        sta $0335
        lsr
        lsr
        lsr
        sta $9e
        sta $0338
        inc $033b
        ldy $033b
        lda $1120,y