cond
*.robage 7500 <
*.robage 10 >
*.eye5 20 >
*.reffixed 0 = 
start
10 .shootval store
-2 .shoot store
stop

cond
*.robage 2 mod 0 =
*.robage 7500 <
*.robage 10 >
*.eye5 20 <
*.reffixed 1 = or
start
628 rnd .aimdx store
100 .shootval store
-2 .shoot store
stop

cond
*.robage 10 <
start
100 rnd .aimdx store
0 .fixpos store
'-1000 .up store
stop

cond
*.robage 10 =
start
.fixpos inc
stop

cond
1000 *.robage >
start
50 .repro store
stop

cond
*.robage 7500 =
start
0 .fixpos store
1221 .eye5width store
stop

cond
*.robage 7500 >
*.eye5 0 >
start
*.refveldx *.body mult 1000 div .dx store
*.refvelup *.body mult 1000 div 30 add .up store
stop


'Commit Suicide when old
cond
*.robage 7600 >
start
.backshot inc
1000 .shootval store
-2 .shoot store
stop

'cond
'*.robage 7500 >
'*.eye5 10 >
'start
'-6 .shoot store
'*.refvelup *.body mult 1000 div .up store
'stop

cond
*.eye5 0 =
*.robage 7500 > 
start
 -5 rnd 5 rnd add .aimdx store
100 .up store
stop

cond
*.body 1000 >
*.robage 7500 > 
start
100 .fdbody store
stop

'11 Feed - Lock and load on the victim
cond
 *.eye5 0 >
' *.eye4 *.eye6 =
 *.numties 0 =
 *.robage 7500 >
start
 77 .tie store
 77 .tienum store
' *.refvelup .up store
' *.refveldx .dx store
' *.tieang 90 sub .aimsx store
' -6 .shoot store
stop

'12 Feed through Tie
cond
*.numties 0 >
*.robage 7500 >
start
*.tiepres .tienum store
1000 .tieval store
.tieval .tieloc store
stop
end