← #969 Top 1024 #971 →
#970

Turkey Soft 01

Turkey Soft

2.512 lines of code

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

History

Released
April 1987
Charset
Mark Jones
Group
Turkey Soft / Untouchable Cracking Force — United States, founded November 1986

CSDb catalogues this as the "UCF Intro (Turkey Soft)" — a production associated with both Turkey Soft and the Untouchable Cracking Force, an American group founded in November 1986. Released in April 1987, the intro runs silent — disassembly confirms no SID register writes. Mark Jones created the charset. The connection between Turkey Soft and UCF suggests either an alias relationship or a cooperative release between the two groups. UCF was one of numerous American cracking groups active during the C64's commercial peak in the mid-to-late 1980s. No entries were found on Doc Snyder's page, Demozoo, or other scene archives for Turkey Soft, making this intro one of the few surviving artifacts of the name. The visual presentation relies on Jones's charset and scrolltext to convey credits and greetings — a minimal but functional approach typical of American crack intros from early 1987.

Sources: CSDb · intros.c64.org

turkey-01.asm 2.512 lines
// ============================================
// output - Part 1 of 4
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:37:19
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0801  End: $ffff  (63487 bytes)
// Crunched with Exomizer — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $0f78 (3960)
// IRQ handler:  $ea86 (nmi_ea86)
// IRQ handler:  $ea31 (irq_ea31)
//
// Code: 319 bytes, Data: 63168 bytes
// Labels: 259, Subroutines: 3
//
// Verification: 2 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0f78-$0f80 ---
.pc = $0f78 "main_0f78"

main_0f78:
        lda #$44
        sta $0288
        jmp loc_1083

dat_0f80:
        .byte $48                                   // H

// --- Region $0f8d-$1028 ---
.pc = $0f8d "loc_0f8d"

loc_0f8d:
        lda ($02,x)
        lda ($02,x)
        lda #$f2
        bpl loc_0fad
        lda #$1b
        sta $d011
        lda #$17
        sta $d018
        lda #$05
        sta $d016
        lda #$01
        sta $d021
        lda #$01
        bne loc_0fc3

loc_0fad:
        lda #$3b
        sta $d011
        lda #$d8
        sta $d016
        lda #$19
        sta $d018
        lda #$01
        sta $d021
        lda #$f2

loc_0fc3:
        sta $d012
        sta $0f92
        ldx $0fa0
        beq loc_0fd1
        dec $0fa0

loc_0fd1:
        jmp loc_1018

loc_0fd4:
        lda $0f92
        bmi loc_0fdc
        jmp loc_1018

loc_0fdc:
        ldx #$07
        stx $0fa0
        ldy #$01

loc_0fe3:
        lda ($8d),y
        tax
        lda ($8b),y
        dey
        sta ($8b),y
        txa
        sta ($8d),y
        iny
        iny
        cpy #$28
        bne loc_0fe3

loc_0ff4:
        ldy #$00
        lda ($63),y
        cmp #$ff
        bne loc_1001
        jsr sub_1060
        bne loc_0ff4

loc_1001:
        sta $dbe7
        lda ($61),y
        eor $029b
        sta $47e7
        inc $61
        bne loc_1012
        inc $62

loc_1012:
        inc $63
        bne loc_1018
        inc $64

loc_1018:
        lda $0f92
        bpl loc_1023
        jsr sub_11ee
        jmp ($0314)

loc_1023:
        jsr sub_11c3
        jmp loc_ea81

// --- Region $104d-$10ba ---
.pc = $104d "loc_104d"

loc_104d:
        sta $01
        lda #$81
        sta $dc0d
        ldx #$31
        ldy #$ea
        sei
        stx $0314
        sty $0315
        rts
// Referenced by: jsr from $0ffc, $10a2

sub_1060:
        ldx #$19
        ldy #$1c
        stx $63
        sty $64
        .byte $5a                                   // nop // ILLEGAL