#34

Yeti Factories [YF] 03

Yeti Factories [YF]

1.701 lines of code

MusicSIDScrollerSCRLSpritesSPRT

History

Released
3 April 1987
Music
Beyond the Forbidden Forest by Paul Norman (ripped)
Group
Yeti Factories — Germany, founded 1986

Ranked #34 on intros.c64.org and rated 9.4/10 on CSDb — a high score for a release with no code or graphics credit attached to it. CSDb catalogues the intro as "Yeti Intro" and dates it 3 April 1987. The only credit is Paul Norman for the music, and the SID is a rip of the title tune from his game Beyond the Forbidden Forest, preserved in the HVSC under Norman's composer directory. Yeti Factories were a German group founded in 1986. Doc Snyder's page for the group exists but carries no section confirmed to match this specific release, so CSDb is the sole primary source for credits. The high rating relative to the sparse metadata suggests the intro earned its reputation through visual and musical impact rather than documented authorship.

Sources: CSDb · docsnyderspage

yf-03.asm 1.701 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:41
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $ffff  (63488 bytes)
// Crunched with Exomizer — depacked by emulation
// Packer entry: $0812 (via BASIC SYS 2066)
// Entry point:  $0334 (820)
// IRQ handler:  $0cc3 (irq_0cc3)
// IRQ handler:  $0b9e (irq_0b9e)
// IRQ handler:  $10dc (irq_10dc)
//
// Code: 1234 bytes, Data: 62254 bytes
// Labels: 164, Subroutines: 9
//
// Cross-references: all OK
// ============================================


// --- Region $0ab3-$0ad2 ---
.pc = $0ab3 "loc_0ab3"

loc_0ab3:
        ora $90
        bvc loc_0b17
        ldy #$06
        asl
        ora #$05
        stx $5a,y
        adc #$a5
        bcc loc_0b12
        rts

dat_0ac3:
        .byte $a0,$00,$00,$00,$00,$90               // ......

loc_0ac9:
        bvc loc_0b2b
        ldy #$06
        asl
        ora #$05
        bcc loc_0b22
        rts

// --- Region $0b0f-$0c11 ---
.pc = $0b0f "loc_0b0f"

loc_0b0f:
        lda txt_11c0,x

loc_0b12:
        sta $0400,x
.label loc_0b17 = * + 2
        lda $12a0,x
        sta $04e0,x
        inx
        bne loc_0b0f
        ldx #$00
        ldy #$00

loc_0b22:
        lda $13a0,x
        pha
        and #$0f
        sta $d800,y

loc_0b2b:
        iny
        pla
        lsr
        lsr
        lsr
        lsr
        sta $d800,y
        inx
        iny
        bne loc_0b22

loc_0b38:
        lda $13a0,x
        pha
        and #$0f
        sta $d900,y
        iny
        pla
        lsr
        lsr
        lsr
        lsr
        sta $d900,y
        inx
        iny
        cpy #$e0
        bne loc_0b38
        sei
        ldx #$01
        stx $d01a
        stx $d012
        dex
        stx $dc0e
        lda #$1b
        sta $d011
        lda #$c3
        sta $0314
        lda #$0c
        sta $0315
        jsr sub_0bf2
        jsr sub_0c09
        jsr sub_0e7b
        jsr sub_10b4
        lda #$03
        sta $020a
        lda #$00
        sta $57
        ldx #$0e
        ldy #$0c
        clc
        jsr $fff0
        lda #$54
        ldy #$10
        jsr sub_ab1e
        jsr sub_1549
        cli

loc_0b94:
        lda $dc01
        cmp #$ef
        bne loc_0b94
        jmp loc_0ffb

irq_0b9e:
        lda $d019
        sta $d019
        lda #$00
        sta $fb
        nop
        nop
        nop
        nop
        nop
        ldy #$00

loc_0baf:
        cpy #$5f
        bcs $0bdb
        ldx #$07