#481

INXS 06

INXS

2.175 lines of code

RasterbarsRSTRMusicSIDScrollerSCRL

History

Released
June 1988
Code
Typhus
Music
Markus Schneider (Diflex) — "Rhenus Demo"
Graphics
Typhus
Group
INXS — Germany, founded 1987

A German crack intro from June 1988, coded by Typhus with music from Markus Schneider — credited on Doc Snyder's page under his handle Diflex. The tune "Rhenus Demo" is preserved in the HVSC under Schneider's real name. Typhus also handled the artwork, making this largely a two-person production. The scrolltext reveals the cracking was done by Caos, another INXS member, and includes the group's weekly "smartcharts" rankings of active crews — listing names like Ikari, Triad, and Fairlight among the top-ranked. INXS was a German group founded in 1987, not to be confused with the Australian rock band of the same name. The group's membership included TPI, Caos, Future Freak, Typhus, JCH, Denethol, and others. Typhus served as both coder and artist across multiple INXS intros documented on Doc Snyder's page, establishing him as the group's primary intro builder.

Sources: CSDb · Doc Snyder's Page

inxs-06.asm 2.175 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:51
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $2dff  (9728 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1200 (4608)
// IRQ handler:  $1225 (irq_1225)
// IRQ handler:  $135c (irq_135c)
// IRQ handler:  $ea31 (loc_ea31)
//
// Code: 2065 bytes, Data: 7663 bytes
// Labels: 233, Subroutines: 8
//
// Cross-references: all OK
// ============================================


// --- Region $1200-$1580 ---
.pc = $1200 "main_1200"
main_1200: {
        jsr sub_138e
        sei
        ldx #$00
        stx $dc0e
        inx
        stx $d01a
        lda #$25
        ldy #$12
        sta $0314
        sty $0315
        lda #$1b
        sta $d011
        lda #$39
        sta $d012
        cli
        jmp $1222
}
irq_1225: {
        ldy #$0d
loop1:
        dey
        bpl loop1
        ldy #$ff
loop2:
        iny
        ldx #$f9
        lda txt_1000,y
        sta $d020
        sta $d021
        lda dat_1e00,y
        sta $d016
loop3:
        iny
        lda txt_1000,y
        sta $d020
        sta $d021
        lda dat_1e00,y
        sta $d016
        bit $ea
        lda $1146,y
        sta $d023
        lda $1149,y
        sta $d022
        lda $1063,y
        sta $d024
        inx
        beq loop2
        nop
        nop
        nop
        cpy #$62
        bcc loop3
        lda #$00
        sta $d020
        sta $d021
        lda $d012
        clc
        adc #$04
loop4:
        cmp $d012
        bne loop4
        lda #$12
        sta $d018
        lda #$06
        sta $d023
        jsr sub_12b0
        lda $70
        sta $d016
        lda #$02
        sta $d023
        jsr sub_1305
        lda #$5c
        ldy #$13
        sta $0314
        sty $0315
        lda #$f8
        sta $d012
        lda #$01
        sta $d019
        jmp $ea81
}
// Referenced by: jsr from $1289

sub_12b0:
        lda #$b0

loc_12b2:
        cmp $d012
        bne loc_12b2
        ldx #$06

loc_12b9:
        dex
        bne loc_12b9
        bit $ea
        ldx #$00
        ldy #$00
        lda $10c6,x
        nop

loc_12c6:
        nop
        bit $ea
        sta $d022
        lda $10e6,x
        sta $d020
        sta $d021
        inx
        lda $10c6,x
        cpy #$02
        beq loc_12f0
        nop

loc_12de:
        pha
        lda $d012
        and #$07
        tay
        bit $ea
        nop
        nop
        nop
        pla
        cpx #$20
        bne loc_12c6