function sqr(x)
	return x*x
end
function Distance(x1, y1, x2, y2)
	return math.sqrt(sqr(x1-x2) + sqr(y1-y2))
end

pathIndex = nil

--Стрелять в ближайшего врага
function ShootAtClosest()
	local mX, mY = api:position(0) --Наши координаты
	local n = api:count() --количество юнитов в радиусе видимости
	local myOwner = api:owner(0)--наш номер игрока (владелец робота)

	local closestEnemy = 1.5*api.field_size
	local shotX = nil
	local shotY = nil
	for i = 1, n do
		if (api:type(i) == 2) then -- Юнит - робот
			local town = api:owner(i); -- Кому принадлежит робот
			if (town ~= myOwner and town >= 0) then -- Если вражеский робот
				local sx, sy = api:position(i) -- Позиция вражеского робота
				local dist = Distance(sx, sy, mX, mY) -- Расстояние до него
				if (dist < closestEnemy) then -- Проверка на кратчайшее расстояние
					shotX, shotY = sx, sy -- Сохранение результата, если робот находится ближе чем предыдущий найденный
					closestEnemy = dist;
				end
			end
		end
	end
	if (shotX) then -- если нашли хоть одного в области видимости
		api:shoot_at_pos(shotX, shotY)
	else
		api:shoot_stop()
	end
end

function MoveToPoint(x, y) -- Двигаемся в точку x,y
	local mX, mY = api:position(0)
	api:move_by_delta(x-mX, y-mY)
end

last = nil

function good()
	local mX, mY = api:position(0)
	local n = api:count()
	local myOwner = api:owner(0)

	local bad = false

	for i = 1, n do
		if (api:type(i) == 2) then -- Юнит - робот
			local town = api:owner(i); -- Кому принадлежит робот
			if (town ~= myOwner and town >= 0) then -- Если вражеский робот
				bad = true
			end
		end
	end

	if (bad) then
		last = nil
		return false
	end

	for i = 1, n do
		if (api:type(i) == 1) then
			local town = api:owner(i);
			local sx, sy = api:position(i)
			if (Distance(sx, sy, path[pathIndex].x, path[pathIndex].y) < 1e-5) then
				if (town == myOwner) then
					if (not last) then
						last = api:time()
					end
					if (api:time() - last > 200) then
						last = nil
						return true
					end
				end
			end
		end
	end
	return false
end

function MoveAlongPath(path, isCycle) -- Двигаемся вдоль контура path, если isCycle = true, то зацикливаемся по контуру
	if (path == nil) then
		return
	end
	if (pathIndex == nil) then
		pathIndex = 0
	end
	local mX, mY = api:position(0)


    if (good()) then
		pathIndex = pathIndex + 1
	end
	if (path[pathIndex] == nil) then
		if (not isCycle) then
			return
		end
		pathIndex = 0
	end
	MoveToPoint(path[pathIndex].x, path[pathIndex].y)
end

function Pass()
	local mX, mY = api:position(0)
	local n = api:count()
	local myOwner = api:owner(0)

	local closestFriend = 2.1*api:radius(0)
	local friendX = nil
	local friendY = nil
	for i = 1, n do
		if (api:type(i) == 2) then
			local town = api:owner(i);
			if (town == myOwner) then
				local sx, sy = api:position(i)
				local dist = Distance(sx, sy, mX, mY)
				if (dist < closestFriend) then
					friendX, friendY = sx, sy
					closestFriend = dist;
				end
			end
		end
	end
	if (friendX) then
		api:move_by_delta((-friendX+mX) / 10 + (-friendY+mY), (-friendY+mY) / 10 - (-friendX+mX))
--		api:shoot_at_pos(0, 0)
		return 1
	end
	return nil
end

function Think()
	if (not Pass()) then
		if (capture) then
			MoveToPoint(capture.x, capture.y)
		else
			MoveAlongPath(path, true)
		end
	end
	ShootAtClosest() -- Стреляем в ближайшего соперника
end