make spell give skull and pz lock!

Seanr · Aug 13, 2012

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_STUN)

AREA_CIRCLE = {
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}

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

local condition = {}
for i = 1, 4 do
condition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition, CONDITION_PARAM_TICKS, 15000)
setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELDPERCENT, 50)
end
setConditionParam(condition[1], CONDITION_PARAM_STAT_MAGICLEVEL, -40)
setConditionParam(condition[2], CONDITION_PARAM_SKILL_DISTANCEPERCENT, -150)
setConditionParam(condition[3], CONDITION_PARAM_SKILL_MELEEPERCENT, -150)

function onTargetCreature(cid, target)
if(isMage(target) or isBard(target)) then
return doTargetCombatCondition(cid, target, condition[1], CONST_ME_MAGIC_BLUE), true
elseif(isPaladin(target)) then
return doTargetCombatCondition(cid, target, condition[2], CONST_ME_MAGIC_GREEN), true
elseif(isKnight(target)) then
return doTargetCombatCondition(cid, target, condition[3], CONST_ME_MAGIC_RED), true
end
return true
end

setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature")

function onCastSpell(cid, var)
local tribute = getCreatureMaxHealth(cid) * 1 - getCreatureMaxHealth(cid)

if getCreatureHealth(cid) <= tribute then
doPlayerSendCancel(cid, "You need more health points.")
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return LUA_ERROR
else
doCreatureAddHealth(cid, -tribute)
return doCombat(cid, combat, var)
end
end

Is there any way to make this spell give skull when used on player and not in party or guild with the player(s)?

Evan · Aug 13, 2012

Isn't it already like that by default?

Seanr · Aug 13, 2012

No it doesn't, can you help?

Loney · Aug 14, 2012

@Evan; I think that he means that add to the target the skull and pz lock?

Code:

setConditionParam(condition[1], CONDITION_INFIGHT)

Seanr · Aug 14, 2012

Loney said:
@Evan; I think that he means that add to the target the skull and pz lock?

Code:

setConditionParam(condition[1], CONDITION_INFIGHT)

Where do I add this Loney? Sorry lol

Loney · Aug 14, 2012

Here?

Code:

local condition = {}
for i = 1, 4 do
condition[i] = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition[i], CONDITION_PARAM_TICKS, 15000)
setConditionParam(condition[i], CONDITION_PARAM_SKILL_SHIELDPERCENT, 50)
end
setConditionParam(condition[1], CONDITION_PARAM_STAT_MAGICLEVEL, -40)
setConditionParam(condition[2], CONDITION_PARAM_SKILL_DISTANCEPERCENT, -150)
setConditionParam(condition[3], CONDITION_PARAM_SKILL_MELEEPERCENT, -150)

Seanr · Aug 15, 2012

Doesn't work, Loney.

Bump!

Seanr · Aug 17, 2012

Nothxbye · Aug 17, 2012

Code:

AREA_CIRCLE = {
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}

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

local condition = {}
for i = 1, 4 do
condition[i] = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition[i], CONDITION_PARAM_TICKS, 15000)
setConditionParam(condition[i], CONDITION_PARAM_SKILL_SHIELDPERCENT, 50)
end
setConditionParam(condition[1], CONDITION_PARAM_STAT_MAGICLEVEL, -40)
setConditionParam(condition[2], CONDITION_PARAM_SKILL_DISTANCEPERCENT, -150)
setConditionParam(condition[3], CONDITION_PARAM_SKILL_MELEEPERCENT, -150)

function onTargetCreature(cid, target) 
if isPlayer(target) == TRUE then
doCreatureSetSkullType(target, 3)
end
return 1
end

setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature")

function onCastSpell(cid, var)
local tribute = getCreatureMaxHealth(cid) * 1 - getCreatureMaxHealth(cid)

if getCreatureHealth(cid) <= tribute then
doPlayerSendCancel(cid, "You need more health points.")
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return LUA_ERROR
else
doCreatureAddHealth(cid, -tribute)
return doCombat(cid, combat, var)
end
end

Seanr · Aug 18, 2012

Nothxbye said:

Code:

AREA_CIRCLE = {
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}

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

local condition = {}
for i = 1, 4 do
condition[i] = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition[i], CONDITION_PARAM_TICKS, 15000)
setConditionParam(condition[i], CONDITION_PARAM_SKILL_SHIELDPERCENT, 50)
end
setConditionParam(condition[1], CONDITION_PARAM_STAT_MAGICLEVEL, -40)
setConditionParam(condition[2], CONDITION_PARAM_SKILL_DISTANCEPERCENT, -150)
setConditionParam(condition[3], CONDITION_PARAM_SKILL_MELEEPERCENT, -150)

