This bot has gone far from what it was originally designed to do. It forms a protective coating of algae, in which it spirals around. When a bot becomes huge (Last gene), it breaks the shell and swarms out. Not a very good bot, but fun to watch.
'Whirlwind
'Circles around 5000,3000
'Hypnotises other bots with its virus
'Infected bots spin around 5000,3000 as well, but lock themselves
'down 1000 units from the centre, forming an algal shell
'shoot and tie-feeds
'virus replaces agressive shots with passive shots
'Conspec
cond
*.out5 666 !=
start
666 .out5 store
stop
'Virus
cond
*.out5 666 !=
start
*.shoot sgn abs -2 mult .shoot store
*.thisgene .mkvirus store
50 .vshoot store
5000 3000 angle .setaim store
.up inc
1000 5000 *.xpos sub 3000 *.ypos sub pyth sub sgn floor .fixpos mult
inc
stop
'Updating
start
10 *.vel sub .up store
*.thisgene -- .mkvirus store
50 .vshoot *.vtimer -- sgn abs -- abs mult store
*.nrg 3 div *.body sub dup .strbody store - .fdbody store
99 .sharenrg store
1 .sharewaste store
99 .shareshell store
99 .shareslime store
5000 3000 angle *.vel add .setaim store
stop
'Do not tie to non-veggies
cond
*.trefshoot 0 !=
start
*.tiepres .deltie store
stop
'Feeding
cond
*.eye5 40 >
*.in5 *.out5 !=
start
64 .shootval store
-6 .shoot store
.tie inc
stop
'Reproduction
cond
*.nrg 5000 >
start
50 .repro store
stop
cond
*.nrg 30000 >
start
-180 .dx store
stop