← #508 Top 1024 #510 →
#509

Ikari+Talent 07

Ikari+Talent

4.168 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLBitmapBMAP
Disassemble Download .asm Download .prg intros.c64.org

History

Released
29 March 1990
Code
Raistlin
Music
JCH (Jens-Christian Huus) — "Narrow+"
Group
Ikari+Talent — international collaboration

CSDb titles this the "Talent & Ikari Intro," coded by Raistlin with music from JCH (Jens-Christian Huus) — his "Narrow+" composition preserved in the HVSC. Released on 29 March 1990, this continues the prolific Ikari+Talent partnership documented across numerous ranked entries including #14 I+T-01 and #80 I+T-06. Raistlin was a prominent coder who later became associated with Genesis Project — CSDb actually catalogues this release under the GP group ID, reflecting the complex membership overlaps of the era. JCH's appearance here is characteristic — the Danish composer's work appeared in crack intros from dozens of different groups throughout the late 1980s and early 1990s. The Ikari+Talent merger united a British group (Ikari) with an international one (Talent), creating one of the scene's most prolific release operations. This particular intro demonstrates how individual sceners moved fluidly between affiliated groups.

Sources: CSDb

i_t-07.asm 4.168 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:48
// 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:  $22f3 (8947)
// IRQ handler:  $2120 (irq_2120)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 3381 bytes, Data: 60107 bytes
// Labels: 483, Subroutines: 8
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1006 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $2118, $f4f9

sub_1000:
        jmp loc_1040
// Referenced by: jsr from $21a8, $f581

sub_1003:
        jmp loc_10d2

dat_1006:
        .byte $01                                   // .

// --- Region $1040-$1491 ---
.pc = $1040 "loc_1040"

loc_1040:
        asl
        asl
        asl
        tay
        ldx #$00

loc_1046:
        lda $15ce,y
        sta $1014,x
        sta $101a,x
        lda $15cf,y
        sta $1017,x
        sta $101d,x
        iny
        iny
        inx
        cpx #$03
        bne loc_1046
        ldx #$00
        stx $100d
        lda $15ce,y
        sta $1551

loc_106a:
        sta $15b8,x
        inc $100d
        lda $1551
        clc
        adc $15ce,y
        sta $1551
        clc
        adc $100d
        inx
        cpx #$10
        bne loc_106a
        lda txt_1020
        beq loc_10b3
        ldx #$02

loc_108a:
        lda $15cf,y
        sta $100d
        and $1552,x
        sta dat_1006,x
        dex
        bpl loc_108a
        bit $100d
        bpl loc_10b3
        ldx #$00

loc_10a0:
        lda $15d0,y
        sta $101a,x
        lda $15d1,y
        sta $101d,x
        iny
        iny
        inx
        cpx #$03
        bne loc_10a0

loc_10b3:
        ldy #$00
        tya

loc_10b6:
        sta $d400,y
        sta $1558,y
        iny
        cpy #$1b
        bne loc_10b6
        lda #$1f
        sta $d418
        lda #$01
        sta $1564
        sta $1565
        sta $1566
        rts

loc_10d2:
        lda $fb
        pha
        lda $fc
        pha
        ldx #$02

loc_10da:
        lda dat_1006,x
        bne loc_10e2
        jmp loc_1484

loc_10e2:
        lda $1567,x
        beq loc_10ef
        lda #$00
        sta $1567,x
        jmp loc_120a

loc_10ef:
        lda $1564,x
        cmp #$01
        bne loc_10fb
        inc $1567,x
        bne loc_1101

loc_10fb:
        dec $1564,x
        jmp loc_12e8

loc_1101:
        lda $156a,x