← #828 Top 1024 #830 →
#829

Terrestrial Breaking Company [TBC] 01

Terrestrial Breaking Company [TBC]

4.442 lines of code

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

History

Group
Terrestrial Breakin' Company — Germany, founded 1984

A crack intro from Terrestrial Breakin’ Company, a German cracker group founded in 1984 — making it one of the earliest C64 cracking operations in the scene. CSDb (group ID 3227) documents TBC as originating in the Hessen region of Germany, with founding members including Antiprotect, Excalibur, Freak, Mad, and The Tuerk, all of whom joined as crackers in 1984. Later members included The Syndicate (1986–1987), The Starforce (coder), and several additional crackers. The group amassed 213 documented releases, primarily game cracks, tools, and demos. The Tuerk is specifically credited for graphics work on some of the group’s productions. Individual credits for code, music, or graphics on this particular intro could not be confirmed through available sources. TBC’s 1984 founding date places it among the very first wave of organized C64 cracking groups, predating many of the better-known outfits that would emerge in 1986–1988.

Sources: CSDb · intros.c64.org

tbc-01.asm 4.442 lines
// ============================================
// output - Part 1 of 2
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:37:12
// 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:  $8dcb (36299)
//
// Code: 724 bytes, Data: 62763 bytes
// Labels: 378, Subroutines: 3
//
// Verification: 5 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $0817-$0842 ---
.pc = $0817 "loc_0817"

loc_0817:
        lda dat_0842,x
        sta.abs $002d,x
        dex
        bpl loc_0817
        txs
        ldy #$00

loc_0823:
        dec $32
        dec $082c

loc_0828:
        lda ($31),y
        sta dat_da00,y
        iny
        bne loc_0828
        lda $32
        cmp #$08
        bne loc_0823

loc_0836:
        lda $0848,y
        sta $0100,y
        iny
        bne loc_0836
        jmp $0100

dat_0842:
        .byte $80                                   // .

// --- Region $3000-$3000 ---
.pc = $3000 "Segment $3000"
        brk

// --- Region $8dcb-$8de9 ---
.pc = $8dcb "main_8dcb"
// Referenced by: jsr from $dab4

main_8dcb:
        jsr $ff81
        sei
        lda #$36
        sta $01
        jsr sub_a562
        lda #$36
        sta $01
        cli
        ldx #$00

loc_8ddd:
        lda dat_8de9,x
        sta $0364,x
        inx
        bne loc_8ddd
        jmp $0364

dat_8de9:
        // === Data block (1 bytes, $8de9-$8de9) ===
        .byte $a2                                   // .

// --- Region $a562-$a582 ---
.pc = $a562 "sub_a562"
// Referenced by: jsr from $8dd3

sub_a562:
        lda #$00
        sta $fb
        sta $fd
        lda #$a6
        sta $fc
        lda #$e0
        sta $fe
        ldx #$20
        ldy #$00

loc_a574:
        lda ($fb),y
        sta ($fd),y
        iny
        bne loc_a574
        inc $fc
        inc $fe
        dex
        bne loc_a574
        rts

// --- Region $a666-$a666 ---
.pc = $a666 "loc_a666"

loc_a666:
        brk

// --- Region $a6e4-$a6f0 ---
.pc = $a6e4 "loc_a6e4"

loc_a6e4:
        bmi loc_a666
        ldy.abs $0020
        bmi loc_a6ee
        rti

dat_a6ec:
        .byte $00,$00                               // ..

loc_a6ee:
        .byte $03,$00                               // slo ($00,x) // ILLEGAL
        brk

// --- Region $a7ae-$a7ae ---
.pc = $a7ae "loc_a7ae"

loc_a7ae:
        brk

// --- Region $a8a8-$a8bd ---
.pc = $a8a8 "sub_a8a8"
// Referenced by: jsr from $e363

sub_a8a8:
        ldx $98
        eor $3473,x
        .byte $d3,$bf                               // dcp ($bf),y // ILLEGAL
        bpl loc_a920
        .byte $df,$7b,$13                           // dcp $137b,x // ILLEGAL
        cpy #$03