CreatureScript%25252FGlobalEvent%25252FMoveMent Glacier Set dando conditions em área

**xWhiteWolf** · Abril 10, 2014

Eai galera, esse script eu fiz para um membro aqui do TibiaKing no suporte e achei que ficou bem legal então decidi postar.

Explicação: Ao tomar um dano maior que 300, se o player tiver usando a glacier robe, uma área em volta dele vai ser congelada e todos dentro dessa área ficarão com slow. Caso o player estiver com o full glacier set, além do paralyze, as pessoas dentro da área receberão dano de freezing

crie um arquivo em creaturescripts\scripts chamado glacierrobe.lua e adicione isso daqui dentro dele

--[[Script made 100% by Night Wolf and Nogard
do not remove the fucking credits or I may kill you and practice necrofily with your filthy body]]

--condição que irá adicionar
local gelocondition = createConditionObject(CONDITION_PARALYZE)
setConditionParam(gelocondition, CONDITION_PARAM_TICKS, 10000)   
setConditionFormula(gelocondition, -0.9, 0, -0.9, 0)  


local frigo = createConditionObject(CONDITION_FREEZING)
setConditionParam(frigo, CONDITION_PARAM_DELAYED, 1)
addDamageCondition(frigo, 5, 2000, -300)
addDamageCondition(frigo, 5, 2000, -200)
addDamageCondition(frigo, 5, 2000, -100)


-------
local config = {
itemid = 7897, --id do item que deverá ser equipado para ativar o gelo
place = 4, --posição que o item deve estar para funcionar, cheque na tabela abaixo
percent = 5,  --se vc quiser 20%, coloque 5 pois 1/5 = 0,2 (20%)
valorvida = 300 --quanto deve ser o valor minimo de vida a perder para executar o script 
}


local head = {
itemid = 7902, 
place = 1
} 


local legs = {
itemid = 7896, 
place = 7
} 


local boots = {
itemid = 7892, 
place = 8
} 


local necklace = {
itemid = 7888, 
place = 2
} 


--[[ Tabela de places possíveis 
CONST_SLOT_HEAD (1) = helmet
CONST_SLOT_NECKLACE (2) = necklace slot (amulet of loss etc.)
CONST_SLOT_BACKPACK (3) = backpack, bag
CONST_SLOT_ARMOR (4) = armor
CONST_SLOT_LEFT (5) = left hand (its really hand placed >> (right page on screen))
CONST_SLOT_RIGHT (6) = right hand (its really hand placed << (left page on screen))
CONST_SLOT_LEGS (7) = legs
CONST_SLOT_FEET (8) = boots
CONST_SLOT_RING (9) = ring slot
CONST_SLOT_AMMO (10) = ammo slot (arrows etc.)]]
-----------------------------------------------


function canEffect(pos, pz, proj) -- Night Wolf based on Nord
if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end
if getTilePzInfo(pos) and not pz then return false end
local n = not proj and 3 or 2
for i = 0, 255 do
pos.stackpos = i
local tile = getTileThingByPos(pos)
if tile.itemid ~= 0 and not isCreature(tile.uid) then
if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
return false
end
end
end
return true
end




function onStatsChange(cid, attacker, type, combat, value)
if (getPlayerSlotItem(cid, config.place).itemid == config.itemid) then
if type == STATSCHANGE_HEALTHLOSS and value >= config.valorvida then
if math.random (1,config.percent) == 1 then
local pos = getPlayerPosition (cid)
local effectPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 


local conditionPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
----
{x = pos.x, y = pos.y - 1, z = pos.z},
{x = pos.x, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y, z = pos.z},
{x = pos.x + 1, y = pos.y, z = pos.z},
{x = pos.x - 1, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y + 1, z = pos.z},
------
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 
if isCreature(cid) == TRUE then
        for _, cPos in ipairs(conditionPositions) do
local mob = getTopCreature(cPos).uid
    if canEffect (cPos) and mob ~= 0 and isMonster(mob) then
