#356

Wanderer Group, The+Pentacle 01

Wanderer Group, The+Pentacle

2.142 lines of code

RasterbarsRSTRScrollerSCRLBitmapBMAP

History

Group
The Wanderer Group + Pentacle — Germany

This joint intro represents a collaboration between two German groups — The Wanderer Group and Pentacle. TWG was founded in 1987 by Rubberduck and Speedcracker and dissolved in 1989, while Pentacle was founded by Dueco and also operated as a German cracking crew. The partnership was natural given their shared national scene and overlapping active periods. Pentacle's members included Dueco as coder and cracker, Gremlin as coder and cracker, and Rial as cracker and swapper. A standalone Pentacle intro also appears in this collection at Pentacle-01. TWG appears multiple times as well, with TWG-02 and TWG-09 showcasing the group's independent output. Joint releases between German groups were common during 1987–1988, as cooperating crews could pool cracking talent and distribution networks. The German scene's density of groups during this period meant that alliances shifted frequently, with partnerships forming and dissolving alongside the groups themselves.

Sources: CSDb — TWG · CSDb — Pentacle

twg_p-01.asm 2.142 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:57
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $27ff  (8192 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1000 (4096)
// IRQ handler:  $0813 (irq_0813)
//
// Code: 1651 bytes, Data: 6541 bytes
// Labels: 316, Subroutines: 10
//
// Cross-references: all OK
// ============================================


// --- Region $0811-$09bb ---
.pc = $0811 "loc_0811"

loc_0811:
        brk

dat_0812:
        .byte $12                                   // .

irq_0813:
        lda #$01
        sta $d019

loc_0818:
.label smc_0819 = * + 1
        lda $0a90                                   // !SMC: modified by $0848, $0966
.label smc_081c = * + 1
        ldx $1d90                                   // !SMC: modified by $084b, $0969
.label smc_081f = * + 1
        ldy $1f90                                   // !SMC: modified by $084e, $096c
        sta $d020
        sta $d021
        stx $d023
        sty $d022
.label smc_082e = * + 1
        lda $0a91                                   // !SMC: modified by $0853, $0971
.label smc_0831 = * + 1
        ldx $1d91                                   // !SMC: modified by $087c, $0974
.label smc_0834 = * + 1
        ldy $1f91                                   // !SMC: modified by $08ab, $0977
        sta $d020
        sta $d021
        stx $d023
        sty $d022
        lda smc_0819
        clc
        adc #$08
        sta smc_0819                                // SMC: modifies $0819
        sta smc_081c                                // SMC: modifies $081c
        sta smc_081f                                // SMC: modifies $081f
        tax
        inx
        stx smc_082e                                // SMC: modifies $082e
.label smc_0857 = * + 1
        lda $0a92                                   // !SMC: modified by $0871, $097b
.label smc_085a = * + 1
        ldx $1d92                                   // !SMC: modified by $0874, $097e
.label smc_085d = * + 1
        ldy $1f92                                   // !SMC: modified by $0877, $0981
        sta $d020
        sta $d021
        stx $d023
        sty $d022
        lda smc_0857
        clc
        adc #$08
        sta smc_0857                                // SMC: modifies $0857
        sta smc_085a                                // SMC: modifies $085a
        sta smc_085d                                // SMC: modifies $085d
        tax
        dex
        stx smc_0831                                // SMC: modifies $0831
        ldx #$01

loc_0881:
        dex
        bne loc_0881
.label smc_0885 = * + 1
        lda $0a93                                   // !SMC: modified by $089f, $0985
.label smc_0888 = * + 1
        ldx $1d93                                   // !SMC: modified by $08a2, $0988
.label smc_088b = * + 1
        ldy $1f93                                   // !SMC: modified by $08a5, $098b
        sta $d020
        sta $d021
        stx $d023
        sty $d022
        lda smc_0885
        clc
        adc #$08
        sta smc_0885                                // SMC: modifies $0885
        sta smc_0888                                // SMC: modifies $0888
        sta smc_088b                                // SMC: modifies $088b
        tax
        dex
        dex
        stx smc_0834                                // SMC: modifies $0834
        ldx #$01

loc_08b0:
        dex
        bne loc_08b0
.label smc_08b4 = * + 1
        lda $0a94                                   // !SMC: modified by $08ce, $098f
.label smc_08b7 = * + 1
        ldx $1d94                                   // !SMC: modified by $08d1, $0992
.label smc_08ba = * + 1
        ldy $1f94                                   // !SMC: modified by $08d4, $0995
        sta $d020
        sta $d021
        stx $d023
        sty $d022
        lda smc_08b4
        clc
        adc #$08
        sta smc_08b4                                // SMC: modifies $08b4
        sta smc_08b7                                // SMC: modifies $08b7
        sta smc_08ba                                // SMC: modifies $08ba
        ldx #$03

loc_08d9:
        dex
        bne loc_08d9
.label smc_08dd = * + 1
        lda $0a95                                   // !SMC: modified by $08f7, $0999
.label smc_08e0 = * + 1
        ldx $1d95                                   // !SMC: modified by $08fa, $099c
.label smc_08e3 = * + 1
        ldy $1f95                                   // !SMC: modified by $08fd, $099f
        sta $d020
        sta $d021
        stx $d023
        sty $d022
        lda smc_08dd
        clc
        adc #$08
        sta smc_08dd                                // SMC: modifies $08dd
        sta smc_08e0                                // SMC: modifies $08e0
        sta smc_08e3                                // SMC: modifies $08e3
        ldx #$03