History
- Group
- The Blasters Inc. — Spain, founded 18 June 1988
The sole ranked intro from The Blasters Inc., a Spanish cracking, demo, importing, and swapping group founded on 18 June 1988 by JR Predator, ACM, and BSR. CSDb (group ID 186) records TBI as active until 1992, with the group describing itself as "Number one in Spain." Key members included Black Hole (coder and cracker, 1988–1991), AMD (coder, cracker, logo graphician, musician, and swapper, 1989–1991), and Narciso (musician, 1988–1991). TBI maintained a well-documented cooperation with The Ruling Company of the Netherlands from 1990 to 1991 — a partnership that ended following the death of JR Predator in September 1991. A joint TRC+TBI intro also appears in this collection at position #353. Individual credits for code, music, or graphics on this particular intro could not be confirmed. A community comment from 2006 on intros.c64.org confirms the intro’s continued recognition within the preservation community.
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:48 // 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: $c400 (50176) // IRQ handler: $c026 (irq_c026) // // Code: 641 bytes, Data: 62846 bytes // Labels: 157, Subroutines: 9 // // Verification: 5 line(s) auto-corrected to .byte for exact byte matching // // Cross-references: all OK // ============================================ // --- Region $8dd0-$8dd0 --- .pc = $8dd0 "Segment $8dd0" brk // --- Region $c000-$c0b6 --- .pc = $c000 "sub_c000" // Referenced by: jsr from $c434 sub_c000: sei lda #$26 sta $0314 lda #$c0 sta $0315 lda #$1b sta $d011 lda #$01 sta $d01a sta $dc0d lda #$ff sta $d015 lda #$33 sta $d012 cli rts dat_c024: .byte $00,$00 // .. irq_c026: ldx #$00 loc_c028: ldy $c510,x loc_c02b: dey bne loc_c02b lda dat_c600,x sta $d020 sta $d021 inx cpx #$2e bne loc_c028 ldx #$00 loc_c03e: ldy $c516,x loc_c041: dey bne loc_c041 lda $c630,x sta $d016 sta $d016 inx cpx #$10 bne loc_c03e ldx #$00 loc_c054: ldy $c516,x loc_c057: dey bne loc_c057 lda $c640,x sta $d020 sta $d021 inx cpx #$60 bne loc_c054 .label smc_c069 = * + 1 lda #$c0 // !SMC: modified by $c71d sta $d016 ldx #$00 loc_c06f: ldy $c506,x loc_c072: dey bne loc_c072 lda $c6b0,x sta $d021 sta $d020 inx cpx #$10 bne loc_c06f .label smc_c084 = * + 1 lda #$c7 // !SMC: modified by $c76d sta $d016 ldx #$00 loc_c08a: ldy $c506,x loc_c08d: dey bne loc_c08d lda $c6c0,x sta $d021 sta $d020 inx cpx #$20 bne loc_c08a lda #$01 sta $d019 jsr sub_c4a0 jsr sub_c710 jsr sub_c760 jsr sub_c760 lda #$bf sta $d016 jmp loc_ea31 // --- Region $c400-$c45f --- .pc = $c400 "main_c400" main_c400: lda #$00 sta $0286 lda #$93 jsr $e716 ldx #$00 loc_c40c: lda txt_c100,x