Bots and Simulations > Veggies

Alga Cycling (V)(Jerry)-06.05.04

(1/1)

Jez:
'Topic: On biodiversity again  
'Jerry

' cycling alga
' or alga_seasonalis
' derived from
' Floating alga
'
' Vegetable

'* be floating *
cond
*.robage 0 =
start
500 .setboy store
stop

'* descent when ripe *
cond
*.nrg 10000 >
*.body 20000 >
start
10 *.shell sub .mkshell store
0 .setboy store
stop

'* spread seeds when deep enough,
'* then ascend again *
'* boyancy decreases with increasing age *
cond
*.nrg 5000 >
*.depth 10000 >
start
50 .repro store
15 .aimdx store
*.robage -50 div 500 add .setboy store
stop

end

Navigation

[0] Message Index