if GetObjectName(GetMyHero()) == "Evelynn" then
EvelynnM = Menu("Evelynn", "Evelynn")
EvelynnM:SubMenu("Combo", "Combo")
EvelynnM.Combo:Boolean("Q", "Use Q", true)
EvelynnM.Combo:Boolean("W", "Use W", true)
EvelynnM.Combo:Boolean("E", "Use E", true)
EvelynnM.Combo:Boolean("R", "Use R", true)

--Start
OnLoop(function(myHero)
local unit = GetCurrentTarget()
if IOW:Mode() == "Combo" then

if GoS:ValidTarget(unit, 950) then

-- Evelynn W
    if EvelynnM.Combo.W then
        if GetCastName(myHero, _W) == "EvelynnW" then
if CanUseSpell(myHero, _W) == READY then
    CastSpell(myHero,_W)
                end
            end
        end
-- Evelynn Q
    if EvelynnM.Combo.Q then
        if GetCastName(myHero, _Q) == "EvelynnQ" then
if CanUseSpell(myHero, _Q) == READY then
    CastTargetSpell(myHero,_Q)
                end
            end
        end
    -- Evelynn E
   if EvelynnM.Combo.E then
        if GetCastName(myHero, _E) == "EvelynnE" then
if CanUseSpell(myHero, _E) == READY then
    CastTargetSpell(unit,_E)
                end
			end
		end
-- Evelynn R
             if EvelynnM.Combo.R then
if GetCastName(myHero, _R) == "EvelynnR" then
    local RPred = GetPredictionForPlayer(GoS:myHeroPos(),unit,GetMoveSpeed(unit),1600,250,650,55,false,true)
if CanUseSpell(myHero, _R) == READY and IsInDistance(unit, 1550) then
    CastSkillShot(_R,RPred.PredPos.x,RPred.PredPos.y,RPred.PredPos.z)
			end
		end
	end
end
end
end)

PrintChat("Evelynn by Musti")