#969

Lazer 11

Lazer

2.239 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

History

Released
December 1988
Graphics
Vamp
Music
Jeroen Soede — "Snik v2"
Group
Lazer — Austria, founded July 1988

A crack intro from Lazer, the Austrian group founded in July 1988, released in December of that same year — making it one of the group's earliest productions. Vamp contributed the graphics and Jeroen Soede composed "Snik v2," a tune preserved in the HVSC. The CSDb entry does not credit a coder for this particular intro. Vamp's role here is notable — Doc Snyder's scrolltexts mention that "vamp has now joined the mighty Lazer," dating his recruitment to this period. Soede was a Dutch SID musician active across multiple groups and releases. Doc Snyder's page documents Lazer's full catalogue, revealing a prolific operation with coders including The Mysterious Art, Jack Ready, The Edge, and Dux. This joins #464 Lazer-01 and #961 Lazer-15 among the group's ranked entries. Austria's C64 scene was small but dedicated, and Lazer dominated it while maintaining extensive European contacts.

Sources: CSDb · docsnyderspage

lazer-11.asm 2.239 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: $0801  End: $2af5  (8949 bytes)
// Note: PRG was crunched, depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $2900 (10496)
// IRQ handler:  $297e (irq_297e)
// IRQ handler:  $29c6 (irq_29c6)
// IRQ handler:  $2a71 (irq_2a71)
//
// Code: 2546 bytes, Data: 6403 bytes
// Labels: 241, Subroutines: 9
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $090c-$0915 ---
.pc = $090c "sub_090c"
// Referenced by: jsr from $290d

sub_090c:
        jmp loc_09bd

dat_090f:
        .byte $4c,$f0,$09                           // L..
// Referenced by: jsr from $2a9a

sub_0912:
        jmp loc_09f6

dat_0915:
        .byte $02                                   // .

// --- Region $098e-$118b ---
.pc = $098e "sub_098e"
// Referenced by: jsr from $09dc

sub_098e:
        lda #$00
        ldx #$74

loc_0992:
        sta $0919,x
        dex
        bpl loc_0992

loc_0998:
        lda #$ff
        sta $0947
        sta $0948
        sta $0949
        lda #$00
        sta $dc0e
        ldx #$02

loc_09aa:
        sta $0919,x
        sta $091c,x
        sta $091f,x
        sta $092b,x
        dex
        bpl loc_09aa
        sta $096a
        rts

loc_09bd:
        pha
        lda #$01
        sta $096a
        pla
        tax
        lda $127d,x
        sta smc_09d4                                // SMC: modifies $09d4
        lda $1280,x
        sta smc_09d5                                // SMC: modifies $09d5
        ldy #$07

loc_09d3:
.label smc_09d4 = * + 1
.label smc_09d5 = * + 2
        lda $1283,y                                 // !SMC: modified by $09c8, $09ce
        sta $129b,y
        dey
        bpl loc_09d3
        jsr sub_098e

loc_09df:
        ldx #$00
        txa

loc_09e2:
        sta $d400,x
        inx
        cpx #$18
        bne loc_09e2
        lda #$0f
        sta $d418
        rts

dat_09f0:
        .byte $a9,$02,$8d,$6a,$09,$60               // ...j.`

loc_09f6:
        lda $096a
        cmp #$02
        beq loc_0a04
        cmp #$01
        bne loc_0a05
        jmp loc_0998

loc_0a04:
        brk

loc_0a05:
        inc $0947
        inc $0948
        inc $0949
        ldx #$02
        dec $0969
        bpl loc_0a1b
        lda dat_0915
        sta $0969

loc_0a1b:
        stx $bf
        lda $0916,x
        sta $094e
        tay
        lda $0969
        cmp dat_0915
        bne loc_0a40
        lda $129b,x
        sta smc_0a47                                // SMC: modifies $0a47
        lda $129f,x
        sta smc_0a48                                // SMC: modifies $0a48
        dec $091f,x
        bmi loc_0a43
        jmp loc_0c12

loc_0a40:
        jmp loc_0c41