← #916 Top 1024 #918 →
#917

Laser 11

Laser

1.776 lines of code

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

History

Released
25 July 1993
Music
dEViLOCk (Peter Siekmann) — "Intro Zak 3"; Iron Cat (Alain Hertenstein) — "Speed It Up"; Francois Prijt — "Mistical"
Group
Laser — United Kingdom, founded 1986

A three-SID crack intro from Laser, the British group founded in 1986. Released on 25 July 1993, the intro features compositions by dEViLOCk (Peter Siekmann), Iron Cat (Alain Hertenstein), and Francois Prijt. All three SIDs are preserved in the HVSC. No coder or graphic artist is individually credited on CSDb for this release, though Doc Snyder's page identifies Ironfist as the coder on other Laser intros. The multi-composer jukebox approach was a hallmark of Laser's later productions — #311 Laser-02 featured five SIDs, and #483 Laser-05 continued the pattern. dEViLOCk's music also appears in X-Rated intros, while Iron Cat contributed to Triad productions, demonstrating how musicians served as connective tissue between otherwise separate groups. By mid-1993, the C64 cracking scene had contracted substantially, making Laser's continued multi-SID output a notable commitment to production quality.

Sources: CSDb · docsnyderspage

laser-11.asm 1.776 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:52
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $362f  (11824 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $2f00 (12032)
// IRQ handler:  $2f40 (irq_2f40)
//
// Code: 1320 bytes, Data: 10504 bytes
// Labels: 173, Subroutines: 11
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1005 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $2f32

sub_1000:
        jmp loc_1048
// Referenced by: jsr from $2f59

sub_1003:
        jmp loc_1021

// --- Region $1021-$1080 ---
.pc = $1021 "loc_1021"

loc_1021:
        ldx #$00
        dec $1090
        bmi loc_1034
        jsr sub_1226
        jsr sub_1225
        jmp sub_1225

dat_1031:
        .byte $ff,$ff,$ff                           // ...

loc_1034:
        lda #$02
        sta $1090
        jsr sub_1040
        jsr sub_103f
// Referenced by: jsr from $103c

sub_103f:
        inx
// Referenced by: jsr from $1039

sub_1040:
        dec $108a,x
        bmi loc_1091
        jmp sub_1226

loc_1048:
        lda #$1f
        sta $d418
        lda #$f0
        sta $d417
        and #$0f
        sta smc_1262                                // SMC: modifies $1262
        ldx #$0f

loc_1059:
        sta dat_1081,x
        dex
        bpl loc_1059
        ldx #$02

loc_1061:
        lda $14b9,x
        sta $fa
        lda $14bc,x
        sta $fb
        ldy #$00
        lda ($fa),y
        sta $108d,x
        iny
        lda ($fa),y
        sta $10e6,x
        and #$0f
        sta $10e9,x
        dex
        bpl loc_1061
        rts

// --- Region $1091-$10c6 ---
.pc = $1091 "loc_1091"

loc_1091:
        ldy $108d,x
        cpy #$fe
        bne loc_10a1
// Referenced by: jsr from $10c0

sub_1098:
        lda $1084,x
        and #$fe
        sta $1084,x
        rts

loc_10a1:
        lda $18e7,y
        sta $fa
        lda $18bf,y
        sta $fb
        ldy dat_1081,x
        lda ($fa),y
        bmi loc_10d2
        cmp #$60
        bcc loc_10f9

loc_10b6:
        and #$1f
        sta $108a,x
        lda #$fe
        sta dat_1031,x
        jsr sub_1098

loc_10c3:
        jmp loc_1187

dat_10c6:
        .byte $00                                   // .

// --- Region $10d2-$10dd ---
.pc = $10d2 "loc_10d2"

loc_10d2:
        cmp #$a0
        bcc loc_10ec
        and #$1f
        sta $108a,x
        bcs loc_10c3
        brk

// --- Region $10ec-$1141 ---
.pc = $10ec "loc_10ec"

loc_10ec:
        asl
        asl
        asl