doAddCondition(mob, gelocondition)
if (getPlayerSlotItem(cid, head.place).itemid == head.itemid) and (getPlayerSlotItem(cid, legs.place).itemid == legs.itemid) and (getPlayerSlotItem(cid, boots.place).itemid == boots.itemid) and (getPlayerSlotItem(cid, necklace.place).itemid == necklace.itemid) then
doAddCondition(mob, frigo)
end
end 
if (getPlayerSlotItem(cid, head.place).itemid == head.itemid) and (getPlayerSlotItem(cid, legs.place).itemid == legs.itemid) and (getPlayerSlotItem(cid, boots.place).itemid == boots.itemid) and (getPlayerSlotItem(cid, necklace.place).itemid == necklace.itemid) then
if canEffect (cPos) then
doSendMagicEffect(cPos, 43)
end
end
end


        for _, ePos in ipairs(effectPositions) do
if canEffect(ePos) then
                doSendMagicEffect(ePos, 41)
end
end
else
end
else
end
return true
else
end
return true
end
return true
end

em creaturescripts.xml adicione essa linha

<event type="statschange" name="glacierrobe" event="script" value="glacierrobe.lua"/>

agora vá em creaturescripts\scripts e procure um arquivo chamado login.lua.
dentro dele coloque isso (de preferencia embaixo dos outros registerCreatureEvent):

registerCreatureEvent(cid, "glacierrobe")

Lembre-se que se vc quiser repetir isso pra outros set's você tem que repetir todo o processo, tanto no creaturescripts.xml quanto no login.lua

no meu server além do set glacier eu uso os outros 3 set's elementais, ficando assim:

creaturescripts\scripts\login.lua

registerCreatureEvent(cid, "glacierrobe") 
registerCreatureEvent(cid, "terramantle")
registerCreatureEvent(cid, "magmacoat")
registerCreatureEvent(cid, "lightingrobe")

creaturescripts.xml

<event type="statschange" name="glacierrobe" event="script" value="glacierrobe.lua"/>
<event type="statschange" name="terramantle" event="script" value="terramantle.lua"/>
<event type="statschange" name="lightingrobe" event="script" value="lightingrobe.lua"/>
<event type="statschange" name="magmacoat" event="script" value="magmacoat.lua"/>

SCRIPTS:
magmacoat.lua

local fire = createConditionObject(CONDITION_FIRE)
setConditionParam(fire, CONDITION_PARAM_DELAYED, 1)
addDamageCondition(fire, 5, 2000, -300)
addDamageCondition(fire, 5, 2000, -200)
addDamageCondition(fire, 5, 2000, -100)


local physical = createConditionObject(CONDITION_PHYSICAL)
setConditionParam(physical, CONDITION_PARAM_DELAYED, 1)
addDamageCondition(physical, 3, 2000, -100)
addDamageCondition(physical, 3, 2000, -75)
addDamageCondition(physical, 3, 2000, -50)


-------
local config = {
itemid = 7899, 
place = 4, 
percent = 5,  
valorvida = 300 
}


local head = {
itemid = 7900, 
place = 1
} 


local legs = {
itemid = 7894, 
place = 7
} 


local boots = {
itemid = 7891, 
place = 8
} 


local necklace = {
itemid = 7890, 
place = 2
} 




--[[CONST_SLOT_HEAD (1) = helmet
CONST_SLOT_NECKLACE (2) = necklace slot (amulet of loss etc.)
CONST_SLOT_BACKPACK (3) = backpack, bag
   CONST_SLOT_ARMOR (4) = armor
    CONST_SLOT_LEFT (5) = left hand (its really hand placed >> (right page on screen))
   CONST_SLOT_RIGHT (6) = right hand (its really hand placed << (left page on screen))
CONST_SLOT_LEGS (7) = legs
CONST_SLOT_FEET (8) = boots
CONST_SLOT_RING (9) = ring slot
   CONST_SLOT_AMMO (10) = ammo slot (arrows etc.)]]
-----------------------------------------------


