Description Parameters/Notes Code One Line
Removes most common sources of food in the world
enum 2 3 0 kill targ next
enum 2 4 0 kill targ next
enum 2 6 0 kill targ next
enum 2 7 0 kill targ next
enum 2 8 0 kill targ next
enum 2 11 0 kill targ next
enum 2 13 0 kill targ next
enum 2 15 0 kill targ next
enum 2 23 0 kill targ next
enum 2 3 0 kill targ next enum 2 4 0 kill targ next enum 2 6 0 kill targ next enum 2 7 0 kill targ next enum 2 8 0 kill targ next enum 2 11 0 kill targ next enum 2 13 0 kill targ next enum 2 15 0 kill targ next enum 2 23 0 kill targ next
Outputs egg/population data
setv va10 totl 4 0 0
setv va11 totl 3 4 0
setv va12 game "total_population"
setv va13 game "breeding_limit"
sets va00 "Creatures: "
adds va00 vtos va10
adds va00 "/"
adds va00 vtos va12
adds va00 " :: "
adds va00 "Eggs: "
adds va00 vtos va11
adds va00 "/"
adds va00 vtos va13
outs va00
setv va10 totl 4 0 0 setv va11 totl 3 4 0 setv va12 game "total_population" setv va13 game "breeding_limit" sets va00 "Creatures: " adds va00 vtos va10 adds va00 "/" adds va00 vtos va12 adds va00 " :: " adds va00 "Eggs: " adds va00 vtos va11 adds va00 "/" adds va00 vtos va13 outs va00
C-sections all pregnant creatures (might cause problems if the creature is in a vehicle at the time)
enum 4 0 0
doif gtos 1 ne ""
seta va00 targ
sets va04 gtos 0
setv va50 1
loop
addv va50 1
untl gtos va50 = ""
subv va50 1

targ va00
setv va01 posl
addv va01 rand 14 18

setv va02 dfty
setv va03 rand 0 10
mulv va03 8

setv va99 gnus
doif va99 = 2
new: simp 3 4 2 "greneggmask" 7 1 10
elif va99 = 3
new: simp 3 4 3 "greneggmask" 7 8 10
else
new: simp 3 4 1 "eggs" 8 va03 2000
endi
pose 0
elas 10
fric 100
attr 195
bhvr 32
aero 10
accg 4
perm 60
subv va02 hght
mvsf va01 va02
doif va99 eq 1
emit 11 0.65
endi
gene move targ 1 va00 va50
setv ov01 rand 0 1
hist evnt gtos 1 11 va04 ""
hist evnt va04 12 gtos 1 ""
tick 900
endi
Next
enum 4 0 0 doif gtos 1 ne "" seta va00 targ sets va04 gtos 0 setv va50 1 loop addv va50 1 untl gtos va50 = "" subv va50 1 targ va00 setv va01 posl addv va01 rand 14 18 setv va02 dfty setv va03 rand 0 10 mulv va03 8 setv va99 gnus doif va99 = 2 new: simp 3 4 2 "greneggmask" 7 1 10 elif va99 = 3 new: simp 3 4 3 "greneggmask" 7 8 10 else new: simp 3 4 1 "eggs" 8 va03 2000 endi pose 0 elas 10 fric 100 attr 195 bhvr 32 aero 10 accg 4 perm 60 subv va02 hght mvsf va01 va02 doif va99 eq 1 emit 11 0.65 endi gene move targ 1 va00 va50 setv ov01 rand 0 1 hist evnt gtos 1 11 va04 "" hist evnt va04 12 gtos 1 "" tick 900 endi Next
Attempts to move all creatures to the hand and warns you if some creatures couldn’t be moved.
enum 4 0 0
doif seee pntr targ eq 1
addv va02 1
elif movs ne 0
addv va00 1
elif tmvf mopx mopy eq 0
addv va01 1
else
mvsf mopx mopy
addv va03 1
endi
addv va04 1
next

outv va04
outs " creatures were found ~ "
doif va03 gt 0
outv va03
outs " creatures were safely moved ~ "
endi
doif va02 gt 0
outv va02
outs " creatures were aleady nearby ~ "
endi
doif va00 gt 0
outv va00
outs " creature(s) were held back ~ "
endi
doif va01 gt 0
outv va01
outs " creature(s) could not safely move ~ "
Endi
enum 4 0 0 doif seee pntr targ eq 1 addv va02 1 elif movs ne 0 addv va00 1 elif tmvf mopx mopy eq 0 addv va01 1 else mvsf mopx mopy addv va03 1 endi addv va04 1 next outv va04 outs " creatures were found ~ " doif va03 gt 0 outv va03 outs " creatures were safely moved ~ " endi doif va02 gt 0 outv va02 outs " creatures were aleady nearby ~ " endi doif va00 gt 0 outv va00 outs " creature(s) were held back ~ " endi doif va01 gt 0 outv va01 outs " creature(s) could not safely move ~ " Endi
Attempts to move all eggs to the hand and warns you if some creatures couldn’t be moved. You can change eggs to anything else (non-autonomous) if you want in the enum line enum 3 4 0
doif seee pntr targ eq 1
addv va02 1
elif movs ne 0
addv va00 1
elif tmvt mopx mopy eq 0
addv va01 1
else
mvto mopx mopy
velo rand -5 5 rand -5 5
addv va03 1
endi
addv va04 1
next

outv va04
outs " item(s) were found ~ "
doif va03 gt 0
outv va03
outs " item(s) were safely moved ~ "
endi
doif va02 gt 0
outv va02
outs " item(s) were aleady nearby ~ "
endi
doif va00 gt 0
outv va00
outs " item(s) were held back ~ "
endi
doif va01 gt 0
outv va01
outs " item(s) could not safely move ~ "
Endi
enum 3 4 0 doif seee pntr targ eq 1 addv va02 1 elif movs ne 0 addv va00 1 elif tmvt mopx mopy eq 0 addv va01 1 else mvto mopx mopy velo rand -5 5 rand -5 5 addv va03 1 endi addv va04 1 next outv va04 outs " item(s) were found ~ " doif va03 gt 0 outv va03 outs " item(s) were safely moved ~ " endi doif va02 gt 0 outv va02 outs " item(s) were aleady nearby ~ " endi doif va00 gt 0 outv va00 outs " item(s) were held back ~ " endi doif va01 gt 0 outv va01 outs " item(s) could not safely move ~ " Endi