-- $Id: bot_Madkrofdor.lua,v 1.5 2009-10-21 14:10:43 a.abolishin Exp $
--[[
	AKEB (c)
	16.05.2008 18:26
	
	Интеллект Лютого Крофдора[12]

	Абилки
		2294
		2293
		2297
		2269

	
	Скрипт:						bot_Madkrofdor.lua
	Управляющая функция:		bot_Madkrofdor
	
--]]

function bot_Madkrofdor()
	if my.status ~= FS_PS_ACTIVE then
		return
	end
	
	TOGGLE_DEFENCE(false)
	
	local bot = PERS(my.persPtr)
	local G = bot.hp / bot.hpMax
	
	bot_MadkrofdorInitTable(bot.id)
	
	if (G < 0.99 and (#aux.activeEffects(my.persPtr, {artId = 2294}) < 1)) then
		aux.useEffect({artId = 2294})
		bot_madkrofdorTimeTable[bot.id] = my.stime + 30
	end
	
	if bot_madkrofdorTimeTable[bot.id] > 0 and (my.stime >= bot_madkrofdorTimeTable[bot.id]) then
		aux.useEffect({artId = 2293})
	end
	
	if (G < 0.7 and (bot_madkrofdorTable[bot.id] == 0)) then
		local p = math.max(0, math.min(1, (7-G*10)))
		if aux.randRoll(p) then
			if aux.randRoll(0.5) then 
				aux.useEffect({artId = 2297})
				bot_madkrofdorTable[bot.id] = 1
			else
				aux.useEffect({artId = 2269}, my.oppPtr)
				bot_madkrofdorTable[bot.id] = 1
			end
		end
	end

	if (G < 0.5 and (bot_madkrofdorTable[bot.id] == 1)) then
		local p = math.max(0, math.min(1, (5-G*10)))
		if aux.randRoll(p) then
			if aux.randRoll(0.5) then 
				aux.useEffect({artId = 2297})
				bot_madkrofdorTable[bot.id] = 2
			else
				aux.useEffect({artId = 2269}, my.oppPtr)
				bot_madkrofdorTable[bot.id] = 2
			end
		end
	end

	if (bot.mp >= 50) then
		TOGGLE_DEFENCE(true)
		aux.useEffect({artId = 2702})
		aux.useEffect({artId = 2296}, my.oppPtr)
	end
	
	ATTACK(math.random(3))
end

function bot_MadkrofdorInitTable(botId)
	if bot_madkrofdorTable == nil then bot_madkrofdorTable = {} end
    if bot_madkrofdorTimeTable == nil then bot_madkrofdorTimeTable = {} end
	if botId == nil then return; end
	if bot_madkrofdorTable[botId] == nil then bot_madkrofdorTable[botId] = 0 end
    if bot_madkrofdorTimeTable[botId] == nil then bot_madkrofdorTimeTable[botId] = 0 end
end