← #751 Top 1024 #753 →
#752

Chromance 26

Chromance

3.612 lines of code

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

History

Group
Chromance -- Hungary, founded October 1990

A Chromance intro for which the CSDb release match points to a graphics release attributed to the related Hungarian group Graffity, rather than this specific crack intro -- leaving individual credits unconfirmed. Chromance was founded in October 1990 in Hungary and operated under the abbreviation. The CSDb group profile for Chromance (group ID 345) catalogues over forty-five releases, documenting the group's prolific output across the 1990s and into the 2000s. Doc Snyder's page lists credits spanning multiple coders: Lion, Druid, Alex, Slator, Atomicro, and Jaydee. Musicians featured across their catalogue include JCH (Jens-Christian Huus), OMP (Ole Marius Pettersen), Sage (Dariusz Paliga), and Jeff (Soren Lund). Their scrolltexts regularly greet partner groups such as Empire, Demonix, F4CG, Onslaught, and SCS+TRC. Other ranked Chromance entries include #420 C-16 and #479 C-31, among many others. Chromance's longevity made them one of the most enduring groups in the entire C64 scene.

Sources: intros.c64.org · docsnyderspage

c-26.asm 3.612 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: $388f  (12688 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $2600 (9728)
// IRQ handler:  $2733 (irq_2733)
//
// Code: 4024 bytes, Data: 8664 bytes
// Labels: 369, Subroutines: 10
//
// Cross-references: all OK
// ============================================


// --- Region $08c9-$08cf ---
.pc = $08c9 "Program $08c9"
        sta ($81,x)
        .byte $03,$03                               // slo ($03,x) // ILLEGAL
        .byte $07,$07                               // slo $07 // ILLEGAL

dat_08cf:
        .byte $07                                   // .

// --- Region $095d-$0968 ---
.pc = $095d "loc_095d"

loc_095d:
.label loc_095f = * + 2
        inc $f0fc,x
        .byte $fc,$f8,$e1                           // nop $e1f8,x // ILLEGAL
        .byte $fa                                   // nop // ILLEGAL
        sty $08
        bpl loc_098b
        rti

// --- Region $098b-$098b ---
.pc = $098b "loc_098b"

loc_098b:
        brk

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

sub_1000:
        jmp loc_1040
// Referenced by: jsr from $2d8c

sub_1003:
        jmp loc_10c0

dat_1006:
        .byte $01                                   // .

// --- Region $1040-$122d ---
.pc = $1040 "loc_1040"

loc_1040:
        asl
        asl
        asl
        tay
        ldx #$00

loc_1046:
        lda $1815,y
        sta $1772,x
        sta $1778,x
        lda $1816,y
        sta $1775,x
        sta $177b,x
        iny
        iny
        inx
        cpx #$03
        bne loc_1046
        lda $1815,y
        sta $17e9
        lda txt_1020
        beq loc_1095
        ldx #$02

loc_106c:
        lda $1816,y
        sta $100b
        and $177e,x
        sta dat_1006,x
        dex
        bpl loc_106c
        bit $100b
        bpl loc_1095
// Referenced by: jsr from $1a94

sub_1080:
        ldx #$00

loc_1082:
        lda $1817,y
        sta $1778,x
        lda $1818,y
        sta $177b,x
        iny
        iny
        inx
        cpx #$03
        bne loc_1082

loc_1095:
        ldy #$00
        tya

loc_1098:
        sta $d400,y
        iny
        cpy #$1b
        bne loc_1098
        tay

loc_10a1:
        sta $1014,y
        sta $1796,y
        sta $1787,y
        iny
        cpy #$0c
        bne loc_10a1
        lda #$02
        sta $179f
        sta $17a0
        sta $17a1
        lda #$0f
        sta $1009
        rts

loc_10c0:
        ldx #$02
        lda $fb
        pha
        lda $fc
        pha

loc_10c8:
        lda dat_1006,x
        bne loc_10d0