;redcode
;name DuplicatingImp
;author Skybuck Flying
;strategy paper (replicator)
;history Skybuck's Second Warrior Version 0.01 created on 31 october 2007
works/tested in WinCore 2.3
begin jmp Initialization
Source dat #0
Dest dat #0
Counter dat #0
Target dat #18 ; must equal dest initialization -2
Initialization mov #-1, Source
mov #20, Dest
mov #15, Counter
CopyRoutine mov @[EMAIL PROTECTED]
@[EMAIL PROTECTED]
#1, Source
add #1, Dest
sub #1, Counter
jmz 2, Counter
jmp CopyRoutine
spl @[EMAIL PROTECTED]
begin