← #290 Top 1024 #292 →
#291

Lightforce, The [TLF] 02

Lightforce, The [TLF]

1.997 lines of code

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

History

Released
22 July 1987
Group
The Lightforce — Germany, founded September 1986

The Lightforce's second crack intro, released on 22 July 1987, featuring a ripped Ben Daglish composition — "Bulldog" — preserved in the HVSC. Jon Hare designed the charset. Daglish was one of the most respected SID composers in commercial game music, making his tunes prime targets for scene ripping. The Lightforce was a German cracking group founded in September 1986 by Boomer, Master of Chaos, and Zar. This intro was reused in at least two subsequent cracks: Cataball and Kampfgruppe. The group ultimately produced 132 releases on CSDb, primarily game cracks from 1986–1989. Master of Chaos — who coded the group's third intro from February 1988 — served multiple roles including coder, cracker, and organizer. Other TLF intros in this collection include #178 TLF-01 and #290 TLF-07.

Sources: CSDb · intros.c64.org

tlf-02.asm 1.997 lines
// ============================================
// output - Disassembled Source
// ============================================
// KickAssembler syntax
// Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:53
// https://restore64.dev by datucker / Rabenauge
//
// Load address: $0400  End: $ffff  (64512 bytes)
// Crunched with PuCrunch — depacked by emulation
// Packer entry: $080d (via BASIC SYS 2061)
// Entry point:  $e285 (57989)
//
// Code: 476 bytes, Data: 64036 bytes
// Labels: 248, Subroutines: 1
//
// Verification: 4 line(s) auto-corrected to .byte for exact byte matching
//
// Cross-references: all OK
// ============================================


// --- Region $8dd0-$8dd0 ---
.pc = $8dd0 "Segment $8dd0"
        brk

// --- Region $e25e-$e2a3 ---
.pc = $e25e "loc_e25e"

loc_e25e:
        lda $f000,y
        sta $0400,y
        lda $f100,y
        sta $0500,y
        lda $f200,y
        sta $0600,y
        lda $f2e8,y
        sta $06e8,y
        lda $f400,y
        sta dat_d800,y
        lda $f500,y
        sta $d900,y
        lda $f600,y

main_e285:
        sta $da00,y
        lda $f6e8,y
        sta $dae8,y
        iny
        bne loc_e25e
        lda #$00
        sta $d020
        sta $d021
        lda #$01
        sta $d022
        lda #$0e
        sta $d023
        rts

// --- Region $e9f6-$eabb ---
.pc = $e9f6 "loc_e9f6"

loc_e9f6:
        rol
        sta $fc
        lda $2a0d,x
        asl
        tay
        iny
        lda ($fb),y
        cmp #$00
        bne loc_ea11
        lda #$00
        sta $2a0d,x
        ldy #$01
        lda ($fb),y
        clv
        bvc loc_ea1b

loc_ea11:
        cmp #$01
        bne loc_ea1b
        lda #$00
        sta $31e0
        rts

loc_ea1b:
        pha
        dey
        lda ($fb),y
        sta $fb
        pla
        sta $fc
        lda $2a1f,x
        tay
        clc
        adc #$02
        sta $2a1f,x
        lda ($fb),y
        cmp #$00
        bne loc_ea3f
        lda #$00
        sta $2a1f,x
        inc $2a0d,x
        jmp loc_2bef

loc_ea3f:
        sta $2a0c,x
        iny
        lda ($fb),y
        pha
        and #$1f
        sta $31e4,x
        pla
        and #$e0
        lsr
        lsr
        tay
        lda $2a49,x
        sta $fb
        lda $2a4a
        sta $fc
        lda #$00
        sta $d404,x
        sta $d402,x
        sta $2a24,x
        lda ($fb),y
        iny
        sta $d403,x
        sta $2a25,x
        and #$f0
        sta $31e3,x
        lda ($fb),y
        iny
        sta $31e5,x
        lda ($fb),y
        iny
        sta $d405,x
        lda ($fb),y
        iny
        sta $d406,x
        lda ($fb),y
        iny
        sta $2a0a,x
        lda ($fb),y
        iny
        sta $31e7,x
        lda ($fb),y
        iny
        sta $2a36,x
        lda ($fb),y