I know I sais I wasn't gonna be making bots atm, but saw Nano and just had to try something like that. although this things is less random...
'1 store bot
'Moonfisher
'1 store bot
'Moonfisher
cond
start
*.tiepres *.robage 1 sub dup div 1 sub abs mult 220 *.robage 0 sub dup div 1 sub abs mult add 535 *.robage 2 sub dup div 1 sub abs mult add 1000 *.nrg *.body 2 mult sub sqr dup div *.eyef 0 sub dup div 1 sub abs mult *.body 3000 sub -1 mult sqr dup div mult *.robage 2 sub sqr dup div mult *.numties 0 sub dup div 1 sub abs mult mult add *.refxpos *.refypos angle *.robage 2 sub sqr dup div *.eyef 0 sub sqr dup div mult *.memval 220 sub dup div mult *.robage 3 mod 0 sub dup div 1 sub abs mult *.numties 0 sub dup div 1 sub abs mult mult add 10 *.robage 2 sub sqr dup div *.eyef 0 sub sqr dup div mult *.memval 220 sub dup div mult *.robage 3 mod 1 sub dup div 1 sub abs mult *.numties 0 sub dup div 1 sub abs mult mult add -1 *.robage 2 sub sqr dup div *.eyef 0 sub sqr dup div mult *.memval 220 sub dup div mult *.robage 3 mod 2 sub dup div 1 sub abs mult *.numties 0 sub dup div 1 sub abs mult mult add 50 *.eyef 0 sub dup div 1 sub abs *.body 3000 sub sqr dup div mult *.robage 2 sub sqr dup div mult *.numties 0 sub dup div 1 sub abs mult mult add 20 *.eyef 0 sub sqr dup div *.memval 220 sub dup div 1 sub abs mult *.numties 0 sub dup div 1 sub abs mult mult add 3 *.eyef 0 sub dup div 1 sub abs *.robage 2 sub sqr dup div mult *.body 2999 sub -1 mult sqr dup div mult *.body *.nrg 2 div sub sqr dup div mult *.numties 0 sub dup div 1 sub abs mult mult add *.tiepres *.numties 0 sub sqr dup div *.robage 2 sub sqr dup div mult mult add 467 *.robage 1 sub dup div 1 sub abs mult 535 *.robage 0 sub dup div 1 sub abs mult add 474 *.robage 2 sub dup div 1 sub abs mult add 313 *.nrg *.body 2 mult sub sqr dup div *.eyef 0 sub dup div 1 sub abs mult *.body 3000 sub -1 mult sqr dup div mult *.robage 2 sub sqr dup div mult *.numties 0 sub dup div 1 sub abs mult mult add 19 *.robage 2 sub sqr dup div *.eyef 0 sub sqr dup div mult *.memval 220 sub dup div mult *.robage 3 mod 0 sub dup div 1 sub abs mult *.numties 0 sub dup div 1 sub abs mult mult add 1 *.robage 2 sub sqr dup div *.eyef 0 sub sqr dup div mult *.memval 220 sub dup div mult *.robage 3 mod 1 sub dup div 1 sub abs mult *.numties 0 sub dup div 1 sub abs mult mult add 7 *.robage 2 sub sqr dup div *.eyef 0 sub sqr dup div mult *.memval 220 sub dup div mult *.robage 3 mod 2 sub dup div 1 sub abs mult *.numties 0 sub dup div 1 sub abs mult mult add 300 *.eyef 0 sub dup div 1 sub abs *.body 3000 sub sqr dup div mult *.robage 2 sub sqr dup div mult *.numties 0 sub dup div 1 sub abs mult mult add 6 *.eyef 0 sub sqr dup div *.memval 220 sub dup div 1 sub abs mult *.numties 0 sub dup div 1 sub abs mult mult add 1 *.eyef 0 sub dup div 1 sub abs *.robage 2 sub sqr dup div mult *.body 2999 sub -1 mult sqr dup div mult *.body *.nrg 2 div sub sqr dup div mult *.numties 0 sub dup div 1 sub abs mult mult add 467 *.numties 0 sub sqr dup div *.robage 2 sub sqr dup div mult mult add store
stop
end