vector origin = {0,0,0}; orbitspeed = fit(abs(length(@P-origin)),0,1,3,0);
vector origin = {0,0,0}; airresist = fit(abs(length(@P-origin)),0,1,0,10);