#48

Ikari 01

Ikari

2.003 lines of code

RasterbarsRSTRMusicSIDScrollerSCRLSpritesSPRT

History

Released
July 1988
Code
Excell
Music
Ikari Intro by Laxity (Thomas E. Petersen)
Group
Ikari — United Kingdom, founded July 1987

Ranked #48 on intros.c64.org, this Ikari release is catalogued on CSDb as "Ikari Intro" and dated July 1988. CSDb credits Excell for the code and Laxity — Thomas E. Petersen — for the music. The SID tune is titled "Ikari Intro" and is preserved in the HVSC under Petersen's composer directory. Doc Snyder's page for Ikari exists but carries no section confirmed to match this specific release; CSDb is the sole primary source for the credits above. Ikari were founded in the United Kingdom in July 1987. See also #6 Ikari, #12 Ikari, #15 Ikari and the other numbered Ikari entries.

Sources: CSDb · docsnyderspage

ikari-01.asm 2.003 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: $0700  End: $d011  (51474 bytes)
// Crunched with Exomizer — depacked by emulation
// Packer entry: $082a (via BASIC SYS 2090)
// Entry point:  $0e98 (3736)
// IRQ handler:  $0f60 (irq_0f60)
// IRQ handler:  $ea31 (irq_ea31)
// IRQ handler:  $0ec4 (nmi_0ec4)
//
// Code: 2506 bytes, Data: 48968 bytes
// Labels: 211, Subroutines: 17
//
// Cross-references: all OK
// ============================================


// --- Region $0e98-$0f0e ---
.pc = $0e98 "main_0e98"

main_0e98:
        jsr sub_105e
        sei
        lda #$01
        sta $d01a
        lda #$7f
        sta $dc0d
        lda #$1b
        sta $d011
        lda #$60
        sta $0314
        lda #$0f
        sta $0315
        lda #$00
        sta $c1
        cli

loc_0eba:
        lda $dc00
        and $dc01
        and #$10
        bne loc_0eba

nmi_0ec4:
        sei
        lda #$37
        sta $01
        jsr $fda3
        jsr $ff5b
        lda #$31
        sta $0314
        lda #$ea
        sta $0315
        lda #$00
        sta $0286
        sta $d020
        sta $d021
        jsr $e544
        ldx #$18

loc_0ee9:
        sta $d400,x
        dex
        bpl loc_0ee9
        ldx #$00

loc_0ef1:
        lda txt_0f0e,x
        sta $0400,x
        lda #$00
        sta $d800,x
        inx
        bne loc_0ef1
        ldx #$00
        lda #$01

loc_0f03:
        sta $d800,x
        inx
        cpx #$0f
        bne loc_0f03
        jmp $040f

txt_0f0e:
        .encoding "screencode_mixed"
        .text "i"
        .encoding "petscii_upper"

// --- Region $0f1d-$113f ---
.pc = $0f1d "loc_0f1d"

loc_0f1d:
        lda #$34
        sta $01
        lda #$f1
        sta $02
        lda #$23
        sta $03
        lda #$01
        sta $04
        lda #$08
        sta $05

loc_0f31:
        ldy #$00

loc_0f33:
        lda ($02),y
        sta ($04),y
        iny
        bne loc_0f33

loc_0f3a:
        inc $03
        inc $05
        lda $03
        cmp #$ff
        bne loc_0f31
        lda #$37
        sta $01
        lda #$46
        ldx #$98
        sta $ae
        stx $af
        sta $2d
        stx $2e
        sta $2f
        stx $30
        sta $31
        stx $32
        cli
        jmp $fce2

irq_0f60:
        lsr $d019
        ldx $c1
        inx
        cpx #$06
        bne loc_0f6c
        ldx #$00

loc_0f6c:
        stx $c1
        txa
        clc