History
- Code
- Zapper
- Music
- Kenneth W. Arnold (ripped -- "Ultima IV - Quest of the Avatar")
- Released
- 1993
- Group
- Empire -- CSDb group ID #275, Canada, founded February 1989
Empire Crack Intro #04 is a 1993 release from the Canadian cracking group Empire, preserved on CSDb as entry #163749. The intro was coded by Zapper, with the soundtrack being a ripped rendition of Kenneth W. Arnold's music from "Ultima IV - Quest of the Avatar," preserved in the High Voltage SID Collection. No graphics credits are recorded on CSDb for this particular entry. Doc Snyder catalogues this as Empire's fourth crack intro. The scrolltext announces a crack of "3D Construction Kit" from Domark, cracked by Enigma and PAL/NTSC-fixed by Booze. Callers are directed to Channel Zer0, Empire's WHQ BBS at 718-356-1879, the Action+Victims HQ at 502-933-7854, and a VMB at 702-594-7983. Greetings go to Enigma, Action, Victims, Pandora, Fairlight, F4CG, Verdict, Legend, TRC+TBI, Dominators, ICS, Ikari, The Force, Havok, TSM, and Plague. By 1993, the use of ripped game music rather than original SID compositions was standard practice for crack intros.
Sources: CSDb Release · Doc Snyder · intros.c64.org
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:18 // 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: $0900 (2304) // IRQ handler: $097d (irq_097d) // IRQ handler: $09c0 (irq_09c0) // IRQ handler: $09ed (irq_09ed) // IRQ handler: $0a18 (irq_0a18) // IRQ handler: $0a40 (irq_0a40) // IRQ handler: $0a6c (irq_0a6c) // IRQ handler: $0a94 (irq_0a94) // IRQ handler: $0aac (irq_0aac) // IRQ handler: $0aeb (irq_0aeb) // // Code: 2490 bytes, Data: 60998 bytes // Labels: 337, Subroutines: 20 // // Cross-references: all OK // ============================================ // --- Region $0900-$0c9f --- .pc = $0900 "main_0900" main_0900: lda #$00 sta $d020 sta $d021 sta $0286 bit dat_1000 lda #$93 jsr sub_0da1 ldx #$00 lda #$08 loc_0917: sta $d800,x sta $dad0,x sta $d850,x inx bne loc_0917 ldx #$00 lda #$08 loc_0927: sta $db48,x sta $db70,x sta $db98,x sta $dbc0,x inx cpx #$28 bne loc_0927 ldx #$00 lda #$00 loc_093c: lda #$01 sta $da30,x sta $d990,x lda $0d44,x clc adc #$20 sta $05e0,x inx cpx #$28 bne loc_093c sei inc $dc0d inc $d01a lda #$1b sta $d011 lda #$09 sta $0315 lda #$7d sta $0314 cli loc_0969: lda dat_0979 bne loc_0969 jsr sub_c059 lda #$01 sta dat_0979 jmp loc_0969 dat_0979: .byte $01 // . loc_097a: jmp loc_0f00 irq_097d: inc $d019 lda $0b65 ora #$10 sta $d016 lda #$18 sta $d018 lda dat_0c03 sta $d021 lda $0c05 sta $d022 lda $0c04 sta $d023 jsr sub_0b66 lda #$00 sta dat_0979 lda #$09 sta $0315 lda #$c0 sta $0314 lda $dc01 cmp #$ef beq loc_097a lda #$4f sta $d012 jmp loc_ea81 irq_09c0: inc $d019 lda $0c06 sta $d021 lda $0c08 sta $d022 lda $0c07 sta $d023 jsr sub_0d80 jsr sub_0bbb lda #$09 sta $0315 lda #$ed sta $0314 lda #$6a sta $d012 jmp loc_ea81 irq_09ed: inc $d019 bit $ea bit $ea lda #$c8 sta $d016 lda #$00