History
- Released
- 8 December 1989
- Code
- Fletch
- Graphics
- Fletch
- Charset
- Spacie
- Music
- Oregon Power by A-Man (Steven Diemer), with additional tunes by JCH, Drax and Scarzix
- Group
- Ikari — United Kingdom, founded July 1987
Ranked #15 on intros.c64.org, this late-1989 release — catalogued on CSDb as "Ikari & Talent Intro" and dated 8 December 1989 — is one of Ikari's most popular intros. Fletch handled both code and artwork, confirmed on the verified Doc Snyder section for this release. Spacie provided the charset. The soundtrack is a player that cycles through fifteen SIDs: "Oregon Power" by A-Man (Steven Diemer) leads, followed by eight tunes from Drax (Thomas Mogensen) including "Acid," "Echo Lead," "Carcrash," "That's Ok," "Kurt's Bass," "NATO Demo," "Zammis" and "Intro Zax," five from JCH (Jens-Christian Huus) including "Ode to JO," "Blizzard," "Laxin'," "Louisiana" and "Skaermtrolden Hugo," and "Axel F." by Scarzix (Carsten Berggreen). The Doc Snyder scrolltext announces an Ikari+Talent crack of Turrican 2 — "cracked, trained and levelcrunched by doc and fletch in 1991, imported to the states by TSM."
Sources: CSDb · docsnyderspage
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:24 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $21fe (6655 bytes) // Crunched with Cruncher AB — depacked by emulation // Packer entry: $080d (via BASIC SYS 2061) // Entry point: $1f00 (7936) // IRQ handler: $10bb (irq_10bb) // IRQ handler: $ea31 (loc_ea31) // // Code: 653 bytes, Data: 6002 bytes // Labels: 149, Subroutines: 8 // // Cross-references: all OK // ============================================ // --- Region $0812-$0819 --- .pc = $0812 "loc_0812" loc_0812: .byte $9b,$9b,$9b // tas $9b9b,y // ILLEGAL .byte $9b,$9b,$9b // tas $9b9b,y // ILLEGAL brk dat_0819: .byte $00 // . // --- Region $1000-$1198 --- .pc = $1000 "sub_1000" // Referenced by: jsr from $1f00 sub_1000: { lda #$00 sta $d020 sta $d021 tax inx stx $0286 jsr $e544 lda #$13 sta $d018 lda #$18 sta $d016 ldx #$00 loop1: lda dat_1600,x sta $0400,x lda $1700,x sta $0500,x lda $1800,x sta $0600,x lda $1900,x sta $0700,x inx bne loop1 lda #$0e sta $d023 sta $0286 ldx #$00 loop2: sta $d800,x sta $d900,x sta $da00,x sta $db00,x inx bne loop2 lda #$0f sta $d022 lda #$ff sta $d015 sta $d01c lda #$ff sta $d017 lda #$00 sta $d01d ldx #$00 loop3: lda $11a0,x sta $d000,x inx cpx #$10 bne loop3 ldx #$00 loop4: lda $11b0,x sta $07f8,x inx cpx #$08 bne loop4 lda #$0f sta $d025 lda #$06 sta $d026 ldx #$00 lda #$0e loop5: sta $d027,x inx cpx #$08 bne loop5 sei lda #$bb sta $0314 lda #$10 sta $0315 lda #$01 sta $dc0d sta $d01a lda #$1b jsr sub_1145 lda #$00 tax loop6: sta $02,x inx cpx #$10 bne loop6 cli rts } irq_10bb: inc $d019 ldx $02 lda dat_1200,x sta $d012 lda $1220,x sta $d016 lda $1240,x sta $d021 inc $02 lda $02 cmp #$10 beq loc_10dd jmp $ea81 loc_10dd: lda #$00 sta $02 jsr sub_132a jsr sub_137a jsr sub_10f3 jsr sub_10f3 jsr sub_10f3 jmp loc_117c