local function canEffect(pos, pz, proj) -- Night Wolf based on Nord
if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end
if getTilePzInfo(pos) and not pz then return false end
local n = not proj and 3 or 2
for i = 0, 255 do
pos.stackpos = i
local tile = getTileThingByPos(pos)
if tile.itemid ~= 0 and not isCreature(tile.uid) then
if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
return false
end
end
end
return true
end




function onStatsChange(cid, attacker, type, combat, value)
if type == STATSCHANGE_HEALTHLOSS and value >= config.valorvida then
if (getPlayerSlotItem(cid, config.place).itemid == config.itemid) then
if math.random (1,config.percent) == 1 then
local pos = getPlayerPosition (cid)
local effectPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 


local conditionPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
----
{x = pos.x, y = pos.y - 1, z = pos.z},
{x = pos.x, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y, z = pos.z},
{x = pos.x + 1, y = pos.y, z = pos.z},
{x = pos.x - 1, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y + 1, z = pos.z},
------
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 
if isCreature(cid) == TRUE then
        for _, cPos in ipairs(conditionPositions) do
local mob = getTopCreature(cPos).uid
    if canEffect (cPos) and mob ~= 0 and isMonster(mob) then
doAddCondition(mob, physical)
if (getPlayerSlotItem(cid, head.place).itemid == head.itemid) and (getPlayerSlotItem(cid, legs.place).itemid == legs.itemid) and (getPlayerSlotItem(cid, boots.place).itemid == boots.itemid) and (getPlayerSlotItem(cid, necklace.place).itemid == necklace.itemid) then
doAddCondition(mob, fire)
end
end 
if (getPlayerSlotItem(cid, head.place).itemid == head.itemid) and (getPlayerSlotItem(cid, legs.place).itemid == legs.itemid) and (getPlayerSlotItem(cid, boots.place).itemid == boots.itemid) and (getPlayerSlotItem(cid, necklace.place).itemid == necklace.itemid) then
if canEffect (cPos) then
doSendMagicEffect(cPos, 15)
end
end
end


        for _, ePos in ipairs(effectPositions) do
if canEffect(ePos) then
                doSendMagicEffect(ePos, 5)
end
end
else
end
else
end
return true
else
end
return true
end
return true
end

lightingrobe.lua

local dazzled = createConditionObject(CONDITION_DAZZLED)
setConditionParam(dazzled, CONDITION_PARAM_DELAYED, 1)
addDamageCondition(dazzled, 5, 2000, -300)
addDamageCondition(dazzled, 5, 2000, -200)
addDamageCondition(dazzled, 5, 2000, -100)


local energy = createConditionObject(CONDITION_ENERGY)
setConditionParam(energy, CONDITION_PARAM_DELAYED, 1)
addDamageCondition(energy, 3, 2000, -100)
addDamageCondition(energy, 3, 2000, -75)
addDamageCondition(energy, 3, 2000, -50)


-------
local config = {
itemid = 7898, 
place = 4, 
percent = 5,  
valorvida = 300 
}


local head = {
itemid = 7901, 
place = 1
} 


local legs = {
itemid = 7895, 
place = 7
} 


local boots = {
itemid = 7893, 
place = 8
} 


local necklace = {
itemid = 7889, 
place = 2
} 




--[[CONST_SLOT_HEAD (1) = helmet
CONST_SLOT_NECKLACE (2) = necklace slot (amulet of loss etc.)
CONST_SLOT_BACKPACK (3) = backpack, bag
   CONST_SLOT_ARMOR (4) = armor
    CONST_SLOT_LEFT (5) = left hand (its really hand placed >> (right page on screen))
   CONST_SLOT_RIGHT (6) = right hand (its really hand placed << (left page on screen))
CONST_SLOT_LEGS (7) = legs
CONST_SLOT_FEET (8) = boots
CONST_SLOT_RING (9) = ring slot
   CONST_SLOT_AMMO (10) = ammo slot (arrows etc.)]]
-----------------------------------------------


local function canEffect(pos, pz, proj) -- Night Wolf based on Nord
if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end
if getTilePzInfo(pos) and not pz then return false end
local n = not proj and 3 or 2
for i = 0, 255 do
pos.stackpos = i
local tile = getTileThingByPos(pos)
if tile.itemid ~= 0 and not isCreature(tile.uid) then
if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
return false
end
end
end
return true
end




