-- $Id: bot_test.lua,v 1.8 2009-10-12 11:10:49 a.abolishin Exp $
--[[
	AKEB (c)
	29.07.2008 0:10
	
	Бот тестовый
	
	
	Первым ходом бот применяет на противника абилку (А), потом бьет вверх
	Вторым ходом применяет на себя абилку (Б), потом бьет вперед
	Третим ходом применяет на противника абилку (В), потом бьет вниз
	
	Начиная с четвертого хода – все сначала, и так по кругу

	Для теста можно использовать А = 161, Б = 167, С = 161
	
	
	Скрипт: 			bot_Test.lua
	Управляющая функция: bot_Test
	
--]]

function bot_Test_r(a1,a2,a3)
	if my.status ~= FS_PS_ACTIVE then	-- если наш статус неактивный, ничего не делаем
		return
	end
	
	local bot_id = PERS_ID(my.persPtr)

	bot_TestInitUsed(bot_id)
	
	local blow = ((bot_TestStepCnt[bot_id] % 3) + 1)
	
	if blow == 1 then
		aux.useEffect({artId = a1},my.oppPtr)
	elseif blow == 2 then
		aux.useEffect({artId = a2},my.persPtr)
	elseif blow == 3 then
		aux.useEffect({artId = a3},my.oppPtr)
	end
	
	bot_TestStepCnt[bot_id] = bot_TestStepCnt[bot_id]+1

	ATTACK(blow) -- атакуем ударом blow
end

function bot_PetTest_r(a1, a2)
	if my.status ~= FS_PS_ACTIVE then	-- если наш статус неактивный, ничего не делаем
		return
	end
	
	local bot_id = PERS_ID(my.persPtr)

	bot_TestInitUsed(bot_id)
	
	local blow = ((bot_TestStepCnt[bot_id] % 2) + 1)
	
	if blow == 1 then
		aux.useEffect({artId = a1}, my.oppPtr)
	elseif blow == 2 then
		aux.useEffect({artId = a2}, my.persPtr)
	end
	
	bot_TestStepCnt[bot_id] = bot_TestStepCnt[bot_id] + 1
end


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


-------------------------------------------------------------------------------

function bot_Test()
	bot_Test_r(161,167,169)
end

function bot_Test_1()
	bot_Test_r(161,167,3935)
end

function bot_Test_2()
	bot_Test_r(161,167,3936)
end

function bot_Test_3()
	bot_Test_r(161,167,3937)
end

function bot_Test_4()
	bot_Test_r(161,167,3938)
end

function bot_Test_5()
	bot_Test_r(161,167,3939)
end

function bot_Test_6()
	bot_Test_r(161,167,3940)
end

function bot_Test_7()
	bot_Test_r(161,167,3941)
end

function bot_Test_8()
	bot_Test_r(161,167,3942)
end

function bot_Test_9()
	bot_Test_r(161,167,3943)
end

function bot_Test_10()
	bot_Test_r(161,167,3944)
end

function bot_Test_11()
	bot_Test_r(4923,4924,4925)
end

function bot_PetTest()
	bot_PetTest_r(5022, 5018)
end

function bot_DefaultTest()
    bot_Test_r(5323, 5322, 5324)
end