#475

X-Ray 08

X-Ray

3.337 lines of code

RasterbarsRSTRMusicSIDSpritesSPRTBitmapBMAP

History

Released
March 1991
Code
Trigger
Music
Maduplec — "Truth," Reyn Ouwehand — "Last Ninja Remix," Thomas Detert, Ronny Pasch — "Bonfilter," Jens Blidon — "Leonardo"
Graphics
Jatagan
Group
X-Ray — Germany, founded 1988

A five-tune jukebox intro from X-Ray, coded by Trigger with graphics by Jatagan — the same core team documented across multiple X-Ray productions on Doc Snyder's page. Released in March 1991, the intro features an impressive roster of SID musicians: Maduplec (Martin Arentoft) with "Truth," Reyn Ouwehand with his "Last Ninja Remix," Thomas Detert, Ronny Pasch with "Bonfilter," and Jens Blidon with "Leonardo" — all preserved in the HVSC. This abundance of musical content was characteristic of later X-Ray intros, which grew more ambitious as the group matured. X-Ray was founded in Germany in 1988 under the tagline "Outta Schnapz!" and another entry appears at #170 XRay-01, coded by The Fleet. Doc Snyder's page documents Chrysagon as the group's primary cracker, with scrolltexts greeting Dominators, Enigma, Legend, and Censor. The Trigger-and-Jatagan partnership gave X-Ray's intros a consistent visual identity.

Sources: CSDb · docsnyderspage

xray-08.asm 3.337 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:37:05
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0700  End: $31ff  (11008 bytes)
// Crunched with Exomizer v2/v3 — depacked by emulation
// Packer entry: $080b (via BASIC SYS 2059)
// Entry point:  $0813 (2067)
// IRQ handler:  $0868 (irq_0868)
// IRQ handler:  $0a00 (irq_0a00)
//
// Code: 4298 bytes, Data: 6710 bytes
// Labels: 323, Subroutines: 34
//
// Cross-references: all OK
// ============================================


// --- Region $0813-$095c ---
.pc = $0813 "main_0813"

main_0813:
        lda #$00
        sta $d011
        ldx #$00
        lda #$0f

loc_081c:
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_081c
        lda #$00
        tax
        tay
        jsr sub_08b0
        jsr sub_0900
        sei
        lda #$7f
        sta $dc0d
        lda #$01
        sta $d01a
        lda #$1b
        sta $d011
        lda #$a8
        sta $d016
        lda #$1d
        sta $d018
        lda #$68
        sta $0314
        lda #$08
        sta $0315
        lda #$30
        sta $d012
        nop
        nop
        nop
        cli

loc_0862:
        jmp loc_0862

dat_0865:
        .byte $00,$00,$00                           // ...

irq_0868:
        inc $d019
        jsr sub_08a0
        lda #$00
        sta $0314
        lda #$0a
        sta $0315
        lda #$70
        sta $d012
        jmp $ea81

loc_0880:
.label loc_0881 = * + 1
        jsr sub_2e24
        jsr sub_2270
        jsr sub_08f8
        lda #$68
        sta $0314
        lda #$08
        sta $0315
        lda #$30
        sta $d012
        lda #$1b
        sta $d011
        jmp $ea81
// Referenced by: jsr from $086b

sub_08a0:
        jsr sub_0900
        jsr sub_1003
        jsr sub_2f48
        jsr sub_2f88
        rts

dat_08ad:
        .byte $60,$00,$00                           // `..
// Referenced by: jsr from $082f

sub_08b0:
        jsr sub_1000
        ldx #$00
        lda #$1f

loc_08b7:
        sta $0400,x
        sta $0500,x
        sta $0600,x
        sta $0700,x
        inx
        bne loc_08b7
        nop
        nop
        nop
        ldx #$00
        lda #$00

loc_08cd:
        sta $0e00,x
        sta $0e7f,x
        inx
        bne loc_08cd
        lda #$00
        sta $2006
        sta $226c
        lda #$ff
        sta $0f7f
        lda #$07
        sta $226e
        lda #$27
        sta $226f
        jsr sub_0fa0
        nop
        nop
        nop
        rts

dat_08f4:
        .byte $00,$00,$00,$00                       // ....
// Referenced by: jsr from $0886