;redcode-94 quiet ;name Negative Energy ;author Zul Nadzri ;kill Negative Energy ;strategy Pspacing Stunners. ;assert 1 ;-------- OVERVIEW ---------- ;(First Round BDECWT : Submitted 8 Oct 1996) ;I use stunner in this tournament to steal some points against papers. ;However, this warrior would have difficulties in defeating (escaping?) ;all those scanners. I need 'stone' to strike at the scanners before ;proceeding with the core clear. That's why I included warrior 2 (credit ;to 'Storm') to do some bombing, and then run those stun-n-clear process, ;which is the theme of this campaign. END. ;-------- Variables --------- gate1 equ gate-1 desti equ 5678 minus equ 100 ;no decoy at all. ;-------- Warrior 1 --------- w3 mov gate+0, desti ;booting Warrior 1 away. mov gate+1, desti w11 mov gate+2, desti mov gate+3, desti mov gate+4, desti mov gate+5, desti mov gate+6, desti mov gate+7, desti jmp desti+w11, <1234 gate dat -5, jump-gate1+5 ;stunner and core clear spl #-515, jump-gate1+505 w1 spl #-10, #10 mov @jump, >gate1 mov @jump, >gate1 jump djn w1+1, {gate+1 jmp w1+1, >gate1 ;-------- Warrior 2 -------- boot EQU Storm+4000 ;I need support for the first warrior. step EQU 155 ;again, credit to 'Storm'. init EQU step away EQU 18 FOR 100-minus ;no decoy. spl #w2, #x ROF x DAT #2, #1 w2 MOV Storm+4, boot+4 ;booting away. MOV Storm+3, w2 on loss DAT #toffs+0, #w3-jumper ;w1->w1 on win DAT #toffs+3, #w3-jumper ;w1->w1 on tie DAT #toffs+6, #w3-jumper ;w2->w1 on loss DAT #toffs+3, #w2-jumper ;w2->w2 on win endtab DAT #toffs+3, #w2-jumper ;w2->w2 on tie end starter