Again, like most of my bots, I take no credit for making any of these genes. I only moved them around.
I liked Alga Reactum (an autotroph that reproduces when attacked) a lot, but, like most things that reproduce too much, they eventually become tiny and die.
So, to fix this, I added a chloroplast gene and a gene that manages their size. This was the result:
Alga Reactum
'Vegetable
'
'This plant will reproduce if it is attacked.
cond
*.shup 0 !=
*.shdn 0 != or
*.shdx 0 != or
*.shsx 0 != or
'*.nrg 10000 > or
start
60 .aimdx store
50 .repro store
stop
cond
*.numties 0 >
start
99 .repro store
stop
cond 'new gene from Botsareus and Panda
*.chlr
*.light
<
start
160 .mkchlr store
stop
def nrgratio 100
start
10 dup *.nrgratio sub sgn abs .nrgratio mult store
100 .strbody *.nrg *.body 10 div *.nrgratio ++ mult sub sgn 0 floor mult store
100 .fdbody *.body 10 div *.nrgratio mult *.nrg sub sgn 0 floor mult *.body 100 sub sgn 0 floor mult store
stop
end