#503

Italian Cracking Service [ICS] 01

Italian Cracking Service [ICS]

7.026 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRT

History

Released
29 June 1991
Code
Raster Burner
Music
JCH (Jens-Christian Huus) — "Beatbassie"
Group
Italian Cracking Service — Italy, founded 1988

CSDb catalogues this as the "ICS Intro (Italian Dots+Bobs)," a reference to the visual effects used in the production. Raster Burner coded the intro while the soundtrack draws from JCH's (Jens-Christian Huus) "Beatbassie" — one of the Danish master composer's many tunes ripped for use in crack intros across Europe. The SID is preserved in the HVSC. Italian Cracking Service was founded in Italy in 1988, part of a modest but committed Italian C64 scene. Released on 29 June 1991, this arrived in the declining commercial years of the platform. Another ICS production appears elsewhere in the ranking at #271 ICS-12, which featured a different coder — Mamasoft — and also used a JCH tune. The group's consistent reliance on JCH's compositions demonstrates the Danish musician's extraordinary reach across national boundaries. The "dots and bobs" visual style was a common raster effect technique of the early 1990s.

Sources: CSDb

ics-01.asm 7.026 lines
// ============================================
// ics-01 - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 vverify-cli 1.0 build 1, 2026-03-29 18:16:46
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $3800 (14336)
// IRQ handler:  $3936 (irq_3936)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 9201 bytes, Data: 54287 bytes
// Labels: 690, Subroutines: 62
//
// Verification: 3 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0807-$080d ---
.pc = $0807 "Program $0807"
        and ($34),y
        .byte $33,$33                               // rla ($33),y // ILLEGAL
        rol $00,x
        brk

// --- Region $0820-$0841 ---
.pc = $0820 "sub_0820"
// Referenced by: jsr from $0d47

sub_0820:
        txs
        ldy #$00

loc_0823:
        dec $32
        dec $082c

loc_0828:
        lda ($31),y
        sta $c100,y
        iny
        bne loc_0828
        lda $32
        cmp #$08
        bne loc_0823

loc_0836:
        lda $0848,y
        sta $0100,y
        iny
        bne loc_0836
        jmp $0000

// --- Region $089d-$08ad ---
.pc = $089d "Program $089d"
        ldy #$fa
        ror $bc
        .byte $3a                                   // nop // ILLEGAL
        tax
        bcs loc_08e3
        inc $33f0
        .byte $ff,$30,$33                           // isc $3330,x // ILLEGAL
        .byte $33,$30                               // rla ($30),y // ILLEGAL

dat_08ad:
        .byte $0c                                   // .

// --- Region $08e3-$08f4 ---
.pc = $08e3 "loc_08e3"

loc_08e3:
        bmi loc_08f4
        .byte $33,$c0                               // rla ($c0),y // ILLEGAL
        .byte $0c,$cc,$c0                           // nop $c0cc // ILLEGAL
        asl $c002
        .byte $03,$9b                               // slo ($9b,x) // ILLEGAL
        brk

dat_08f0:
        .byte $00,$ec,$00,$00                       // ....

loc_08f4:
        brk

// --- Region $0908-$0908 ---
.pc = $0908 "sub_0908"
// Referenced by: jsr from $0c5e, $0c9c, $d8ad

sub_0908:
        brk

// --- Region $0920-$0927 ---
.pc = $0920 "sub_0920"
// Referenced by: jsr from $0c17

sub_0920:
        cpy #$0f
        .byte $ef,$c0,$0c                           // isc $0cc0 // ILLEGAL
        .byte $fc,$c0,$03                           // nop $03c0,x // ILLEGAL

// --- Region $0a0a-$0a0a ---
.pc = $0a0a "sub_0a0a"
// Referenced by: jsr from $105f

sub_0a0a:
        brk

// --- Region $0a20-$0a27 ---
.pc = $0a20 "sub_0a20"
// Referenced by: jsr from $0c3f, $0c86, $0ceb, $d8ef

sub_0a20:
        brk

dat_0a21:
        .byte $00,$30,$00,$00,$00,$00               // .0....
// Referenced by: jsr from $d898

sub_0a27:
        brk

// --- Region $0b0a-$0b6f ---
.pc = $0b0a "sub_0b0a"
// Referenced by: jsr from $0d4a

sub_0b0a:
        .byte $0b,$0c                               // anc #$0c // ILLEGAL
        ora sub_2020
        bpl loc_0b12
        .byte $02                                   // jam // ILLEGAL

loc_0b12:
        jsr $0520
        jsr sub_2020
        jsr sub_200a
        jsr sub_0e0d
.label sub_0b20 = * + 2
        .byte $0f,$20,$20                           // slo sub_2020 // ILLEGAL
        .byte $02                                   // jam // ILLEGAL
.label sub_0b24 = * + 2
        jsr sub_2020
        asl $20
        jsr sub_2020
        jsr $0620
        jsr sub_2020