cond *.tin1 1 = start 1 .tout1 store stop cond *.multi 1 = *.tin1 1 = start 50 .sharenrg store stop cond *.body *.nrg != start *.nrg *.body sub 0 floor .strbody store *.body *.nrg sub 0 floor .fdbody store stop cond *.multi 1 = start 1 .tielen1 store 628 .tieang1 store stop cond *.chlr 0 > start *.chlr .rmchlr store stop cond *.eye5 0 > *.numties 0 = start .tie inc stop cond *.multi 1 = start 50 .shareslime store 50 .shareshell store stop cond *.numties 0 = start 314 rnd .aimsx store stop cond *.slime 100 < *.nrg 7000 > start 100 *.slime sub .mkslime store stop cond *.shell 1000 < *.nrg 3000 > start 1000 *.shell sub .mkshell store stop cond *.poison 100 < *.nrg 3000 > start 100 *.poison sub .mkpoison store stop cond *.robage 0 = start .shoot .ploc store -2 .pval store stop cond *.numties 1 > start *.tiepres .deltie store stop cond *.nrg 5000 > *.body 5000 > start 50 .repro store stop