Author Topic: Coloniser(MB)(Spike43884)10-25-2014  (Read 825 times)

Offline Botsareus

  • Society makes it all backwards - there is a good reason for that
  • Moderator
  • Bot God
  • *****
  • Posts: 4483
    • View Profile
    • DJ Paul Kononov
Coloniser(MB)(Spike43884)10-25-2014
« on: October 26, 2014, 11:18:16 AM »
Code: [Select]
'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  '''''''''''''''''''''''
« Last Edit: June 09, 2015, 04:16:16 PM by Botsareus »

Offline spike43884

  • Bot Overlord
  • ****
  • Posts: 656
    • View Profile
    • OurIllogicalWorld Blog
Re: Coloniser(MB)(EVO)(Spike43884)10-25-2014
« Reply #1 on: November 22, 2014, 03:33:38 PM »
wait, its a single genus bot!
Autism can allow so much joy, and at the same time sadness to be seen. Our world is weird, and full of contradiction everywhere, yet somehow at moments seems to come together, and make near perfect sense.