Jeffalish!(F1)(23-06-2010)

[Ammeh]

Code: [Select]

'Jeffalish
'Floats around, uses tentacles to catch food
'Made by sammeh

cond
*971 0 =
*53 0 =
*.robage 1 >=
start
53 inc
971 inc
stop

start
50 *.multi mult .sharenrg store
.dnalen .memloc store
stop

cond
*971 0 !=
*53 0 =
*.robage 0 =
start
.tie inc
stop

cond
*971 0 !=
*53 0 =
*.robage 1 =
start
*.aim 628 add .setaim store
stop

cond
*971 0 !=
*53 0 =
*.robage 50 mod 25 =
*.nrg 300 >
*.numties 2 <
start
50 .repro store
.tie inc
stop

cond
*971 0 !=
*53 0 !=
*.numties 4 <
*.robage 50 mod 25 =
start
*.aim 314 add .setaim store
10 .repro store
stop

cond
*971 0 !=
*53 0 =
start
*.body -- -- .fdbody 50 *.body sub sgn 0 floor -- - mult store
stop

cond
*971 0 !=
*53 0 =
*.numties 2 >
start
*.tiepres .numtie store
.deltie inc
stop

cond
*971 0 !=
*53 0 !=
*.pleas 0 >
start
*.body -- -- .fdbody 2000 *.body sub sgn 0 floor -- - mult store
stop

cond
*971 0 !=
*53 0 !=
*.pleas 0 <=
*.numties 4 =
start
*.robage 100 mod .up store
*.robage 1221 mod .setaim store
stop

cond
*971 0 !=
*53 0 =
*.robage 100 >
*.numties 0 =
start
53 inc
stop

cond
*971 0 !=
*53 0 =
*.eye5 0 >
*.refeye *.myeye !=
*.memval *.dnalen !=
start
*.refxpos *.refypos angle .setaim store
-1 .shoot store
stop

It could probably be a lot better, but it's an idea I wanted to try. seems to work for sims with lots of little bots floating around, not so well for big clumps of food.

[bacillus]

Auugh, too tired too inspect ATM. I'll look at it later today maybe, but the only thing I can really say is that you should name your variables (eg. def loc 987), or at least write a small comment here and there so we know what's going on. My DB is still not running, so I'm just going to scan for plain error...

[Lyndon]

They lag down my sim when I connect to internet mode