#882

Ikari+Talent 15

Ikari+Talent

2.131 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRT

History

Released
4 April 1991
Code
Sting
Graphics
Gotcha
Music
JCH (Jens-Christian Huus) -- "Feel It"
Group
Ikari+Talent -- United Kingdom, founded July 1987

Released on 4 April 1991, this Ikari & Talent intro features code by Sting, graphics by Gotcha, and music from JCH (Jens-Christian Huus) -- his composition "Feel It" preserved in the HVSC. This is the fifteenth numbered entry in the merged group's extensive intro catalogue, which spans dozens of productions documented across the ranking. Earlier Ikari+Talent intros appear at #29 I+T-06 and #51 I+T-01, among many others. Ikari was founded in the United Kingdom in July 1987 and merged with the Danish group Talent around 1989, creating one of the most dominant cracking operations of the late C64 era. JCH's presence here is characteristic -- the Danish composer supplied an extraordinary volume of SID tunes to cracking groups across Europe. By April 1991, the merged group was entering its final phase of active cracking, though the quality of individual contributors like Sting and Gotcha remained high.

Sources: CSDb

i_t-15.asm 2.131 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:49
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $38ff  (12544 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1d43 (7491)
// IRQ handler:  $1e21 (irq_1e21)
//
// Code: 2214 bytes, Data: 10330 bytes
// Labels: 212, Subroutines: 20
//
// Cross-references: all OK
// ============================================


// --- Region $0a00-$0a44 ---
.pc = $0a00 "sub_0a00"
// Referenced by: jsr from $1eae

sub_0a00:
.label smc_0a01 = * + 1
        lda $0a6a                                   // !SMC: modified by $0a13
        sta $d022
        inc smc_0a01
        lda smc_0a01
        cmp #$70
        beq loc_0a11
        rts

loc_0a11:
        lda #$45
        sta smc_0a01                                // SMC: modifies $0a01
        rts
// Referenced by: jsr from $1eb1

sub_0a17:
.label smc_0a18 = * + 1
        lda $0a9d                                   // !SMC: modified by $0a2a
        sta $d023
        inc smc_0a18
        lda smc_0a18
        cmp #$a0
        beq loc_0a28
        rts

loc_0a28:
        lda #$70
        sta smc_0a18                                // SMC: modifies $0a18
        rts
// Referenced by: jsr from $1eb4

sub_0a2e:
.label smc_0a2f = * + 1
        lda $0aa4                                   // !SMC: modified by $0a41
        sta $d024
        inc smc_0a2f
        lda smc_0a2f
        cmp #$d0
        beq loc_0a3f
        rts

loc_0a3f:
        lda #$a0
        sta smc_0a2f                                // SMC: modifies $0a2f
        rts

// --- Region $0ad0-$0b24 ---
.pc = $0ad0 "sub_0ad0"
// Referenced by: jsr from $1e95

sub_0ad0:
        lda dat_0b24
        cmp #$00
        beq loc_0adc
        cmp #$01
        beq loc_0b00
        rts

loc_0adc:
.label smc_0add = * + 1
        lda $0b25                                   // !SMC: modified by $0af7
        ldx #$00

loc_0ae1:
        sta $0400,x
        sta $0440,x
        inx
        bne loc_0ae1
        inc smc_0add
        lda smc_0add
        cmp #$80
        beq loc_0af5
        rts

loc_0af5:
        lda #$25
        sta smc_0add                                // SMC: modifies $0add
        nop
        nop
        jsr sub_1ce0
        rts

loc_0b00:
.label smc_0b01 = * + 1
        lda $0b5a                                   // !SMC: modified by $0b1b
        ldx #$00

loc_0b05:
        sta $05e0,x
        sta $0620,x
        inx
        bne loc_0b05
        inc smc_0b01
        lda smc_0b01
        cmp #$80
        beq loc_0b19
        rts

loc_0b19:
        lda #$25
        sta smc_0b01                                // SMC: modifies $0b01
        nop
        nop
        jsr sub_1ceb
        rts

dat_0b24:
        .byte $01                                   // .

// --- Region $0bb0-$0c00 ---
.pc = $0bb0 "sub_0bb0"
// Referenced by: jsr from $1e00

sub_0bb0:
        lda #$00
        jsr sub_1000
        lda #$00
        sta $d020
        jsr $e544
        ldx #$00
        lda #$00

loc_0bc1:
        sta $0400,x
        sta $0440,x