'Alga Stratificus
'Alga that likes to live in a very tightly controlled depth
'it floats up in the daytime and down again at night
cond
*.daytime 0 =
*.depth 5000 !%=
start
*.depth 5000 sub .setboy store
stop
cond
*.daytime 1 =
*.rdboy 2000 !=
start
2000 .setboy store
stop
cond
*.depth 1000 <
*.nrg 3000 >
start
50 .repro store
50 .aimdx store
stop
end