#831

Jabole 01

Jabole

3.102 lines of code

MusicSID

History

Code
Nemezis
Music
Compod (Roman Majewski) — "One Night"
Group
Jabole — Poland

CSDb catalogues this as "Jabole Crack Intro 1," the first numbered intro from the Polish group Jabole (abbreviated JBL). Nemezis handled the code while Compod (Roman Majewski) provided the music with "One Night," preserved in the HVSC at /MUSICIANS/C/Compod/One_Night.sid. No release date is recorded on CSDb, and the group's founding year is also undocumented. Demozoo independently lists the production and confirms it as a cracktro for the Commodore 64. Jabole's country of origin — Poland — places it within the Eastern European scene, which by the mid-1990s had become one of the most active regions for C64 cracking and demoscene activity. No scrolltext or additional historical context has been recovered from Doc Snyder's page, Freeze64, or any other scene archive consulted during research.

Sources: CSDb · Demozoo

jbl-01.asm 3.102 lines
// ============================================
// output - Part 1 of 3
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:53
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $4fff  (18432 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $4210 (16912)
// IRQ handler:  $4251 (nmi_4251)
//
// Code: 4731 bytes, Data: 13701 bytes
// Labels: 273, Subroutines: 24
//
// Verification: 2 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0907-$0b39 ---
.pc = $0907 "Program $0907"
        inc $e7
        inx
        sbc #$ea
        .byte $eb,$20                               // sbc #$20 // ILLEGAL
        cpx #$e1
        .byte $e2,$e3                               // nop #$e3 // ILLEGAL
        cpx $e5
        inc $e7
        jsr sub_2020
        jsr $e020
        sbc ($e2,x)
        .byte $e3,$20                               // isc ($20,x) // ILLEGAL
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        sbc ($e2,x)
        .byte $e3,$e4                               // isc ($e4,x) // ILLEGAL
        sbc $e6
        .byte $e7,$e8                               // isc $e8 // ILLEGAL
        sbc #$ea
        .byte $eb,$e0                               // sbc #$e0 // ILLEGAL
        jsr $e2e1
        .byte $e3,$e4                               // isc ($e4,x) // ILLEGAL
        sbc $e6
        .byte $e7,$e8                               // isc $e8 // ILLEGAL
        sbc #$ea
        jsr sub_2020
        sbc ($e2,x)
        .byte $e3,$e4                               // isc ($e4,x) // ILLEGAL
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr $e3e2
        cpx $e5
        inc $e7
        inx
        sbc #$ea
        .byte $eb,$e0                               // sbc #$e0 // ILLEGAL
        sbc ($20,x)
        .byte $e2,$e3                               // nop #$e3 // ILLEGAL
        cpx $e5
        jsr $e820
        sbc #$ea
        .byte $eb,$e0                               // sbc #$e0 // ILLEGAL
        jsr $e220
        .byte $e3,$e4                               // isc ($e4,x) // ILLEGAL
        sbc $20
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        .byte $e3,$e4                               // isc ($e4,x) // ILLEGAL
        sbc $e6
        jsr sub_2020
        jsr $e0eb
        sbc ($e2,x)
        jsr $e4e3
        sbc $e6
        jsr sub_2020
        nop
        .byte $eb,$e0                               // sbc #$e0 // ILLEGAL
        sbc ($20,x)
        jsr $e4e3
        sbc $e6
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        cpx #$e1
        .byte $e2,$e3                               // nop #$e3 // ILLEGAL
        jsr $e5e4
        inc $e7
        jsr $ea20
        .byte $eb,$e0                               // sbc #$e0 // ILLEGAL
        sbc ($e2,x)
        jsr $e420
        sbc $e6
        .byte $e7,$20                               // isc $20 // ILLEGAL
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr $e120
        .byte $e2,$e3                               // nop #$e3 // ILLEGAL
        cpx $20
        sbc $e6
        .byte $e7,$e8                               // isc $e8 // ILLEGAL
        sbc #$ea
        .byte $eb,$e0                               // sbc #$e0 // ILLEGAL
        sbc ($e2,x)
        jsr sub_2020
        sbc $e6
        .byte $e7,$e8                               // isc $e8 // ILLEGAL
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        .byte $e2,$e3                               // nop #$e3 // ILLEGAL
        cpx $e5
        jsr $e7e6
        inx
        sbc #$ea
        .byte $eb,$e0                               // sbc #$e0 // ILLEGAL
        sbc ($e2,x)
        .byte $e3,$e4                               // isc ($e4,x) // ILLEGAL
        jsr $e620
        .byte $e7,$e8                               // isc $e8 // ILLEGAL
        sbc #$20
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr sub_2020
        jsr $e320
        cpx $e5
        inc $20
        .byte $e7,$e8                               // isc $e8 // ILLEGAL
        sbc #$ea
        jsr sub_2020
        .byte $e2,$e3                               // nop #$e3 // ILLEGAL
        cpx $e5
        inc $20