'initializing eye configuration cond *.robage 0 = start 420 .eye1dir store 315 .eye2dir store 210 .eye3dir store 105 .eye4dir store -105 .eye6dir store -210 .eye7dir store -315 .eye8dir store -420 .eye9dir store 105 .eye1width store 105 .eye2width store 105 .eye3width store 105 .eye4width store 105 .eye5width store 105 .eye6width store 105 .eye7width store 105 .eye8width store 105 .eye9width store stop 'setting friend "1" or foe "0" status cond *.refeye *.myeye = start 1 *.focuseye 5 add 9 mod 60 add store stop 'eye1 specific cond *.eye1 *51 5 !~= *.eye1 *52 5 ~= *62 1 = and *.eye1 *59 5 ~= *69 1 = and or start 1 61 store stop cond *.eye1 *51 5 !~= *.eye1 *52 5 !~= *.eye1 *59 5 !~= start 0 61 store stop cond *.eye1 0 = start 0 61 store stop 'eye2 specific cond *.eye2 *52 5 !~= *.eye2 *53 5 ~= *63 1 = and *.eye2 *51 5 ~= *61 1 = and or start 1 62 store stop cond *.eye2 *52 5 !~= *.eye2 *53 5 !~= *.eye2 *51 5 !~= start 0 62 store stop cond *.eye2 0 = start 0 62 store stop 'eye3 specific cond *.eye3 *53 5 !~= *.eye3 *54 5 ~= *64 1 = and *.eye3 *52 5 ~= *62 1 = and or start 1 63 store stop cond *.eye3 *53 5 !~= *.eye3 *54 5 !~= *.eye3 *52 5 !~= start 0 63 store stop cond *.eye3 0 = start 0 63 store stop 'eye4 specific cond *.eye4 *54 5 !~= *.eye4 *55 5 ~= *65 1 = and *.eye4 *53 5 ~= *63 1 = and or start 1 64 store stop cond *.eye4 *54 5 !~= *.eye4 *55 5 !~= *.eye4 *53 5 !~= start 0 64 store stop cond *.eye4 0 = start 0 64 store stop 'eye5 specific cond *.eye5 *55 5 !~= *.eye5 *56 5 ~= *66 1 = and *.eye5 *54 5 ~= *64 1 = and or start 1 65 store stop cond *.eye5 *55 5 !~= *.eye5 *56 5 !~= *.eye5 *54 5 !~= start 0 65 store stop cond *.eye5 0 = start 0 65 store stop 'eye6 specific cond *.eye6 *56 5 !~= *.eye6 *57 5 ~= *67 1 = and *.eye6 *55 5 ~= *65 1 = and or start 1 66 store stop cond *.eye6 *56 5 !~= *.eye6 *57 5 !~= *.eye6 *55 5 !~= start 0 66 store stop cond *.eye6 0 = start 0 66 store stop 'eye7 specific cond *.eye7 *57 5 !~= *.eye7 *58 5 ~= *68 1 = and *.eye7 *56 5 ~= *66 1 = and or start 1 67 store stop cond *.eye7 *57 5 !~= *.eye7 *58 5 !~= *.eye7 *56 5 !~= start 0 67 store stop cond *.eye7 0 = start 0 67 store stop 'eye8 specific cond *.eye8 *58 5 !~= *.eye8 *59 5 ~= *69 1 = and *.eye8 *57 5 ~= *67 1 = and or start 1 68 store stop cond *.eye8 *58 5 !~= *.eye8 *59 5 !~= *.eye8 *57 5 !~= start 0 68 store stop cond *.eye8 0 = start 0 68 store stop 'eye9 specific cond *.eye9 *59 5 !~= *.eye9 *51 5 ~= *61 1 = and *.eye9 *58 5 ~= *68 1 = and or start 1 69 store stop cond *.eye9 *59 5 !~= *.eye9 *51 5 !~= *.eye9 *58 5 !~= start 0 69 store stop cond *.eye9 0 = start 0 69 store stop 'the focuseye is set cond *.robage 20 mod 0 != start 5 .focuseye *.eye1 sgn abs mult *61 1 sub abs mult store 6 .focuseye *.eye2 sgn abs mult *62 1 sub abs mult store 7 .focuseye *.eye3 sgn abs mult *63 1 sub abs mult store 8 .focuseye *.eye4 sgn abs mult *64 1 sub abs mult store 9 .focuseye *.eye5 sgn abs mult *65 1 sub abs mult store 1 .focuseye *.eye6 sgn abs mult *66 1 sub abs mult store 2 .focuseye *.eye7 sgn abs mult *67 1 sub abs mult store 3 .focuseye *.eye8 sgn abs mult *68 1 sub abs mult store 4 .focuseye *.eye9 sgn abs mult *69 1 sub abs mult store stop 'the visual memory is stored cond start *.eye1 51 store *.eye2 52 store *.eye3 53 store *.eye4 54 store *.eye5 55 store *.eye6 56 store *.eye7 57 store *.eye8 58 store *.eye9 59 store stop 'set and fire cond start *.refxpos *.refypos angle -1 mult *.aim add .aimshoot store stop cond *.eyef 20 > *.refeye *.myeye != start -1 .shoot store stop end