History
- Released
- December 1991
- Code
- The Arrogance
- Charset
- Blitz
- Graphics
- MCA
- Music
- Harmony Productions (Ludovic Llorca) — "War at 33%"
- Group
- Success — Germany, founded 2 September 1989
Success's twentieth intro, released in December 1991, with code by The Arrogance, charset by Blitz, graphics by MCA, and music by Harmony Productions (Ludovic Llorca). The tune — titled "War at 33%" — is preserved in the HVSC. The Arrogance also left a 2008 comment on intros.c64.org confirming his involvement. Success was founded in Germany on 2 September 1989, and by December 1991 had already produced twenty numbered intros — a pace of roughly one per month. Doc Snyder's page documents multiple Success intros with credits to a rotating cast of coders and musicians including Rap, Trax, Flexible, and Hi-Lite. Another Success intro appears at #165 Success-17, coded by Hi-Lite with music by PRI. MCA contributed both graphics and code to other Success productions, demonstrating the multi-talented membership typical of productive German groups. The group maintained a website at scs-trc.net, reflecting their long alliance with The Ruling Company (TRC).
Sources: CSDb · docsnyderspage · intros.c64.org
// ============================================ // output - Disassembled Source // ============================================ // KickAssembler syntax // Generated by Restore 64 v0.2.1 alpha build 298, 2026-04-01 10:59:32 // https://restore64.dev by datucker / Rabenauge // // Load address: $07ee End: $371e (12081 bytes) // Crunched with Beta Dynamic v3 — depacked by emulation // Packer entry: $080b (via BASIC SYS 2059) // Entry point: $0f40 (3904) // IRQ handler: $28ff (irq_28ff) // IRQ handler: $ea31 (irq_ea31) // // Code: 1961 bytes, Data: 10120 bytes // Labels: 225, Subroutines: 16 // // Cross-references: all OK // ============================================ // --- Region $0f40-$1080 --- .pc = $0f40 "main_0f40" main_0f40: sei lda #$00 sta $d020 sta $d021 jsr $e544 ldx #$00 loc_0f4e: lda #$0a sta $d800,x inx cpx #$ff bne loc_0f4e lda #$18 sta $d018 lda #$d8 sta $d016 lda #$0f sta $d022 lda #$0a sta $d023 ldy #$00 loc_0f6e: lda #$00 sta $0400,y sta $0500,y sta $0600,y sta $0700,y iny bne loc_0f6e ldx #$00 loc_0f81: lda txt_3100,x bit $04f0 inx bne loc_0f81 nop nop nop nop nop nop ldy #$00 loc_0f92: lda #$0e sta $d918,y bit $da18 iny bne loc_0f92 ldx #$00 loc_0f9f: lda #$01 sta $d9e0,x inx bne loc_0f9f ldy #$00 loc_0fa9: lda txt_3100,y bit $0608 iny bne loc_0fa9 ldx #$00 loc_0fb4: lda #$00 sta $da08,x inx bne loc_0fb4 ldy #$00 loc_0fbe: lda #$0a sta $da30,y iny bne loc_0fbe ldx #$00 loc_0fc8: lda #$0e sta $daf8,x inx bne loc_0fc8 lda #$00 jsr sub_1000 lda #$08 sta smc_3341 // SMC: modifies $3341 lda #$0f sta smc_3377 // SMC: modifies $3377 nop nop nop lda #$00 sta smc_2a69 // SMC: modifies $2a69 lda #$2c sta smc_2a6a // SMC: modifies $2a6a lda #$18 sta smc_29fe // SMC: modifies $29fe lda #$00 sta smc_323f // SMC: modifies $323f sta smc_29be // SMC: modifies $29be jsr sub_3200 loc_0ffc: jmp loc_0ffc chr_0fff: // === Charset data (1 bytes, $0fff-$0fff) === .byte $bd // char 0 (partial) // Referenced by: jsr from $0fd2 sub_1000: jmp loc_1048 // Referenced by: jsr from $29a0 sub_1003: jmp loc_1021 loc_1006: ldy #$10 sta $0314