History
- Released
- December 1992
- Code
- Trasher
- Music
- JCH (Jens-Christian Huus), Reyn Ouwehand, Scarzix (Carsten Berggreen), dEViLOCk (Peter Siekmann), Decoder (Jesper Värn)
- Group
- Active — Sweden, founded May 1989
Active's tenth intro, released in December 1992, was coded by Trasher and features an exceptional five-tune music selection from JCH (Jens-Christian Huus), Reyn Ouwehand, Scarzix (Carsten Berggreen), dEViLOCk (Peter Siekmann), and Decoder (Jesper Värn) — all preserved in the HVSC. This abundance of SID compositions, including JCH's "Aliensong" and "Skaermtrolden Hugo" alongside Ouwehand's "London Demo," suggests a multi-tune jukebox-style intro that allowed users to cycle through tracks. Active, self-styled "Sweden's #1," was a Swedish group founded on 1 May 1989. Trasher was the group's primary coder, handling intro programming across multiple releases as documented on Doc Snyder's Page. The group has several other entries in this collection, including #257 Active-08, #270 Active-06, and #419 Active-05. Active maintained connections with groups like F4CG, Fairlight, Illusion, and Dominators throughout the early 1990s Scandinavian scene.
Sources: CSDb · Doc Snyder's Page
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:06 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $2e5f (9824 bytes) // Crunched with Cruncher AB — depacked by emulation // Packer entry: $080d (via BASIC SYS 2061) // Entry point: $1fe4 (8164) // // Code: 1963 bytes, Data: 7861 bytes // Labels: 153, Subroutines: 13 // // Cross-references: all OK // ============================================ // --- Region $080b-$0b68 --- .pc = $080b "loc_080b" loc_080b: jsr sub_0a9d jsr sub_0acc jsr sub_0af8 jsr sub_0ab4 ldx #$45 ldy #$08 lda #$f8 jsr sub_0b5d loc_0820: lda $dc01 cmp #$ef bne loc_0820 jsr sub_0a9d ldx #$00 loc_082c: lda txt_0b80,x sta $0400,x lda #$0c sta $d800,x inx bne loc_082c loc_083a: lda #$0b sta $d828,x inx bne loc_083a jmp $0440 loc_0845: inc $d019 inc $0fe9 lda $0fe9 lsr lsr bcc loc_0855 jsr sub_09a7 loc_0855: lda #$00 sta $08c8 jsr sub_0b43 jsr sub_0a13 jsr sub_08e6 lda $0fe8 ldx #$73 ldy #$08 jsr sub_0b5d jsr sub_1003 jmp $ea81 loc_0873: inc $d019 jsr sub_0885 lda $f8 ldx #$45 ldy #$08 jsr sub_0b5d jmp $ea81 // Referenced by: jsr from $0876 sub_0885: ldx $0fe8 inx inx inx inx stx $d001 stx $d003 stx $d005 stx $d007 stx $d009 stx $d00b lda #$a2 ldx #$aa ldy #$c2 bit $ffff bit $ffff bit $ffff bit $ffff bit $ffff bit $ffff bit $ffff bit $ffff bit $ff sta $d006 stx $d008 sty $d00a lda #$00 sta $d010 ldx #$a6 stx $07f8 inx stx $07f9 inx stx $07fa inx stx $07fb inx stx $07fc inx stx $07fd rts // Referenced by: jsr from $0860 sub_08e6: { lda $0fec sec sbc $0fef sta $0fec bpl skip jsr sub_0975 lda #$00 sta $0fee asl $0fed rol $0fee asl $0fed rol $0fee asl $0fed rol $0fee lda $0fee adc #$20 sta $091e lda $0fed sta $091d