#803

Future Boys, The [TFB] 01

Future Boys, The [TFB]

1.068 lines of code

RasterbarsRSTRScrollerSCRLSpritesSPRT

History

Released
1989
Group
The Future Boys — Austria, founded 1986

An Austrian crack intro coded by Glerc, with graphics by co-founder Salem. A CSDb comment notes this intro was ripped from "Mega Intro 1.0" by Glerc — a common practice where groups repurposed existing intro frameworks for new releases. The intro runs silent, with the visual presentation carried by Salem's artwork and a scrolltext. The Future Boys were founded in 1986 by Mordlord and Salem in Austria, active until November 1989. The group produced 113 releases spanning cracks, demos, and other scene productions. Salem served as both coder and graphician while Mordlord handled cracking and organization. TFB hosted a copy party in July 1989 — one of their final activities before dissolving that November. A second group shared the name, but the Swiss "Future Boys" (CSDb ID 5923) were a separate entity entirely.

Sources: CSDb · intros.c64.org

tfb-01.asm 1.068 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:49
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0800  End: $18cd  (4302 bytes)
// Crunched with Cruncher AB — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $1220 (4640)
// IRQ handler:  $11c0 (irq_11c0)
// IRQ handler:  $0cc3 (loc_0cc3)
//
// Code: 841 bytes, Data: 3461 bytes
// Labels: 110, Subroutines: 5
//
// Cross-references: all OK
// ============================================


// --- Region $0b94-$0b9f ---
.pc = $0b94 "loc_0b94"

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

chr_0b9e:
        // === Charset data (2 bytes, $0b9e-$0b9f) ===
        .byte $ad,$19                               // char 0 (partial)

// --- Region $0c09-$0c11 ---
.pc = $0c09 "sub_0c09"
// Referenced by: jsr from $0db4, $123a

sub_0c09:
        lda #$00
        sta $f7
        lda #$80
        sta $f8
        rts

// --- Region $0cc3-$0dbc ---
.pc = $0cc3 "loc_0cc3"

loc_0cc3:
        lda #$12
        sta $d018
        lda $03
        clc
        adc #$10
        sta $d016
        bit $02
        bit $02
        bit $02
        ldy #$00

loc_0cd8:
        cpy #$1f
        bcs $0d06
        ldx #$07

loc_0cde:
        lda chr_0c12,y
        sta $d020
        iny
        dex
        bmi loc_0cd8
        lda $0c83,y
        sta $d022
        lda $0ca3,y
        sta $d023
        bit $02
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        nop
        bit $02
        bit $02
        sec
        bcs loc_0cde
        lda $03ff
        beq loc_0d10
        dec $03ff
        bne loc_0d26

loc_0d10:
        lda $020a
        sta $020b

loc_0d16:
        dec $03
        bpl loc_0d21
        lda #$07
        sta $03
        jsr sub_0dc7

loc_0d21:
        dec $020b
        bne loc_0d16

loc_0d26:
        ldy $0c83
        ldx #$00

loc_0d2b:
        lda $0c84,x
        sta $0c83,x
        inx
        cpx #$20
        bne loc_0d2b
        sty $0ca2
        ldy $0cc2
        ldx #$1e

loc_0d3e:
        lda $0ca3,x
        sta $0ca4,x
        dex
        bpl loc_0d3e
        sty $0ca3
        lda #$32
        sta $d012
        lda #$d8
        sta $d016
        lda #$06
        sta $d022
        lda #$0e
        sta $d023
        lda #$01
        sta $d019
        ldy $0c82
        ldx #$2e

loc_0d68:
        lda $0c53,x
        sta $0c54,x
        dex
        bpl loc_0d68
        sty $0c53
        nop
        nop