Warrior: Skybuck's DivideAndConcuerV1

Copies itself half way to the core and spawns there, then resets itself and
divides counter by 2, then copies itself again half way the half core, etc.
Like divide and concuer

;redcode
;name DivideAndConquerV1
;author Skybuck Flying
;strategy Divide and Concuer
;version 1
;date 25-1-2008
;assert 1
WarriorBegin
WarriorLength equ (WarriorEnd-WarriorBegin)

Initialization

Copy
mov }Source, >Dest
Loop djn Copy, #WarriorLength
sub #5, $Dest
spl @Dest
mov.ab #WarriorLength, Loop
mov.a #(WarriorBegin-Source), $Source
div #2, $Dest
jmp Copy
Source
Dest
dat #WarriorBegin, #(CORESIZE / 2) - (WarriorLength / 2)
WarriorEnd
dat $0, $0