History
- Released
- 23 November 1988
- Code
- The Fleet
- Charset
- Kevin Bulmer, Flex (Antti Hannula)
- Music
- JCH (Jens-Christian Huus) — "Simple Tune"
- Group
- X-Ray — Germany, founded 1988
The sixth numbered intro from X-Ray — a German cracking group founded in 1988 who operated under the motto "Outta Schnapz!" Released on 23 November 1988, it was coded by The Fleet with charset work from both Kevin Bulmer and Flex, and music by JCH (Jens-Christian Huus) performing "Simple Tune." JCH was one of the most sought-after SID composers of the era, and his involvement reflects X-Ray's connections within the Danish-German scene axis. The Fleet and JCH also collaborated on #391 Xray-01, establishing a recurring coder-musician partnership. Doc Snyder's page documents multiple X-Ray intros, revealing the group's primary cracker as Chrysagon — who is referenced in scrolltexts across their releases. Kevin Bulmer's charset designs were widely reused across the scene — his work appears in Genesis Project and other groups' intros as well. X-Ray's primary cracker Chrysagon handled the game-cracking side while The Fleet focused on intro coding. X-Ray also maintained a cooperative relationship with Success, as evidenced by a joint X-Ray+SCS intro documented on Doc Snyder's page.
Sources: CSDb · docsnyderspage
// ============================================ // output - Part 1 of 4 // ============================================ // 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: $0800 End: $ffff (63488 bytes) // Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation // Packer entry: $0810 (via BASIC SYS 2064) // Entry point: $1400 (5120) // IRQ handler: $1649 (irq_1649) // IRQ handler: $ea31 (irq_ea31) // // Code: 1552 bytes, Data: 61936 bytes // Labels: 243, Subroutines: 9 // // Cross-references: all OK // ============================================ // --- Region $0b09-$0b34 --- .pc = $0b09 "sub_0b09" // Referenced by: jsr from $fd2b sub_0b09: adc ($95,x) ror $a9 ldx $ea,y .byte $bb,$59,$66 // las $6659,y // ILLEGAL txs .byte $6b,$ae // arr #$ae // ILLEGAL .byte $bb,$ef,$be // las $beef,y // ILLEGAL ldx $efbb ldx $eefb,y tsx nop .byte $fb,$ee,$ba // isc $baee,y // ILLEGAL sbc #$a6 sta $e465,y lda $98 .byte $64,$94 // nop $94 // ILLEGAL loc_0b2c: bvc loc_0b72 bpl loc_0b70 lda $e4,x lda ($94,x) rts // --- Region $0b72-$0b8c --- .pc = $0b72 "loc_0b72" loc_0b72: .byte $ff,$fe,$fe // isc $fefe,x // ILLEGAL sbc $edfa,x inc $fffb,x inc $fefb,x .byte $fa // nop // ILLEGAL sbc $edfb,y lda $a5f8,y tya .byte $64,$94 // nop $94 // ILLEGAL .byte $bb,$6f,$3f // las $3f6f,y // ILLEGAL dat_0b8b: .byte $7f // . txt_0b8c: .text "?" // --- Region $1060-$121f --- .pc = $1060 "sub_1060" // Referenced by: jsr from $1620 sub_1060: { asl asl asl tay ldx #$00 loop1: lda $1010,y sta $12df,x sta $12e5,x lda $1011,y sta $12e2,x sta $12e8,x iny iny inx cpx #$03 bne loop1 lda $1010,y sta $12f4 sta $12f5 ldx #$00 txa loop2: sta $1305,x inx cpx #$06 bne loop2 ldy #$00 tya loop3: sta $d400,y iny cpy #$19 bne loop3 lda #$88 sta $d404 sta $d40b sta $d412 lda #$20 sta $d405 sta $d40c sta $d413 lda #$a9 sta $d406 sta $d40d sta $d414 lda #$04 sta $d403 lda #$01 sta $d40a sta $d411 lda #$0f sta $d418 lda #$ff sta $12f9 sta $12fa sta $12fb lda #$03 sta $12f6 sta $12f7 sta $12f8 rts } // Referenced by: jsr from $1650 sub_10e8: lda $fb pha lda $fc pha ldx #$02 loc_10f0: lda $12df,x