#519

Faze 7 01

Faze 7

1.400 lines of code

RasterbarsRSTRMusicSID

History

Released
September 1987
Code
Trec
Music
Electro — "Gyroscope 3"
Group
Faze 7 — United Kingdom, founded 1987

A crack intro from Faze 7, a British group founded in 1987. Trec coded the intro with music from Electro — his "Gyroscope 3" composition preserved in the HVSC under the game SIDs directory, suggesting it was ripped from or associated with the Gyroscope game. Released in September 1987, this arrived during a period of intense activity in the British C64 cracking scene. The group is not documented on Doc Snyder's page, Demozoo, or the Atlantis Prophecy archive, suggesting they were a smaller operation that did not achieve the longevity of contemporaries like Ikari or Papillons. Comments on intros.c64.org include a 2008 exchange between conrad and Zyron, indicating the intro remained of interest to scene archivists. The "Faze" spelling — a deliberate phonetic rendering of "Phase" — followed a common pattern of creative misspellings in group naming. British groups of this era operated in the shadow of the dominant Scandinavian and German scenes but maintained their own distinct identity.

Sources: CSDb · intros.c64.org

faze7-01.asm 1.400 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:35:38
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $ffff  (63487 bytes)
// Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation
// Packer entry: $0810 (via BASIC SYS 2064)
// Entry point:  $0830 (2096)
// IRQ handler:  $0957 (irq_0957)
// IRQ handler:  $ea31 (irq_ea31)
// IRQ handler:  $1e9f (sub_1e9f)
//
// Code: 827 bytes, Data: 62660 bytes
// Labels: 160, Subroutines: 10
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0830-$08df ---
.pc = $0830 "main_0830"

main_0830:
        ldy #$00

loc_0832:
        lda dat_0900,y
        sta $d000,y
        iny
        cpy #$1e
        bne loc_0832
        lda #$85
        sta $d001
        sta $d003
        sta $d005
        sta $d007
        sta $d009
        sta $d00b
        sta $d00d
        lda #$00
        sta $d020
        sta $d021
        ldx #$38
        stx $07f8
        inx
        stx $07f9
        inx
        stx $07fa
        inx
        stx $07fb
        inx
        stx $07fc
        inx
        stx $07fd
        inx
        stx $07fe
        inx
        lda #$ff
        sta $be
        lda #$13
        sta $bf
        ldx #$00

loc_0884:
        lda dat_1000,x
        sta $0400,x
        lda $1100,x
        sta $0500,x
        lda $1200,x
        sta $0600,x
        inx
        bne loc_0884
        jsr sub_1e00
        lda #$00
        nop
        ldx #$00

loc_08a1:
        sta $d800,x
        sta $d900,x
        sta $da00,x
        sta $db00,x
        inx
        bne loc_08a1
        nop
        nop
        nop
        lda #$00
        sta $d01b
        ldx #$00

loc_08ba:
        lda $1300,x
        sta $0700,x
        inx
        cpx #$e8
        bne loc_08ba
        jsr sub_0940

loc_08c8:
        lda $dc01
        cmp #$ef
        beq loc_08d2
        jmp loc_08c8

loc_08d2:
        sei
        jsr $fd15
        jsr $ff5b
        lda #$34
        sta $01
        jmp loc_0c50

// --- Region $0940-$0989 ---
.pc = $0940 "sub_0940"
// Referenced by: jsr from $08c5

sub_0940:
        sei
        lda #$7f
        sta $dc0d
        lda #$81
        sta $d01a
        lda #$57
        sta $0314
        lda #$09
        sta $0315
        cli
        rts
// Referenced by: jmp from $0978

irq_0957:
        lda $d019
        sta $d019
        lda $d012

loc_0960:
        cmp $d012
        beq loc_0960
        cmp #$e0
        beq loc_097b
        clc
        adc $09
        and #$0f
        tax