← #371 Top 1024 #373 →
#372

Pandora 01

Pandora

3.541 lines of code

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

History

Released
1992
Graphics
Mike
Code
uncredited
Music
Jeroen Soede — Filter Mania
Group
Pandora — Germany

This Pandora crack intro from 1992 is catalogued on CSDb as release #187655 under the name "Pandora Intro." Mike is credited with the graphics, while the coder is listed on CSDb but left unnamed. The music is Jeroen Soede's "Filter Mania," preserved in the HVSC — a composition by the Dutch musician associated with Soedesoft. Doc Snyder's page lists it as Pandora Crack Intro #01, crediting Mike for both code and artwork and confirming the Jeroen Soede music credit. The scrolltext reveals the cracked game was imported and NTSC/PAL-fixed by Empire and originally supplied by Attraction, documenting the cooperative supply chains through which cracks moved between European groups. Greetings go to Empire, TSM, Pudwerx, Legend, Talent, Illusion, Dominators, and Sky — placing Pandora within the German-centred cracking network of the early 1990s. Doc Snyder's page documents two other Pandora intros with Shoot! as coder and music from DOS (Andor Cseh) and Chotaire.

Sources: CSDb · docsnyderspage

pandora-01.asm 3.541 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:26
// 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:  $1d50 (7504)
// IRQ handler:  $0813 (irq_0813)
//
// Code: 2741 bytes, Data: 60747 bytes
// Labels: 366, Subroutines: 9
//
// Cross-references: all OK
// ============================================


// --- Region $0810-$084b ---
.pc = $0810 "loc_0810"

loc_0810:
        jmp loc_08db

irq_0813:
        lda #$01
        sta $d019
        ldx #$03

loc_081a:
        dex
        bne loc_081a
        lda #$01
        sta $d020
.label smc_0823 = * + 1
        ldx #$0a                                    // !SMC: modified by $1d5d

loc_0824:
        dex
        bne loc_0824
        nop
        lda #$00
        sta $d020
        lda #$18
        sta $d018
        sta $d016
        lda #$07
        sta $d022
        lda #$0a
        sta $d023
        lda #$52
        sta $d012
        lda #$4c
        sta $0314
        jmp loc_ea81

// --- Region $0864-$0870 ---
.pc = $0864 "loc_0864"

loc_0864:
        lda #$8a
        sta $d012
        lda #$71
        sta $0314
        jmp loc_ea81

// --- Region $087c-$095c ---
.pc = $087c "loc_087c"

loc_087c:
        lda #$1a
        sta $d018
        lda #$07
        sta $d022
        lda #$0a
        sta $d023
        jsr sub_09ad
        lda #$c0
        sta $d012
        lda #$9b
        sta $0314
        jmp loc_ea81

loc_089b:
        lda #$01
        sta $d019
        lda #$03
        ora #$00
        sta $d016
        lda #$fb
        jsr sub_09f0
        lda #$b4
        sta $0314
        jmp loc_ea81

loc_08b4:
        lda #$01
        sta $d019
        ldx #$03

loc_08bb:
        dex
        bne loc_08bb
        lda #$01
        sta $d020
        ldx #$0a

loc_08c5:
        dex
        bne loc_08c5
        nop
        lda #$00
        sta $d020
        lda #$2f
        sta $d012
        lda #$13
        sta $0314
        jmp loc_ea81

loc_08db:
        jsr sub_0a05
        sei
        lda #$13
        sta $0314
        lda #$08
        sta $0315
        lda #$01
        sta $d01a
        lda #$1b
        sta $d011
        lda #$7f
        sta $dc0d
        jsr sub_1d00
        lda #$00
        sta $d020
        sta $d021
        tax

loc_0904:
        lda $1e48,x
        sta $0400,x
        lda $1f00,x
        sta $04b8,x
        lda #$0e
.label sub_0914 = * + 2
        sta $d8a0,x
        lda #$01
        sta $d9e0,x