← #585 Top 1024 #587 →
#586

Shadows, The [TSW] 04

Shadows, The [TSW]

3.153 lines of code

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

History

Released
February 1989
Group
The Shadows — Norway, founded 1986

This 1989 Shadows intro features music by Stone of Prosonix and The Troopers, with the ripped SID being "Destination (1)" preserved in the HVSC. Released in February 1989, it was used in crack releases for Action Service, Hillsfar, and Run the Gauntlet, among others. The Shadows were a Norwegian group founded in 1986, one of the few Scandinavian cracking crews operating outside of Sweden's dominant scene. By early 1989, the group was in its productive middle period — still two years from their eventual dissolution around 1991. This intro is one of three Shadows productions in this collection alongside TSW-01 and TSW-06. Stone's compositions were popular rip sources among Scandinavian groups, his work with Prosonix placing him among the region's notable SID musicians. The group's consistent output across multiple years demonstrates their sustained commitment to the C64 platform.

Sources: CSDb · CSDb — Group

tsw-04.asm 3.153 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:56
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $2000 (8192)
// IRQ handler:  $ea31 (irq_ea31)
// IRQ handler:  $2070 (irq_2070)
//
// Code: 3476 bytes, Data: 60012 bytes
// Labels: 315, Subroutines: 11
//
// Cross-references: all OK
// ============================================


// --- Region $0fc0-$0fe6 ---
.pc = $0fc0 "loc_0fc0"

loc_0fc0:
        lda #$ef

loc_0fc2:
        cmp $dc01
        bne loc_0fc2
        sei
        jsr $fda3
        ldx #$31
        ldy #$ea
        stx $0314
        sty $0315
        jsr $ff5b
        ldx #$18

loc_0fda:
        lda $0fe5,x
        sta $0333,x
        dex
        bne loc_0fda
        jmp $0334

dat_0fe6:
        .byte $e6                                   // .

// --- Region $102a-$1563 ---
.pc = $102a "sub_102a"
// Referenced by: jsr from $20aa, $fbcb

sub_102a:
        inc $1942
        inc $1943
        inc $1944
        lda #$1f
        sta $d418
        ldx #$02
        dec $1973
        bpl loc_1045
        lda dat_191d
        sta $1973

loc_1045:
        nop
        nop
        nop
        stx $ff
        lda $191e,x
        sta $1956
        tay
        lda $1973
        cmp dat_191d
        bne loc_106b
        lda $16a1,x
        sta $fb
        lda $16a4,x
        sta $fc
        dec $1927,x
        bmi loc_106e
        jmp loc_11fa

loc_106b:
        jmp loc_120a

loc_106e:
        ldy dat_1921,x
        lda ($fb),y
        nop
        nop
        nop
        nop
        cmp #$ff
        bne loc_1094
        lda #$00
        sta $1927,x
        sta dat_1921,x
        sta $1924,x
        sta dat_1972
        jmp loc_106e

dat_108c:
        .fill 8, $00

loc_1094:
        sta $1967
        and #$80
        beq loc_10a9
        lda $1967
        and #$1f
        sta $194f,x
        inc dat_1921,x
        jmp loc_106e

loc_10a9:
        lda $1967
        and #$40
        beq loc_10be
        lda $1967
        and #$3f
        sta $1976,x
        inc dat_1921,x
        jmp loc_106e

loc_10be:
        lda $1967
        asl
        tay
        lda $16a9,y
        sta $fd
        lda $16a8,y
        sta $fe
        lda #$00
        sta $193f,x
        ldy $1924,x
        sta $1942,x
        lda #$03
        sta $1961,x

loc_10dd:
        lda ($fd),y
        sta $f8
        and #$f0
        cmp #$f0
        bne loc_10f7
        lda #$01
        sta $1980,x
        inc $1924,x