← #778 Top 1024 #780 →
#779

Public Enemy [PE] 10

Public Enemy [PE]

3.686 lines of code

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

History

Released
10 July 1988
Code
The Codebreaker
Graphics
Dene Carter
Music
Matt Gray — "Hunter's Moon" (ripped)
Group
Public Enemy [PE] — United States, founded 1987

Public Enemy's tenth intro, released on 10 July 1988, features code by The Codebreaker and graphics by Dene Carter. The music is a ripped Matt Gray composition — "Hunter's Moon" — the soundtrack to the Thalamus game of the same name, preserved in the HVSC and co-credited to Martin Walker. Founded in the United States in 1987, Public Enemy was an active cracking group during the peak of the transatlantic software trading era. The Atlantis Prophecy interview archive contains multiple references to Public Enemy across interviews with sceners including Creeper, Depeh, and Stein Pedersen. Another Public Enemy intro appears at #232 PE-03, coded by Mandrake with a ripped Jeroen Tel tune. The use of Matt Gray's commercially composed game music in a crack intro was standard practice — Gray's Hunter's Moon soundtrack was particularly popular across the scene.

Sources: CSDb · HVSC

pe-10.asm 3.686 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:29
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $ffff  (63487 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $c000 (49152)
// IRQ handler:  $c12e (irq_c12e)
// IRQ handler:  $ea31 (loc_ea31)
// IRQ handler:  $0d4c (irq_0d4c)
//
// Code: 2837 bytes, Data: 60650 bytes
// Labels: 290, Subroutines: 18
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0848-$0862 ---
.pc = $0848 "loc_0848"

loc_0848:
        lda ($2f),y
        rol
        rol
        rol
        rol
        and #$07
        tax
        lda $011a,x
        sta $0118
        lda ($2f),y
        and #$1f
        tax
        jsr $0122
        jmp $01ff

dat_0862:
        .byte $a4                                   // .

// --- Region $0870-$0870 ---
.pc = $0870 "loc_0870"

loc_0870:
        rts

// --- Region $08a0-$08c1 ---
.pc = $08a0 "loc_08a0"

loc_08a0:
        jsr $0171
        lda ($2f),y
        jsr $0122

loc_08a8:
        sta ($2d),y
        inc $2d
        bne loc_08b0
        inc $2e

loc_08b0:
        dex
        bne loc_08a8
        dec $39
        bpl loc_08a8
        bmi loc_0848
        stx $39
        lda ($2f),y
        tax
        jmp $0122

dat_08c1:
        .byte $20                                   //  

// --- Region $0a27-$0a68 ---
.pc = $0a27 "loc_0a27"

loc_0a27:
        lda #$a1
        sta $d001
        sta $d003
        lda #$bc
        sta txt_d002
        sta $d006
        sta $d00a
        lda #$b6
        sta $d005
        sta $d007
        sta $d00d
        sta loc_d00f
        lda #$cb
        sta $d009
        sta $d00b
        lda #$bd
        sta $07fe
        sta $07ff
        lda #$3c
        sta $d00c
        lda #$3f
        sta $d01c
        lda #$1b
        sta $d011
        cli
        rts

// --- Region $0b4e-$0b6e ---
.pc = $0b4e "loc_0b4e"

loc_0b4e:
        dex
        bne loc_0b4e
        ldx #$00

loc_0b53:
        lda $c922,x
        sta $d021
        ldy $c933,x

loc_0b5c:
        dey
        bne loc_0b5c
        inx
        cpx #$10
        bne loc_0b53
        lda #$00
        sta $d021
        lda #$c8
        sta $d016
        rts

// --- Region $0d45-$0d77 ---
.pc = $0d45 "loc_0d45"

loc_0d45:
        lda $22d9,y
        sta $22d8,y
        iny

irq_0d4c:
        cpy #$d7
        bne loc_0d45
        stx $23af
        rts