← #679 Top 1024 #681 →
#680

Slaves of Keyboard [SOK] 01

Slaves of Keyboard [SOK]

2.618 lines of code

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

History

Group
Slaves of Keyboard [SOK] — Poland, CSDb group ID #2121
Code
Mosquito
Graphics
Kruger
Music
Scarzix (Carsten Berggreen) — "Galactix V2.0"

This crack intro from Slaves of Keyboard — a Polish cracking group operating under the motto "The Power of the Chain" — is catalogued on CSDb as release #75396. The code was written by Mosquito, the graphics by Kruger, and the music by Scarzix (Carsten Berggreen), using the SID tune "Galactix V2.0" from the HVSC. Doc Snyder's page confirms these credits for Crack Intro #01 and maps it to CSDb release #75396. The scrolltext reveals this was a joint release between SOK and GS, presenting "Para Academy" — cracked and trained by Exory of Holocaust, with Kruger signing off. Greetings extend to an extensive alphabetical list of groups including Adroit, Antimon, Army, ASW, Beyond Force, Censor, Crest, Cross, Cryptic Tales, Fairlight, Genesis Project, Horizon, Ice, Legend, Logic, NATO, Panorama Design, Passion, Triad, Warning, Warrant, and many others. Doc Snyder's page documents two SOK intros in total.

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

sok-01.asm 2.618 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:45
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0700  End: $3fff  (14592 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $0e80 (3712)
// IRQ handler:  $2e00 (irq_2e00)
// IRQ handler:  $ea34 (irq_ea34)
// IRQ handler:  $2fa0 (loc_2fa0)
//
// Code: 2096 bytes, Data: 12496 bytes
// Labels: 299, Subroutines: 7
//
// Cross-references: all OK
// ============================================


// --- Region $0b20-$0b27 ---
.pc = $0b20 "loc_0b20"

loc_0b20:
        .byte $3f,$00,$05                           // rla $0500,x // ILLEGAL
        eor $5a,x
        tax
        tax
        rti

// --- Region $0b5a-$0b62 ---
.pc = $0b5a "loc_0b5a"

loc_0b5a:
        bpl loc_0b71
        adc $6a
        tax
        bcc loc_0b20
        rti

dat_0b62:
        .byte $50                                   // P

// --- Region $0b71-$0b71 ---
.pc = $0b71 "loc_0b71"

loc_0b71:
        brk

// --- Region $0e40-$0e55 ---
.pc = $0e40 "loc_0e40"

loc_0e40:
        lda #$83

loc_0e42:
        cmp $d012
        bcs loc_0e42
        lda #$9a
        sta $d00f
        sta $d00d
        inc $d019
        jmp $ea7d

dat_0e55:
        .byte $00                                   // .

// --- Region $0e60-$0e77 ---
.pc = $0e60 "loc_0e60"

loc_0e60:
        lda #$82
        sta $d00f
        sta $d00d
        jmp $ea7d

dat_0e6b:
        .byte $00,$00,$00,$00,$00                   // .....
// Referenced by: jsr from $2e68

sub_0e70:
        jsr sub_1003
        jmp loc_0f00

dat_0e76:
        .byte $00,$00                               // ..

// --- Region $0e80-$0ebb ---
.pc = $0e80 "main_0e80"

main_0e80:
        lda #$0b
        sta $d011
        lda #$00
        sta $d020
        ldx #$00

loc_0e8c:
        lda $d012
        cmp #$ff
        bne loc_0e8c

loc_0e93:
        lda #$20
        cmp $d012
        bne loc_0e93
        lda $0ec0,x
        sta $d020
        ldy #$10
        lda #$00
        sta $02

loc_0ea6:
        dec $02
        bne loc_0ea6
        dey
        bne loc_0ea6
        inx
        cpx #$10
        bne loc_0e8c
        lda #$00
        sta $d020
        jmp loc_2d00

dat_0eba:
        .byte $00,$00                               // ..

// --- Region $0f00-$0f10 ---
.pc = $0f00 "loc_0f00"

loc_0f00:
        lda #$00
        bne dat_0f10
        lda $dc01
        and #$10
        beq loc_0f0c
        rts

loc_0f0c:
        inc $0f01
        rts

dat_0f10:
        .byte $a9                                   // .

// --- Region $0f50-$0ff0 ---
.pc = $0f50 "loc_0f50"