#715

Legend 26

Legend

3.356 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

History

Released
September 1990
Graphics
Lyon
Music
Hithouse (Marco de Jong) — "Jingle Bells"
Group
Legend — Belgium, founded May 1988

Released in September 1990, this Legend intro features graphics by Lyon and music by Hithouse (Marco de Jong), whose SID arrangement of "Jingle Bells" is preserved in the High Voltage SID Collection. Lyon was a core member who handled both artwork and coding duties across multiple Legend releases. The choice of a Christmas-themed tune for a September release is unusual, though it may have been reused from an earlier seasonal production. Legend, tagged [L], was a Belgian cracking group founded in May 1988 with the motto "Snapshot of the future." The group is one of the most extensively represented in this collection, with entries ranging from #30 Legend-17 through #244 Legend-08 and many others. Doc Snyder's Page documents a roster that included Midfit, Dave, Goldfish, and Powerplant alongside Lyon. Their prolific output and connections to elite groups like SCS+TRC, F4CG, and Alpha Flight established Legend as a mainstay of the Belgian C64 scene.

Sources: CSDb · Doc Snyder's Page

legend-26.asm 3.356 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:54
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $07ee  End: $ffff  (63506 bytes)
// Crunched with Beta Dynamic v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $1258 (4696)
// IRQ handler:  $1300 (irq_1300)
// IRQ handler:  $c018 (irq_c018)
//
// Code: 2648 bytes, Data: 60858 bytes
// Labels: 415, Subroutines: 12
//
// Cross-references: all OK
// ============================================


// --- Region $0ee0-$0eed ---
.pc = $0ee0 "loc_0ee0"

loc_0ee0:
        jsr $ffe4
        cmp #$20
        bne loc_0ee0
        pla
        pla
        jmp loc_0f00

dat_0eec:
        .byte $00,$00                               // ..

// --- Region $0f00-$0f3f ---
.pc = $0f00 "loc_0f00"

loc_0f00:
        sei
        ldy #$1f

loc_0f03:
        lda $fd30,y
        sta $0314,y
        dey
        bpl loc_0f03
        jsr $fda3
        jsr $ff5b
        jsr $ff5b
        ldx #$00
        txa
        sta $d020
        sta $d021

loc_0f1e:
        sta $d400,x
        inx
        cpx #$18
        bne loc_0f1e
        ldx #$07

loc_0f28:
        lda $0ef8,x
        sta $0403,x
        dex
        bpl loc_0f28
        ldx #$30

loc_0f33:
        lda $0f41,x
        sta $033a,x
        dex
        bpl loc_0f33
        jmp $033a

dat_0f3f:
        .byte $ea                                   // .

// --- Region $1258-$135b ---
.pc = $1258 "main_1258"

main_1258:
        lda #$0d
        sta $0286
        jsr $e544
        sei
        lda #$00
        sta $d012
        sta $d020
        sta $d021
        lda #$01
        sta $d01a
        lda #$7f
        sta $dc0d
        lda #$1b
        sta $d011
        ldx #$00

loc_127d:
        lda $1000,x
        sta $0400,x
        lda $10c8,x
        sta $04c8,x
.label loc_128b = * + 2
        lda $1190,x
        sta $0590,x
        inx
        cpx #$c8
        bne loc_127d

loc_1294:
        bne loc_128b
        lda #$00
        sta $0314
        lda #$13
        sta $0315
        ldx #$27
        lda #$00

loc_12a4:
        sta $0658,x
        dex
        bpl loc_12a4
        tax

loc_12ab:
        sta $da58,x
        sta $db20,x
        inx
        cpx #$c8
        bne loc_12ab
        ldx #$27

loc_12b8:
        lda $13b0,x
        sta $dbc0,x
        dex
        bpl loc_12b8
        jsr sub_c048
        jmp loc_1400

dat_12c7:
        .byte $ea                                   // .
// Referenced by: jsr from $131a, $f068

sub_12c8:
        inc dat_12fc
        lda dat_12fc
        and #$03