#955

Madsquad 02

Madsquad

2.205 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

History

Released
March 1988
Music
Red (Jeroen Kimmel) — "Watch It!"
Group
Madsquad — Netherlands, founded 1987

This crack intro is catalogued on CSDb as "Madsquad Intro 02," released in March 1988. Like the group's first intro, it features music by Red — Jeroen Kimmel of The Judges — performing the SID tune "Watch It!" from the HVSC. The reuse of the same soundtrack across multiple intros was common practice, allowing groups to maintain a consistent sonic identity. Madsquad was a Dutch cracking group founded in 1987, situated within one of the densest C64 scenes in Europe. Doc Snyder's page preserves scrolltext from the group's intros, showing greetings to Ace, TPI, FCS, FAC, Dominators, Antitrax, Triad, Ikari, TWG, C64CG, Beastie Boys, TDF, Detonator, DCU, Fairlight, and others — a roll call of the era's most active European groups. This is one of two Madsquad entries in the rankings — see also Madsquad-01.

Sources: CSDb · CSDb · Doc Snyder · intros.c64.org

madsquad-02.asm 2.205 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:56
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $2e00  (9729 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $18fa (6394)
// IRQ handler:  $19b2 (irq_19b2)
//
// Code: 1870 bytes, Data: 7859 bytes
// Labels: 267, Subroutines: 14
//
// Verification: 6 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $08a0-$08a7 ---
.pc = $08a0 "Program $08a0"
        cpy #$60
        cli
        cli
        cli
        ldy #$00
        brk

// --- Region $0c55-$0c5c ---
.pc = $0c55 "loc_0c55"

loc_0c55:
        eor $d555,x
        beq loc_0cb2
        cli
        cli
        rts

// --- Region $0cb2-$0cba ---
.pc = $0cb2 "loc_0cb2"

loc_0cb2:
        cmp $a5,x
        ora $0d0d
        ora $60c0
        rts

// --- Region $0e51-$0e5c ---
.pc = $0e51 "loc_0e51"

loc_0e51:
        eor $55,x
        lda #$03
        ora $d635
        beq loc_0eb2
        cli
        cli
        rts

// --- Region $0eb2-$0eb9 ---
.pc = $0eb2 "loc_0eb2"

loc_0eb2:
        eor $55,x
        lda #$03
        .byte $03,$3d                               // slo ($3d,x) // ILLEGAL
        brk

dat_0eb9:
        .byte $80                                   // .

// --- Region $11e3-$147c ---
.pc = $11e3 "loc_11e3"

loc_11e3:
        tya
        sta $101c,x
// Referenced by: jsr from $12df

sub_11e7:
        lda $106e,y
        sta $d401,x
        sta $1033,x
        lda $10ce,y
        sta $d400,x
        sta $1032,x
        rts

loc_11fa:
        lda #$01
        sta $1047,x

loc_11ff:
        lda $101e,x
        sta $fb
        lda $101f,x
        sta $fc
        lda $101d,x
        asl
        tay
        iny
        lda ($fb),y
        cmp #$00
        bne loc_1221
        lda #$00
        sta $101d,x
        ldy #$01
        lda ($fb),y
        clv
        bvc loc_122b

loc_1221:
        cmp #$01
        bne loc_122b
        lda #$00
        sta dat_1000
        rts

loc_122b:
        pha
        dey
        lda ($fb),y
        sta $fb
        pla
        sta $fc
        lda $102f,x
        tay
        clc
        adc #$02
        sta $102f,x
        lda ($fb),y
        cmp #$00
        bne loc_124f
        lda #$00
        sta $102f,x
        inc $101d,x
        jmp loc_11ff

loc_124f:
        sta $101c,x
        iny
        lda ($fb),y
        pha
        and #$1f
        sta $1004,x
        pla
        and #$e0