← #74 Top 1024 #76 →
#75

Legend+North East Importers 01

Legend+North East Importers

5.020 lines of code

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

History

Released
30 January 1992
Code
Dave
Music
Iron Cat (Alain Hertenstein) — "For Legend 2"
Graphics
Skywolf
Group
Legend + North East Importers — Belgium, founded May 1988

A joint intro from two groups pooling resources — Legend (Belgium) and North East Importers (Germany) collaborating on a shared production. Dave coded while Iron Cat (Alain Hertenstein) composed "For Legend 2," an original piece written specifically for this group and preserved in the HVSC. Skywolf provided the graphics. The Belgian-German collaboration reflects how groups increasingly cooperated rather than competed as the C64 scene contracted in the early 1990s. Released on 30 January 1992, this arrived in the twilight period when joint operations became common as individual groups lacked the manpower to maintain solo output. Legend was founded in Belgium in May 1988 and would produce the highly-rated #30 Legend 17 later that same year.

Sources: CSDb

l_nei-01.asm 5.020 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:25
// 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:  $2000 (8192)
// IRQ handler:  $2096 (irq_2096)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 5649 bytes, Data: 57839 bytes
// Labels: 540, Subroutines: 23
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1006 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $2058, $29af, $ef73, $f85e

sub_1000:
        jmp loc_1048
// Referenced by: jsr from $20e2, $effd

sub_1003:
        jmp loc_1021

txt_1006:
        .text "-"

// --- Region $1021-$1080 ---
.pc = $1021 "loc_1021"

loc_1021:
        ldx #$00
        dec $1090
        bmi loc_1034
        jsr sub_1226
        jsr sub_1225
        jmp sub_1225

dat_1031:
        .byte $ff,$ff,$ff                           // ...

loc_1034:
        lda #$02
        sta $1090
        jsr sub_1040
        jsr sub_103f
// Referenced by: jsr from $103c, $e658

sub_103f:
        inx
// Referenced by: jsr from $1039, $e655

sub_1040:
        dec $108a,x
        bmi loc_1091
        jmp sub_1226

loc_1048:
        lda #$1f
        sta $d418
        lda #$f0
        sta $d417
        and #$0f
        sta smc_1262                                // SMC: modifies $1262
        ldx #$0f

loc_1059:
        sta dat_1081,x
        dex
        bpl loc_1059
        ldx #$02

loc_1061:
        lda $14b9,x
        sta $fa
        lda $14bc,x
        sta $fb
        ldy #$00
        lda ($fa),y
        sta $108d,x
        iny
        lda ($fa),y
        sta $10e6,x
        and #$0f
        sta $10e9,x
        dex
        bpl loc_1061
        rts

// --- Region $1091-$10c6 ---
.pc = $1091 "loc_1091"

loc_1091:
        ldy $108d,x
        cpy #$fe
        bne loc_10a1
// Referenced by: jsr from $10c0, $e6cf

sub_1098:
        lda $1084,x
        and #$fe
        sta $1084,x
        rts

loc_10a1:
        lda $18d7,y
        sta $fa
        lda $1899,y
        sta $fb
        ldy dat_1081,x
        lda ($fa),y
        bmi loc_10d2
        cmp #$60
        bcc loc_10f9

loc_10b6:
        and #$1f
        sta $108a,x
        lda #$fe
        sta dat_1031,x
        jsr sub_1098

loc_10c3:
        jmp loc_1187

dat_10c6:
        .byte $00                                   // .

// --- Region $10d2-$10dd ---
.pc = $10d2 "loc_10d2"

loc_10d2:
        cmp #$a0
        bcc loc_10ec
        and #$1f
        sta $108a,x
        bcs loc_10c3
        brk

// --- Region $10ec-$1141 ---
.pc = $10ec "loc_10ec"