#721

Chromance 23

Name: Chromance 23
Availability: InStock
Author: Chromance

Chromance

2.469 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRT

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

History

Released: July 1994
Code: Stake
Graphics: Ollie
Charset: Reign
Music: Red Devil (Emil Helldin) — "Technotism"
Group: Chromance — Hungary, founded 1990

Titled "Chromance Intro S2" on CSDb, this July 1994 release features code by Stake, graphics by Ollie, a custom charset by Reign, and music by Red Devil (Emil Helldin). Red Devil was a Swedish SID composer whose "Technotism" is preserved in the HVSC. The four-person credit list reflects the collaborative production values that Chromance brought to their intros during the mid-1990s. Chromance, tagged, was a Hungarian group founded in 1990 with the motto "Light in the Night." They were one of the most prominent Eastern European cracking outfits, maintaining connections with groups like Empire, Demonix, F4CG, SCS+TRC, Avantgarde, and Alpha Flight. Doc Snyder's Page documents an extensive catalogue featuring coders such as Druid, Alex, Slator, Atomicro, Jaydee, and Lion. Ollie, credited here as graphician, was among those who commented on the intros.c64.org entry, maintaining a connection to the group's archived output.

Sources: CSDb · Doc Snyder's Page

c-23.asm 2.469 lines

// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:12
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0700  End: $2cff  (9728 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $1a60 (6752)
// IRQ handler:  $1b20 (irq_1b20)
// IRQ handler:  $1b1f (nmi_1b1f)
//
// Code: 2182 bytes, Data: 7546 bytes
// Labels: 236, Subroutines: 6
//
// Cross-references: all OK
// ============================================


// --- Region $089b-$08b8 ---
.pc = $089b "loc_089b"

loc_089b:
        bvs loc_0915
        .byte $3f,$1f,$00                           // rla $001f,x // ILLEGAL
        brk

dat_08a1:
        .byte $7f,$ff                               // ..

loc_08a3:
        .byte $63,$03                               // rra ($03,x) // ILLEGAL
        .byte $03,$03                               // slo ($03,x) // ILLEGAL

dat_08a7:
        .byte $03,$60                               // .`

loc_08a9:
        beq loc_089b
        bvs loc_091d
        bvs loc_091f
        bvs loc_0911
        beq loc_08a3
        bvs loc_0925
        bvs loc_092f
        sec
        rts

// --- Region $0911-$0926 ---
.pc = $0911 "loc_0911"

loc_0911:
        .byte $0c,$1e,$1e                           // nop $1e1e // ILLEGAL
.label loc_0915 = * + 1
        asl.abs $000c,x
        brk

dat_0918:
        .byte $00,$00,$00,$00,$00                   // .....

loc_091d:
        brk

dat_091e:
        .byte $00                                   // .

loc_091f:
        brk

dat_0920:
        .byte $00,$00,$00,$00,$00                   // .....

loc_0925:
        brk

loc_0926:
        brk

// --- Region $092f-$093d ---
.pc = $092f "loc_092f"

loc_092f:
        .byte $07,$00                               // slo $00 // ILLEGAL
        .byte $0f,$3f,$78                           // slo $783f // ILLEGAL
        beq loc_0926
        beq loc_09b4
        .byte $03,$07                               // slo ($07,x) // ILLEGAL
        .byte $07,$0f                               // slo $0f // ILLEGAL

dat_093c:
        .byte $0f,$0e                               // ..

// --- Region $09ae-$09bc ---
.pc = $09ae "loc_09ae"

loc_09ae:
        .byte $3f,$00,$03                           // rla $0300,x // ILLEGAL
        .byte $0f,$1f,$3c                           // slo $3c1f // ILLEGAL

loc_09b4:
        sei
        bvs loc_09ae
        .byte $ff,$7f,$ff                           // isc $ff7f,x // ILLEGAL
        bvs loc_09bc

loc_09bc:
        brk

// --- Region $1000-$1006 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $1b0b

sub_1000:
        jmp loc_102d
// Referenced by: jsr from $29f3

sub_1003:
        jmp loc_1095

dat_1006:
        .byte $a9                                   // .

// --- Region $102d-$10a6 ---
.pc = $102d "loc_102d"

loc_102d:
        ldy #$00
        lda $19a9,y
        pha
        lsr
        lsr
        lsr
        lsr
        sta smc_10eb                                // SMC: modifies $10eb
        lda $19aa,y
        sta smc_10e3                                // SMC: modifies $10e3
        sty smc_1123                                // SMC: modifies $1123
        ldx #$00
        stx smc_109d                                // SMC: modifies $109d
        stx smc_10a2                                // SMC: modifies $10a2
        stx $1372
        stx smc_10fa                                // SMC: modifies $10fa
        stx $10ef
        stx $d417

loc_1057:
        tay
        txa