'simple multibot

def job 50
def fixtie 51

' - Gene 1 -
' Fix the Tie

cond
   *.multi 1 =
   *.fixtie 1 =
start
50 .sharenrg store 
 1 .tienum store
 628 .fixang store
 150 .fixlen store
 20 .stifftie store
0 .fixtie store
stop

' - Gene 2 -
' Head ties to Tail and gets ready for fixing
cond
   *.robage 0 =
start
 1 .tie store
 1 .job store
 1 .fixtie store
stop

' - Gene 3 -
' Lone bot repros the Head bot and gets ready for fixing
cond
   *.numties 0 =
   *.robage 0 !=
start
 50 .repro store
 2 .job store
 1 .fixtie store
 15 .aimright store
stop

' - Gene 4 -
' Start Repro Loop
cond
   *.nrg 30000 >
   *.multi 1 =
 *.eye5 30 <
 *.job 1 =
start
 1 .deltie store
stop

' - Gene 5 -
' multi gene??
cond
*.numties 1 =
*.multi 1 =
start
50 .sharenrg store        
stop

' choosing direction
cond
 *.eye5 0 >
 *.eye5 45 <
 *.refeye *.myeye !=
   *.multi 1 =
   *.fixtie 0 =
 *.job 1 =
start
*.refxpos *.refypos angle .setaim store
*.refveldx .dx store
*.refvelup 30 add .up store
stop

'shoot
cond
 *.refeye *.myeye !=
   *.multi 1 =
   *.fixtie 0 =
start
10 .schootval store
-6 .shoot store
stop

'body strenght
cond
 *.nrg 4000 >
 *.body 1000 <
 start
 100 .strbody store
 stop