← #632 Top 1024 #634 →
#633

Neophytes 01

Neophytes

2.105 lines of code

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

History

Released
5 September 2009
Code
Ksubi
Design
Mabel
Music
Metal (Torben Hansen) — "Orbital"
Group
Neophytes — Australia, founded November 2008

The debut crack intro from the Neophytes, an Australian group founded in late November 2008 — making them one of the youngest crews in the ranked collection. Released on 5 September 2009, the intro features code by Ksubi, design work by Mabel, and a SID tune titled "Orbital" by Metal (Torben Hansen), preserved in the HVSC. The group's name, meaning "beginners" or "newcomers," directly acknowledged their late arrival to the C64 cracking scene. Despite forming over two decades after the platform's heyday, the Neophytes represented the scene's ongoing vitality in the late 2000s. Their second intro — #460 Neophytes-02 — was released the following year, also coded by Ksubi. Australia maintained a small but dedicated C64 scene community throughout the 2000s, with groups like Neophytes keeping the cracking tradition alive in the Southern Hemisphere.

Sources: CSDb

neophytes-01.asm 2.105 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:21
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $0811 (2065)
// IRQ handler:  $fe43 (nmi_fe43)
// IRQ handler:  $ff48 (irq_ff48)
//
// Code: 2025 bytes, Data: 61463 bytes
// Labels: 215, Subroutines: 3
//
// Cross-references: all OK
// ============================================


// --- Region $0811-$08e7 ---
.pc = $0811 "main_0811"

main_0811:
        sei
        lda #$35
        ldx #$01
        ldy #$7f
        sta $01
        stx $d019
        stx $d01a
        dex
        stx $3fff
        stx $d012
        sty $dc0d
        sty $dd0d
        bit $dc0d
        bit $dd0d
        dex
        ldy #$08
        stx $fffe
        sty $ffff
        dex
        stx $fffc
        sty $fffd
        dex
        stx $fffa
        sty $fffb
        dex
        jsr sub_0853
        cli

loc_084f:
        jmp loc_084f

dat_0852:
        .byte $ea                                   // .
// Referenced by: jsr from $084b; branch from $0856

sub_0853:
        bit $d011
        bmi sub_0853

loc_0858:
        bit $d011
        bpl loc_0858

loc_085d:
        lda $d012

loc_0860:
        cmp $d012
        beq loc_0860
        bmi loc_085d
        cmp #$20
        bcc loc_0872
        sta $02a6
        jmp loc_0891

dat_0871:
        .byte $ea                                   // .

loc_0872:
        lda #$0b
        ldx #$ea
        ldy #$08
        sta $090b
        stx $08f8
        sty $0916
        lda #$32
        ldx #$74
        ldy #$08
        sta $0938
        stx $0925
        sty $0916
        nop

loc_0891:
        lda #$20
        ldx #$00

loc_0895:
        sta $0400,x
        sta $0500,x
        sta $0600,x
        sta $0700,x
        inx
        bne loc_0895
        lda #$01

loc_08a6:
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_08a6

loc_08b5:
        lda $0e00,x
        sta $04d8,x
        lda $0f00,x
        sta $05d8,x
        inx
        bne loc_08b5
        lda #$80
        ldx #$03
        ldy #$18
        sta $09e1
        stx $dd00
        sty $d018
        lda #$0a
        ldx #$1b
        ldy #$00
        sta $09e2
        stx $d011
        sty $d015
        lda #$00
        jsr sub_1000
        rts

// --- Region $0941-$094f ---
.pc = $0941 "loc_0941"

loc_0941:
        lda #$01
        sta $d019
        jsr sub_1003
        lda $11