#975

Onslaught [ONS] 38

Onslaught [ONS]

2.215 lines of code

RasterbarsRSTRMusicSID

History

Released
1998
Code
Donar
Graphics
Insane
Music
Drax (Thomas Mogensen) — "Saedklat"
Group
Onslaught — Australia, founded 1 February 1995

CSDb catalogues this as the "Onslaught Intro (Basic Style)" — a 1998 production from the Australian cracking group founded on 1 February 1995. Donar coded the intro, Insane handled the graphics, and Drax (Thomas Mogensen) composed "Saedklat," a SID tune preserved in the HVSC. Drax was one of the most celebrated C64 musicians, and his involvement demonstrates the calibre of contributors Onslaught attracted despite their geographic isolation. The group styled themselves "The pirates of the seven seas!" and maintained a website at onslaught.c64.org. Doc Snyder's page documents an extensive catalogue featuring members Conrad, Logan, Morbid, Majikeyric, and Slartibartfast. An Atlantis Prophecy interview titled "Massive Onslaught" provides historical context. This joins other ranked entries including #457 ONS-21 and #476 ONS-03. Onslaught was one of the few Australian groups to maintain a lasting presence in the C64 cracking scene.

Sources: CSDb · docsnyderspage · Atlantis

ons-38.asm 2.215 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:26
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $44ff  (15616 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $3ff2 (16370)
// IRQ handler:  $42a7 (nmi_42a7)
//
// Code: 2265 bytes, Data: 13351 bytes
// Labels: 232, Subroutines: 6
//
// Cross-references: all OK
// ============================================


// --- Region $1000-$1006 ---
.pc = $1000 "sub_1000"
// Referenced by: jsr from $4043

sub_1000:
        jmp loc_1040
// Referenced by: jsr from $4056, $40a9

sub_1003:
        jmp loc_10c1

dat_1006:
        .byte $01                                   // .

// --- Region $1040-$1277 ---
.pc = $1040 "loc_1040"

loc_1040:
        asl
        asl
        asl
        tay
        ldx #$00

loc_1046:
        lda $17cb,y
        sta $172e,x
        sta $1734,x
        lda $17cc,y
        sta $1731,x
        sta $1737,x
        iny
        iny
        inx
        cpx #$03
        bne loc_1046
        lda $17cb,y
        sta $1747
        lda $1020
        beq loc_1095
        ldx #$02

loc_106c:
        lda $17cc,y
        sta $100b
        and $173a,x
        sta dat_1006,x
        dex
        bpl loc_106c
        bit $100b
        bpl loc_1095
        ldx #$00

loc_1082:
        lda $17cd,y
        sta $1734,x
        lda $17ce,y
        sta $1737,x
        iny
        iny
        inx
        cpx #$03
        bne loc_1082

loc_1095:
        ldy #$00
        tya

loc_1098:
        sta $d400,y
        iny
        cpy #$17
        bne loc_1098
        tay

loc_10a1:
        sta $1014,y
        iny
        cpy #$0c
        bne loc_10a1
        ldy #$14

loc_10ab:
        sta $1748,y
        dey
        bpl loc_10ab
        lda #$01
        sta $1794
        lda #$03
        sta $1746
        lda #$0f
        sta $1009
        rts

loc_10c1:
        lda $fb
        pha
        lda $fc
        pha
        dec $1746
        bpl loc_10e9
        lda $1747
        sta $1746
        cmp #$02
        bcs loc_10e9
        ldy $1794
        lda $18c7,y
        sta $1746
        dec $1794
        bpl loc_10e9
        lda #$01
        sta $1794

loc_10e9:
        ldx #$02

loc_10eb:
        lda dat_1006,x
        bne loc_10f3
        jmp loc_1660

loc_10f3:
        lda $1746
        beq loc_1104
        cmp #$02
        bne loc_1109
        lda $175a,x
        beq loc_110f
        jmp loc_1409