#984

Rampar 07

Rampar

2.414 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRT

History

Released
2 December 1988
Code
Wanderer
Music
Laxity (Thomas E. Petersen) — "Jewels"
Group
Rampar — United States, founded 1988

This 2 December 1988 crack intro from Rampar was coded by Wanderer with a SID tune by Laxity — Thomas E. Petersen — one of the most respected C64 musicians. His composition "Jewels" is preserved in the HVSC. Rampar was an American group founded in 1988, abbreviated as RAM, with the motto "We do it better than all the rest" — and Wanderer served as the group's primary coder, also appearing in Fantasy releases and suggesting connections between US-based crews. Doc Snyder's page documents the "Forest Soldier" intro, where Wanderer commented in 2025 about experimenting with FLD techniques to create a bouncing effect while keeping lower content stable. This collection includes #207 Rampar 03, #335 Rampar 04, and #347 Rampar 10. The scrolltext lists members Kid Quick, Minotaur, Wanderer, and Player 1.

Sources: CSDb · intros.c64.org · docsnyderspage

rampar-07.asm 2.414 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:35
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $f93f  (61760 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1000 (4096)
// IRQ handler:  $1108 (irq_1108)
// IRQ handler:  $11ae (irq_11ae)
// IRQ handler:  $11d8 (irq_11d8)
// IRQ handler:  $11f3 (irq_11f3)
// IRQ handler:  $125f (irq_125f)
// IRQ handler:  $1289 (irq_1289)
// IRQ handler:  $12be (irq_12be)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 2821 bytes, Data: 58939 bytes
// Labels: 204, Subroutines: 12
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1608 ---
.pc = $1000 "main_1000"

main_1000:
        lda #$ea
        sta $0328
        jsr sub_1740
        sei
        lda #$35
        sta $01
        jsr $e51f
        lda #$37
        sta $01
        cli
        lda #$12
        sta $d018
        jsr sub_15a4
        jsr sub_15e7
        lda #$00
        sta $d020
        sta $d021
        sta $d01b
        jsr $e544
        lda #$a2
        ldy #$16
        jsr sub_ab1e
        ldx #$00
        lda #$41

loc_1039:
        sta $04cd,x
        clc
        adc #$01
        inx
        cpx #$1e
        bne loc_1039
        ldx #$00
        lda #$61

loc_1048:
        sta $04f5,x
        clc
        adc #$01
        inx
        cpx #$1e
        bne loc_1048
        ldx #$00
        lda #$81

loc_1057:
        sta $051d,x
        clc
        adc #$01
        inx
        cpx #$1e
        bne loc_1057
        ldx #$00
        lda #$a1

loc_1066:
        sta $0545,x
        clc
        adc #$01
        inx
        cpx #$1e
        bne loc_1066
        ldx #$00
        lda #$0e

loc_1075:
        sta $d8c8,x
        inx
        cpx #$a0
        bne loc_1075
        lda #$09
        sta $d022
        lda #$0d
        sta $d023
        lda #$ff
        sta $d015
        sta $d01c
        ldx #$94
        stx $07fa
        inx
        stx $07fb
        lda #$00
        sta $d004
        sta $d006
        lda #$30
        sta $d005
        lda #$05
        sta $d029
        sta $d02a
        lda #$45
        sta $d007
        ldx #$0d
        stx $d02c
        jsr sub_1560
        ldx #$07
        stx $d02d
        stx $d02e
        lda #$8c
        sta $d00c
        sta $d00e
        lda #$8a
        sta $d00d
        sta $d00f
        ldx #$00

loc_10d4:
        lda #$0b
        sta $da58,x
        sta $da80,x
        lda #$05
        sta $db20,x
        lda #$0d
        sta $db48,x
        inx
        cpx #$28
        bne loc_10d4
        sei
        inc $dc0d
        inc $d01a