History
- Released
- 5 August 1988
- Group
- Untouchable Cracking Force — United States, founded November 1986
No Moralz coded this later UCF intro while Kid Ice — a consistent presence across the group's visual output — handled the graphics. The ripped music comes from Jeroen Tel's "JT in Space," one of the Maniacs of Noise founder's many compositions that found their way into crack intros on both sides of the Atlantic. Released on 5 August 1988, this was among UCF's final productions before the group dissolved later that year. Untouchable Cracking Force was an American group founded in November 1986 by JJ the Breaker and Phantom Shark, operating as a demo group, cracking crew, and import operation simultaneously. Earlier UCF intros featured multiple Rob Hubbard rips and credits to JJ the Breaker as coder, making No Moralz's coding role here notable as a transition within the group's brief existence. JJ the Breaker himself commented on this intro's intros.c64.org page in 2011, a rare instance of the original creator contributing to the archival record.
Sources: CSDb · CSDb — Group
// ============================================ // output - Part 1 of 2 // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:37:18 // https://restore64.dev by datucker / Rabenauge // // Load address: $0801 End: $ffff (63487 bytes) // Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation // Packer entry: $0810 (via BASIC SYS 2064) // Entry point: $080d (2061) // IRQ handler: $ea31 (irq_ea31) // IRQ handler: $ea86 (nmi_ea86) // // Code: 2511 bytes, Data: 60976 bytes // Labels: 616, Subroutines: 3 // // Verification: 1 line(s) auto-corrected to .byte for exact byte matching // // Cross-references: all OK // ============================================ // --- Region $080d-$08e8 --- .pc = $080d "main_080d" main_080d: sei lda #$7f jsr sub_57c9 lda #$34 sta $01 ldx #$0c ldy #$1e loc_081b: lda $57aa,y sta $ffe1,y dey cpy #$ff bne loc_081b dec $0820 dec $081d cpx $081d bne loc_081b inc $01 ldx #$fb txs iny loc_0837: lda loc_0a00,y sta $0100,y lda dat_0b00,y sta $d800,y lsr lsr lsr lsr sta $da00,y iny bne loc_0837 inc $083f inc $0842 inc $0849 dec $0839 dec $083c bpl loc_0837 ldx #$0e loc_0860: lda #$80 sta $d402,x sta $d403,x lda #$21 sta $d404,x lda #$08 sta $d405,x lda #$80 sta $d406,x txa sec sbc #$07 tax bpl loc_0860 ldy #$0f lda #$00 asl bcc loc_089c dat_0885: .byte $a2,$ff,$8e // ... loc_0888: asl $8ed4 .byte $0f,$d4,$8d // slo $8dd4 // ILLEGAL .byte $13,$d4 // slo ($d4),y // ILLEGAL ldx #$f0 stx $d414 ldx #$81 stx $d412 ldy #$8f loc_089c: sty $d418 ldy #$02 lda #$ff loc_08a3: sta $dc01,y sta $dd01,y dey bne loc_08a3 loc_08ac: cpy #$10 bcs $08bc lda $0d30,y sta $dc00,y lda $0d40,y sta $dd00,y lda $0d00,y sta $d000,y iny cpy #$2f bne loc_08ac jsr sub_0d50 lda $0330 sta $c3 lda $0331 sta $c8 lda #$20 ldx #$06 sta $de00 sta $dffe stx $de00 dec $01 ldy #$00 jmp $008e dat_08e8: .byte $20 // // --- Region $094d-$094d --- .pc = $094d "loc_094d" loc_094d: brk // --- Region $0a00-$0a1a ---