#155

Yugoslav Cracking Service [Yu.C.S.] 04

Yugoslav Cracking Service [Yu.C.S.]

2.644 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

History

Group
Yugoslav Cracking Service [Yu.C.S.] — Yugoslavia

A crack intro from the Yugoslav Cracking Service (Yu.C.S.) — one of the few C64 groups to operate from Yugoslavia, making it a distinctive entry in a scene dominated by Western European operations. CSDb documents the group under ID 5634 as a cracking group based in Belgrade, with a contact address at Cvijiceva 125/20, 11000 Belgrade. Known members include crackers Duto and Suto, both listed as ex-members. The group produced 84 releases spanning 1985 through 1992, covering cracks, games, tools, and imports. The intro generated unusually active discussion on intros.c64.org, with scene archivists including iAN CooG, ZeSmasher, and dr.K/ex-CHS contributing multiple comments debating details of the group's history. Yugoslav groups were rare enough in the C64 scene to warrant special attention from historians — the country's non-aligned position between East and West gave its sceners a unique perspective within the predominantly Western European cracking networks.

Sources: CSDb · intros.c64.org

yucs-04.asm 2.644 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:41
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $3300  (11009 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1910 (6416)
// IRQ handler:  $0923 (irq_0923)
//
// Code: 2566 bytes, Data: 8443 bytes
// Labels: 314, Subroutines: 25
//
// Cross-references: all OK
// ============================================


// --- Region $0810-$0878 ---
.pc = $0810 "loc_0810"

loc_0810:
        ldx #$00

loc_0812:
.label smc_0813 = * + 1
.label smc_0814 = * + 2
        lda $0ac0,x                                 // !SMC: modified by $1f25, $1f2d, $1f8a, $1faa
.label smc_0816 = * + 1
        sta $0a13,x                                 // !SMC: modified by $1937
        inx
        cpx #$13
        bcc loc_0812
        ldx #$00

loc_081f:
.label smc_0820 = * + 1
.label smc_0821 = * + 2
        lda $0c00,x                                 // !SMC: modified by $1f32, $1f49, $1f75, $1f95
.label smc_0823 = * + 1
        sta $0a3c,x                                 // !SMC: modified by $1a3f
        inx
        cpx #$07
        bcc loc_081f
        ldx #$00

loc_082c:
.label smc_082d = * + 1
.label smc_082e = * + 2
        lda $0c00,x                                 // !SMC: modified by $1f35, $1f4c, $1f78, $1f98
.label smc_0830 = * + 1
        sta $0a44,x                                 // !SMC: modified by $1aa2
        inx
        cpx #$07
        bcc loc_082c
        ldx #$00

loc_0839:
.label smc_083a = * + 1
.label smc_083b = * + 2
        lda $0c00,x                                 // !SMC: modified by $1f38, $1f4f, $1f7b, $1f9b
.label smc_083d = * + 1
        sta $0a4a,x                                 // !SMC: modified by $1a1f
        inx
        cpx #$07
        bcc loc_0839
        ldx #$00

loc_0846:
.label smc_0847 = * + 1
.label smc_0848 = * + 2
        lda $0c00,x                                 // !SMC: modified by $1f3b, $1f52, $1f7e, $1f9e
.label smc_084a = * + 1
        sta $0a2d,x                                 // !SMC: modified by $1a5f
        inx
        cpx #$07
        bcc loc_0846
        ldx #$00

loc_0853:
.label smc_0854 = * + 1
.label smc_0855 = * + 2
        lda $0c00,x                                 // !SMC: modified by $1f3e, $1f55, $1f81, $1fa1
.label smc_0857 = * + 1
        sta $0a1e,x                                 // !SMC: modified by $1a7f
        inx
        cpx #$07
        bcc loc_0853
        ldx #$00

loc_0860:
.label smc_0861 = * + 1
.label smc_0862 = * + 2
        lda $0c00,x                                 // !SMC: modified by $1f41, $1f58, $1f84, $1fa4
.label smc_0864 = * + 1
        sta $0a0f,x                                 // !SMC: modified by $1acf
        inx
        cpx #$07
        bcc loc_0860
        ldx #$00

loc_086d:
.label smc_086e = * + 1
.label smc_086f = * + 2
        lda $0c00,x                                 // !SMC: modified by $1f44, $1f5b, $1f87, $1fa7
.label smc_0871 = * + 1
        sta $0a04,x                                 // !SMC: modified by $1aef
        inx
        cpx #$07
        bcc loc_086d
        rts

// --- Region $0900-$091a ---
.pc = $0900 "sub_0900"
// Referenced by: jsr from $1967

sub_0900:
        sei
        lda #$23
        sta $0314
        lda #$09
        sta $0315
        ldx #$00
        stx $dc0e
        inx
        stx $d01a
        lda #$1b
        sta $d011
        cli
        rts

// --- Region $0923-$09c7 ---
.pc = $0923 "irq_0923"

irq_0923:
        lda #$01
        sta $d019
        lda #$c7
        sta $d016
        lda #$00
        sta $d012
        ldy #$01

loc_0934:
        dey
        bne loc_0934
        ldx #$00