[1.0d] SidasAutoCarryPlugin - Pantheon

--[[

        Auto Carry Plugin - Pantheon Edition
        Author: Roach_
        Version: 1.0d
        Copyright 2013

        Dependency: Sida's Auto Carry: Revamped

        How to install:
            Make sure you already have AutoCarry installed.
            Name the script EXACTLY "SidasAutoCarryPlugin - Pantheon.lua" without the quotes.
            Place the plugin in BoL/Scripts/Common folder.

        Features:
            Combo with Autocarry
            Fully supports E with movement/attack disable
            Harass with Mixed Mode
            Killsteal with Q/W
            Draw Combo Range
            Draw Critical Hit on Target
            Escape Artist(with Flash)

        History:
            Version: 1.0d
                Fixed Escape Artist
                Fixed a problem with Flash, it was flashing before Stunning the enemy
                Optimised Escape Artist
                Fully removed Auto-Ignite
                Fixed all the Bugsplats (TESTED)
                Fixed Mixed Mode Harass

            Version: 1.0c
                Real fix for E.
                Fixed Killsteal.
                Hopefully fixed OnTick bugsplat.
                Removed Auto-Ignite, because it exists in SAC too.

            Version: 1.0b
                Temporarily fix for E.
                Fixed some bugsplats on draw.

            Version: 1.0a
                First release
--]]

local target

function PluginOnLoad()
    AutoCarry.PluginMenu:addParam("pCombo", "Use Combo With Auto Carry", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("pHarass", "Harass with Mixed Mode", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("pKillsteal", "Killsteal with Q/W", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("pDCR", "Draw Combo Range", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("pDCT", "Draw Crit Text", SCRIPT_PARAM_ONOFF, true)
    AutoCarry.PluginMenu:addParam("pEscape", "Escape Artist", SCRIPT_PARAM_ONKEYDOWN, false, string.byte("T"))
    AutoCarry.PluginMenu:addParam("pEscapeFlash", "Escape: Flash to Mouse", SCRIPT_PARAM_ONOFF, false)

    AutoCarry.SkillsCrosshair.range = 600

    lastAnimation = nil
end


function PluginOnTick()
    if isChanneling() then
        AutoCarry.CanAttack = false
        AutoCarry.CanMove = false
    else
        AutoCarry.CanAttack = true
        AutoCarry.CanMove = true
    end

    if AutoCarry.PluginMenu.pCombo and AutoCarry.MainMenu.AutoCarry then pCombo() end
    if AutoCarry.PluginMenu.pHarass and AutoCarry.MainMenu.MixedMode then pHarass() end
    if AutoCarry.PluginMenu.pKillsteal then pKillsteal() end
    if AutoCarry.PluginMenu.pEscape then pEscapeCombo() end

    if not myHero.dead and AutoCarry.PluginMenu.pDCT then
        for _, enemy in pairs(AutoCarry.EnemyTable) do
            if ValidTarget(enemy) then
                if (enemy.health/enemy.maxHealth*100) < 15 then
                    PrintFloatText(enemy, 0, "CRITICAL HIT")
                end
            end
        end
    end
end

function PluginOnDraw()
    if not myHero.dead and AutoCarry.PluginMenu.pDCR then
        DrawCircle(myHero.x, myHero.y, myHero.z, 600, 0x00FFFF)
    end
end

function PluginOnAnimation(unit, animationName)
    if unit.isMe and lastAnimation ~= animationName then lastAnimation = animationName end
end

--

function pCombo()
    target = AutoCarry.GetAttackTarget()

    if ValidTarget(target) then
        if myHero:CanUseSpell(_Q) == READY and GetDistance(target) < 600 then
            CastSpell(_Q, target)
        end

        if myHero:CanUseSpell(_W) == READY and GetDistance(target) < 600 then
            CastSpell(_W, target)
        end

        if myHero:CanUseSpell(_E) == READY and GetDistance(target) < 600 then
            CastSpell(_E, target.x, target.z)
        end
    end
end

function pHarass()
    if ValidTarget(target) then
        if myHero:CanUseSpell(_Q) == READY and GetDistance(target) < 600 then
            CastSpell(_Q, target)
        end
    end
end

function pKillsteal()
    for _, enemy in pairs(AutoCarry.EnemyTable) do
        if myHero:CanUseSpell(_Q) == READY then
            if ValidTarget(enemy) and GetDistance(enemy) < 600 and enemy.health < getDmg("Q", enemy, myHero) then
                CastSpell(_Q, enemy)
            end
        elseif myHero:CanUseSpell(_Q) ~= READY and myHero:CanUseSpell(_W) == READY then
            if ValidTarget(enemy) and GetDistance(enemy) < 600 and enemy.health < getDmg("W", enemy, myHero) then
                CastSpell(_W, enemy)
            end
        end
    end
end

function pEscapeCombo()
    local FlashSlot

    if myHero:GetSpellData(SUMMONER_1).name:find("SummonerFlash") then
        FlashSlot = SUMMONER_1
    elseif myHero:GetSpellData(SUMMONER_2).name:find("SummonerFlash") then
        FlashSlot = SUMMONER_2
    end

    --
    if myHero:CanUseSpell(_W) == READY then
        CastSpell(_W, target)
        if AutoCarry.PluginMenu.pEscapeFlash and FlashSlot ~= nil and myHero:CanUseSpell(FlashSlot) == READY and GetDistance(mousePos) > 400 and lastAnimation == "Spell2" then
            CastSpell(FlashSlot, mousePos.x, mousePos.z)
        end
    end

    if AutoCarry.PluginMenu.pEscapeFlash then
        myHero:MoveTo(mousePos.x, mousePos.z)
    end
end

function isChanneling()
    if lastAnimation == "Spell3" then
        return true
    else
        return false
    end
end