def friend 50 def food 51 start *.xpos .out1 store *.ypos .out2 store stop cond *.refveldx 0 > *.refvelup 0 > or *.refxpos *.in1 %= *.refypos *.in2 %= and and *.refveldx 0 = *.refvelup 0 = or *.refxpos *.in1 = *.refypos *.in2 = and and or *.in1 *.out1 != and *.in2 *.out2 != and *.friend 1 != and start .friend inc *.food 1 = .food dec dropbool stop cond *.refveldx 0 > *.refvelup 0 > or *.refxpos *.in1 !%= *.refypos *.in2 !%= or and *.refveldx 0 = *.refvelup 0 = or *.refxpos *.in1 != *.refypos *.in2 != or and or *.in1 *.out1 = or *.in2 *.out2 = or *.food 1 != and start .food inc *.friend 1 = .friend dec dropbool stop cond *.eye5 0 = start *.friend 1 = .friend dec dropbool *.food 1 = .food dec dropbool 314 rnd .aimdx store stop cond *.eye5 0 > *.food 1 = start *.refxpos *.refypos angle .setaim store *.refveldx .dx store *.eye5 50 => -6 .shoot store *.refvelup .up store dropbool *.eye5 50 < 20 *.refvelup add .up store dropbool stop cond *.eye5 0 > *.friend 1 = start 314 rnd .aimdx store 40 .dn store stop cond *.body 1000 > start 20 .repro store stop cond *.waste 100 >= start -4 .shoot store *.waste .shootval store stop