History
- Released
- 6 August 1993
- Code
- Centurion
- Graphics
- Hedgehog
- Music
- Steve Rowlands — "Creatures" (ripped)
- Group
- Charged — Poland, founded 1991
A crack intro from Charged, a Polish group founded in 1991 under the short tag CRD. Released on 6 August 1993, the intro credits Centurion for the code and Hedgehog for the graphics. The soundtrack is a ripped SID from Steve Rowlands — the "Creatures" theme, one of the most celebrated SID compositions from the commercial games era, preserved in the HVSC. A comment on intros.c64.org from "Hedgehog of charged" in February 2020 confirms the graphics artist's continued connection to the scene community nearly three decades after the intro's release. The CSDb catalogues this as "Charged Crack Intro 4" and lists a website at charged.prv.pl, though the domain is likely inactive. Charged were part of a vibrant Polish C64 scene that flourished in the early 1990s, somewhat later than the Western European peak. The group does not appear on Doc Snyder's page or Demozoo.
Sources: CSDb
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:13 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $2cff (9472 bytes) // Crunched with Cruncher AB — depacked by emulation // Packer entry: $080d (via BASIC SYS 2061) // Entry point: $2000 (8192) // IRQ handler: $2100 (irq_2100) // IRQ handler: $212b (irq_212b) // IRQ handler: $220f (irq_220f) // IRQ handler: $2238 (irq_2238) // IRQ handler: $226d (irq_226d) // IRQ handler: $231b (irq_231b) // IRQ handler: $ea31 (irq_ea31) // // Code: 1907 bytes, Data: 7565 bytes // Labels: 206, Subroutines: 18 // // Cross-references: all OK // ============================================ // --- Region $1000-$100d --- .pc = $1000 "sub_1000" // Referenced by: jsr from $211e sub_1000: jmp loc_1006 // Referenced by: jsr from $2206, $222f, $225f, $226d, $2369 sub_1003: jmp loc_1573 loc_1006: ldx #$17 ldy #$5d jmp loc_1504 dat_100d: .byte $00 // . // --- Region $1035-$12f7 --- .pc = $1035 "sub_1035" // Referenced by: jsr from $1578 sub_1035: inc $1598 lda $1598 cmp $1597 bcc loc_1045 lda #$00 sta $1598 loc_1045: clc lda $165a adc $15b4 sta $165a cmp #$08 bcc loc_1059 and #$07 sta $165a sec loc_1059: lda $165b adc $15b5 sta $165b ldx #$02 loc_1064: ldy $163b,x sty $fe clc lda $15de,x adc #$01 cmp $15b1,x bcc loc_1088 inc $15e1,x clc lda $15cf,x adc #$01 cmp #$03 bcc loc_1083 lda #$00 loc_1083: sta $15cf,x lda #$00 loc_1088: sta $15de,x lda $1638,x sta $fc lda $1635,x sta $fd lda $1598 bne loc_10d5 inc $15c3,x lda $15e7,x cmp #$ff beq loc_10af cmp #$00 bne loc_10d5 lda $1632,x cmp #$01 bne loc_10d5 loc_10af: ldy #$00 sec lda ($fc),y sbc #$01 cmp #$25 bcs loc_10d5 tay lda tbl_lo_165e,y sta smc_10ce // SMC: modifies $10ce lda tbl_hi_1683,y sta smc_10cf // SMC: modifies $10cf ldy #$01 lda ($fc),y ldy $fe .label smc_10ce = * + 1 .label smc_10cf = * + 2 jsr sub_13fe // !SMC: modified by $10be, $10c4 jsr sub_14f8 bne loc_10af loc_10d5: ldy $fe lda $159f,x beq loc_1142 lda $15b7,x beq loc_10ef lda $15c3,x cmp $15c0,x bcc loc_10ef lda $15b7,x jsr sub_1465 loc_10ef: lda $15c6,x beq loc_10f7 jsr sub_13a0