--[[
    a.abolishin
    
    Воительница Крофдоров[13]. Более чистая версия.
--]]

function bot_Krofdor13_r(A, C)
    local bot = PERS(my.persPtr)
    
    if bot_Krofdor13Baf2 == nil then bot_Krofdor13Baf2 = {} end
	if bot_Krofdor13Baf2[bot.id] == nil then bot_Krofdor13Baf2[bot.id] = 2 end
    if bot_Krofdor13Summon == nil then bot_Krofdor13Summon = {} end
	if bot_Krofdor13Summon[bot.id] == nil then bot_Krofdor13Summon[bot.id] = 2 end
    if bot_Krofdor13SummonTime == nil then bot_Krofdor13SummonTime = {} end
	if bot_Krofdor13SummonTime[bot.id] == nil then bot_Krofdor13SummonTime[bot.id] = -1 end

    if my.status ~= FS_PS_ACTIVE then	-- если наш статус неактивный, ничего не делаем
        return
    end

    TOGGLE_DEFENCE(false)
    
    local hpC = bot.hp / bot.hpMax
    
    -- Портал и призыв
    if (hpC < bot_Krofdor13Summon[bot.id] * C[3]) and (#aux.activeEffects(my.persPtr, {artId = A[1]}) < 1) then
        aux.useEffect({artId = A[1]})
		bot_Krofdor13SummonTime[bot.id] = my.stime + C[4]
        bot_Krofdor13Summon[bot.id] = bot_Krofdor13Summon[bot.id] - 1
    end
    
    if bot_Krofdor13SummonTime[bot.id] > 0 and my.stime >= bot_Krofdor13SummonTime[bot.id] and
        #aux.activeEffects(my.persPtr, {artId = A[1]}) > 0
    then
        aux.useEffect({artId = A[7]})
        bot_Krofdor13SummonTime[bot.id] = -1
    end

    -- Дыхание крофдора и мана
    local thresholdHP = bot_Krofdor13Baf2[bot.id] * C[5]
    if hpC < thresholdHP then
		local p = math.max(0, math.min(1, (thresholdHP-hpC)*10))
		if aux.randRoll(p) then
			if aux.randRoll(0.5) then
				aux.useEffect({artId = A[2]}) -- мана
			else
				aux.useEffect({artId = A[3]}, my.oppPtr) -- дыхание
			end
            bot_Krofdor13Baf2[bot.id] = bot_Krofdor13Baf2[bot.id] - 1
		end
	end
    
    if bot.mp >= C[1] then
        aux.useEffect({artId = A[4]}, my.oppPtr) -- разрушающий луч
        TOGGLE_DEFENCE(true)
        aux.useEffect({artId = A[5]}) -- блок ?!
    else
        local r = math.random()
        local part = 3

        if r < C[2] then
            part = 2
        elseif r < C[2]+((1-C[2])/2) then
            part = 1
        end
        ATTACK(part)
        if part == 2 then
            aux.useEffect({artId = A[6]}, my.oppPtr) -- сердечная рана
        end
    end
end

function bot_Krofdor13()
    -- портал, мана, дыхание крофдора, разрушающий луч, блок, сердечная рана, призыв
    local A = {4066, 2297, 4098, 4096, 4077, 4095, 4068}
    -- стоимость разрушающего луча, P, шаг портала и призыва, время портала, шаг дыхания/маны
    local C = {50, 0.14, 0.45, 24, 0.4}

    bot_Krofdor13_r(A, C)
end