Hello,
I can't stand the silence on this newsgroup LOL.
And therefore I post this new warrior of mine, it's not terribly great,
but
I have seen worse, mostly from myself LOL :)
;redcode
;name DualStunnerDualBomberV2
;strategy Dual Stun Bomber, Dual Clear Bomber
;author Skybuck Flying
;date 14 march 2008
;version 2
mov $StunCounter, $CORESIZE/2 + 12
mov $StunFire1, $CORESIZE/2 + 12
mov $StunFire2, $CORESIZE/2 + 12
mov $StunFire3, $CORESIZE/2 + 12
mov $StunFire4, $CORESIZE/2 + 12
mov $StunFire5, $CORESIZE/2 + 12
mov $StunFire6, $CORESIZE/2 + 12
mov $StunFire7, $CORESIZE/2 + 12
mov $StunFire8, $CORESIZE/2 + 12
mov $StunRepeat, $CORESIZE/2 + 12
mov $StunBomb, $CORESIZE/2 + 12
mov $ClearBomb, $CORESIZE/2 + 12
spl $CORESIZE/2
WarriorLength equ WarriorEnd - WarriorBegin
WarriorBegin
BombingLength equ $-( (CORESIZE / 2) - 11 )
StunCounter nop $WeaponSelect, BombingLength ; will be overwritten as to
reset itself :)
StunFire1 mov *StunCounter, >StunCounter
StunFire2 mov *StunCounter, >StunCounter
StunFire3 mov *StunCounter, >StunCounter
StunFire4 mov *StunCounter, >StunCounter
StunFire5 mov *StunCounter, >StunCounter
StunFire6 mov *StunCounter, >StunCounter
StunFire7 mov *StunCounter, >StunCounter
StunFire8 mov *StunCounter, >StunCounter
StunRepeat jmp StunFire1
WeaponSelect
StunBomb spl $(-StunCounter)+1, BombingLength
ClearBomb dat $(-StunCounter)-1, BombingLength
WarriorEnd
dat $0, $0
|