function onStatsChange(cid, attacker, type, combat, value)
if type == STATSCHANGE_HEALTHLOSS and value >= config.valorvida then
if (getPlayerSlotItem(cid, config.place).itemid == config.itemid) then
if math.random (1,config.percent) == 1 then
local pos = getPlayerPosition (cid)
local effectPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 


local conditionPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
----
{x = pos.x, y = pos.y - 1, z = pos.z},
{x = pos.x, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y, z = pos.z},
{x = pos.x + 1, y = pos.y, z = pos.z},
{x = pos.x - 1, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y + 1, z = pos.z},
------
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 
if isCreature(cid) == TRUE then
        for _, cPos in ipairs(conditionPositions) do
local mob = getTopCreature(cPos).uid
    if canEffect (cPos) and mob ~= 0 and isMonster(mob) then
doAddCondition(mob, energy)
if (getPlayerSlotItem(cid, head.place).itemid == head.itemid) and (getPlayerSlotItem(cid, legs.place).itemid == legs.itemid) and (getPlayerSlotItem(cid, boots.place).itemid == boots.itemid) and (getPlayerSlotItem(cid, necklace.place).itemid == necklace.itemid) then
doAddCondition(mob, dazzled)
end
end 
if (getPlayerSlotItem(cid, head.place).itemid == head.itemid) and (getPlayerSlotItem(cid, legs.place).itemid == legs.itemid) and (getPlayerSlotItem(cid, boots.place).itemid == boots.itemid) and (getPlayerSlotItem(cid, necklace.place).itemid == necklace.itemid) then
if canEffect (cPos) then
doSendMagicEffect(cPos, 39)
end
end
end


        for _, ePos in ipairs(effectPositions) do
if canEffect(ePos) then
                doSendMagicEffect(ePos, 11)
end
end
else
end
else
end
return true
else
end
return true
end
return true
end

terramantle.lua

local curse = createConditionObject(CONDITION_CURSED)
setConditionParam(curse, CONDITION_PARAM_DELAYED, 1)
addDamageCondition(curse, 3, 2000, -1)
addDamageCondition(curse, 3, 2000, -20)
addDamageCondition(curse, 3, 2000, -400)


local poison = createConditionObject(CONDITION_POISON)
setConditionParam(poison, CONDITION_PARAM_DELAYED, 1)
addDamageCondition(poison, 5, 2000, -300)
addDamageCondition(poison, 5, 2000, -200)
addDamageCondition(poison, 5, 2000, -100)


-------
local config = {
itemid = 7884, 
place = 4, 
percent = 5,  
valorvida = 300 
}


local head = {
itemid = 7903, 
place = 1
} 


local legs = {
itemid = 7885, 
place = 7
} 


local boots = {
itemid = 7886, 
place = 8
} 


local necklace = {
itemid = 7887, 
place = 2
} 




--[[CONST_SLOT_HEAD (1) = helmet
CONST_SLOT_NECKLACE (2) = necklace slot (amulet of loss etc.)
CONST_SLOT_BACKPACK (3) = backpack, bag
   CONST_SLOT_ARMOR (4) = armor
    CONST_SLOT_LEFT (5) = left hand (its really hand placed >> (right page on screen))
   CONST_SLOT_RIGHT (6) = right hand (its really hand placed << (left page on screen))
CONST_SLOT_LEGS (7) = legs
CONST_SLOT_FEET (8) = boots
CONST_SLOT_RING (9) = ring slot
   CONST_SLOT_AMMO (10) = ammo slot (arrows etc.)]]
-----------------------------------------------


local function canEffect(pos, pz, proj) -- Night Wolf based on Nord
if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end
if getTilePzInfo(pos) and not pz then return false end
local n = not proj and 3 or 2
for i = 0, 255 do
pos.stackpos = i
local tile = getTileThingByPos(pos)
if tile.itemid ~= 0 and not isCreature(tile.uid) then
if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
return false
end
end
end
return true
end




function onStatsChange(cid, attacker, type, combat, value)
if type == STATSCHANGE_HEALTHLOSS and value >= config.valorvida then
if (getPlayerSlotItem(cid, config.place).itemid == config.itemid) then
if math.random (1,config.percent) == 1 then
local pos = getPlayerPosition (cid)
local effectPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 


local conditionPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
----
{x = pos.x, y = pos.y - 1, z = pos.z},
{x = pos.x, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y, z = pos.z},
{x = pos.x + 1, y = pos.y, z = pos.z},
{x = pos.x - 1, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y + 1, z = pos.z},
------
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 
if isCreature(cid) == TRUE then
        for _, cPos in ipairs(conditionPositions) do
local mob = getTopCreature(cPos).uid
    if canEffect (cPos) and mob ~= 0 and isMonster(mob) then
doAddCondition(mob, poison)
if (getPlayerSlotItem(cid, head.place).itemid == head.itemid) and (getPlayerSlotItem(cid, legs.place).itemid == legs.itemid) and (getPlayerSlotItem(cid, boots.place).itemid == boots.itemid) and (getPlayerSlotItem(cid, necklace.place).itemid == necklace.itemid) then
doAddCondition(mob, curse)
end
end 
if (getPlayerSlotItem(cid, head.place).itemid == head.itemid) and (getPlayerSlotItem(cid, legs.place).itemid == legs.itemid) and (getPlayerSlotItem(cid, boots.place).itemid == boots.itemid) and (getPlayerSlotItem(cid, necklace.place).itemid == necklace.itemid) then
if canEffect (cPos) then
doSendMagicEffect(cPos, 44)
end
end
end


        for _, ePos in ipairs(effectPositions) do
if canEffect(ePos) then
                doSendMagicEffect(ePos, 45)
end
end
else
end
else
end
return true
else
end
return true
end
return true
end

Espero que vocês tenham curtido. Se for mudar qualquer coisa, não retire os créditos

EDIT:: Algumas imagens pra vocês verem como o script funciona:

Hit quando está só com a glacier robe (paraliza todos dentro dessa área)

Hit quando se está com o FULL set (paraliza todos e fica tirando dano de gelo)

Editado Maio 10, 2014 por xWhiteWolf (veja o histórico de edições)

**luanluciano93** · Abril 10, 2014

Muito bom!

**xWhiteWolf** · Abril 11, 2014

fico feliz que vc tenha gostado

Maio 4, 2014

n funfo n fiz tudo certin mais n saiu o gelo.

OBS: TENTA FAZER PRA TIBIA 8.40 AMIGO. TEM 1 OT CHAMADO FOXWORLD QUE TEM ESSA SCRIPT LA

Editado Maio 4, 2014 por 88105882 (veja o histórico de edições)

**xWhiteWolf** · Maio 5, 2014

o script foi testado e feito pra 8.54, eu não sei oque mudou de 8.4 pra 8.54 mas foi provavelmente alguma função utilizada nesse script pra não ter funcionado... deu algum erro no console?

**MaXwEllDeN** · Maio 5, 2014

Ótima ideia, xD

Só uma otimização no código

xD

**xWhiteWolf** · Maio 5, 2014

muito legal esse outro modo que você utilizou, realmente, com alguns laços e umas tables o script fica infinitas vezes melhor de se mexer.. obrigado pela ajuda max.. só vou corrigir umas coisinhas que acho que vc esqueceu:

--[[Script made 100% by Night Wolf and Nogard
do not remove the fucking credits or I may kill you and practice necrofily with your filthy body]]

--condição que irá adicionar
local gelo_condition = createConditionObject(CONDITION_PARALYZE)
setConditionParam(gelo_condition, CONDITION_PARAM_TICKS, 10000)
setConditionFormula(gelo_condition, -0.9, 0, -0.9, 0)


local frigo = createConditionObject(CONDITION_FREEZING)
setConditionParam(frigo, CONDITION_PARAM_DELAYED, 1)
addDamageCondition(frigo, 5, 2000, -300)
addDamageCondition(frigo, 5, 2000, -200)
addDamageCondition(frigo, 5, 2000, -100)


