← #907 Top 1024 #909 →
#908

Unique 02

Unique

1.352 lines of code

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

History

Released
23 November 1991
Code
Crossfire
Music
JCH (Jens-Christian Huus) — "Introzak"
Graphics
Silco
Charset
Ecco
Group
Unique — Denmark, founded August 1991

A Danish crack intro released on 23 November 1991 — just three months after Unique's founding in August 1991. Crossfire coded the intro while Silco handled the graphics and Ecco contributed the charset. The music is JCH's "Introzak" — a composition by Jens-Christian Huus, one of the most sought-after SID musicians in the C64 scene, whose tunes appear in crack intros from groups across Europe. The SID is preserved in the HVSC. Unique used the abbreviation [U] and operated from Denmark, which by 1991 had established itself as a major hub for C64 scene activity alongside Sweden and Norway. The precise date of this release — 23 November 1991 — is unusually specific for crack intro documentation, suggesting the date was embedded in the release itself or recorded by the original distributors. Despite the group's brief existence, the quality of contributors suggests connections to Denmark's established scene infrastructure.

Sources: CSDb

unique-02.asm 1.352 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:58
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $1bff  (5120 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1728 (5928)
// IRQ handler:  $17dc (irq_17dc)
// IRQ handler:  $1807 (irq_1807)
// IRQ handler:  $184c (irq_184c)
// IRQ handler:  $187c (irq_187c)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 1649 bytes, Data: 3471 bytes
// Labels: 120, Subroutines: 7
//
// Cross-references: all OK
// ============================================


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

sub_1000:
        jmp loc_1020
// Referenced by: jsr from $1839

sub_1003:
        jmp loc_104b

dat_1006:
        .byte $0f                                   // .

// --- Region $1020-$105e ---
.pc = $1020 "loc_1020"

loc_1020:
        ldx #$02

loc_1022:
        lda $14fb,x
        sta $14f5,x
        lda $14fe,x
        sta $14f8,x
        dex
        bpl loc_1022
        lda #$04
        sta $155c
        ldy #$00
        tya

loc_1039:
        sta $d400,y
        sta $1511,y
        iny
        cpy #$1b
        bne loc_1039
        lda dat_1006
        sta $d418
        rts

loc_104b:
        lda $fb
        pha
        lda $fc
        pha
        ldx #$02
        dec $155c
        bpl loc_105d
        lda #$04
        sta $155c

loc_105d:
        bne loc_1067

// --- Region $1067-$1453 ---
.pc = $1067 "loc_1067"

loc_1067:
        jmp loc_11c3

loc_106a:
        lda $1523,x
        sta $151a,x
        lda $14f5,x
        sta $fb
        lda $14f8,x
        sta $fc
        ldy #$00
        tya
        sta $151d,x
        lda ($fb),y
        bpl loc_109a
        and #$7f
        asl
        sta $1511,x
        inc $14f5,x
        inc $fb
        bne loc_1096
        inc $14f8,x
        inc $fc

loc_1096:
        ldy #$00
        lda ($fb),y

loc_109a:
        tay
        lda $160d,y
        sta $fb
        lda $1613,y
        sta $fc

loc_10a5:
        ldy $1514,x
        lda ($fb),y
        bmi loc_10e4
        beq loc_10da
        cmp #$7e
        beq loc_10d0
        sta $1526,x
        asl
        clc
        adc $1511,x
        tay
        lda dat_1453,y
        clc
        adc $100e,x
        sta $1541,x
        lda $1454,y
        adc #$00
        sta $1544,x
        jmp loc_10d3

loc_10d0:
        inc $151d,x

loc_10d3:
        lda #$ff
        sta $150b,x
        bne loc_110c

loc_10da:
        lda #$fe
        sta $150b,x