100 chip drag test scenario

sforce = 0 --change this in multiples of 100*iforce. this force gets added to all of the chips
iforce = 1000

function force()
for n=0,100 do
_WARP(n,0,0,0) --teleports the chips to coordinates where floating point numbers are more accurate.
_FORCE(n,0,sforce+(n*iforce),0) --applies that force to the objects.
end

end
function main()
out(1,"Startforce - "..sforce)
out(2,"Increment Force - "..iforce)
out(3,"Make sure gravity is off.")
force()
end