local config = {
percent = 5, -- se vc quiser 20%, coloque 5 pois 1/5 = 0,2 (20%)
valorvida = 300, -- quanto deve ser o valor minimo de vida a perder para executar o script
itemid = 7897, -- id do item que deverá ser equipado para ativar o gelo
place = 4, -- posição que o item deve estar para funcionar, cheque na tabela abaixo

set = {
[CONST_SLOT_HEAD] = 7902, -- Helmet
[CONST_SLOT_NECKLACE] = 7888, -- Amuleto
[CONST_SLOT_LEGS] = 7896, -- Legs
[CONST_SLOT_FEET] = 7892, -- Boots
},

-- Tabela de slots possíveis
-- CONST_SLOT_HEAD (1) = helmet
-- CONST_SLOT_NECKLACE (2) = necklace slot (amulet of loss etc.)
-- CONST_SLOT_BACKPACK (3) = backpack, bag
-- CONST_SLOT_ARMOR (4) = armor
-- CONST_SLOT_LEFT (5) = left hand (its really hand placed >> (right page on screen))
-- CONST_SLOT_RIGHT (6) = right hand (its really hand placed << (left page on screen))
-- CONST_SLOT_LEGS (7) = legs
-- CONST_SLOT_FEET (8) = boots
-- CONST_SLOT_RING (9) = ring slot
-- CONST_SLOT_AMMO (10) = ammo slot (arrows etc.)
}


function canEffect(pos, pz, proj) -- Night Wolf based on Nord
if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then
return false
end

if getTilePzInfo(pos) and not pz then
return false
end

local n = not proj and 3 or 2

for i = 1, 255 do
pos.stackpos = i
local tile = getTileThingByPos(pos)
if tile.itemid ~= 0 and not isCreature(tile.uid) then
if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
return false
end
end
end

return true
end

local function isUsingSet(cid, set)
for slot, item_id in pairs(set) do
if getPlayerSlotItem(cid, slot).itemid ~= item_id then
return false
end
end

return true
end

local predef_effect_on = {
{x = 0, y = -2}, {x = 0, y = 2},
{x = -2, y = 0}, {x = 2, y = 0},
{x = -2, y = -1}, {x = 2, y = -1},
{x = 2, y = 1}, {x = -2, y = 1},
{x = -1, y = -2}, {x = 1, y = -2},
{x = 1, y = 2}, {x = -1, y = 2},
}

local predef_condition_on = {
--- predef_effect_on
{x = 0, y = -2}, {x = 0, y = 2},
{x = -2, y = 0}, {x = 2, y = 0},
{x = -2, y = -1}, {x = 2, y = -1},
{x = 2, y = 1}, {x = -2, y = 1},
{x = -1, y = -2}, {x = 1, y = -2},
{x = 1, y = 2}, {x = -1, y = 2},

{x = 0, y = -1}, {x = 0, y = 1},
{x = -1, y = 0}, {x = 1, y = 0},

{x = -1, y = 1}, {x = -1, y = -1},
{x = 1, y = -1}, {x = 1, y = 1},
}

function onStatsChange(cid, attacker, type, combat, value)
if getPlayerSlotItem(cid, config.place).itemid == config.itemid then
if type == STATSCHANGE_HEALTHLOSS and value >= config.valorvida then
if math.random (1, config.percent) == 1 then
local pos = getPlayerPosition(cid)

for _, add_pos in ipairs(predef_condition_on) do
local cPos = {x = pos.x + add_pos.x, y = pos.y + add_pos.y, z = pos.z}
local mob = getTopCreature(cPos).uid
doAddCondition(mob, gelo_condition)

if isUsingSet(cid, config.set) then
if isMonster(mob) and canEffect(cPos) then
doAddCondition(mob, frigo)
end

doSendMagicEffect(cPos, 43)
end
end

for _, add_pos in ipairs(predef_effect_on) do
local ePos = {x = pos.x + add_pos.x, y = pos.y + add_pos.y, z = pos.z}
if canEffect(ePos) then
doSendMagicEffect(ePos, 41)
end
end
end
end
end

