Author Topic: Jeffalish!(F1_MB)(Ammeh)(23-06-2010)  (Read 718 times)

Offline Botsareus

  • Society makes it all backwards - there is a good reason for that
  • Moderator
  • Bot God
  • *****
  • Posts: 4483
    • View Profile
    • DJ Paul Kononov
Jeffalish!(F1_MB)(Ammeh)(23-06-2010)
« on: May 07, 2014, 11:05:03 AM »
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
« Last Edit: August 02, 2014, 12:27:26 PM by Botsareus »