#323

Legend 01

Legend

2.036 lines of code

RasterbarsRSTRScrollerSCRLSpritesSPRT

History

Released
30 January 1992
Code
Dave
Graphics
Skywolf
Charset
uncredited
Music
Iron Cat (Alain Hertenstein) — For Legend 2
Group
Legend — Belgium, founded May 1988

Released on 30 January 1992, this joint Legend and NEI crack intro is catalogued on CSDb as release #33473 under the name "NEI + Legend Intro." Dave handled the code, Skywolf created the graphics, and Iron Cat — Alain Hertenstein — composed the SID tune "For Legend 2," which is preserved in the HVSC. The charset artist is uncredited by name on CSDb. Doc Snyder's page lists it under both Legend and NEI's catalogues, confirming the cooperation between the two groups. Legend was a Belgian cracking group founded in May 1988, known for their confrontational scrolltexts and self-proclaimed identity as "the will of god." The scrolltext sends greetings to Censor, Talent, F4CG, Chromance, and TSM, while promoting their BBSes Second to None and South of Heaven. This collaboration with North East Importers reflects the transatlantic partnerships common in the early 1990s scene, where European crackers and American importers regularly joined forces.

Sources: CSDb · docsnyderspage

legend-01.asm 2.036 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:53
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ecff  (58624 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1000 (4096)
// IRQ handler:  $1202 (irq_1202)
// IRQ handler:  $122b (irq_122b)
// IRQ handler:  $124c (irq_124c)
// IRQ handler:  $126d (irq_126d)
// IRQ handler:  $128e (irq_128e)
// IRQ handler:  $12af (irq_12af)
// IRQ handler:  $12da (irq_12da)
// IRQ handler:  $1306 (irq_1306)
// IRQ handler:  $1335 (irq_1335)
// IRQ handler:  $11b3 (irq_11b3)
// IRQ handler:  $1169 (irq_1169)
//
// Code: 1549 bytes, Data: 57075 bytes
// Labels: 216, Subroutines: 18
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1473 ---
.pc = $1000 "main_1000"

main_1000:
        jsr sub_16b0
        ldx #$00
        txa

loc_1006:
        sta scr_2400,x
        sta $2500,x
        sta $2600,x
        sta dat_2700,x
        inx
        bne loc_1006
        lda #$df
        sta smc_136f                                // SMC: modifies $136f
        ldy #$00

loc_101c:
        tya
        pha
        jsr sub_116e
        jsr sub_11b8
        pla
        tay
        dey
        bne loc_101c
        lda #$ea
        sta smc_11a0                                // SMC: modifies $11a0
        sta smc_11ef                                // SMC: modifies $11ef
        lda #$00
        sta $d020
        sta $d021
        sta $d017
        ldx #$01
        txa

loc_103f:
        sta $d026,x
        inx
        cpx #$09
        bne loc_103f
        lda #$ff
        sta $d015
        sta $d01d
        sta $d01b
        lda #$40
        sta $d010
        lda #$0c
        sta $d000
        lda #$3c
        sta $d002
        lda #$6c
        sta $d004
        lda #$9c
        sta $d006
        lda #$cc
        sta $d008
        lda #$fc
        sta $d00a
        lda #$2c
        sta $d00c
        jmp loc_10f3

// Referenced by: jsr from $1237, $1258, $1279, $129a, $12bb, $12e6
sub_107d: {
        ldx #$00
loop:
        sta $07f8,x
        clc
        adc #$01
        inx
        cpx #$08
        bne loop
        rts
}
// Referenced by: jsr from $1209, $1232, $1253, $1274, $1295, $12b6, $12e1

sub_108b:
        sta $d001
        sta $d003
        sta $d005
        sta $d007
        sta $d009
        sta $d00b
        sta $d00d
        rts

loc_10a1:
        ror scr_2400,x
        ror $2401,x
        ror $2402,x
        ror $2440,x
        ror $2441,x
        ror $2442,x
        ror $2480,x
        ror $2481,x
        ror $2482,x
        ror $24c0,x
        ror $24c1,x
        ror $24c2,x
        ror $2500,x
        ror $2501,x
        ror $2502,x
        ror $2540,x
        ror $2541,x
        ror $2542,x
        ror $2580,x
        ror $2581,x
        ror $2582,x
        ror $25c0,x
        ror $25c1,x
        ror $25c2,x
        ror $2600,x
        ror $2601,x
        ror $2602,x
        rts

loc_10f3: