Messages

316

Veggies / Re: Caterpillar Chloroplastus(Veggie)spork22

« on: May 30, 2014, 04:52:55 PM »

Well, I tried it, I made the caterpillar a plant. It's not very interesting, but here's the code:

'Caterpillar
'Moves by extending and retracting ties.
'V0.1 kind of in development. That is also the reason the bot is also filled with useless genes, and ineffiecient.
'If anyone is interested in the way it moves it is under the head "'moving with ties, yes with ties."
'It will win the MB-league, but having much trouble doing it. Some changes broke the original design, I don't know what changes yet.
'Made by Peter
'Made 04-11-08

def time 100
def head 101
def move 102
def Mvel 971
def maxlengh 972
def stiftie 973
def phycics 974
def angle 104

'Split MB
cond
*.nrg 5000 >
*.body 2000 >
start
.deltie inc
stop

'first ever bot
cond
*.maxlengh 0 =
start
1000 .maxlengh store
100 .stiftie store
stop

'reproduce
cond
*.numties 0 =
*.robage 0 !=
start
50 .repro store
1 .head store
1 .tout3 store
stop

'birth turn
cond
*.trefage *.refage =
*.robage 2 >
start
628 .aimdx store
stop

cond
*.robage 0 =
start
.shoot .ploc store
.tie inc
14 .time store
628 .angle store
-30 .eye1width store
157 .eye1dir store
-30 .eye9width store
-157 .eye9dir store
stop

'I'm old and no MB, strange.
cond
*.robage 1 >
*.numties 0 =
start
100 .aimdx store
stop

'Head-change
cond
*.edge 1 =
*.refkills 1 add *.in6 =
*.eye5 0 !=
and
or
*.reftype 1 =
or
*.head 0 !=
and
start
500 .aimdx store
'0 .head store
'0 .tout3 store
stop

cond
*.99 0 !=
start
.99 dec
stop

cond
*.robage 2 >
*.tin3 0 =
*.head 0 =
start
1 .head store
1 .tout3 store
10 .99 store
stop

'MB-sharing stuff
cond
*.numties 1 =
*.trefage *.tin1 =
start
.tienum inc
*.stiftie .stifftie store
50 .sharenrg store
stop

cond
*.eye1 0 =
*.eye2 0 =
*.eye3 0 =
*.eye4 0 =
*.eye5 0 =
*.eye6 0 =
*.eye7 0 =
*.eye8 0 =
*.eye9 0 =
start
'*.angle
628 .fixang store
stop

cond
*.head 1 =
*.eye2 0 =
*.eye3 0 =
*.eye4 0 =
*.eye5 0 =
*.eye6 0 =
*.eye7 0 =
*.eye8 0 =
start
0 .move store
0 .tout2 store
*.eye1 0 !=
400 .aimsx store
-350 .angle store
*.eye9 0 !=
*.eye1 0 =
and
-400 .aimsx store
'350 .angle store
'200 .maxlengh store
'*.maxvel *.phycics ++ 2 sub .dx
stop

'direction
cond
*.eye5 0 =
start
*.eye2 0 !=
45 .aimsx store
*.eye8 0 !=
-45 .aimsx store
*.eye3 0 !=
30 .aimsx store
*.eye7 0 !=
-30 .aimsx store
*.eye4 0 !=
15 .aimsx store
*.eye6 0 !=
-15 .aimsx store
stop

'moving with ties, yes with ties.


'second step body
cond
*.move 1 !=
*.head 0 =
*.trefage *.time mod *.time 2 div >
start
*.maxlengh .fixlen store
1 .fixpos store
stop

'second step head
cond
*.move 1 !=
*.head 0 !=
*.trefage *.time mod *.time 2 div >
start
0 .fixpos store
'*.eye9 *.eye1 sub 2 mult .aimdx store
stop

'first step body
cond
*.move 1 !=
*.head 0 =
*.trefage *.time mod *.time 2 div <
start
1 .fixlen store
0 .fixpos store
stop

'second step head
cond
*.move 1 !=
*.head 0 !=
*.trefage *.time mod *.time 2 div <
start
1 .fixpos store
stop

'Different phycics section
'just a try to let it survive in F1-conditions
'It stays bad with weak phycics, it needs friction for stability.
cond
*.tielen 1000 >
start
1 .phycics store
'10 .stifftie store
stop

cond
*.phycics 1 =
start
200 .maxlengh store
50 .stiftie store
stop

cond
*.phycics 0 =
*.eye1 0 =
*.eye2 0 =
*.eye3 0 =
*.eye4 0 =
*.eye5 0 =
*.eye6 0 =
*.eye7 0 =
*.eye8 0 =
*.eye9 0 =
start
1000 .maxlengh store
stop

'Shooting section
cond
*.reftype 0 =
*.eye5 0 >
*.eye5 40 <
*.refkills 1 add *.in6 !=
start
100 .maxlengh store
*.refxpos *.refypos angle .setaim store
-10 .shootval store
-6 .shoot store
0 .tout2 store
0 .move store
'1 .fixlen store 'added line
stop

cond
*.eye5 45 >
*.refeye 0 =
*.pain 100 <
and
start
1 .fixpos store
1 .fixlen store
stop

cond
*.eye5 39 >
*.refkills 1 add *.in6 !=
*.reftype 0 =
start
100 .maxlengh store
1 .tout2 store
1 .move store
*.refxpos *.refypos angle .setaim store
8 .shootval store
*.refpoison *.refshell =>
-6 .shoot store
*.refpoison *.refshell <
-1 .shoot store
stop

'Did you, did you just shoot at me.
cond
*.shflav 0 !=
*.shflav -2 !=
start
*.shang .aimshoot store
25 .shootval store
0 .shflav store
*.refpoison *.refshell =>
-6 .shoot store
*.refpoison *.refshell <
-1 .shoot store
stop



'body
cond
*.nrg 500 >
*.nrg *.body >
start
100 .strbody store
stop

cond
*.nrg 200 <
start
100 .fdbody store
stop

'?onspec
cond
start
*.kills 1 add .out6 store
.tout1 inc
*.tin2 .move store
stop

'let it move, for now.
cond
'*.eye1 0 =
'*.eye5 0 =
'*.eye9 0 =
'*.refkills 1 add *.in6 =
1 1 =
'or
start
0 .move store
0 .tout2 store
stop

'Sight communication
cond
*.edge 1 !=
*.refkills 1 add *.in6 !=
or
*.reftype 1 !=
or
*.head 0 =
and
*.eye5 0 !=
start
*.eye5 .tout4 store
stop

'order body
cond
*.head 0 =!
start
*.aimsx .tout5 store
stop

'body move
cond
*.head 0 =
start
*.tin5 .aimsx store
stop

'defence

cond
*.vloc .shoot !=
start
-2 .venval store
.shoot .vloc store
stop

'poison reloading
cond
*.numties 0 !=
*.poison 400 <
*.nrg 1100 >
start
100 .strpoison store
stop

'increasing shell
cond
*.numties 0 !=
*.shell 250 <
*.nrg 1500 >
start
100 .mkshell store
stop

cond
*.numties 1 >
start
*.tiepres .deltie store
stop

'look veggie, waste.
cond
*.waste 100 >
*.refeye 0 =
*.reftie 0 =
start
*.waste .shootval store
-4 .shoot store
stop

cond 'new gene from Botsareus and Panda
  *.chlr
  *.light
  <
start
160 .mkchlr store
stop

'the end
end

317

Veggies / Re: Caterpillar Chloroplastus(Veggie)spork22

« on: May 30, 2014, 04:45:00 PM »

You mean one that doesn't cheat and take over everything because it gets infinite energy?

318

Veggies / Lovebot Chloroplastus(Veggie)(spork22)

« on: May 29, 2014, 08:12:26 PM »

The next "veggiefied" robot, this was the Lovebot, and I added the chloroplast gene. Again, I take no credit for typing anything at all. All I did was copying and pasting.

I just put this little guy in my simulator and left it alone. When it became "day" and I returned, they were everywhere! They seem to multiply rapidly in the day, but quickly die off at night.  This makes them good for a toggleable food source.

Here's the code.

'Lovebot (F2) : 30-03-08
'Make love not war !
'By Moonfisher, v0.01
'First draft for a rape bot
'Would probably be more effective SG'fied with a propper conspec
'But this way is more fun.
'Sometimes causes a crash in 2.43.1e though

def repspin 122
def original 971
def birthx 972
def birthy 973

def origkey 1234

cond
*.robage 0 =
start
*.tiepres .deltie store
.sexrepro .vloc store
99 .venval store
100 .eye5width store
.shoot .memloc store
stop

cond
*.robage 2 <
*.nrg 3000 %=
*.body 1000 %=
*.totalmyspecies 6 <
*.totalbots 21 <
start
.origkey .original store
stop

cond
*.fixpos 0 !=
start
0 .fixpos store
stop

cond
*.body 100 <
*.nrg 500 >
start
100 .strbody store
stop

cond
*.body 50 >
*.nrg 100 <
start
100 .fdbody store
stop

cond
*.venom 50 <
*.nrg 100 >
start
10 .strvenom store
stop

cond
*.shell 200 <
*.nrg 100 >
start
10 .mkshell store
stop

cond
*.shell 50 <
*.nrg 300 >
start
100 *.shell sub .mkshell store
stop

cond
*.eyef 0 =
*.robage 20 mod 10 <
start
20 .up store
stop

cond
*.eyef 0 =
*.robage 20 mod 10 >=
start
*.aim 70 add .setaim store
stop

cond
*.refshoot *.myshoot =
*.robage 20 mod 10 <
start
10 .dx store
stop

cond
*.refshoot *.myshoot =
*.robage 20 mod 10 >=
start
*.aim 70 add .setaim store
stop

cond
*.refshoot *.myshoot !=
*.eyef 0 >
start
*.refxpos *.refypos angle .setaim store
*.refxpos *.xpos sub abs *.refypos *.ypos sub abs pyth 10 div 20 sub 0 floor *.refvelup add .up store
*.refveldx .dx store
*.refxpos .birthx store
*.refypos .birthy store
stop

cond
*.shoot -2 =
start
*.refveldx 30 add .dx store
stop

cond
*.refshoot *.myshoot !=
*.eyef 0 >
*.refshoot 0 =
*.refeye 0 =
*.refshell 0 =
*.refpoison 0 =
*.refvenom 0 =
*.memval 0 =
*.original .origkey !=
start
0 .up store
30 .dn store
*.aim 682 add .setaim store
stop

cond
*.poisoned 0 !=
start
0 .up store
*.refvelup 50 add .dn store
stop

cond
*.pain 50 >
*.shflav -2 !=
*.shflav 0 !=
start
*.pain .dx store
stop

cond
*.body 100 >=
*.nrg 500 >=
*.repspin 0 =
start
1 .repspin store
stop

cond
*.body 100 >=
*.nrg 500 >=
*.repspin 0 >
*.repspin 6 <
start
*.aim 341 add .setaim store
50 .repro store
.repspin inc
stop

cond
*.repspin 5 >
*.robage 20 mod 0 =
start
0 .repspin store
stop

cond
*.robage 1 =
start
*.birthx *.birthy angle .setaim store
stop

cond
*.robage 6 <
*.robage 1 >
*.refshoot *.myshoot =
*.eyef 0 = or
start
*.aim 341 add .setaim store
stop

cond
*.shflav -2 =
*.original .origkey =
start
1 .fixpos store
stop

cond
*.shflav -2 =
*.original .origkey !=
start
100 .up store
stop

cond
*.shflav 0 !=
start
0 .shflav store
stop

cond
*.body 300 >
start
3000 .fdbody store
stop

cond
*.refshoot *.myshoot !=
*.eyef 0 >
*.robage 3 mod 0 =
start
-3 .shoot store
0 .shootval store
stop

cond
*.refshoot *.myshoot !=
*.eyef 0 >
*.robage 3 mod 1 =
start
-8 .shoot store
0 .shootval store
stop

cond
*.refshoot *.myshoot !=
*.eyef 0 >
*.robage 3 mod 2 =
*.refbody 100 >
*.refnrg 300 >
start
.sexrepro .shoot store
99 .shootval store
stop

cond
*.refshoot *.myshoot !=
*.eyef 0 >
*.refshoot 0 =
*.refeye 0 =
*.refshell 0 =
*.refpoison 0 =
*.refvenom 0 =
*.memval 0 =
*.original .origkey =
*.robage 5 >
start
-1 .shoot store
*.nrg 20 div 10 ceil .shootval store
stop

cond
*.original .origkey !=
*.shoot -1 =
*.shoot -6 = or
start
0 .shoot store
0 .shoot store 'Remove or add shoots if another bot has the same amount
0 .shoot store
0 .shoot store
0 .shoot store
0 .shoot store
0 .shoot store
0 .shoot store
0 .shoot store
0 .shoot store
0 .shoot store
0 .shoot store
0 .shoot store
0 .shootval store
stop

cond
*.refshoot *.myshoot =
*.eyef 0 >
start
0 .shoot store
0 .shootval store
stop

cond
*.robage 20 >
*.refshoot *.myshoot =
*.eyef 0 >
*.nrg 1000 >
*.refnrg 1000 <
start
*.refxpos *.refypos angle .setaim store
*.refxpos *.xpos sub abs *.refypos *.ypos sub abs pyth 10 div 20 sub 0 floor *.refvelup add .up store
*.refveldx .dx store
0 .dn store
-2 .shoot store
*.eyef 50 sub 0 floor 50 ceil .shootval store
stop

cond 'new gene from Botsareus and Panda
  *.chlr
  *.light
  <
start
160 .mkchlr store
stop

end

319

DNA - General / Buggers

« on: May 29, 2014, 07:47:17 PM »

I'd like some help in making a bot, which I want to call the Formica Dominatus. It will be divided into two types: the Queens and the Drones.
Queens are defined as the largest of all of the Formica. It is protected by the drones that it makes. Drones are the soldiers. The queens and the drones communicate immediately with each other. When a drone finds food, instantly, every other Formica knows where it is and attacks the target. Every drone has a set limit to how much energy it can have. When it gets too much, it returns to the queen and gives the excess energy to the queen. In this way, the queen stays fed. When food is not found altogether, all the drones return to the queen and protectively circle around it. If, by accident, a drone gets larger than the queen, that drone becomes the new queen, and the old queen becomes a drone, which goes to the new queen and gives all it's excess energy to the queen until it reaches the set energy limit for a drone.

The drones could also use a bit of common sense when picking targets, choosing them by their size, amount of energy, how hard it is to kill them, etc..

320

F1 bots / Re: Everlivus Influenzus(F1_EVO)(Spork22)5.23.2014

« on: May 29, 2014, 07:03:07 PM »

The "zombie bots" actually display a unique behavior: Instead of attempting to devour whatever they chase, they're attempting to feed their victim energy for when they infect it. This might be both an advantage and a disadvantage. The advantage is that since they're feeding their target, when it gets infected, it has more energy to survive longer and spread the zombie infection. On the other hand, viruses cannot be aimed, and if the zombie releases all of it's energy and fails to infect it's target, it dies, and all the target gets is a free meal.

321

Veggies / Re: Hexagonis 2 Chloroplastus(Veggie)(spork22)

« on: May 26, 2014, 07:00:20 PM »

I figured out one possibly effective way to kill them: using a Jeffalish with a chloroplast gene put into it as an energy source for the Dominator Invincibalis, which  should effectively spread itself everywhere and kill the Hexagonis Chloroplastus 2.

322

Veggies / Re: Hexagonis 2 Chloroplastus(Veggie)(spork22)

« on: May 26, 2014, 02:46:28 PM »

One would expect it to move with ties, but it doesn't. It skips about by reproducing, it looks like. This is one benefit of bots that work together.

323

Veggies / Hexagonis 2 Chloroplastus(Veggie)(spork22)

« on: May 25, 2014, 04:13:33 PM »

I'll attach them as files.
I give no credit to myself for these. I merely did the copying and pasting.
So, I thought that Hexagonis 2 had some potential. I'm not very experienced with coding the bots, so I instead copied the chloroplast genes from the Everlivus Influenzus and the Alga Minimalis Chloroplastus. And I created a monster. I advise putting it in the Veggies category immediately since it uses chloroplasts.

If anyone has a bot that can quickly destroy these guys in an advanced stage of development, please tell me where I can get it!

324

F1 bots / Re: Everlivus Influenzus(F1_EVO)(Spork22)5.23.2014

« on: May 25, 2014, 01:15:04 PM »

Yeah, after studying it more, it seems to use more than one virus. One may be from the Shell Maker, and another one might be from the Alga Pollinator. the Alga Pollinator's virus takes over the host and makes it move into the plant while releasing all of it's energy, at least, I think that's it's purpose. In the Everlivus Influenzus, the same virus gets a little confused when it infects it's targets. If there is a bot close to the infected one, plant or not, it will be attacked.

325

Biology / Re: zombie ants! nature is the coolest

« on: May 23, 2014, 06:23:22 PM »

Well, this evolved bot that came from the Shell Maker bot uses a virus to turn whatever tries to eat it against it's buddies. It's not like a fungus at all, but it has the same effect.

http://forum.darwinbots.com/index.php/topic,6380.0.html

I'm actually interested in how it's doing that.

326

Mutations / Everlivus Influenzus(F1_EVO)(Spork22)5.23.2014

« on: May 23, 2014, 06:17:48 PM »

A mutated result of the Shell Maker, at least, I think that's what it evolved from. It evolved to some sort of plant (is that possible?) and it's using a virus to turn whatever's trying to eat it turn against it's friends like a zombie. Well, really, it makes them compulsively run toward the nearest bot endlessly. It lives for a very long time too.

I really don't know what it belongs to. My guess is F1, since it uses viruses..

Further investigation makes it seem like it has more than one type of virus. It takes a really long time to reproduce, too.

Here's the code:

Code: [Select]

'#generation: 3
'#mutations: 50
 cond
 *.thisgene 7 <
 & *.tiepres .deltie store
 0 .repro store
 0 .shoot multstore
 .mass sqrstore
 store
 500 .vshoot store
 1 .delgene store
 stop
''''''''''''''''''''''''  Gene:  1 Ends at position  24  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  2 Ends at position  59  '''''''''''''''''''''''
 cond
 *.eye5 0 >
 *.myeye !=
 start
 *.tiepres .deltie store
 *.refveldx .dx store
 *.refvelup 50 add .up store
 stop
''''''''''''''''''''''''  Gene:  3 Ends at position  78  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  4 Ends at position  113  '''''''''''''''''''''''
 cond
 swapbool
 -27 >
 *.eye5 30 <
 *.refeye *.myeye !=
 start
 multstore
 .eye8 store
 *.refveldx .dx store
 *.refvelup 50 add .up store
 stop
''''''''''''''''''''''''  Gene:  5 Ends at position  136  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  6 Ends at position  171  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *489 -7 !%=
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 6 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  7 Ends at position  206  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  8 Ends at position  235  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  9 Ends at position  270  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  10 Ends at position  299  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  11 Ends at position  334  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  12 Ends at position  369  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  13 Ends at position  404  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  14 Ends at position  439  '''''''''''''''''''''''
 cond
 *.eye5 0 =
 *.refeye *.myeye =
 or
 start
 *.tiepres .deltie store
 50 mult .sx store
 45 .aimright store
 stop
''''''''''''''''''''''''  Gene:  15 Ends at position  459  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  16 Ends at position  494  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  17 Ends at position  529  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  18 Ends at position  564  '''''''''''''''''''''''
 cond
 *21 0 =
 start
 618 rnd 618 rnd add rnd 101 floor .aimleft store
 *.chlr *.light <
 100 .mkchlr store
 clearbool
 .fixpos inc
 stop
''''''''''''''''''''''''  Gene:  19 Ends at position  589  '''''''''''''''''''''''
 cond
 *.eye5 30 >
 *.refeye *.myeye !=
 start
 *.tiepres .deltie store
 -1 .shoot store
 stop
''''''''''''''''''''''''  Gene:  20 Ends at position  604  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  21 Ends at position  639  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos anglecmp 21 sqrstore
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  22 Ends at position  674  '''''''''''''''''''''''
 cond
 *.nrg 1000 >
 *.body 1000 >
 start
 50 .repro store

''''''''''''''''''''''''  Gene:  23 Ends at position  685  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  24 Ends at position  720  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  25 Ends at position  749  '''''''''''''''''''''''
 cond
 *21 0 =
 start
 618 rnd 618 rnd add rnd 101 floor .aimleft store
 *.chlr *.light <
 100 .mkchlr store
 216 stop
''''''''''''''''''''''''  Gene:  26 Ends at position  772  '''''''''''''''''''''''
 cond
 7 *989 !=
 start
 *.eyef 0 =
 10 .up store
 not
 *.refxpos *.refypos angle .setaim store
 *.refvelup 5 add .up store
 *.refveldx .dx store
 -8 .shoot store
 *.thisgene .mkvirus store
 50 .vshoot store
 stop
''''''''''''''''''''''''  Gene:  27 Ends at position  807  '''''''''''''''''''''''

'#hash: 8XCU0@8FmZ&0^&yTMgWy