Author Topic: Enitor Comesum (F2)(Numsgil)-02.06.05  (Read 2407 times)

Offline Jez

  • Bot Overlord
  • ****
  • Posts: 788
    • View Profile
Enitor Comesum (F2)(Numsgil)-02.06.05
« on: December 09, 2006, 09:11:20 AM »
Code: [Select]
'Enitor Comesum
'By Numsgil - June 2005
'2.37
'Programmed for maximum _personal_ benefit.
'Eats others of its own kind if it can win the fight
'Children run away from parent before they can get eaten by
'distracting the parent with a 'hey, look over there'.
'Not very efficient, run on largest sim size to get an
'appropriate population size for selection to start working.

'''''''''''''''''''''''''''''''''''''
'Form and break birth ties'''''''''''
'''''''''''''''''''''''''''''''''''''
cond
*.robage 2 <
start
.tie *.robage 1 add mult inc
.deltie inc
stop

'''''''''''''''''''''''''''''''''''''
'Feed on everything and anything'''''
'''''''''''''''''''''''''''''''''''''
cond
*.eye5 0 >
*.nrg 30000 <
start
-1 .shoot store
*.refveldx .dx store

*.refvelup
12000 *.eye5 div 240 sub 0 floor 30 ceil add
.up store
stop
'''''''''''''''''''''''''''''''''''''

'''''''''''''''''''''''''''''''''''''
'Turn if there's nothing to eat
'''''''''''''''''''''''''''''''''''''
cond
*.eye5 0 =
*.nrg 30000 >= or
start
1256 rnd .setaim store 'pick a random direction to look at
stop

cond
*.eye5 0 =
*.velscalar 0 =
start
100 .up store
stop
''''''''''''''''''''''''''''''''''''''

''''''''''''''''''''''''''''''''''''''
'Run from stronger foes
''''''''''''''''''''''''''''''''''''''
cond
start
*.refbody 2 div dup
stop

cond
*.eye5 0 >
*.body >
*.refeye 1 >
start
-15 .up store
stop

cond
*.eye5 50 >
*.body >
*.refeye 1 >
start
.setaim .shoot store
*.aim .shootval store
stop

''''''''''''''''''''''''''''''''''''''
'Reproduce''''''''''''''''''''''''''''
''''''''''''''''''''''''''''''''''''''
cond
*.nrg 25000 >
start
10 .repro store
stop
''''''''''''''''''''''''''''''''''''''
end
« Last Edit: May 09, 2014, 12:20:20 PM by Botsareus »
If you try and take a cat apart to see how it works, the first thing you have in your hands is a non-working cat.
Douglas Adams