#18

Eagle Soft Incorporated [ESI] 01

Eagle Soft Incorporated [ESI]

2.449 lines of code

RasterbarsRSTRScrollerSCRLBitmapBMAP

History

Released
15 July 1987
Code
Mitch (Mitch Solomon)
Music
Ripped SID tunes by Antony Crowther and Ben Daglish
Graphics
Scorpio
Group
Eagle Soft Incorporated — Canada, founded 1982

Ranked #18 on intros.c64.org, this is the lower-numbered counterpart to #1 ESI: both intros share the same CSDb release "Eagle Soft Incorporated Intro (Eagle 2x1)," rated 9.75/10 and dated 15 July 1987. Mitch — real name Mitch Solomon per Doc Snyder's page — coded the intro, Scorpio painted the eagle bitmap, and the soundtrack is a medley of six ripped tunes: "R1-D1 Unit Attack" and "Zig Zag" by Antony Crowther, and "Footballer of the Year," "Future Knight," "Mountie Mick's Death Ride" and "Bulldog" by Ben Daglish. A 2023 comment on Doc Snyder's page from Jazzcat notes that ESI had two female graphicians — Ladyhawk of TSC painted the earlier 1986 eagle, and Scorpio painted the one used through 1987 and 1988 that appears here. The scrolltext sends greetings to NEPA, The Alliance, Triad, TTI, Hotline and Fairlight and closes with the line "esi #1 / rush #1 / soho #1."

Sources: CSDb · docsnyderspage

esi-01.asm 2.449 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:45
// 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:  $5f60 (24416)
//
// Code: 640 bytes, Data: 62847 bytes
// Labels: 239, Subroutines: 14
//
// Verification: 2 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $118d-$118d ---
.pc = $118d "Segment $118d"
        brk

// --- Region $5d00-$5d96 ---
.pc = $5d00 "sub_5d00"
// Referenced by: jsr from $5f6b

sub_5d00:
        lda #$00
        sta $d020
        bit $d021
        jsr sub_5d78

loc_5d0b:
        lda #$00
        sta $3d
        lda #$5a
        sta $3e
        sei

loc_5d14:
        dec $37
        lda $37
        and #$07
        cmp #$07
        bne loc_5d3a
        ldx #$00

loc_5d20:
        lda $07c1,x
        sta $07c0,x
        inx
        cpx #$27
        bne loc_5d20
        ldy #$00
        lda ($3d),y
        beq loc_5d0b
        sta $07e7
        inc $3d
        bne loc_5d3a

dat_5d38:
        .byte $e6,$3e                               // .>

loc_5d3a:
        lda $37
        and #$07
        ora #$d8
        tax

loc_5d41:
        lda $d012
        cmp #$f2
        bne loc_5d41
        stx $d016
        lda #$1b
        sta $d011
        lda #$15
        sta $d018

loc_5d55:
        lda $d012
        cmp #$fb
        bne loc_5d55
        lda #$18
        sta $d016
        lda #$3b
        sta $d011
        lda #$19
        sta $d018
        lda #$00
        sta $dc00
        lda $dc01
        cmp #$ef
        bne loc_5d14
        rts
// Referenced by: jsr from $5d08

sub_5d78:
        lda #$18
        sta $d016
        lda #$1b
        sta $d011
        lda #$19
        sta $d018
        ldx #$28

loc_5d89:
        lda #$20
        sta $07c0,x
        lda #$00
        sta $dbc0,x
        dex
        bpl loc_5d89
        rts

// --- Region $5e00-$5f86 ---
.pc = $5e00 "sub_5e00"
// Referenced by: jsr from $5f60

sub_5e00:
        jmp loc_5e0c

dat_5e03:
        .byte $4c,$bc,$5e                           // L.^
// Referenced by: jsr from $5f68

sub_5e06:
        jmp loc_5f3c

dat_5e09:
        .byte $4c,$21,$5f                           // L!_

loc_5e0c:
        lda #$00
        sta smc_5ed0                                // SMC: modifies $5ed0
        lda #$60
        sta smc_5ed2                                // SMC: modifies $5ed2
        lda #$20
        sta smc_5ed4                                // SMC: modifies $5ed4
        jsr sub_5ea7
        lda $d011
        ora #$20
        sta $d011
        lda $d016
        ora #$10
        sta $d016
        lda $d018