def tiebreak 110

cond
*.robage 0 !=
start
*.eye5dir 25 add 1220 mod .eye5dir store

0 .tieloc store
0 .tieval store
0 .tienum store

*.robage 1 =
.waste .memloc store
.waste .tmemloc store

*.genes 1 !=
*.thisgene 1 = and
2 .delgene store

*.genes 1 !=
*.thisgene 1 != and
1 .delgene store

*.numties 0 =
*.memval 2000 > and
*.eye5 0 > and
*.refxpos *.refypos angle .setaim store
0 .eye5dir store
.tie inc

*.numties 1 =
*.tmemval 2000 > and
.shootval .tieloc store
-32000 .tieval store

*.numties 1 =
*.numties .tienum store

10 rnd 5 =
*.nrg 3000 > and
*.body 1000 > and
50 .repro store
70 .aimsx store
stop
