class "TroopPhite"


function TroopPhite:__init()
    if myHero.charName ~= "Malphite" then return end
    require('DamageLib')
    PrintChat("[TroopPhite] loaded")
    self:LoadSpells()
    self:LoadMenu()
    Callback.Add('Tick', function() self:Tick() end)
    Callback.Add('Draw', function() self:Draw() end)

end


function TroopPhite:LoadSpells()
    Q = {Range = 625, Delay = 0.25, Radius = 1, Speed = 500}
    W = {Range = 125, Delay = 0.25, Radius = 300, Speed = 500}
    E = {Range = 200, Delay = 0.25, Radius = 350, Speed = 9999999} --instant
    R = {Range = 1000, Delay = 0.25, Radius = 300, Speed = 1500}
end

--MENU
function TroopPhite:LoadMenu()
    self.Menu = MenuElement({type = MENU, id = "TroopPhite", name = "trooperhdx - TroopPhite", leftIcon="http://puu.sh/tr1zs/735071dd81.jpg"})

    --Combo
    self.Menu:MenuElement({type = MENU, id = "Combo", name = "Combo"})
    self.Menu.Combo:MenuElement({id = "CombQ", name = "Use Q", value = true})
    self.Menu.Combo:MenuElement({id = "CombW", name = "Use W", value = true})
    self.Menu.Combo:MenuElement({id = "CombE", name = "Use E", value = true})
    self.Menu.Combo:MenuElement({id = "CombR", name = "Use R", value = true})
    self.Menu.Combo:MenuElement({id = "CombMana", name = "Min. Mana to Combo", value = 40, min = 0, max = 100})

    --Harass
    self.Menu:MenuElement({type = MENU, id = "Harass", name = "Harass"})
    self.Menu.Harass:MenuElement({id = "HQ", name = "Use Q", value = true})
    self.Menu.Harass:MenuElement({id = "HMana", name = "Min. Mana", value = 40, min = 0, max = 100})

    --Farm
    self.Menu:MenuElement({type = MENU, id = "Farm", name = "LaneClear"})
    self.Menu.Farm:MenuElement({id = "lcE", name = "Use E", value = true})
    self.Menu.Farm:MenuElement({id = "lcMana", name = "Min. Mana", value = 40, min = 0, max = 100})

    --LastHit
    self.Menu:MenuElement({type = MENU, id = "LastHit", name = "LastHit"})
    self.Menu.LastHit:MenuElement({id = "lhQ", name = "Use Q", value = true})
    self.Menu.LastHit:MenuElement({id = "lhMana", name = "Min. Mana", value = 40, min = 0, max = 100})

    --Misc
    self.Menu:MenuElement({type = MENU, id = "Misc", name = "Misc"})
    self.Menu.Misc:MenuElement({id = "IgniteE", name = "Use Ignite", value = true})
    self.Menu.Misc:MenuElement({id = "kswithQ", name = "Use Q to ks", value = true})


    --Draw
    self.Menu:MenuElement({type = MENU, id = "Draw", name = "Drawing Settings"})
    self.Menu.Draw:MenuElement({id = "DrawSpells", name = "Draw Only Ready Spells", value = true})
    self.Menu.Draw:MenuElement({id = "DrawQ", name = "Draw Q Range", value = true})
    self.Menu.Draw:MenuElement({id = "DrawW", name = "Draw W Range", value = true})
    self.Menu.Draw:MenuElement({id = "DrawE", name = "Draw E Range", value = true})
    self.Menu.Draw:MenuElement({id = "DrawR", name = "Draw R Range", value = true})
    self.Menu.Draw:MenuElement({id = "DrawTarget", name = "Draw Target", value = true})

    PrintChat("[TroopPhite] Menu Loaded")
end


--MENU
function TroopPhite:Tick()

    local target = self:GetTarget(R.Range)

    if self:Mode() == "Combo" then
        self:Combo(target)
    elseif self:Mode() == "Harass" then
        self:Harass(target)
    elseif self:Mode() == "Farm" then
        self:Farm()
    elseif self:Mode() == "Lasthit" then
        self:Lasthit()

    end
end

--MENU END

--THINGS NEEDED
function TroopPhite:GetPercentMP(unit)
    return 100 * unit.mana / unit.maxMana
end




function TroopPhite:IsReady(spellSlot)
    return myHero:GetSpellData(spellSlot).currentCd < 0.01 and myHero:GetSpellData(spellSlot).level > 0
end

function TroopPhite:CheckMana(spellSlot)
    return myHero:GetSpellData(spellSlot).mana < myHero.mana
end

function TroopPhite:CanCast(spellSlot)
    return self:IsReady(spellSlot) and self:CheckMana(spellSlot)
end

function TroopPhite:IsValidTarget(obj, spellRange)
    return obj ~= nil and obj.valid and obj.visible and not obj.dead and obj.isTargetable and obj.distance <= spellRange
end
--END THINGS NEEDED



--CS
function TroopPhite:GetFarmTarget(range)
    local target
    for j = 1,Game.MinionCount() do
        local minion = Game.Minion(j)
        if self:IsValidTarget(minion, range) and minion.team ~= myHero.team then
            target = minion
            break
        end
    end
    return target
end



--GETTARGET
function TroopPhite:GetTarget(range)
    local target
    for i = 1,Game.HeroCount() do
        local hero = Game.Hero(i)
        if self:IsValidTarget(hero, range) and hero.team ~= myHero.team then
            target = hero
            break
        end
    end
    return target
end


--MISC
function TroopPhite:Misc()
    for K, Enemy in pairs(GetTarget()) do
        if Menu.Misc.kswithQ:Value() then
            if getdmg("Q", Enemy, myHero) > Enemy.health then
                CastQ(Enemy)
                return;
            end
        end

        if myHero:GetSpellData(5).name == "SummonerDot" and Menu.Misc.IgniteE:Value() and IsReady(SUMMONER_2) then
            if IsValidTarget(Enemy, 600, false, myHero.pos) and Enemy.health + Enemy.hpRegen*2.5 + Enemy.shieldAD < 50 + 20*myHero.levelData.lvl then
                Control.CastSpell(HK_SUMMONER_2, Enemy)
                return;
            end
        end
        if myHero:GetSpellData(4).name == "SummonerDot" and Menu.Misc.IgniteE:Value() and IsReady(SUMMONER_1) then
            if IsValidTarget(Enemy, 600, false, myHero.pos) and Enemy.health + Enemy.hpRegen*2.5 + Enemy.shieldAD < 50 + 20*myHero.levelData.lvl then
                Control.CastSpell(HK_SUMMONER_1, Enemy)
                return;
            end
        end
    end
end


--COMBO
function TroopPhite:Combo(target)
    if (myHero.mana/myHero.maxMana >= self.Menu.Combo.CombMana:Value()/100) then
        if self.Menu.Combo.CombQ:Value() and self:CanCast(_Q) and self:IsValidTarget(target, Q.Range) then
            self:CastQ(target)

    elseif self.Menu.Combo.CombE:Value() and self:CanCast(_E) and self:IsValidTarget(target, E.Range) then
            self:CastE(target)

    elseif self.Menu.Combo.CombE:Value() and self:CanCast(_W) and self:IsValidTarget(target, W.Range) then
           self:CastW()

    elseif self.Menu.Combo.CombR:Value() and self:CanCast(_R) and self:IsValidTarget(target, R.Range) then
           self:CastR(target)

        end
    end
end



--Harass
function TroopPhite:Harass()
    if (myHero.mana/myHero.maxMana >= self.Menu.Harass.HMana:Value() / 100) then
        local target = self:GetTarget(Q.Range)
        if self.Menu.Harass.HQ:Value() and self:CanCast(_Q) then
            self:CastQ(target)
        end
    end
end

--LastHit
function TroopPhite:LastHit()
    if self.Menu.LastHit.lhQ:Value() and (myHero.mana/myHero.maxMana >= self.Menu.LastHit.lhMana:Value() / 100) and self:CanCast(_Q) then
        local target
        for i=1,Game.MinionCount() do
            local minion = Game.Minion(i)
            if self:IsValidTarget(minion, Q.Range) and
                (minion.team ~= myHero.team) and
                (getdmg(_Q, minion, myHero) > minion.health) then
                target = minion
                break
            end
        end

        if target and self:IsValidTarget(target, Q.Range)then
            self:CastQ(target)
        end
    end
end


--FARM
function TroopPhite:Farm()
    if (myHero.mana/myHero.maxMana >= self.Menu.Farm.lcMana:Value() / 100) then
        local eMinion = self:GetFarmTarget(E.Range)
        if self.Menu.Farm.lcE:Value() and self:CanCast(_E) then
            self:CastE(eMinion)
        end
    end
end

--MODE
function TroopPhite:Mode()
    if Orbwalker["Combo"].__active then
        return "Combo"
    elseif Orbwalker["Harass"].__active then
        return "Harass"
    elseif Orbwalker["Farm"].__active then
        return "Farm"
    elseif Orbwalker["LastHit"].__active then
        return "LastHit"
    end
    return ""
end


--Q CAST
function TroopPhite:CastQ(unit)
    Control.CastSpell(HK_Q, unit)
end


--W CAST
function TroopPhite:CastW()
    Control.CastSpell(HK_W)
end


--E CAST
function TroopPhite:CastE(unit)
    Control.CastSpell(HK_E, unit)
end


--R CAST
function TroopPhite:CastR(Rtarget)
    if Rtarget then
        local castPos = Rtarget:GetPrediction(R.Speed, R.Delay)
        Control.CastSpell(HK_R, castPos)
    end
end



--DRAWINGS COPIED FROM ALQOHOL
function TroopPhite:Draw()
    if myHero.dead then return end
    if self.Menu.Draw.DrawSpells:Value() then
        if self:IsReady(_Q) and self.Menu.Draw.DrawQ:Value() then
            Draw.Circle(myHero.pos,Q.Range,1,Draw.Color(255, 255, 255, 255))
        end
        if self:IsReady(_W) and self.Menu.Draw.DrawW:Value() then
            Draw.Circle(myHero.pos,W.Range,1,Draw.Color(255, 255, 255, 255))
        end
        if self:IsReady(_E) and self.Menu.Draw.DrawE:Value() then
            Draw.Circle(myHero.pos,E.Range,1,Draw.Color(255, 255, 255, 255))
        end
        if self.Menu.Draw.DrawQ:Value() then
            Draw.Circle(myHero.pos,Q.Range,1,Draw.Color(255, 255, 255, 255))
        end
        if self.Menu.Draw.DrawW:Value() then
            Draw.Circle(myHero.pos,W.Range,1,Draw.Color(255, 255, 255, 255))
        end
        if self.Menu.Draw.DrawE:Value() then
            Draw.Circle(myHero.pos,E.Range,1,Draw.Color(255, 255, 255, 255))
        end
    end
end




function OnLoad()
    TroopPhite()
end