History
- Released
- March 1993
- Code
- Crossfire
- Music
- JVD (Jurgen van Dongen) — "Wardonia", "Amiga King"; Bart (Tommi Konttinen) — "Tune for Nina"
- Charset
- Flower
- Group
- Epic + Device — Denmark, Epic founded 15 September 1992
A joint release from Epic and Device, two groups collaborating under the Danish scene banner. CSDb dates this intro to March 1993, just six months after Epic's founding on 15 September 1992. Crossfire coded the intro, Flower designed the charset, and the music came from two composers — JVD (Jurgen van Dongen) contributed "Wardonia" and "Amiga King," while Bart (Tommi Konttinen) provided "Tune for Nina." All three SID tunes are preserved in the HVSC. The multi-tune design gave the user a selection of music to listen to while reading the scrolltext — a common feature in intros from this era. Epic's CSDb entry lists no short tag, and Device appears as the secondary group in the partnership. The intro survives through both CSDb and intros.c64.org but has left no trace on Demozoo, Doc Snyder's page, or other scene archives.
Sources: CSDb
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:20 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $3fff (14336 bytes) // Crunched with Cruncher AB — depacked by emulation // Packer entry: $080d (via BASIC SYS 2061) // Entry point: $2ab0 (10928) // IRQ handler: $2b10 (irq_2b10) // IRQ handler: $2b81 (irq_2b81) // IRQ handler: $2bc6 (irq_2bc6) // IRQ handler: $2bed (irq_2bed) // IRQ handler: $2c0a (irq_2c0a) // IRQ handler: $2c1f (irq_2c1f) // IRQ handler: $2c42 (irq_2c42) // IRQ handler: $ea31 (irq_ea31) // IRQ handler: $1020 (loc_1020) // // Code: 2201 bytes, Data: 12135 bytes // Labels: 224, Subroutines: 20 // // Cross-references: all OK // ============================================ // --- Region $1000-$1028 --- .pc = $1000 "sub_1000" // Referenced by: jsr from $1007, $2acf sub_1000: jmp loc_1041 // Referenced by: jsr from $1020, $2c86 sub_1003: jmp loc_107a loc_1006: sei jsr sub_1000 lda #$7f sta $dc0d lda #$01 sta $d01a lda #$20 ldx #$10 sta $0314 stx $0315 cli rts loc_1020: jsr sub_1003 inc $d019 jmp $ea31 // --- Region $1041-$10a4 --- .pc = $1041 "loc_1041" loc_1041: lda #$1f sta $d418 lda #$f0 sta $d417 and #$0f sta smc_12a6 // SMC: modifies $12a6 ldx #$0f loc_1052: sta dat_10a5,x dex bpl loc_1052 ldx #$02 loc_105a: lda dat_1029,x sta $fa lda $102c,x sta $fb ldy #$00 lda ($fa),y sta $10b1,x iny lda ($fa),y sta $110a,x and #$0f sta $110d,x dex bpl loc_105a rts loc_107a: ldx #$00 dec $10b4 bmi loc_1091 jsr sub_126a ldx #$01 jsr sub_126a ldx #$02 jmp sub_126a dat_108e: .byte $ff,$ff,$ff // ... loc_1091: .label smc_1092 = * + 1 lda #$04 // !SMC: modified by $11cf sta $10b4 jsr sub_109d jsr sub_109c // Referenced by: jsr from $1099 sub_109c: inx // Referenced by: jsr from $1096 sub_109d: dec $10ae,x bmi loc_10b5 jmp sub_126a // --- Region $10b5-$10ea --- .pc = $10b5 "loc_10b5" loc_10b5: ldy $10b1,x cpy #$fe bne loc_10c5 // Referenced by: jsr from $10e4 sub_10bc: lda $10a8,x and #$fe sta $10a8,x rts loc_10c5: lda $18de,y sta $fa lda $189e,y sta $fb ldy dat_10a5,x lda ($fa),y bmi loc_10f6 cmp #$60 bcc loc_111d loc_10da: