#922

Chromance 37

Chromance

2.606 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRT

History

Released
December 1991
Code
Alex
Music
Jeroen Tel — "Invest (intro)"
Graphics
Gabriel
Group
Chromance — Hungary, founded 1990

CSDb catalogues this as the "ALEX-13 (space theme)" intro, released in December 1991. Alex coded the intro and Gabriel contributed the graphics, while Jeroen Tel provided the music — his "Invest (intro)" is preserved in the HVSC. Jeroen Tel was one of the most celebrated SID composers of the C64 era, and his appearance here reflects Chromance's ability to source music from the Netherlands' finest. The "space theme" designation in the CSDb title likely describes the intro's visual motif. Chromance was a Hungarian group founded in 1990 under the tagline "Light in the Night," becoming one of the most enduring Eastern European formations. This intro joins a substantial list of Chromance entries in the rankings, including #117 C-05 and #123 C-03. Alex served as both coder and graphic artist across multiple Chromance intros documented on Doc Snyder's page, confirming his central role within the group.

Sources: CSDb · docsnyderspage

c-37.asm 2.606 lines
// ============================================
// 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: $0700  End: $2a73  (9076 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $20f9 (8441)
//
// Code: 3032 bytes, Data: 6044 bytes
// Labels: 299, Subroutines: 30
//
// Cross-references: all OK
// ============================================


// --- Region $1090-$16d0 ---
.pc = $1090 "sub_1090"
// Referenced by: jsr from $22d4

sub_1090:
        jsr sub_135f
        lda #$0f
        sta smc_10dc                                // SMC: modifies $10dc
        lda #$00
        sta smc_10e1                                // SMC: modifies $10e1
        sta smc_10da                                // SMC: modifies $10da
        ldy #$0f

loc_10a2:
        sta $1006,y
        dey
        bpl loc_10a2
        ldy #$0b

loc_10aa:
        sta.abs $00f2,y
        dey
        bpl loc_10aa
        ldy #$02

loc_10b2:
        lda #$fe
        sta $1019,y
        lda #$04
        sta.abs $00f5,y
        lda #$01
        sta $101c,y
        sta $1025,y
        sta $101f,y
        sta $1022,y
        dey
        bpl loc_10b2
        sta $1014
        sta $1028

loc_10d3:
        rts
// Referenced by: jsr from $2107, $2114, $2159, $2186

sub_10d4:
        lda $1014
        beq loc_10d3
.label smc_10da = * + 1
        lda #$30                                    // !SMC: modified by $109d, $15ec
.label smc_10dc = * + 1
        ora #$0f                                    // !SMC: modified by $1095
        sta $d418
.label smc_10e1 = * + 1
        lda #$f4                                    // !SMC: modified by $109a, $121b
        sta $d417
.label smc_10e6 = * + 1
        lda #$2c                                    // !SMC: modified by $15f2, $1630
        sta $d416
        clc
        ldx #$02

loc_10ed:
        ldy $1016,x
        lda $105c,x
        adc $100d,x
        sta $d400,y
        lda $105f,x
        adc #$00
        sta $d401,y
        lda $1065,x
        sta $d403,y
        lda $1062,x
        sta $d402,y
        lda $106e,x
        sta $d406,y
        lda $106b,x
        sta $d405,y
        lda $1068,x
        and $1019,x
        sta $d404,y
        dex
        bpl loc_10ed
        ldy $1006
        beq loc_1137
        dec $1028
        bne loc_1137
        sty $1028
        dec smc_10dc
        bmi loc_117e

loc_1137:
        lda #$00
        sta $1013
        dec $1015
        bpl loc_1149
        lda #$0b
        sta $1015
        dec $1013

loc_1149:
        ldx #$02

loc_114b:
        lda $1025,x
        beq loc_117a
        lda $1013
        bpl loc_116c
        lda $100a,x
        bne loc_1167
        lda $101f,x
        cmp $1035,x
        bne loc_1167
        lda #$fe
        sta $1019,x

loc_1167:
        dec $101f,x
        beq loc_1192

loc_116c:
        lda $103b,x
        cmp #$ff
        beq loc_1176
        jsr sub_1375

loc_1176:
        lda #$00
        sta $fb,x

loc_117a:
        dex