Skrypt

KSSO · 25 Lutego 2014

Mam skrypt syndra gdzie go mam wkleić i jak bo jak zapisuje w lua to dalej jest notatnik gdzie go włożyć ITP.Dobry jest ten skrypt i go mam wkleić czy cos pozmieniać?

--[[
Follow while combo:
0 for Dont Follow
1 for Follow the mouse
]]
if myHero.charName ~= "Syndra" then return end
local qRange = 800
local wRange = 925
local eRange = 650
local rRange = 675
local enemyMinions = {}
local ultDmg = {90, 135, 180}
local wWait, nextdelay, balls, qX, qZ, qCreated = 0, 0, 0, 0, 0, 0
local DFGSlot = nil
local delay, espeed = 250, 1.35
local QREADY, WREADY, EREADY, RREADY, DFGREADY = false, false, false, false, false
function onload()
HConfig = scriptConfig("Syndra Combo", "SyndraCombo")
HConfig:addParam("scriptActive", "Combo", SCRIPT_PARAM_onkeydown, false, 32)
HConfig:addParam("stun", "Stun", SCRIPT_PARAM_onkeydown, false, 84)
HConfig:addParam("following", "Follow while combo", SCRIPT_PARAM_SLICE, 0, 0, 1)
for i=1, heroManager.iCount do
local enemy = heroManager:GetHero(i)
if enemy.team ~= myHero.team then
HConfig:addParam("ult"..enemy.charName, "Ult and DFG on "..enemy.charName,SCRIPT_PARAM_ONOFF, true)
end
end
HConfig:permaShow("stun")
HConfig:permaShow("scriptActive")
enemyMinions = minionManager(MINION_ENEMY, wRange, myHero, MINION_SORT_HEALTH_DES)
PrintChat(" >> Syndra Combo by HunteR")
end
function getEnemyMinion()
for i, minion in pairs(enemyMinions.objects) do
if minion ~= nil and minion.valid then
return minion
end
end
return nil
end
function getBall()
local ret = nil
if GetTickCount() > nextdelay then
balls = 0
for i = 1, objManager.maxObjects do
local object = objManager:getObject(i)
if object then
if GetDistance(object) < rRange and string.find(string.lower(object.name),"darksphere") and string.find(string.lower(object.name), "_idle") then
balls = balls + 1
if ret == nil then ret = object end
end
end
end
if ret == nil then ret = "none" end
nextdelay = GetTickCount() + 100
end
return ret
end
function OnTick()
if myHero.dead then
return
end
QREADY = (myHero:CanUseSpell(_Q) == READY)
WREADY = (myHero:CanUseSpell(_W) == READY)
EREADY = (myHero:CanUseSpell(_E) == READY)
RREADY = (myHero:CanUseSpell(_R) == READY)
DFGSlot = GetInventorySlotItem(3128)
DFGREADY = (DFGSlot ~= nil and myHero:CanUseSpell(DFGSlot) == READY)
local spellR = myHero:GetSpellData(_R)
if spellR.level == 3 then rRange = 750 end
if HConfig.scriptActive then combo("Combo") end
if HConfig.stun then combo("Stun") end
end
function OnProcessSpell(unit, spell)
if unit.name == myHero.name then
if spell.name == "SyndraQ" then
qCreated = os.clock() + 1
qX, qZ = spell.endPos.x, spell.endPos.z
end
end
end
function getDistance2(x1, z1, x2, z2)
return math.sqrt(math.pow(x2 - x1, 2) + math.pow(z2 - z1, 2))
end
function combo(typeC)
local focusEnemy = nil
local minimumHit = -1
local lowPriority = false
local stunEnemy = nil
local minimumDistance = -1
for i=1, heroManager.iCount do
local target = heroManager:GetHero(i)
if ValidTarget(target, 1000) then
local dmg = getDmg("Q", target, myHero)
local hits = (target.health / dmg)
if minimumHit == -1 or (hits < minimumHit and HConfig["ult"..target.charName]) or hits <=1.05 or (not lowPriority and minimumHit > 1.05) then
focusEnemy = target
minimumHit = hits
lowPriority = HConfig["ult"..target.charName]
end
local distancetoStun = GetDistance(target)
if minimumDistance == -1 or distancetoStun < minimumDistance then
stunEnemy = target
minimumDistance = distancetoStun
end
end
end
if focusEnemy ~= nil or (stunEnemy ~= nil and typeC == "Stun") then
if typeC == "Stun" then
focusEnemy = stunEnemy
end
local travelDuration = (delay + GetDistance(myHero, focusEnemy)/espeed)
travelDuration = (delay + GetDistance(GetPredictionPos(focusEnemy, travelDuration))/espeed)
travelDuration = (delay + GetDistance(GetPredictionPos(focusEnemy, travelDuration))/espeed)
travelDuration = (delay + GetDistance(GetPredictionPos(focusEnemy, travelDuration))/espeed)
local prediction = GetPredictionPos(focusEnemy, travelDuration)
local spellW = myHero:GetSpellData(_W)
if QREADY and prediction ~= nil then
local dPredict = GetDistance(prediction)
if EREADY then
if (dPredict < eRange) then
CastSpell(_Q, prediction.x, prediction.z)
else
local xQ = myHero.x + (eRange / dPredict) * (prediction.x - myHero.x)
local zQ = myHero.z + (eRange / dPredict) * (prediction.z - myHero.z)
CastSpell(_Q, xQ, zQ)
end
return
elseif dPredict < qRange then
CastSpell(_Q, prediction.x, prediction.z)
return
end
end
if EREADY and qCreated > os.clock() then
if getDistance2(myHero.x, myHero.z, qX, qZ) < eRange then
CastSpell(_E, qX, qZ)
wWait = GetTickCount() + 700
return
else
myHero:MoveTo(qX, qZ)
return
end
end
if typeC == "Combo" then
if DFGREADY and GetDistance(focusEnemy) < 750 and HConfig["ult"..focusEnemy.charName] then
CastSpell(DFGSlot, focusEnemy)
return
end
if WREADY and GetTickCount() > wWait then
local wGetX, wGetZ = nil, nil
if spellW.name == "SyndraW" and not EREADY then
enemyMinions:update()
local minion = getEnemyMinion()
if minion ~= nil then wGetX, wGetZ = minion.x, minion.z end
if wGetX == nil then
local ball = getBall()
if ball == nil then return end
if ball ~= "none" then wGetX, wGetZ = ball.x, ball.z end
end
if wGetX ~= nil then
CastSpell(_W, wGetX, wGetZ)
wWait = GetTickCount() + 300
return
end
elseif spellW.name ~= "SyndraW" then
if not focusEnemy.canMove then
wGetX = focusEnemy.x
wGetZ = focusEnemy.z
elseif prediction ~= nil then
wGetX = prediction.x
wGetZ = prediction.z
end
if wGetX ~= nill then
CastSpell(_W, wGetX, wGetZ)
return
end
end
end
local AlwaysUltimate = true
if CountEnemyHeroInRange(1000) > 3 then
if getDmg("Q", focusEnemy, myHero) >= focusEnemy.health then
AlwaysUltimate = false
end
end
if RREADY and GetDistance(focusEnemy) < rRange and HConfig["ult"..focusEnemy.charName] andAlwaysUltimate then
if getBall() ~= nil then
local ballsAll = 3 + balls
local spellR = myHero:GetSpellData(_R)
local RdmgAll = myHero:CalcMagicDamage(focusEnemy, ((ultDmg[spellR.level]* ballsAll) + (ballsAll * 0.2 * myHero.ap)))
local percentDmg = RdmgAll / focusEnemy.health
if percentDmg > 1 and (percentDmg < 5 or (myHero.health /myHero.maxHealth) < 0.25) then
CastSpell(_R, focusEnemy)
return
end
end
end
end
end
if HConfig.following == 1 and typeC == "Combo" then
myHero:MoveTo(mousePos.x, mousePos.z)
end
end

Vanosh. · 25 Lutego 2014

http://www.mpcforum.pl/topic/1157240-skrypt/

dbl.

Zaloguj się

👋 Witaj na MPCForum!

Skrypt

Rekomendowane odpowiedzi

KSSO

KSSO

Vanosh.

Vanosh.

Zarchiwizowany