function onTargetCreature(cid, target) 
if isPlayer(target) == TRUE then
doCreatureSetSkullType(target, 3)
end
return 1
end

setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature")

function onCastSpell(cid, var)
local tribute = getCreatureMaxHealth(cid) * 1 - getCreatureMaxHealth(cid)

if getCreatureHealth(cid) <= tribute then
doPlayerSendCancel(cid, "You need more health points.")
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return LUA_ERROR
else
doCreatureAddHealth(cid, -tribute)
return doCombat(cid, combat, var)
end
end

This gives target skull even if theyre in party or guild..I want the player using spell to receive skull but only if that player isnt in party or guild with target..

Cronox · Aug 19, 2012

Code:

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_STUN)
[COLOR="#FF0000"]setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)[/COLOR]

AREA_CIRCLE = {
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}

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

local condition = {}
for i = 1, 4 do
condition[i] = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition[i], CONDITION_PARAM_TICKS, 15000)
setConditionParam(condition[i], CONDITION_PARAM_SKILL_SHIELDPERCENT, 50)
end
setConditionParam(condition[1], CONDITION_PARAM_STAT_MAGICLEVEL, -40)
setConditionParam(condition[2], CONDITION_PARAM_SKILL_DISTANCEPERCENT, -150)
setConditionParam(condition[3], CONDITION_PARAM_SKILL_MELEEPERCENT, -150)

function onTargetCreature(cid, target)
if(isMage(target) or isBard(target)) then
return doTargetCombatCondition(cid, target, condition[1], CONST_ME_MAGIC_BLUE), true
elseif(isPaladin(target)) then
return doTargetCombatCondition(cid, target, condition[2], CONST_ME_MAGIC_GREEN), true
elseif(isKnight(target)) then
return doTargetCombatCondition(cid, target, condition[3], CONST_ME_MAGIC_RED), true
end
return true
end

setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature")

function onCastSpell(cid, var)
local tribute = getCreatureMaxHealth(cid) * 1 - getCreatureMaxHealth(cid)

if getCreatureHealth(cid) <= tribute then
doPlayerSendCancel(cid, "You need more health points.")
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return LUA_ERROR
else
doCreatureAddHealth(cid, -tribute)
return doCombat(cid, combat, var)
end
end

Seanr · Aug 19, 2012

Cronox said:

Code:

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_STUN)
[COLOR="#FF0000"]setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false)[/COLOR]

AREA_CIRCLE = {
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}

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

local condition = {}
for i = 1, 4 do
condition[i] = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition[i], CONDITION_PARAM_TICKS, 15000)
setConditionParam(condition[i], CONDITION_PARAM_SKILL_SHIELDPERCENT, 50)
end
setConditionParam(condition[1], CONDITION_PARAM_STAT_MAGICLEVEL, -40)
setConditionParam(condition[2], CONDITION_PARAM_SKILL_DISTANCEPERCENT, -150)
setConditionParam(condition[3], CONDITION_PARAM_SKILL_MELEEPERCENT, -150)

function onTargetCreature(cid, target)
if(isMage(target) or isBard(target)) then
return doTargetCombatCondition(cid, target, condition[1], CONST_ME_MAGIC_BLUE), true
elseif(isPaladin(target)) then
return doTargetCombatCondition(cid, target, condition[2], CONST_ME_MAGIC_GREEN), true
elseif(isKnight(target)) then
return doTargetCombatCondition(cid, target, condition[3], CONST_ME_MAGIC_RED), true
end
return true
end

setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature")

function onCastSpell(cid, var)
local tribute = getCreatureMaxHealth(cid) * 1 - getCreatureMaxHealth(cid)

if getCreatureHealth(cid) <= tribute then
doPlayerSendCancel(cid, "You need more health points.")
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return LUA_ERROR
else
doCreatureAddHealth(cid, -tribute)
return doCombat(cid, combat, var)
end
end

nope

and it gives this to other player: 14:53 You are strengthened. Can I make it say you are weakened?

Cronox · Aug 19, 2012

What version TFS have you?

Seanr · Aug 19, 2012

Cronox said:
What version TFS have you?

I think it is 0.3.6 for TFS..

Cronox · Aug 19, 2012

try this

