Bots and Simulations > Multi-Bots
Coloniser(MB)(Spike43884)10-25-2014
(1/1)
Botsareus:
--- Code: ---'Coloniser (MB)
'By Spike43884
'Spawn just 1, right near a patch of veggies,
'it becomes intertwined with them.
'Nobody else will be feeding today.
cond
*.nrg 15 >
*.numties 0 !=
or
start
.fixpos dec
*.robage 0 =
314 .aimright store
.deltie inc
300 .eye5width store
336 .memloc store
336 .tmemloc store
15 rnd 110 store
*110 5 <
and
*110 973 store
*973 0 =
5 rnd 973 store
*.body 5 >
*.nrg 80 >
and
*.totalmyspecies 1000 2 mult <
and
*.maxvel .dn store
50 .repro store
*.totalmyspecies 1000 <
*.nrg 200 >
and
50 *.body 10 mult sub 0 floor .strbody store
not
*.body 1 >
and
*.body 10 mult 10 sub *.numties store
-98 312 floor 0 0 !=
*.dnalen =
*.numties 1 >
or
and
*.numties .deltie store
*.numties 0 !=
*.robage 1 >
and
*.trefxpos *.trefypos angle .setaim store
99 .sharenrg store
dupbool
*.memval 13 =
and
*.trefxpos *.xpos sub abs *.trefypos *.ypos sub abs pyth 5 div 10 sub 0 floor *.maxvel ceil .up store
*.velsx .dx store
dropbool
dupbool
*973 1 =
and
453 .tieloc store
3200 .tieval store
*.memval 13 =
and
452 .shoot store
-1 .shootval store
dropbool
dupbool
*973 2 =
and
8 .tieloc store
-31999 .tieval store
dropbool
dupbool
*973 3 =
and
452 .tieloc store
-6 .tieval store
*.memval 13 =
and
453 .shoot store
3200 .shootval store
dropbool
*973 3 >
and
452 .tieloc store
-1 .tieval store
*.memval 13 =
and
453 .shoot store
3200 .shootval store
*.numties 0 =
*.body 1 =
and
dupbool
*.eye5 0 =
*.memval *.dnalen =
or
and
350 .aimright store
dropbool
*.eye5 0 !=
and
*.memval *.dnalen *.refbody and
!=
20 >
*.totalmyspecies 600 >
or
and
*.refxpos *.refypos angle .setaim store
abs .tie inc
*.memval 13 =
and
*.velsx .dx store
*.refvelup 15 add *.maxvel ceil 0 1 !%=
floor store
216 .shoot store
1 .shootval store
stop
'''''''''''''''''''''''' Gene: 1 Ends at position 296 '''''''''''''''''''''''
--- End code ---
spike43884:
wait, its a single genus bot!
Navigation
[0] Message Index
Go to full version