'shootfeeding preditor
'by shadowgod

cond
*.robage 1 <=
start
.fixpos .vloc store
1 .venval store
628 .aimsx store
stop

cond
*.nrg 2000 >
*.slime 200 <
start
200 .mkslime store
stop

cond
*.nrg 2000 >
*.venom 200 <
start
200 .strvenom store
stop

'hunt

start
*.eye3 *.eye7 sub .aimsx store
stop

cond
*.eye5 50 <
*.refeye *.myeye = or
start
2 .up store
stop

cond
*.refbody 2000 >=
*.edge *.reftype add 0 > or
start
314 rnd .aimsx store
stop

'feeding

cond
*.tiepres *50 !=
*.tiepres 0 >
start
*.tiepres .tienum store
.tieval .tieloc store
1000 .tieval store
stop

cond
*.myeye *.refeye !=
*.eye5 50 >
*.refbody 2000 <=
start
1 rnd 2 mult 3 sub .shoot store
*.refvelup .up store
stop

'repro

cond
*.body 200 >
start
50 .repro store
stop