← #50 Top 1024 #52 →
#51

Ikari+Talent 01

Ikari+Talent

4.006 lines of code

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

History

Released
7 March 1990
Code
CPU
Music
Griff (Peter Varga) — "Ikari & Talent Intro"
Graphics
SKC
Group
Ikari+Talent — Hungary, founded 1988

A Hungarian contribution to the Ikari+Talent catalogue — CPU coded while Griff (Peter Varga) composed an original SID piece titled simply "Ikari & Talent Intro," preserved in the HVSC. SKC provided the graphics. The Hungarian connection is significant: by 1990, Eastern European sceners were actively contributing to Western cracking groups, and Griff became one of Hungary's most prolific SID composers. His work appears across multiple Ikari+Talent and Talent releases from this period. Released on 7 March 1990, this intro demonstrates how the merged Ikari+Talent operation drew talent from across Europe — coders and musicians from Hungary, Denmark, and the UK all contributing to what remained nominally a British group.

Sources: CSDb

i_t-01.asm 4.006 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:23
// 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:  $1c00 (7168)
// IRQ handler:  $1d00 (irq_1d00)
// IRQ handler:  $1e00 (irq_1e00)
// IRQ handler:  $ea31 (irq_ea31)
// IRQ handler:  $1030 (irq_1030)
// IRQ handler:  $1f00 (irq_1f00)
//
// Code: 3408 bytes, Data: 60080 bytes
// Labels: 476, Subroutines: 15
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0e23-$0e35 ---
.pc = $0e23 "Program $0e23"
        tax
        tax
        sta $ff55,y
        .byte $54,$63                               // nop $63,x // ILLEGAL
        .byte $93,$9a                               // sha ($9a),y // ILLEGAL
        ldx $91
        .byte $3c,$c3,$ff                           // nop $ffc3,x // ILLEGAL
        .byte $ff,$ff,$7f                           // isc $7fff,x // ILLEGAL

dat_0e34:
        .byte $af,$a7                               // ..

// --- Region $1000-$1023 ---
.pc = $1000 "loc_1000"

loc_1000:
        sei
        lda #$00
        sta $dc0e
        lda #$01
        sta $d01a
        lda #$30
        sta $0314
        lda #$10
        sta $0315
        lda #$1b
        sta $d011
        lda #$32
        sta $d012
        jsr sub_1040
        cli
        rts

// --- Region $1030-$1095 ---
.pc = $1030 "irq_1030"

irq_1030:
        dec $d019
        jsr sub_1043
        .byte $0c,$31,$ea                           // nop irq_ea31 // ILLEGAL
        .byte $0c,$31,$ea                           // nop irq_ea31 // ILLEGAL
        jmp irq_ea31

dat_103f:
        .byte $00                                   // .
// Referenced by: jsr from $101f, $1ca1, $ecfc, $f560

sub_1040:
        jmp loc_1048
// Referenced by: jsr from $1033, $1b20, $f4b3

sub_1043:
        jmp loc_10e0

dat_1046:
        .byte $00,$00                               // ..

loc_1048:
        ldx #$00
        lda #$00

loc_104c:
        sta $d400,x
        sta $033c,x
        inx
        cpx #$c4
        bne loc_104c
        lda $10a0,y
        sta $03c1
        lda txt_10a8,y
        sta $03c2
        lda $10b0,y
        sta $03c3
        lda $10b8,y
        sta $03c4
        lda #$fe
        sta $0393
        sta $0394
        sta $0395
        lda #$fe
        sta $037b
        sta $037c
        sta $037d
        lda #$ff
        sta $0399
        lda #$18
        sta $037e
        sta $037f
        sta $0380
        rts

// --- Region $10e0-$1356 ---
.pc = $10e0 "loc_10e0"

loc_10e0:
        lda $039c
        beq loc_10e6
        rts

loc_10e6:
        lda $0345
        sta $d416
        lda $0347
        bne loc_1100
        lda $0346
        eor #$01
        sta $0346
        tax
        lda $0341,x
        sta $0347

loc_1100:
        ldx $0346
        lda $0345
        clc
        adc $0343,x
        jsr sub_15f0
        lda #$00
        sta $033c
        sta $033d
        jsr sub_1160
        inc $033c