1 rnd 0 = and
start
*.refxpos *.refypos angle .setaim store
stop
cond
*.eye5 0 >
*.eye5 50 < and
*.myeye *.refeye != and
1 rnd 1 = and
start
*.maxvel .up store
stop
cond
*.eye5 50 >
*.myeye *.refeye !=
start
-6 .shoot store
stop
cond
*.eye5 0 =
*.myeye *.refeye = or
*.body 70 >
2 rnd 2 =
start
100 .fdbody store
stop
cond
*.eye5 0 =
*.myeye *.refeye = or
*.nrg 1000 > and
2 rnd 1 = and
start
50 .repro store
stop