What's new

Skrypty & Kody Stun

Status
Not open for further replies.

buuuszek

Active User
Joined
Aug 27, 2012
Messages
71
Reaction score
0
Witam, chcia?bym zrobi? czar, kt?ry b?dzie unieruchamia? naszych wrog?w, podaj? tutaj skrypt przyk?adowego czaru :

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_SOUND_GREEN)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -2, -2.1, -2.4, -2.5)

arr = {
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 3, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0},
}

local area = createCombatArea(arr)
setCombatArea(combat, area)

function onCastSpell(cid, var)
return doCombat(cid, combat, var)
end


Je?eli kto? z was m?g?by mi pom?c i powiedzia? co dopisa?, aby czar unieruchamia? lub spowolnia? naszych wrog?w to b?d? bardzo wdzi?czny :D
 

misztrz440

Banned
Joined
Dec 15, 2012
Messages
1,032
Reaction score
39
Odp: Stun

Tutaj masz na runke kt?ra tak jak by zamra?a nie wiem przetestuj i zobacz (action)
[LUA]local freezetime = 5

local cooldown = 5 -- time to use again

local storage = 19002

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, 43)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)

local exhaust = createConditionObject(CONDITION_EXHAUST)
setConditionParam(exhaust, CONDITION_PARAM_SUBID, 1)
setConditionParam(exhaust, CONDITION_PARAM_TICKS, -1)
setCombatCondition(combat, exhaust)

local exhaustt = createConditionObject(CONDITION_EXHAUST)
setConditionParam(exhaustt, CONDITION_PARAM_SUBID, 2)
setConditionParam(exhaustt, CONDITION_PARAM_TICKS, -1)
setCombatCondition(combat, exhaustt)

function countDown(number, pos, effect, msgonend, effectonend)
local n = number
for i = 1, number do
addEvent(doSendAnimatedText,i* 1000, pos, n > 1 and n.."" or msgonend .."", n < 6 and TEXTCOLOR_RED or TEXTCOLOR_GREEN)
addEvent(doSendMagicEffect,i* 1000, pos, n > 1 and effect or effectonend )
n = n -1
end
n = number
return true
end

function removed(cid)
doCreatureSetNoMove(cid, 0)
doRemoveCondition(cid,CONDITION_EXHAUST,1)
doRemoveCondition(cid,CONDITION_EXHAUST,2)
end

function onUse(cid, item, fromPosition, itemEx, toPosition)
if exhaustion.get(cid,storage) then
return doPlayerSendCancel(cid,"You can't use this yet.")
end

if not isPlayer(itemEx.uid) or cid == itemEx.uid then
return doPlayerSendCancel(cid,"You can only use this on another players.")
end

doSendAnimatedText(getThingPos(itemEx.uid),"SLOW!", TEXTCOLOR_WHITE)
exhaustion.set(cid,storage,cooldown)
doCombat(cid, combat, numberToVariant(itemEx.uid))
doCreatureSetNoMove(itemEx.uid, 1)
countDown(freezetime , toPosition, 0, "melted", 5)
addEvent(removed,freezetime*1000,itemEx.uid)
return true
end
[/LUA]
 

Restles

Senior User
Joined
Aug 31, 2012
Messages
616
Reaction score
51
Odp: Stun

gdzie to wkleic ?
To jest funkcja.
[LUA]local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 5)
setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 10)
setCombatFormula(combat1, COMBAT_FORMULA_DAMAGE, -1, 0, -1, 0)

arr1 = {
{0, 0, 0},
{1, 1, 1},
{1, 3, 1},
{1, 1, 1},
{0, 0, 0}
}

local area1 = createCombatArea(arr1)
setCombatArea(combat1, area1)

function onTargetCreature(cid, target)
local t = 5000
doCreatureSetNoMove(target, true)
addEvent(doCreatureSetNoMove, t, target, false)
end

setCombatCallback(combat1, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature")

local function onCastSpell1(parameters)
doCombat(parameters.cid, combat1, parameters.var)
end

function onCastSpell(cid, var)
local parameters = { cid = cid, var = var}
addEvent(onCastSpell1, 0, parameters)
end[/LUA]
Chyba o to Ci chodzi?o.
 

buuuszek

Active User
Joined
Aug 27, 2012
Messages
71
Reaction score
0
Odp: Stun

Hmm.. co? jest nie tak :-( nie zadaje dmg i nawet nie spowalania ) m?g?by? zobaczy? to jeszcze raz ? B?d? bardzo wdzieczny
 

Restles

Senior User
Joined
Aug 31, 2012
Messages
616
Reaction score
51
Odp: Stun

Da?e? jako target?, to nie spowalnia tylko powoduje by ca?kowicie nie mo?na by?o si? ruszy?.
#edit
Sam przetestowa?em, i dzia?a normalnie
 
Last edited:

misztrz440

Banned
Joined
Dec 15, 2012
Messages
1,032
Reaction score
39
Odp: Stun

Takie co? dodajesz :
[LUA]function removed(cid)
doCreatureSetNoMove(cid, 0)
doRemoveCondition(cid,CONDITION_EXHAUST,1)
doRemoveCondition(cid,CONDITION_EXHAUST,2)
end[/LUA]
Jeszcze to, ?e to np 5 sekundach mo?na ju? i??:
[LUA]addEvent(removed,freezetime*1000)
local freezetime = 5[/LUA]
 
Status
Not open for further replies.
Top