← #987 Top 1024 #989 →
#988

Armageddon 07

Armageddon

1.725 lines of code

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

History

Released
29 January 2011
Code
Dr. Disk
Music
dEViLOCk (Peter Siekmann) — "Intro Zak 3"
Group
Armageddon — United States, founded 1991

Released on 29 January 2011, this crack intro demonstrates Armageddon's longevity — the American group was still producing releases two decades after its 1991 founding. Dr. Disk coded the intro while dEViLOCk (Peter Siekmann) provided the SID tune "Intro Zak 3," originally composed for the 711 group and preserved in the HVSC. dEViLOCk was a German musician whose compositions also appear in X-Rated intros, reflecting the international exchange of SID tunes across cracking groups. Armageddon used the abbreviation [A] and was based in the United States, with CSDb listing this as "Armageddon Intro #8" though intros.c64.org catalogues it as #07 — a minor numbering discrepancy. Other Armageddon entries in this collection include #303 Armageddon 01 and #262 Armageddon 04.

Sources: CSDb · intros.c64.org

armageddon-07.asm 1.725 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:08
// 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:  $0a00 (2560)
// IRQ handler:  $0a9e (irq_0a9e)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 1579 bytes, Data: 6613 bytes
// Labels: 177, Subroutines: 17
//
// Cross-references: all OK
// ============================================


// --- Region $0a00-$0bb7 ---
.pc = $0a00 "main_0a00"

main_0a00:
        lda #$06
        sta $d020
        sta $d021
        jsr $e544
        ldx #$00

loc_0a0d:
        lda #$06
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_0a0d
        ldx #$00

loc_0a20:
        lda #$01
        sta $d027,x
        inx
        cpx #$08
        bne loc_0a20
        ldx #$00

loc_0a2c:
        lda txt_1c00,x
        sta $0540,x
        sta $05b8,x
        sta $0630,x
        inx
        cpx #$50
        bne loc_0a2c
        ldx #$00

loc_0a3f:
        lda #$07
        sta $d940,x
        sta $d9b8,x
        sta $da30,x
        lda #$00
        sta $d8c8,x
        sta $daa8,x
        inx
        cpx #$50
        bne loc_0a3f
        ldx #$00

loc_0a59:
        lda #$01
        sta $da08,x
        inx
        cpx #$28
        bne loc_0a59
        ldx #$00

loc_0a65:
        lda txt_1ca0,x
        sta $0590,x
        inx
        cpx #$28
        bne loc_0a65
        sei
        lda #$fb
        sta $d012
        lda #$01
        sta $d01a
        lda #$7f
        sta $dc0d
        lda #$1b
        sta $d011
        lda #$9e
        sta $0314
        lda #$0a
        sta $0315
        lda #$00
        sta $51
        lda #$80
        sta $52
        jsr sub_1000
        cli

loc_0a9b:
        jmp loc_0a9b

irq_0a9e:
        lda #$20

loc_0aa0:
        cmp $d012
        bne loc_0aa0
        jsr sub_1003
        jsr sub_0b4e
        lda #$18
        sta $d018
.label smc_0ab1 = * + 1
        lda #$c8                                    // !SMC: modified by $0c98
        sta $d016
        lda #$6d

loc_0ab7:
        cmp $d012
        bne loc_0ab7
        ldx #$0b

loc_0abe:
        dex
        bne loc_0abe
        lda #$06
        sta $d020
        sta $d021
        lda #$c7
        sta $d016
        lda #$82

loc_0ad0:
        cmp $d012
        bne loc_0ad0
        ldx #$08

loc_0ad7:
        dex
        bne loc_0ad7
        lda #$12
        sta $d018
        lda #$8a