return true
end

Editado Maio 5, 2014 por xWhiteWolf (veja o histórico de edições)

Maio 7, 2014

n da erro nenhum só que nao vai ta ligado? n sai o gelinho da glacier quando vc leva os hit la.... obs: levei mais de 300 hits e n saiu.

**xWhiteWolf** · Maio 9, 2014

vc colocou tudo certo, inclusive no login. lua o register event? Lembra que é 20% de chance de ativar ao levar 300+ de dano então vc tem que levar + de 300 várias vezes.. ou vc aumenta a chance ou vc diminui a vida necessária.. tudo isso no começo do script!

Maio 13, 2014

vc colocou tudo certo, inclusive no login. lua o register event? Lembra que é 20% de chance de ativar ao levar 300+ de dano então vc tem que levar + de 300 várias vezes.. ou vc aumenta a chance ou vc diminui a vida necessária.. tudo isso no começo do script!

s coloquei só que não sai o gelo na glacier.

**xWhiteWolf** · Maio 13, 2014

8.4 não tem a função onStatsChange no creaturescripts, vc teria que adicionar ela pelas sources pra poder utilizar esse script :/

Maio 13, 2014

8.4 não tem a função onStatsChange no creaturescripts, vc teria que adicionar ela pelas sources pra poder utilizar esse script :/

Me ensina fazer isso?

**xWhiteWolf** · Maio 14, 2014

nunca nem se quer olhei a source de alguma versão do tibia, sou scripter, não programmer :/ Só sei que é só vc pegar a source do 8.6, procurar a pasta referente aos creaturescripts, abrir o arquivo e copiar a função pro mesmo arquivo do 8.4.. Procura uns tutoriais no google que acho q vc consegue de boa, dificil mesmo é pegar a source do 0 e compilar ela porque isso pode acabar estragando muitas outras coisas do seu servidor. Como eu disse anteriormente, não sou programmer, eu apenas arquiteto oque me é fornecido da maneira que convém

Danves · Julho 19, 2014

Olá, não gostei muito da parte que de set full = causar dano em área, pois o jogador fugindo poderia até pegar pk sem querer pelo dano causado a players sem PK em sua volta.
Como eu poderia tirar isso de causar dano?
E, caso não tire dano, ele tá dando PK por causar slow em outros players?

**xWhiteWolf** · Julho 21, 2014

eu não tenho um server pra testar, eu fiz esse script meio que às cegas e postei aqui.. pra retirar o dano em área é só colocar assim:

--[[Script made 100% by Night Wolf and Nogard
do not remove the fucking credits or I may kill you and practice necrofily with your filthy body]]


--condição que irá adicionar
local gelocondition = createConditionObject(CONDITION_PARALYZE)
setConditionParam(gelocondition, CONDITION_PARAM_TICKS, 10000)   
setConditionFormula(gelocondition, -0.9, 0, -0.9, 0)  






-------
local config = {
itemid = 7897, --id do item que deverá ser equipado para ativar o gelo
place = 4, --posição que o item deve estar para funcionar, cheque na tabela abaixo
percent = 5,  --se vc quiser 20%, coloque 5 pois 1/5 = 0,2 (20%)
valorvida = 300 --quanto deve ser o valor minimo de vida a perder para executar o script 
}




local head = {
itemid = 7902, 
place = 1
} 




local legs = {
itemid = 7896, 
place = 7
} 




local boots = {
itemid = 7892, 
place = 8
} 




local necklace = {
itemid = 7888, 
place = 2
} 




--[[ Tabela de places possíveis 
CONST_SLOT_HEAD (1) = helmet
CONST_SLOT_NECKLACE (2) = necklace slot (amulet of loss etc.)
CONST_SLOT_BACKPACK (3) = backpack, bag
CONST_SLOT_ARMOR (4) = armor
CONST_SLOT_LEFT (5) = left hand (its really hand placed >> (right page on screen))
CONST_SLOT_RIGHT (6) = right hand (its really hand placed << (left page on screen))
CONST_SLOT_LEGS (7) = legs
CONST_SLOT_FEET (8) = boots
CONST_SLOT_RING (9) = ring slot
CONST_SLOT_AMMO (10) = ammo slot (arrows etc.)]]
-----------------------------------------------




