cond
*.eye5 rnd *.refeye *.myeye !=
start
*.refveldx .dx store
*.refvelup 30 add .up store
stop

cond
*.eye5 rnd >
*.refeye *.myeye !=
*.refnrg 0 >
start
-1 .shoot store
*.refvelup .up store
stop

cond
*.eye5 0 =
*.refeye *.myeye =
*.refnrg 0 = or
start
314 rnd .aimright store
stop

cond
*.nrg 24000 >
start
128 .strbody store
stop

cond
*.body 4000 >
start
50 .repro store
stop
