History
- Group
- Strike Force — Germany, founded September 1987
The second numbered intro from Strike Force, most likely the German group documented on CSDb (group ID 670) that was active from September 1987 until 7 December 1988. The group dissolved abruptly when law enforcement seized founder Conan’s equipment — an event that underscores the legal risks crackers faced during the late 1980s. Members included Conan, Drago, Pershy, Caos, and Creator, handling cracking, coding, importing, and swapping. Three comments on intros.c64.org from 2017 — including posts from Doc Snyder and a user identified as Sid — suggest the intro attracted attention during a period of active scene archival work. No individual credits for code, music, or graphics on this particular intro could be confirmed. The Strike Force name was used by at least five different groups across Germany, Denmark, and New Zealand, complicating attribution. The first Strike Force intro in this collection appears at position #223.
Sources: CSDb · intros.c64.org
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-11 21:36:46 // https://restore64.dev by datucker / Rabenauge // // Load address: $0800 End: $ffff (63488 bytes) // Crunched with Exomizer v2/v3 (with relocation) — depacked by emulation // Packer entry: $0810 (via BASIC SYS 2064) // Entry point: $18c6 (6342) // IRQ handler: $1a28 (irq_1a28) // IRQ handler: $1a78 (irq_1a78) // IRQ handler: $1ab2 (irq_1ab2) // IRQ handler: $1aec (irq_1aec) // IRQ handler: $1b26 (irq_1b26) // IRQ handler: $1b63 (irq_1b63) // IRQ handler: $1ba9 (irq_1ba9) // // Code: 6013 bytes, Data: 57475 bytes // Labels: 607, Subroutines: 24 // // Cross-references: all OK // ============================================ // --- Region $0810-$0888 --- .pc = $0810 "sub_0810" // Referenced by: jsr from $182c sub_0810: lda #$13 sta dat_090c lda #$00 sta $090d sta $090e ldx #$00 loc_081f: txa pha jsr sub_0900 pla tax inx cpx #$80 bne loc_081f jsr sub_0948 lda #$13 sta dat_090c lda #$00 sta $090d sta $090e ldx #$00 loc_083d: txa pha jsr sub_0900 pla tax inx cpx #$10 bne loc_083d jsr sub_0a02 lda #$13 sta dat_090c lda #$00 sta $090d sta $090e ldx #$00 loc_085b: txa pha jsr sub_0900 pla tax inx cpx #$10 bne loc_085b jsr sub_0abc lda #$13 sta dat_090c lda #$00 sta $090d sta $090e ldx #$00 loc_0879: txa pha jsr sub_0900 pla tax inx cpx #$10 bne loc_0879 jsr sub_0b76 rts // --- Region $0900-$0bf7 --- .pc = $0900 "sub_0900" // Referenced by: jsr from $0821, $083f, $085d, $087b, $0944, $0959, $0986, $09ae sub_0900: ldy #$03 loc_0902: ldx #$00 loc_0904: inx nop bne loc_0904 dey bne loc_0902 rts dat_090c: .byte $ff,$14,$14,$00 // .... // Referenced by: jsr from $094b sub_0910: { ldx #$00 ldx #$00 loop1: lda $05f5,x sta $05f4,x inx cpx #$14 bne loop1 ldx #$13 loop2: lda $05df,x sta $05e0,x dex bne loop2 ldx dat_090c lda $1760,x sta $05e0 dex stx dat_090c ldx $090d lda $1774,x sta $0607 inx stx $090d jsr sub_0900 rts