function canEffect(pos, pz, proj) -- Night Wolf based on Nord
if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end
if getTilePzInfo(pos) and not pz then return false end
local n = not proj and 3 or 2
for i = 0, 255 do
pos.stackpos = i
local tile = getTileThingByPos(pos)
if tile.itemid ~= 0 and not isCreature(tile.uid) then
if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then
return false
end
end
end
return true
end








function onStatsChange(cid, attacker, type, combat, value)
if (getPlayerSlotItem(cid, config.place).itemid == config.itemid) then
if type == STATSCHANGE_HEALTHLOSS and value >= config.valorvida then
if math.random (1,config.percent) == 1 then
local pos = getPlayerPosition (cid)
local effectPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 




local conditionPositions = {
{x = pos.x, y = pos.y - 2, z = pos.z},
{x = pos.x, y = pos.y + 2, z = pos.z},
{x = pos.x - 2, y = pos.y, z = pos.z},
{x = pos.x + 2, y = pos.y, z = pos.z},
{x = pos.x - 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y - 1, z = pos.z},
{x = pos.x + 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 2, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y - 2, z = pos.z},
{x = pos.x + 1, y = pos.y + 2, z = pos.z},
----
{x = pos.x, y = pos.y - 1, z = pos.z},
{x = pos.x, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y, z = pos.z},
{x = pos.x + 1, y = pos.y, z = pos.z},
{x = pos.x - 1, y = pos.y + 1, z = pos.z},
{x = pos.x - 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y - 1, z = pos.z},
{x = pos.x + 1, y = pos.y + 1, z = pos.z},
------
{x = pos.x - 1, y = pos.y + 2, z = pos.z}
} 
if isCreature(cid) == TRUE then
        for _, cPos in ipairs(conditionPositions) do
local mob = getTopCreature(cPos).uid
    if canEffect (cPos) and mob ~= 0 and isMonster(mob) then
doAddCondition(mob, gelocondition)
end 
if (getPlayerSlotItem(cid, head.place).itemid == head.itemid) and (getPlayerSlotItem(cid, legs.place).itemid == legs.itemid) and (getPlayerSlotItem(cid, boots.place).itemid == boots.itemid) and (getPlayerSlotItem(cid, necklace.place).itemid == necklace.itemid) then
if canEffect (cPos) then
doSendMagicEffect(cPos, 43)
end
end
end




        for _, ePos in ipairs(effectPositions) do
if canEffect(ePos) then
                doSendMagicEffect(ePos, 41)
end
end
else
end
else
end
return true
else
end
return true
end
return true
end

se possível testa pra mim e coloca o resultado aqui que eu analiso mas acredito que não dá PK não por ser por função de add condition e não de fazer combat condition

Mythusz · Julho 30, 2014

Pena que não funciona em 8.40 pois a procura maior é de quem tem servidores FoxWorld.

Mas valeu por postar.

**xWhiteWolf** · Julho 31, 2014

só fazer edição na source do 8.4 e adicionar a função onStatsChange que vai funcionar haha

vagnerkuntz · Novembro 19, 2014

Não funciona em distro 0.3.2 olhei nas source e tem a função onStatsChange

não da erro mais não funciona

**xWhiteWolf** · Novembro 19, 2014

Vc leu o script? Tem uma porcentagem de ativar qnd perde uma quantidade de vida por dano de monstro ou player

vagnerkuntz · Novembro 21, 2014

Sim senhor da hit até de 1k durante muito tempo e não vai

aumentei a % mesmo assim nd...

Entrar

CreatureScript%25252FGlobalEvent%25252FMoveMent Glacier Set dando conditions em área

Posts Recomendados

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Link para o post

Compartilhar em outros sites

Participe da conversa

Quem Está Navegando 0 membros estão online

TibiaKing

Open Tibia Server

Redes Sociais

Anuncie no TibiaKing

Informação Importante