[1.0c] SidasAutoCarryPlugin - Pantheon

--[[

        Auto Carry Plugin - Pantheon Edition
        Author: Roach_
        Version: 1.0c
        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.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 = "Run"
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 i=1, heroManager.iCount do
            local enemydraw = heroManager:GetHero(i)

            if ValidTarget(enemydraw) then
                if(enemydraw.health/enemydraw.maxHealth*100 < 15) then
                    PrintFloatText(Target, 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 myHero:CanUseSpell(_W) ~= READY and GetDistance(target) < 600 then
            CastSpell(_Q, target)
        elseif myHero:CanUseSpell(_W) == READY and 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
        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)
    end

    if AutoCarry.PluginMenu.pEscapeFlash and FlashSlot ~= nil and myHero:CanUseSpell(FlashSlot) == READY and GetDistance(mousePos) > 300 then
        CastSpell(FlashSlot, mousePos.x, mousePos.z)
    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