← #540 Top 1024 #542 →
#541

Eagle Soft Incorporated [ESI] 05

Eagle Soft Incorporated [ESI]

1.715 lines of code

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

History

Released
1985
Group
Eagle Soft Incorporated — Canada, founded 1982

CSDb catalogues this as the "prism" variant of the Eagle Soft Incorporated intro, released in 1985. No individual credits for code, music, or graphics are listed — unusual for ESI, whose other intros credit Mitch as coder and Scorpio as graphics artist. The 1985 release date places this among the group's earliest productions, predating the more famous eagle-logo intros that appeared in 1987. Eagle Soft Incorporated was founded in Canada in 1982, making them one of the first North American cracking groups on the C64. This intro sits alongside #10 ESI-01 and #1 ESI-02 in the rankings — the latter holding the top position overall. Doc Snyder's page preserves the group's tagline "The Few — The Proud — The Best" and documents their scrolltext archives. The "prism" descriptor distinguishes this early visual design from the iconic eagle motif that would later define the group's identity.

Sources: CSDb · docsnyderspage

esi-05.asm 1.715 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:47
// 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:  $0900 (2304)
//
// Code: 315 bytes, Data: 63172 bytes
// Labels: 210, Subroutines: 1
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0848-$0862 ---
.pc = $0848 "loc_0848"

loc_0848:
        lda ($2f),y
        rol
        rol
        rol
        rol
        and #$07
        tax
        lda $011a,x
        sta $0118
        lda ($2f),y
        and #$1f
        tax
        jsr $0122
        jmp $01ff

dat_0862:
        .byte $a4                                   // .

// --- Region $086f-$08de ---
.pc = $086f "loc_086f"

loc_086f:
        bmi loc_08d1
        lda ($2f),y
        jsr $0122

loc_0876:
        sta ($2d),y
        inc $2d
        bne loc_087e
        inc $2e

loc_087e:
        dex
        bne loc_0876
        beq loc_0848
        lda #$00
        beq loc_0876
        lda #$ff
        bne loc_0876

loc_088b:
        lda ($2f),y
        sta ($2d),y
        inc $2f
        bne loc_0895
        inc $30

loc_0895:
        inc $2d
        bne loc_089b
        inc $2e

loc_089b:
        dex
        bne loc_088b
        beq loc_0848
        jsr $0171
        lda ($2f),y
        jsr $0122

loc_08a8:
        sta ($2d),y
        inc $2d
        bne loc_08b0
        inc $2e

loc_08b0:
        dex
        bne loc_08a8
        dec $39
        bpl loc_08a8
        bmi loc_0848
        stx $39
        lda ($2f),y
        tax
        jmp $0122

loc_08c1:
        jsr $0171

loc_08c4:
        lda ($2f),y
        sta ($2d),y
        inc $2f
        bne loc_08ce
        inc $30

loc_08ce:
        inc $2d
.label loc_08d1 = * + 1
        bne loc_08d4
        inc $2e

loc_08d4:
        dex
        bne loc_08c4
        dec $39
        bpl loc_08c4
        jmp $0100

dat_08de:
        .byte $2c                                   // ,

// --- Region $0900-$0970 ---
.pc = $0900 "main_0900"

main_0900:
        ldy #$00
        sty $61
        sty $63
        lda #$0a
        sta $62
        lda #$e0
        sta $64
        ldx #$20

loc_0910:
        lda ($61),y
        sta ($63),y
        iny
        bne loc_0910
        inc $62
        inc $64
        dex