#61

Napalm (US) 02

Napalm (US)

2.555 lines of code

MusicSIDScrollerSCRLSpritesSPRT

History

Released
April 1990
Music
Chris, Jeroen Soede, Stefan Hartwig, Matt Gray, Moppe
Group
Napalm — United States, founded 1989

A five-composer jukebox from an American group — unusual because the US scene had largely collapsed by April 1990, yet Napalm maintained access to a roster of European musicians. The tunes span multiple nationalities: Chris Ammermuller contributed "Let's Disco," Jeroen Soede provided "Magic Funk," Stefan Hartwig added "Tie-break," Matt Gray supplied "Dominator," and the Swedish composer Moppe (Fredrik Segerfalk) contributed "Blood Money." No coder is credited on CSDb, which is atypical for a group producing this level of output. Napalm was founded in the US in 1989 — one of the last American C64 cracking groups to achieve international recognition. The HVSC preserves all five tunes. The intro's music selector feature — allowing users to choose between tracks — was a hallmark of late-era productions that valued the audio experience as much as the visual.

Sources: CSDb

napalm-02.asm 2.555 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: $07ee  End: $37ff  (12306 bytes)
// Crunched with Beta Dynamic v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $3000 (12288)
//
// Code: 2225 bytes, Data: 10081 bytes
// Labels: 294, Subroutines: 12
//
// Cross-references: all OK
// ============================================


// --- Region $0c00-$0c7f ---
.pc = $0c00 "loc_0c00"

loc_0c00:
        lda #$32
        sta smc_31df                                // SMC: modifies $31df
        jmp loc_0c0d

loc_0c08:
        lda #$33
        sta smc_31df                                // SMC: modifies $31df

loc_0c0d:
        jmp loc_0c6d
// Referenced by: jsr from $3191

sub_0c10:
.label smc_0c11 = * + 1
        ldx #$00                                    // !SMC: modified by $0c1e
        inc smc_0c11
        lda smc_0c11
        cmp #$80
        bne loc_0c21
        lda #$00
        sta smc_0c11                                // SMC: modifies $0c11

loc_0c21:
        lda $3700,x
        ldx #$00

loc_0c26:
        sta $d9b8,x
        inx
        cpx #$4f
        bne loc_0c26
        rts
// Referenced by: jsr from $310f

sub_0c2f:
.label smc_0c30 = * + 1
        ldx #$14                                    // !SMC: modified by $0c3d
        inc smc_0c30
        lda smc_0c30
        cmp #$80
        bne loc_0c40
        lda #$00
        sta smc_0c30                                // SMC: modifies $0c30

loc_0c40:
        lda $3700,x
        ldx #$00

loc_0c45:
        sta $da30,x
        inx
        cpx #$4f
        bne loc_0c45
        rts
// Referenced by: jsr from $31a5

sub_0c4e:
.label smc_0c4f = * + 1
        ldx #$17                                    // !SMC: modified by $0c5c
        inc smc_0c4f
        lda smc_0c4f
        cmp #$80
        bne loc_0c5f
        lda #$00
        sta smc_0c4f                                // SMC: modifies $0c4f

loc_0c5f:
        lda $3700,x
        ldx #$00

loc_0c64:
        sta $daa8,x
        inx
        cpx #$4f
        bne loc_0c64
        rts

loc_0c6d:
        lda $dc01
        cmp #$ef
        beq loc_0c77
        jmp loc_3094

loc_0c77:
        lda #$15
        sta $d018
        jmp loc_3780

chr_0c7f:
        // === Charset data (1 bytes, $0c7f-$0c7f) ===
        .byte $60                                   // char 0 (partial)

// --- Region $1230-$17b1 ---
.pc = $1230 "sub_1230"
// Referenced by: jsr from $308d

sub_1230:
        jmp loc_1969

dat_1233:
        .byte $4c,$d2,$17                           // L..

loc_1236:
        lda $01cb
        cmp #$02
        beq loc_1244
        cmp #$01
        bne sub_1245
        jmp loc_17a4

loc_1244:
        rts
// Referenced by: jsr from $3094; branch from $123f

sub_1245:
        inc $0199
        inc $019a
        inc $019b
        lda #$1f
        sta $d418
        ldx #$02
        dec $01ca
        bpl loc_1260
        lda $1918
        sta $01ca

loc_1260: