-- $Id: bot_Alias.lua,v 1.4 2009-04-15 08:22:23 vadim_b Exp $
--[[
	AKEB (c)
	17.07.2008 12:00
	
	Бот Союзник
	
	Перед ударом
		Если бот еще не использовал абилку "2600", и в команде бота есть живые игроки, использовать абилку 2600 на любого живого игрока в своей команде.
 
	Для теста можно использовать абилку 167
 	
	Скрипт: 		bot_Alias.lua
	Управляющая функция: bot_Alias
	Управляющая функция для теста: bot_Alias_t

--]]


function bot_Alias_r(artikulId)
	if my.status ~= FS_PS_ACTIVE then	-- если наш статус неактивный, ничего не делаем
		return
	end
	
	local bot = PERS(my.persPtr)
	
	bot_AliasInitArtikulUsed(bot.id)
	
	if bot_AliasArtikulUsed[bot.id] < 1 then
		for _,persPtr in pairs(PERS_LIST(my.teamNum,true,nil)) do
			if not PERS_ISBOT(persPtr) then
				local status = aux.useEffect({artId = artikulId},persPtr)
				if status == 0 then
					bot_AliasArtikulUsed[bot.id] = 1
					break;
				end
				
			end
		end
		
	end
	
	ATTACK(math.random(3))
end





function bot_Alias()
	return bot_Alias_r(2600)
end

function bot_Alias_t()
	return bot_Alias_r(167)
end

function bot_AliasInitArtikulUsed(botId)
	if bot_AliasArtikulUsed == nil then bot_AliasArtikulUsed={} end 									-- Если глобальная переменная не существует создаем ее
	if botId == nil then return; end 																			-- если не задан ID бота, ничего не делаем
	if bot_AliasArtikulUsed[botId] == nil then bot_AliasArtikulUsed[botId]=0 end 					-- Если нет глобальной переменной с Этим ботом создаем ее со значением 0
end