sivir

--[[        Auto Update     ]]
local sversion = "1.1"
local AUTOUPDATE = true
local UPDATE_HOST = "raw.github.com"
local UPDATE_PATH = "/BoLFantastik/BoL/master/Fantastik Sivir.lua".."?rand="..math.random(1,10000)
local UPDATE_FILE_PATH = SCRIPT_PATH..GetCurrentEnv().FILE_NAME
local UPDATE_URL = "https://"..UPDATE_HOST..UPDATE_PATH

function AutoupdaterMsg(msg) print("<font color=\"#6699ff\"><b>Fantastik Sivir:</b></font> <font color=\"#FFFFFF\">"..msg..".</font>") end
if AUTOUPDATE then
    local ServerData = GetWebResult(UPDATE_HOST, "/BoLFantastik/BoL/master/version/Fantastik Sivir.version")
    if ServerData then
        ServerVersion = type(tonumber(ServerData)) == "number" and tonumber(ServerData) or nil
        if ServerVersion then
            if tonumber(sversion) < ServerVersion then
                AutoupdaterMsg("New version available"..ServerVersion)
                AutoupdaterMsg("Updating, please don't press F9")
                DelayAction(function() DownloadFile(UPDATE_URL, UPDATE_FILE_PATH, function () AutoupdaterMsg("Successfully updated. ("..sversion.." => "..ServerVersion.."), press F9 twice to load the updated version.") end) end, 3)
            else
                AutoupdaterMsg("You have got the latest version ("..ServerVersion..")")
            end
        end
    else
        AutoupdaterMsg("Error downloading version info")
    end
end

local REQUIRED_LIBS =
    {
        ["VPrediction"] = "https://raw.github.com/Hellsing/BoL/master/common/VPrediction.lua",
        ["SOW"] = "https://raw.github.com/Hellsing/BoL/master/common/SOW.lua",
--      if VIP_USER then ["Prodiction"] = "https://bitbucket.org/Klokje/public-klokjes-bol-scripts/raw/7f8427d943e993667acd4a51a39cf9aa2b71f222/Test/Prodiction/Prodiction.lua" end,
    }
local DOWNLOADING_LIBS = false
local DOWNLOAD_COUNT = 0
local SELF_NAME = GetCurrentEnv() and GetCurrentEnv().FILE_NAME or ""

for DOWNLOAD_LIB_NAME, DOWNLOAD_LIB_URL in pairs(REQUIRED_LIBS) do
    if FileExist(LIB_PATH .. DOWNLOAD_LIB_NAME .. ".lua") then
        require(DOWNLOAD_LIB_NAME)
    else
        DOWNLOADING_LIBS = true
        DOWNLOAD_COUNT = DOWNLOAD_COUNT + 1

        print("<font color=\"#00FF00\">Fantastik Sivir:</font><font color=\"#FFDFBF\"> Not all required libraries are installed. Downloading: <b><u><font color=\"#73B9FF\">"..DOWNLOAD_LIB_NAME.."</font></u></b> now! Please don't press [F9]!</font>")
        print("Download started")
        DownloadFile(DOWNLOAD_LIB_URL, LIB_PATH .. DOWNLOAD_LIB_NAME..".lua", AfterDownload)
        print("Download finished")
    end
end

function AfterDownload()
    DOWNLOAD_COUNT = DOWNLOAD_COUNT - 1
    if DOWNLOAD_COUNT == 0 then
        DOWNLOADING_LIBS = false
        print("<font color=\"#00FF00\">Fantastik Sivir:</font><font color=\"#FFDFBF\"> Required libraries downloaded successfully, please reload (double [F9]).</font>")
    end
end
if DOWNLOADING_LIBS then return end

--[[        Code        ]]
local sauthor = "Fantastik"
local QREADY, WREADY, EREADY, RREADY = false
local Qrange, Qwidth, Qspeed, Qdelay = 1075, 85, 1350, 0.250
local Rrange = 1000
local ignite = nil
local iDmg = 0
local target = nil
local ts
local ts = TargetSelector(TARGET_LESS_CAST_PRIORITY, Qrange, DAMAGE_PHYSICAL, true)
local Announcer = ""
local isSOW = false
local isSAC = false
local isMMA = false

