← #849 Top 1024 #851 →
#850

Accuracy 07

Accuracy

702 lines of code

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

History

Released
August 1991
Charset
Taito
Music
JCH (Jens-Christian Huus) — "Problems"
Group
Accuracy — Turkey, founded 1 September 1989

CSDb dates this intro to August 1991, released by Accuracy — a Turkish group founded on 1 September 1989 whose motto was "Our Aim Is Our Name!" Taito is credited with the charset, and JCH (Jens-Christian Huus) provided the music with "Problems," preserved in the HVSC. JCH was one of the most prolific and respected SID composers on the C64 — his tunes appeared in countless crack intros and demos across the European scene. Doc Snyder's page documents a separate Accuracy intro with scrolltext crediting Mr. DJ as the cracker and listing greetings to Triad, NATO, Holocaust, X-Factor, F4CG, WOW, Hotline, Brutal, and many others. Accuracy is also represented with #410 ACY 02. Turkey's C64 scene was small but persistent, with Accuracy standing as one of its most visible representatives on the international stage.

Sources: CSDb · Doc Snyder's Page

acy-07.asm 702 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:06
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $13ff  (3072 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $0ab0 (2736)
// IRQ handler:  $0a1c (irq_0a1c)
//
// Code: 802 bytes, Data: 2270 bytes
// Labels: 78, Subroutines: 5
//
// Cross-references: all OK
// ============================================


// --- Region $0a00-$0a70 ---
.pc = $0a00 "sub_0a00"
// Referenced by: jsr from $0ad0

sub_0a00:
        sei
        lda #$01
        sta $d01a
        lda #$1b
        sta $d011
        lda #$7f
        sta $dc0d
        lda #$0a
        sta $0315
        lda #$1c
        sta $0314
        cli
        rts

irq_0a1c:
        lda #$01
        sta $d019
        lda #$30
        sta $d012
        jsr sub_1003
        lda #$31
        sta $0314
        jmp $ea81

loc_0a31:
        inc $d019
        lda #$e0
        sta $d012
        lda #$00
        sta $d020
        ldy #$2d
        ldx txt_0c00,y

loc_0a43:
        lda $d012

loc_0a46:
        cmp $d012
        beq loc_0a46
        and #$07
        ora #$10
        sta $d011
        dex
        bpl loc_0a43
        lda $d012
        adc #$40

loc_0a5a:
        cmp $d012
        bne loc_0a5a
        lda #$12
        sta $d018
        lda #$17
        sta $d016
        lda #$71
        sta $0314
        jmp $ea81

// --- Region $0ab0-$0add ---
.pc = $0ab0 "main_0ab0"

main_0ab0:
        lda #$06
        sta $0286
        jsr $e544
        lda #$00
        sta $d020
        sta $d021
        sta $d015
        jsr sub_1000
        lda #$00
        ldy #$0b
        jsr $ab1e
        jsr sub_0cb5
        jsr sub_0a00

loc_0ad3:
        lda $dc01
        cmp #$ef
        bne loc_0ad3
        jmp loc_0bad

dat_0add:
        // === Fill data (1 bytes, $0add-$0add) ===
        .byte $00                                   // .

// --- Region $0bad-$0bcb ---
.pc = $0bad "loc_0bad"

loc_0bad:
        sei
        jsr $fd15
        jsr $fda3
        jsr $ffb5
        jsr $ff81
        ldx #$00
        ldy #$35

loc_0bbe:
        lda dat_0bcb,x
        sta $03cb,x
        inx
        dey
        bne loc_0bbe
        jmp $03cb

dat_0bcb:
        .byte $a9                                   // .

// --- Region $0c80-$0cc0 ---
.pc = $0c80 "loc_0c80"

loc_0c80:
        dec $0a65
        lda $0a65
        cmp #$0f
        beq loc_0c8b
        rts

loc_0c8b:
        lda #$17
        sta $0a65
        ldx #$00

loc_0c92: