← #5 Top 1024 #7 →
#6

Ikari 02

Ikari

1.819 lines of code

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

History

Released
18 November 1987
Music
Ikari Intro by Mad (Marcel Donné)
Group
Ikari — United Kingdom, founded July 1987

Ranked #6 on intros.c64.org, this is one of the most popular entries from Ikari — the British group founded in July 1987 that would become one of the defining names of the European cracking scene. CSDb catalogues the release as "Ikari Intro" with a release date of 18 November 1987 and credits Mad — Marcel Donné — for the music. The soundtrack is an original composition titled "Ikari Intro" preserved in the HVSC under Donné's composer directory. No code or graphics handle is attached to this specific release on CSDb, so while the visual style is unmistakably Ikari, the individual responsible for the code is not documented in the primary source data. The intro appears only a few months after Ikari's founding, placing it among the group's earliest breakout releases. See also #48 Ikari, #12 Ikari, #15 Ikari and other numbered entries by the group.

Sources: CSDb · docsnyderspage

ikari-02.asm 1.819 lines
// ============================================
// 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: $201f  (6176 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1751 (5969)
// IRQ handler:  $17ed (irq_17ed)
// IRQ handler:  $ea31 (irq_ea31)
// IRQ handler:  $177d (nmi_177d)
//
// Code: 2198 bytes, Data: 3978 bytes
// Labels: 186, Subroutines: 23
//
// Cross-references: all OK
// ============================================


// --- Region $0814-$0829 ---
.pc = $0814 "Program $0814"
        .byte $9c,$9c,$9c                           // shy $9c9c,x // ILLEGAL
        sta ($c1,x)
        .byte $9c,$9f,$9f                           // shy $9f9f,x // ILLEGAL
        .byte $9f,$9f,$9c                           // sha $9c9f,y // ILLEGAL
        cmp ($83,x)
        sta $9c9c,y
        .byte $9c,$9c,$99                           // shy $999c,x // ILLEGAL
        .byte $83,$c0                               // sax ($c0,x) // ILLEGAL

dat_0829:
        .byte $9f                                   // .

// --- Region $0a10-$0a13 ---
.pc = $0a10 "Program $0a10"
        .byte $ff,$00,$00                           // isc $0000,x // ILLEGAL
        .byte $22                                   // jam // ILLEGAL

// --- Region $0f03-$0f14 ---
.pc = $0f03 "Program $0f03"
        brk

dat_0f04:
        .byte $00,$0f,$09                           // ...
// Referenced by: jsr from $1f45

sub_0f07:
        ora #$9c
        .byte $5c,$ac,$00                           // nop $00ac,x // ILLEGAL
        brk

dat_0f0d:
        .byte $fc,$57,$e7,$27,$27,$2b,$00           // .W.''+.
// Referenced by: jsr from $1f2a, $1f37, $1f48

sub_0f14:
        brk

// --- Region $1000-$1009 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $18e3

sub_1000:
        jmp loc_107a

dat_1003:
        .byte $4c,$aa,$10                           // L..
// Referenced by: jsr from $18db

sub_1006:
        jmp loc_10b0

dat_1009:
        .byte $ff                                   // .

// --- Region $107a-$1453 ---
.pc = $107a "loc_107a"

loc_107a:
        ldx #$00
        txa

loc_107d:
        lda #$00
        sta $102c,x
        sta $1062,x
        lda #$01
        sta $1029,x
        lda #$09
        sta $102f,x
        lda #$10
        sta $1032,x
        inx
        cpx #$03
        bcc loc_107d
        lda $1011
        sta $1013
        lda #$0f
        sta $d418
        lda #$01
        sta $100a
        rts

loc_10aa:
        lda #$00
        sta $100a
        rts

loc_10b0:
        lda $100a
        bne loc_10b6
        rts

loc_10b6:
        ldx #$02

loc_10b8:
        lda $100e,x
        sta $fb
        tay
        lda $1029,x
        beq loc_10fd
        dec $105c,x
        bpl loc_10d4
        inc $105c,x
        lda $106b,x
        sta $d404,y
        jmp loc_1220

loc_10d4:
        lda $1044,x
        and #$10
        beq loc_10fa
        lda #$81
        sta $d404,y
        lda $1012
        asl
        tay
        lda dat_1453,y
        pha
        lda $1454,y
        pha
        ldy $fb
        pla
        sta $d401,y
        pla
        sta $d400,y