--[[    Drawings    ]]
TextList = {"Poke", "1 AA kill!", "2 AA kill!", "3 AA kill!", "Q kill!", "Q + 1 AA kill!", "Q + 2 AA kill!", "Q + 3 AA kill!", "Q + 4 AA kill!"}
KillText = {}
colorText = ARGB(255,255,204,0)

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

function GetCustomTarget()
    ts:update()
    if _G.MMA_Target and _G.MMA_Target.type == myHero.type then return _G.MMA_Target end
    if _G.AutoCarry and _G.AutoCarry.Crosshair and _G.AutoCarry.Attack_Crosshair and _G.AutoCarry.Attack_Crosshair.target and _G.AutoCarry.Attack_Crosshair.target.type == myHero.type then return _G.AutoCarry.Attack_Crosshair.target end
    return ts.target
end

function OnLoad()
    PrintChat("<font color=\"#00FF00\">Fantastik Sivir version ["..sversion.."] by Fantastik loaded.</font>")
    if _G.MMA_Loaded ~= nil then
        PrintChat("<font color = \"#00FF00\">Fantastik Sivir MMA Status:</font> <font color = \"#fff8e7\"> Loaded</font>")
        isMMA = true
    elseif _G.AutoCarry ~= nil then
        PrintChat("<font color = \"#00FF00\">Fantastik Sivir SAC Status:</font> <font color = \"#fff8e7\"> Loaded</font>")
        isSAC = true
    else
        isSOW = true
    end
    if _G.Evadeee_Loaded then
    PrintChat("<font color=\"##58D3F7\"><b>Evadeee</b> found! You can use Evadeee integration!")
    _G.Evadeee_Enabled = true
    end
    IgniteCheck()
    SLoadLib()
    Announcer()
end


function OnTick()
    ts:update()
    target = GetCustomTarget()
    Checks()

  if ValidTarget(target) then
        if SivMenu.Extra.KS then KS(target) end
        if SivMenu.Extra.Ignite then AutoIgnite(target) end
    end

   if SivMenu.combokey then
        Combo()
   end
   if SivMenu.pokekey then
        Poke()
   end
   if SivMenu.farmkey then
        FarmQ()
        FarmW()
   end
   if SivMenu.Extra.Evade then
       EvadeeeHelper()
   end
end

function Checks()
    QREADY = (myHero:CanUseSpell(_Q) == READY)
    WREADY = (myHero:CanUseSpell(_W) == READY)
    EREADY = (myHero:CanUseSpell(_E) == READY)
    RREADY = (myHero:CanUseSpell(_R) == READY)
    IREADY = (ignite ~= nil and myHero:CanUseSpell(ignite) == READY)

    Qrangec = SivMenu.Combo.Qrangemin

    SkinHack()
    if SivMenu.Extra.autolev.enabled then
        AutoLevel()
    end
    calcDmg()
end

function IgniteCheck()
    if myHero:GetSpellData(SUMMONER_1).name:find("summonerdot") then
            ignite = SUMMONER_1
    elseif myHero:GetSpellData(SUMMONER_2).name:find("summonerdot") then
            ignite = SUMMONER_2
    end
end

function OnDraw()
    if SivMenu.Drawing.DrawAA and isSOW then
     SOWi:DrawAARange()
    end

   if SivMenu.Drawing.DrawQ then
     if QREADY then
     DrawCircle(myHero.x, myHero.y, myHero.z, Qrangec, 0xF7FE2E)
     end
   end

    if SivMenu.Drawing.DrawT then
        for i = 1, heroManager.iCount do
            local target = heroManager:GetHero(i)
            if ValidTarget(target) and target ~= nil then
                local barPos = WorldToScreen(D3DXVECTOR3(target.x, target.y, target.z))
                local PosX = barPos.x - 35
                local PosY = barPos.y - 10

                DrawText(TextList[KillText[i]], 16, PosX, PosY, colorText)
            end
        end
    end
