#259

Jazzcat Cracking Team [JCT] 01

Jazzcat Cracking Team [JCT]

2.151 lines of code

ScrollerSCRLSpritesSPRT

History

Group
Jazzcat Cracking Team [JCT]

A crack intro from the Jazzcat Cracking Team, abbreviated JCT. No CSDb release match was found, and the group's origins — country, founding date, and core members — remain unconfirmed through available scene databases. The name follows the common pattern of combining a distinctive handle with a functional descriptor, suggesting the group may have been built around a single lead member. The intros.c64.org listing attracted three comments between 2008 and 2021, including from Morpheus (2021), Rough (2010), and ZTH/Abnormal (2008) — the latter two being prominent scene archivists. No documentation surfaces on Doc Snyder's page, Demozoo, Atlantis, or in preserved diskmag archives. Ranked 259th on intros.c64.org, the intro holds a respectable mid-tier position. Without confirmed credits, it is impossible to attribute the code, music, or graphics to specific individuals. JCT represents one of the many groups whose work survives primarily through the intros.c64.org preservation effort.

Sources: intros.c64.org

jct-01.asm 2.151 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:25
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $ffff  (63487 bytes)
// Crunched with NSU Packer 1.1 — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $93c0 (37824)
// IRQ handler:  $91a0 (irq_91a0)
// IRQ handler:  $ea1f (irq_ea1f)
//
// Code: 900 bytes, Data: 62587 bytes
// Labels: 237, Subroutines: 10
//
// Verification: 4 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $188d-$188d ---
.pc = $188d "Segment $188d"
        brk

// --- Region $8cd0-$8cd0 ---
.pc = $8cd0 "Segment $8cd0"
        brk

// --- Region $9000-$9062 ---
.pc = $9000 "loc_9000"

loc_9000:
        jsr sub_90a6
        lda #$00
        sta $dd00
        lda $d018
        and #$f0
        ora #$00
        and #$0f
        ora #$20
        sta $d018
        lda #$c8
        sta $0288
        jmp loc_90f7

dat_901e:
        .byte $00                                   // .
// Referenced by: jsr from $91bd

sub_901f:
        ldx #$00
        ldy #$00

loc_9023:
        tya
        pha
        lda dat_9062,x
        tay
        lda $9072,y
        sta $9094
        pla
        tay
        sty $9095
        sec
        sbc $9094
        clc
        rol
        sec
        sbc #$80
        sec
        sbc $9095
        sta $d001,y
        iny
        iny
        inx
        cpx #$08
        bne loc_9023
        ldx #$00

loc_904d:
        inc dat_9062,x
        lda dat_9062,x
        cmp #$21
        bne loc_905c
        lda #$00
        sta dat_9062,x

loc_905c:
        inx
        cpx #$10
        bne loc_904d
        rts

dat_9062:
        .byte $00                                   // .

// --- Region $90a6-$9191 ---
.pc = $90a6 "sub_90a6"
// Referenced by: jsr from $9000

sub_90a6:
        ldy #$00

loc_90a8:
        lda $9096,y
        sta dat_d000,y
        iny
        cpy #$10
        bne loc_90a8
        lda #$7f
        sta $d015
        sta $d01d
        sta $d01c
        lda #$40
        sta $d010
        ldy #$07
        lda #$01

loc_90c7:
        sta $d027,y
        dey
        bpl loc_90c7
        lda #$07
        sta $d025
        lda #$08
        sta $d026
        ldy #$30
        sty txt_cbf8
        iny
        sty $cbf9
        iny
        sty $cbfa
        sty $cbfb
        ldy #$33
        sty $cbfc
        ldy #$31
        sty $cbfd
        ldy #$34
        sty $cbfe
        rts

loc_90f7:
        jsr sub_916d
        jsr $e544
        ldy #$00
        sty $d020
        sty $d021