← #415 Top 1024 #417 →
#416

Nostalgia [NO] 38

Nostalgia [NO]

1.446 lines of code

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

History

Released
September 2007
Code
6R6
Music
Glenn Rune Gallefoss — "Plaster v2"
Group
Nostalgia — founded February 1995

Nostalgia Intro 38 — the number alone speaks to the group's extraordinary output over twelve years of activity. 6R6 coded the intro, the same Glenn Gallefoss who appears across nearly all Nostalgia productions and who also composed the "Plaster v2" SID used here, preserved in the HVSC under his Blues Muz alias. Released in September 2007, this is among the latest-dated intros in the rankings — arriving twenty-two years after the C64's commercial peak. Nostalgia was founded in February 1995 as a preservation-oriented cracking group, dedicated to making classic and obscure games accessible to the surviving community. The group's motto — "Come to where the legend lives" — is documented on Doc Snyder's page. This is one of many Nostalgia entries in the rankings, including #225 NO-14. 6R6's dual role as coder and musician reflects the self-sufficiency required of groups operating in the scene's later years when fewer active members were available.

Sources: CSDb · Doc Snyder

no-38.asm 1.446 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:45
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $46ff  (16127 bytes)
// Note: PRG was crunched, depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $3800 (14336)
// IRQ handler:  $3a58 (irq_3a58)
//
// Code: 1515 bytes, Data: 14612 bytes
// Labels: 131, Subroutines: 5
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $1700-$1700 ---
.pc = $1700 "loc_1700"

loc_1700:
        brk

// --- Region $3800-$3a87 ---
.pc = $3800 "main_3800"

main_3800:
        jsr sub_3dab
        ldy #$01

loc_3805:
        bit $d011
        bmi loc_3805

loc_380a:
        bit $d011
        bpl loc_380a
        ldx #$72

loc_3811:
        dex
        bpl loc_3811
        bit $d011
        bmi loc_381a
        dey

loc_381a:
        sty $02a6
        jsr sub_3c43
        lda #$35
        sta $01
        ldx #$07

loc_3826:
        lda #$a0
        sta $07f8,x
        lda #$01
        sta $d027,x
        sta $d000,x
        sta $d008,x
        dex
        bpl loc_3826
        stx $d015
        sta $04
        sta $11
        ldx #$ff
        stx $1a
        ldx #$00
        stx $15
        stx $18
        stx smc_3bc6                                // SMC: modifies $3bc6

loc_384d:
        ldy #$00

loc_384f:
        lda.abs $00d0,y
        cmp $15
        beq loc_3860

loc_3856:
        iny
        cpy #$21
        bne loc_384f
        inc $15
        jmp loc_384d

loc_3860:
        stx $20,y
        lda #$00
        sta $41,x
        lda #$a0
        sta $62,x
        inx
        cpx #$21
        bne loc_3856
        lda #$08
        sta $07
        sta $19
        lda #$12
        sta $d018
        jsr sub_4099
        jsr sub_38e3

loc_3880:
        lda $d012
        bne loc_3880
        jsr sub_3dab
        ldx #$02

loc_388a:
        lda $1e00,x
        sta $00,x
        lda $1f00,x
        sta $0300,x
        lda #$20
        sta $03fe,x
        sta $04fa,x
        sta $05f8,x
        sta $06f6,x
        inx
        bne loc_388a
        lda #$15
        sta $d018
        lda #$47
        sta $ff
        lda #$00
        sta $fe
        lda #$09
        sta $fd
        lda #$00
        sta $fc
        ldy #$18

loc_38bd:
        lda $38ca,y
        sta $02bf,y
        dey
        bne loc_38bd
        inc $01
        jmp $02c0

loc_38cb:
        lda ($fe),y
        sta ($fc),y