end

function SLoadLib()
    EnemyMinions = minionManager(MINION_ENEMY, Qrange, myHero, MINION_SORT_MAXHEALTH_DEC)
    VP = VPrediction(true)
    if isSOW then
        SOWi = SOW(VP)
    end
    SMenu()
    CurSkin = 0
end

function SMenu()

    SivMenu = scriptConfig("Fantastik Sivir", "Sivir")
    SivMenu:addParam("combokey", "Combo key(Space)", SCRIPT_PARAM_ONKEYDOWN, false, 32)
    SivMenu:addParam("pokekey", "Poke key(C)", SCRIPT_PARAM_ONKEYDOWN, false, string.byte("C"))
    SivMenu:addParam("farmkey", "Farm key(V)", SCRIPT_PARAM_ONKEYDOWN, false, string.byte("V"))
    SivMenu:addParam("Version", "Version", SCRIPT_PARAM_INFO, sversion)
    SivMenu:addParam("Author", "Author", SCRIPT_PARAM_INFO, sauthor)

    SivMenu:addTS(ts)

    SivMenu:addSubMenu("Combo", "Combo")
    SivMenu.Combo:addParam("comboQ", "Use Q", SCRIPT_PARAM_ONOFF, true)
    SivMenu.Combo:addSubMenu("Use Q on:", "targets")
    for _, enemy in ipairs(GetEnemyHeroes()) do
        SivMenu.Combo.targets:addParam(enemy.charName, enemy.charName, SCRIPT_PARAM_ONOFF, true)
    end
    SivMenu.Combo:addParam("Qrangemin", "Min. range for Q ", SCRIPT_PARAM_SLICE, 950, 600, 1075, 0)
    SivMenu.Combo:addParam("comboW", "Use W", SCRIPT_PARAM_ONOFF, true)
    SivMenu.Combo:addParam("comboR", "Use R", SCRIPT_PARAM_ONOFF, true)
    SivMenu.Combo:addParam("minEnemiesR", "Min. no. of enemies for R ", SCRIPT_PARAM_SLICE, 1, 1, 5, 0)
    SivMenu.Combo:addParam("manapls", "Min. % mana for spells ", SCRIPT_PARAM_SLICE, 30, 1, 100, 0)

    SivMenu:addSubMenu("Poke", "Poke")
    SivMenu.Poke:addParam("pokeQ", "Use Q", SCRIPT_PARAM_ONOFF, true)
    SivMenu.Poke:addParam("manapls", "Min. % mana for spells ", SCRIPT_PARAM_SLICE, 30, 1, 100, 0)

    SivMenu:addSubMenu("Farm", "Farm")
    SivMenu.Farm:addParam("farmQ", "Use Q", SCRIPT_PARAM_ONOFF, true)
    SivMenu.Farm:addParam("farmW", "Use W", SCRIPT_PARAM_ONOFF, true)
    SivMenu.Farm:addParam("manafarm", "Min. % mana to farm", SCRIPT_PARAM_SLICE, 30, 1, 100, 0)

    SivMenu:addSubMenu("Drawing", "Drawing")
    if isSOW then
    SivMenu.Drawing:addParam("DrawAA", "Draw AA Range", SCRIPT_PARAM_ONOFF, true)
    end
    SivMenu.Drawing:addParam("DrawQ", "Draw Q Range", SCRIPT_PARAM_ONOFF, true)
    SivMenu.Drawing:addParam("DrawT", "Draw Text", SCRIPT_PARAM_ONOFF, true)
    if isSOW then
        SivMenu:addSubMenu("Orbwalker", "Orbwalker")
        SOWi:LoadToMenu(SivMenu.Orbwalker)
    end

    SivMenu:addSubMenu("Extra", "Extra")
    SivMenu.Extra:addParam("KS", "Auto Killsteal", SCRIPT_PARAM_ONOFF, true)
    SivMenu.Extra:addParam("Ignite", "Use Auto Ignite", SCRIPT_PARAM_ONOFF, true)
    SivMenu.Extra:addParam("Hitchance", "Hitchance Combo", SCRIPT_PARAM_LIST, 2, {"LOW", "MEDIUM"})
    SivMenu.Extra:addParam("HitchanceP", "Hitchance Poke", SCRIPT_PARAM_LIST, 2, {"LOW", "MEDIUM"})
    SivMenu.Extra:addSubMenu("Auto level spells", "autolev")
    SivMenu.Extra.autolev:addParam("enabled", "Enable auto level spells", SCRIPT_PARAM_ONOFF, false)
    SivMenu.Extra.autolev:addParam("lvlseq", "Select your auto level sequence: ", SCRIPT_PARAM_LIST, 1, {"R>Q>W>E", "R>W>Q>E", "R>E>Q>W"})
    SivMenu.Extra:addSubMenu("Skin Hack - VIP ONLY", "skinhax")
    SivMenu.Extra.skinhax:addParam("enabled", "Enable Skin Hack", SCRIPT_PARAM_ONOFF, false)
    SivMenu.Extra.skinhax:addParam("skinid", "Choose skin: ", SCRIPT_PARAM_LIST, 1, {"No Skin", "Warrior Princess", "Spectacular", "Huntress", "Bandit", "PAX", "Snowstorm"})
    if _G.Evadeee_Loaded then
        SivMenu.Extra:addParam("Evade", "Use Evadeee Integration", SCRIPT_PARAM_ONOFF, true)
    end
    if VIP_USER then
        SivMenu.Extra:addParam("packetcast", "Use Packet Cast", SCRIPT_PARAM_ONOFF, false)
    end
    SivMenu:permaShow("combokey")
    SivMenu:permaShow("pokekey")
    SivMenu:permaShow("farmkey")
end

function KS(Target)
    if QREADY and getDmg("Q", Target, myHero) > Target.health then
        local CastPos = VP:GetLineCastPosition(Target, Qdelay, Qwidth, Qrange, Qspeed, myHero, false)
        if GetDistance(Target) <= Qrange and QREADY then
            if not VIP_USER or not SivMenu.Extra.packetcast then
                CastSpell(_Q, CastPos.x, CastPos.z)
            elseif VIP_USER and SivMenu.Extra.packetcast then
                PacketCast(_Q, CastPos)
            end
        end
    end
end

function AutoIgnite(enemy)
    iDmg = ((IREADY and getDmg("IGNITE", enemy, myHero)) or 0)
    if enemy.health <= iDmg and GetDistance(enemy) <= 600 and ignite ~= nil
        then
            if IREADY then CastSpell(ignite, enemy) end
    end
end

function EvadeeeHelper()
    if _G.Evadeee_impossibleToEvade then
        CastSpell(_E)
    end
end

function Combo()
    if ValidTarget(target) and ManaManager() then
        if QREADY and SivMenu.Combo.comboQ and SivMenu.Combo.targets[target.charName] then
            local CastPosition, HitChance, CastPos = VP:GetLineCastPosition(target, Qdelay, Qwidth, Qrangec, Qspeed, myHero, false)
            if HitChance >= SivMenu.Extra.Hitchance and GetDistance(CastPosition) <= Qrangec and QREADY then
                if not VIP_USER or not SivMenu.Extra.packetcast then
                    CastSpell(_Q, CastPosition.x, CastPosition.z)
                elseif VIP_USER and SivMenu.Extra.packetcast then
                    PacketCast(_Q, CastPosition)
                end
            end
        end
        if RREADY and SivMenu.Combo.comboR and GetDistance(target) <= 600 then
            CastR()
        end
    end
end

function Poke()
  if ValidTarget(target) and ManaManagerPoke() then
        if SivMenu.Poke.pokeQ and QREADY and SivMenu.Combo.targets[target.charName] then
            local CastPosition, HitChance, CastPos = VP:GetLineCastPosition(target, Qdelay, Qwidth, Qrange, Qspeed, myHero, false)
            if HitChance >= SivMenu.Extra.HitchanceP and GetDistance(CastPosition) <= Qrange and QREADY then
                if not VIP_USER or not SivMenu.Extra.packetcast then
                    CastSpell(_Q, CastPosition.x, CastPosition.z)
                elseif VIP_USER and SivMenu.Extra.packetcast then
                    PacketCast(_Q, CastPosition)
                end
            end
        end
    end
end

function GetBestQPositionFarm()
  local MaxQPos
  local MaxQ = 0
  for i, minion in pairs(EnemyMinions.objects) do
    local hitQ = CountMinionsHit(minion)
    if hitQ > MaxQ or MaxQPos == nil then
      MaxQPos = minion
      MaxQ = hitQ
    end
  end

  if MaxQPos then
    return MaxQPos
  else
    return nil
  end
end

function CastQFarm(to)
    if not VIP_USER or not SivMenu.Extra.packetcast then
        CastSpell(_Q, to.x, to.z)
    elseif VIP_USER and SivMenu.Extra.packetcast then
        PacketCast(_Q, to)
    end
end

function FarmQ()
    if ManaManagerFarm() then
    EnemyMinions:update()
    if SivMenu.Farm.farmQ then
        if QREADY and #EnemyMinions.objects > 3 then
            for i, minion in pairs(EnemyMinions.objects) do
            if GetDistance(minion) < Qrange then
                local QPos = GetBestQPositionFarm()
                if QPos then
                    CastQFarm(QPos)
                end
            end
        end
    end
    end
end
end

function FarmW()
    if ManaManagerFarm() then
    EnemyMinions:update()
    if SivMenu.Farm.farmW then
        if WREADY and #EnemyMinions.objects > 3 then
            for i, minion in pairs(EnemyMinions.objects) do
            if GetDistance(minion) < 500 then
                CastSpell(_W)
            end
        end
    end
    end
end
end

function OnProcessSpell(unit, spell)
if unit == myHero and spell.name:lower():find("attack") then
    if SivMenu.combokey and WREADY and SivMenu.Combo.comboW and GetDistance(target) <= 600 then
        if not VIP_USER or not SivMenu.Extra.packetcast then
            DelayAction(function() CastSpell(_W) end, spell.windUpTime + GetLatency() / 2000)
        elseif VIP_USER and SivMenu.Extra.packetcast then
            DelayAction(function() PacketCast(_W, myHero) end, spell.windUpTime + GetLatency() / 2000)
        end
    end
end
end

function ManaManagerFarm()
    if myHero.mana >= myHero.maxMana * (SivMenu.Farm.manafarm / 100) then
    return true
    else
    return false
    end
end

function ManaManager()
    if myHero.mana >= myHero.maxMana * (SivMenu.Combo.manapls / 100) then
    return true
    else
    return false
    end
end

function ManaManagerPoke()
    if myHero.mana >= myHero.maxMana * (SivMenu.Poke.manapls / 100) then
    return true
    else
    return false
    end
end

function CastR()
    if SivMenu.Combo.minEnemiesR <= CountEnemyHeroInRange(600) then
        if not VIP_USER or not SivMenu.Extra.packetcast then
            CastSpell(_R)
        elseif VIP_USER and SivMenu.Extra.packetcast then
            PacketCast(_R, myHero)
        end
    end
end

function CountMinionsHit(QPos)
  local LineEnd = Vector(myHero) + Qrange * (Vector(QPos) - Vector(myHero)):normalized()
  local n = 0
  for i, minion in pairs(EnemyMinions.objects) do
    local pointSegment, pointLine, isOnSegment = VectorPointProjectionOnLineSegment(Vector(myHero), LineEnd, minion)
    if isOnSegment and GetDistance(minion, pointSegment) <= 85*1.25 then
      n = n + 1
    end
  end
  return n
