After a month of development and testing I have come across this code
as being the best for a reproducing program that I have been
developing with my classmate.
==============================================================================================
to clone
noyield
make "generation random 2147483646 ;31-bit random number
make "totalgens :totalgens + 1
make "newname (word "Whirlwind :generation)
make "newfilename (word :newname ".lgo)
define :newname [[clone]]
save :newfilename
load :newfilename
end
make "redefp "true
erase "halt
make "totalgens 0
Make "generation 0
Make "startup [
clone
]
==============================================================================================
We "tested" this at school during an ICT lesson in which nothing
happened. It successfully reproduces and very quickly.
Example: http://www.logogames.org/images/stevogotowned.jpg