#318

ARM 01

ARM

1.265 lines of code

RasterbarsRSTRSpritesSPRT

History

Released
July 1991
Code
Odyn, Ex-m
Group
ARM — Italy

The sole ranked intro from ARM, an Italian cracking group. Two coders share credit — Odyn and Ex-m — with no listed music or graphics contributors, suggesting a lean production focused on code rather than audiovisual presentation. CSDb records no SID files associated with this release. Released in July 1991, this intro dates from the period when Italian scene activity was growing as a distinct regional force. ARM's founding date is not recorded on CSDb, but the group is confirmed as Italian. Demozoo catalogues the release as "ARM Intro (1)" and cross-references it to both CSDb and Pouet entries. The dual-coder credit is relatively unusual — most intros of this era list a single programmer. Without music or graphician credits, the intro likely relied on minimal visual elements or ripped content. ARM left little trace in scene publications — the Hugi search results for "arm" returned only false positives unrelated to this group.

Sources: CSDb · Demozoo

arm-01.asm 1.265 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:15
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $0e00 (3584)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 984 bytes, Data: 62504 bytes
// Labels: 123, Subroutines: 9
//
// Cross-references: all OK
// ============================================


// --- Region $0d00-$0d28 ---
.pc = $0d00 "sub_0d00"
// Referenced by: jsr from $0e2a

sub_0d00:
        lda #$0f
        sta $0400
        lda #$04
        sta $0401
        lda #$19
        sta $0402
        lda #$0e
        sta $0403
        lda #$05
        sta $0424
        lda #$18
        sta $0425
        lda #$2d
        sta $0426
        lda #$0d
        sta $0427
        rts

// --- Region $0e00-$0ea7 ---
.pc = $0e00 "main_0e00"

main_0e00:
        sei
// Referenced by: jsr from $fda3

sub_0e01:
        lda #$00
        sta $08
        sta $d020
        sta $d021
        sta $19ff
        lda #$20
        sta $d01d
        sta $1a27
        lda #$1b
        sta $09
        lda #$01
        sta $6a
        sta $0286
        jsr $e544
        jsr sub_1655
        jsr sub_1900
        jsr sub_0d00
        lda #$0f
        sta $db9a
        sta $dbbc
        lda #$0c
        sta $db99
        sta $dbbd
        lda #$0b
        sta $db98
        sta $dbbe
        lda #$4c
        sta $1a4c
        lda #$ff
        sta $d015
        sta $d01c
        ldx #$00

loc_0e54:
        lda $18b0,x
        sta $d000,x
        inx
        cpx #$0f
        bne loc_0e54
        ldx #$00

loc_0e61:
        lda $18c0,x
        sta $d027,x
        lda txt_18d0,x
        sta $07f8,x
        inx
        cpx #$08
        bne loc_0e61
        lda #$04
        sta $d025
        lda #$06
        sta $d026
        lda #$00
        sta $0800
        sta $dc0e
        sta $dd0e
        sta $0314
        lda #$7f
        sta $dc0d
        sta $d015
        lda #$1a
        sta $0315
        lda $d011
        and #$7f
        sta $d011
        lda #$01
        sta $d01a
        cli

loc_0ea5:
        jmp loc_0ea5

// --- Region $1228-$1228 ---
.pc = $1228 "Segment $1228"
        brk

// --- Region $1655-$1726 ---
.pc = $1655 "sub_1655"
// Referenced by: jsr from $0e24

sub_1655:
        lda #$0c
        sta $1613
        lda #$02
        sta $1614
        lda #$00
        sta $1617
        sta $1618
        lda #$00
        sta $1619
        lda #$f8
        sta $160e
        lda $1607
        sta $1654
        lda $160c
        sta $1610
        lda $160d
        sta $160f