end

function AutoLevel()
        if SivMenu.Extra.autolev.lvlseq == 1 then seq = {1, 2, 1, 3, 1, 4, 1, 2, 1, 2, 4, 2, 2, 3, 3, 4, 3, 3}
        elseif SivMenu.Extra.autolev.lvlseq == 2 then seq = {2, 1, 2, 3, 2, 4, 2, 1, 2, 1, 4, 1, 1, 3, 3, 4, 3, 3}
        elseif SivMenu.Extra.autolev.lvlseq == 3 then seq = {3, 1, 3, 2, 3, 4, 3, 1, 3, 1, 4, 1, 1, 2, 2, 4, 2, 2,}
        end
        autoLevelSetSequence(seq)
end

function SkinHack()
    if SivMenu.Extra.skinhax.enabled and CurSkin ~= SivMenu.Extra.skinhax.skinid then
        local SkinIdSwap = { [1] = 7, [2] = 1, [3] = 2, [4] = 3, [5] = 4, [6] = 5, [7] = 6 }
        CurSkin = SivMenu.Extra.skinhax.skinid
        SkinChanger(myHero.charName, SkinIdSwap[CurSkin])
    end
end

function SkinChanger(champ, skinId) -- Credits to shalzuth
    p = CLoLPacket(0x97)
    p:EncodeF(myHero.networkID)
    p.pos = 1
    t1 = p:Decode1()
    t2 = p:Decode1()
    t3 = p:Decode1()
    t4 = p:Decode1()
    p:Encode1(t1)
    p:Encode1(t2)
    p:Encode1(t3)
    p:Encode1(bit32.band(t4,0xB))
    p:Encode1(1)
    p:Encode4(skinId)
    for i = 1, #champ do
        p:Encode1(string.byte(champ:sub(i,i)))
    end
    for i = #champ + 1, 64 do
        p:Encode1(0)
    end
    p:Hide()
    RecvPacket(p)
end

function calcDmg()
    for i=1, heroManager.iCount do
        local target = heroManager:GetHero(i)
        if ValidTarget(target) and target ~= nil then
            qDmg = ((QREADY and getDmg("Q", target, myHero)) or 0)
            aDmg = ((getDmg("AD", target, myHero)) or 0)
            aDmg2 = (aDmg * 2)
            aDmg3 = (aDmg * 3)
            aDmg4 = (aDmg * 4)

            if target.health > (qDmg + aDmg4) then
                KillText[i] = 1
            elseif target.health <= aDmg then
                KillText[i] = 2
            elseif target.health <= aDmg2 then
                KillText[i] = 3
            elseif target.health <= aDmg3 then
                KillText[i] = 4
            elseif target.health <= qDmg then
                KillText[i] = 5
            elseif target.health <= (qDmg + aDmg) then
                KillText[i] = 6
            elseif target.health <= (qDmg + aDmg2) then
                KillText[i] = 7
            elseif target.health <= (qDmg + aDmg3) then
                KillText[i] = 8
            elseif target.health <= (qDmg + aDmg4) then
                KillText[i] = 9
            end
        end
    end
end

--[[    Announcer   ]]
function AnnouncerMsg(msg) print("<font color=\"#6699ff\"><b>Fantastik Sivir Announce:</b></font> <font color=\"#FFFFFF\">"..msg.."</font>") end
function Announcer()
    local Announce
    local AnnouncerData = GetWebResult(UPDATE_HOST, "/BoLFantastik/BoL/master/Announcer/Fantastik Sivir")
    if AnnouncerData then
        Announcer = AnnouncerData or nil
        if Announcer then
            AnnouncerMsg(""..Announcer.."")
        end
    end
end

function PacketCast(spell, position)
    Packet("S_CAST", {spellId = spell, fromX =  position.x, fromY =  position.z, toX =  position.x, toY =  position.z}):send()
end