tests/lua/drillrockets_drill.lua
changeset 10028 9e742fc72696
parent 10026 14a3f7feeb39
child 10421 87e47843018e
--- a/tests/lua/drillrockets_drill.lua	Mon Jan 20 15:31:45 2014 +0100
+++ b/tests/lua/drillrockets_drill.lua	Mon Jan 20 22:42:36 2014 +0100
@@ -109,10 +109,13 @@
 	d = distance
 	radius = ta_radius
 	local xmin, xmax, ymin, ymax
+	speed = 900000;
+	local xmin, xmax, ymin, ymax
 	if (xdir ~= 0) and (ydir ~= 0) then
 		sqrttwo = math.sqrt(2)
 		d = d / sqrttwo
 		radius = radius / sqrttwo
+		speed = math.floor(speed / sqrttwo)
 	end
 	centerx = centerx - (xdir * (radius + 20))
 	centery = centery - (ydir * (radius + 20))
@@ -133,7 +136,7 @@
 	if (yd < 0) and (starty < endy) then y = endy end
 	nsteps = math.floor(math.max(math.abs(startx - endx),math.abs(starty - endy)) / d)
 	for i = 1, nsteps, 1 do
-		AddGear(math.floor(x), math.floor(y), gtDrill, 0, 900000 * xdir, 900000 * ydir, 0)
+		AddGear(math.floor(x), math.floor(y), gtDrill, 0, speed * xdir, speed * ydir, 0)
 		nspawned = nspawned + 1
 		x = x + xd
 		y = y + yd