← #29 Top 1024 #31 →
#30

Legend 17

Legend

2.989 lines of code

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

History

Released
20 November 1992
Graphics
Mirage
Music
Legend Intro by Martijn Schutten
Group
Legend — Belgium, founded May 1988

Ranked #30 on intros.c64.org and rated 9.4/10 on CSDb — one of the higher-rated late-era crack intros. Catalogued as "Legend Intro" and dated 20 November 1992, this release credits Mirage for graphics and Martijn Schutten for the music. The SID tune is titled simply "Legend Intro" and is preserved in the HVSC under Schutten's composer directory. CSDb attaches no code credit to this release. Legend were a Belgian group founded in May 1988. Doc Snyder's page for the group exists but carries no section confirmed to map specifically to this intro. The November 1992 date places this in the late phase of C64 cracking, when most original scene members had migrated to 16-bit platforms — yet the high rating reflects the technical and artistic ambition of the releases that did continue to appear on the machine.

Sources: CSDb · docsnyderspage

legend-17.asm 2.989 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:26
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $3f3f  (14144 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $2100 (8448)
// IRQ handler:  $2120 (irq_2120)
// IRQ handler:  $2255 (irq_2255)
// IRQ handler:  $2291 (irq_2291)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 2892 bytes, Data: 11252 bytes
// Labels: 343, Subroutines: 17
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$100c ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $2386

sub_1000:
        jmp loc_10c9
// Referenced by: jsr from $22bc

sub_1003:
        nop
        nop
        nop
        nop
        nop
        nop
        jmp loc_1135

txt_100c:
        .text "-"

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

// --- Region $10c9-$18b3 ---
.pc = $10c9 "loc_10c9"

loc_10c9:
        lda $18ba,y
        tay
        lda $1b91,y
        sta $1043
        lda $1b92,y
        sta $1044
        lda #$0f
        sta $104a
        ldx #$00

loc_10e0:
        iny
        iny
        lda $1b91,y
        sta $1069,x
        sta $106c,x
        lda $1b92,y
        sta $1075,x
        lda $1b93,y
        sta $1078,x
        lda #$01
        sta $1040
        sta $104b,x
        sta $1042
        lda #$00
        sta $1072,x
        sta $106f,x
        sta $107b,x
        sta $1057,x
        iny
        inx
        cpx #$03
        bne loc_10e0
        sta $10c8
        sta $1048
        sta $1049
        sta $1041

loc_1122:
        sta $d404
        sta $d40b
        sta $d412
        sta $1045
// Referenced by: jsr from $1203, $121c

sub_112e:
        sta $1046
        sta $1047
        rts

loc_1135:
        lda $1040
        beq loc_1122
        cld
        ldx #$02
        lda $1046
        beq loc_1152
        ldy $104a
        beq loc_1152
        dec $1047
        bne loc_1152
        sta $1047
        dec $104a

loc_1152:
        dec $1042
        bpl loc_115f
        lda $1044
        sta $1042
        bne loc_1173

loc_115f:
        dec $1041
        bpl loc_1173
        lda $1043
        sta $1041
        dec $104b
        dec $104c
        dec $104d

loc_1173:
        stx dat_103e
        lda $104b,x
        beq loc_117e
        jmp loc_13ed

loc_117e:
        lda $1075,x
        sta $fe
        lda $1078,x
        sta $ff
        ldy $1072,x
        lda ($fe),y
        bpl loc_11d2
        cmp #$ff
        bne loc_119e
        iny
        lda ($fe),y
        sta $1072,x