Lua:

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_STUN)

AREA_CIRCLE = {
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}

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

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

local condition = {}
for i = 1, 4 do
condition[i] = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition[i], CONDITION_PARAM_TICKS, 15000)
setConditionParam(condition[i], CONDITION_PARAM_SKILL_SHIELDPERCENT, 50)
end
setConditionParam(condition[1], CONDITION_PARAM_STAT_MAGICLEVEL, -40)
setConditionParam(condition[2], CONDITION_PARAM_SKILL_DISTANCEPERCENT, -150)
setConditionParam(condition[3], CONDITION_PARAM_SKILL_MELEEPERCENT, -150)

function onTargetCreature(cid, target)
if(isMage(target) or isBard(target)) then
return doTargetCombatCondition(cid, target, condition[1], CONST_ME_MAGIC_BLUE), true
elseif(isPaladin(target)) then
return doTargetCombatCondition(cid, target, condition[2], CONST_ME_MAGIC_GREEN), true
elseif(isKnight(target)) then
return doTargetCombatCondition(cid, target, condition[3], CONST_ME_MAGIC_RED), true
end
return true
end

setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature")

function onCastSpell(cid, var)
doPlayerAddMana(cid, 0)
local tribute = getCreatureMaxHealth(cid) * 1 - getCreatureMaxHealth(cid)
if getCreatureHealth(cid) <= tribute then
doPlayerSendCancel(cid, "You need more health points.")
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return LUA_ERROR
else
doCreatureAddHealth(cid, -tribute)
return doCombat(cid, combat, var)
end
end

Seanr · Aug 19, 2012

Cronox said:

try this

Lua:

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_STUN)

AREA_CIRCLE = {
{0, 1, 1, 1, 0},
{1, 1, 1, 1, 1},
{1, 1, 2, 1, 1},
{1, 1, 1, 1, 1},
{0, 1, 1, 1, 0}
}

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

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

local condition = {}
for i = 1, 4 do
condition[i] = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition[i], CONDITION_PARAM_TICKS, 15000)
setConditionParam(condition[i], CONDITION_PARAM_SKILL_SHIELDPERCENT, 50)
end
setConditionParam(condition[1], CONDITION_PARAM_STAT_MAGICLEVEL, -40)
setConditionParam(condition[2], CONDITION_PARAM_SKILL_DISTANCEPERCENT, -150)
setConditionParam(condition[3], CONDITION_PARAM_SKILL_MELEEPERCENT, -150)

function onTargetCreature(cid, target)
if(isMage(target) or isBard(target)) then
return doTargetCombatCondition(cid, target, condition[1], CONST_ME_MAGIC_BLUE), true
elseif(isPaladin(target)) then
return doTargetCombatCondition(cid, target, condition[2], CONST_ME_MAGIC_GREEN), true
elseif(isKnight(target)) then
return doTargetCombatCondition(cid, target, condition[3], CONST_ME_MAGIC_RED), true
end
return true
end

setCombatCallback(combat, CALLBACK_PARAM_TARGETCREATURE, "onTargetCreature")

function onCastSpell(cid, var)
doPlayerAddMana(cid, 0)
local tribute = getCreatureMaxHealth(cid) * 1 - getCreatureMaxHealth(cid)
if getCreatureHealth(cid) <= tribute then
doPlayerSendCancel(cid, "You need more health points.")
doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF)
return LUA_ERROR
else
doCreatureAddHealth(cid, -tribute)
return doCombat(cid, combat, var)
end
end

That makes player get effected...and it doesnt make area spell anymore. :/ and it gives yellow skull to player lol >.< This just completely messes up the spell..

Cronox · Aug 19, 2012

not understand now my script give you skull and problem is..?

Seanr · Aug 19, 2012

Cronox said:
not understand now my script give you skull and problem is..?

It doesn't give white skull...

Can you just make it do some damage? and I can add to attack spells.

Cronox · Aug 19, 2012

damage is in formulas..
for white skull hmm i go see

Seanr · Aug 19, 2012

Cronox said:
damage is in formulas..
for white skull hmm i go see

ok..

- - - Updated - - -

BUMP

make spell give skull and pz lock!

New Member

A splendid one to behold

New Member

#!

New Member

#!

New Member

New Member

Banned User

New Member

www.Searz-Online.com

New Member

www.Searz-Online.com

New Member

www.Searz-Online.com

New Member

www.Searz-Online.com

New Member

www.Searz-Online.com

New Member

Similar threads