xTibia

.com
AN
dúvida

Spell De Invocação Com Problema...

Por andreelm, 05 de ago. de 2012 em Scripts

script
9
1.9k
andreelmA
05 de agosto de 2012 às 10:17

eu tava querendo fazer uma magia q invocasse um crystal protector tipo pbot, fiz tudinho e tals, mas quando uso a magia simplesmente disse que o mostro ja foi invocado mesmo não tendo aparecido nada...

Spells.xml

 

</instant>

<instant name="utevo aura" words="utevo aura" lvl="300" mana="2000" casterTargetOrDirection="1" blockwalls="1" exhaustion="3000" needlearn="0" script="pbot/utevo aura.lua">

<vocation id="9"/>

<vocation id="10"/>

 

e script

 

local removeTime = 1.0 --time to remove the clones

local mana = 1000

local HAVE_CLONE = 65537 --storage to know if you have clones or not

local arr = {

{

{0, 0, 0},

{0, 2, 0},

{0, 1, 0}

}

}

local function removeCreatures(cid, creature)

setPlayerStorageValue(cid, HAVE_CLONE, 0)

if isCreature(creature) == TRUE then

doRemoveCreature(creature)

end

end

function onTargetTile(cid, pos)

local creature = doSummonCreature("Protector", pos)

doCreatureAddMana(cid, -1500)

doCreatureSay(cid, "Utevo Aura", TALKTYPE_ORANGE_1)

doConvinceCreature(cid, creature)

addEvent(removeCreatures, removeTime * 30000, cid, creature)

return TRUE

end

local combat = {}

for i = 1, 1 do

combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_POFF)

setCombatArea(combat, createCombatArea(arr))

_G["onTargetTile" .. i] = onTargetTile

setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile" .. i)

end

function onCastSpell(cid, var)

local level = getPlayerLevel(cid)

if getPlayerStorageValue(cid, HAVE_CLONE) < 1 then

if level > 350 then

doCombat(cid, combat[1], var)

else

doCombat(cid, combat[1], var)

end

setPlayerStorageValue(cid, HAVE_CLONE, 1)

else

doPlayerSendCancel(cid, "Voce ja fez o Crystal Protector.")

end

end

 

NewtonnotwenN
05 de agosto de 2012 às 11:03

Não entendi direito.

 

Se você estiver querendo uma magia que sumona um monstro (apenas um) eu ti arranjo.

 

Ex:

 

-Player usa magia

-Monstro sumonado

-Player tenta sumonar de novo. não conssegue

-Algum tempo depois o monstro some (tempo escolhido por você)

-Player já pode sumona-lo novamente

 

 

Se for isso que você quer eu ti arranjo.

Editado Agosto 5 por Newtonnotwen

andreelmA
05 de agosto de 2012 às 11:05

isso mesmo que eu quero......

NewtonnotwenN
05 de agosto de 2012 às 11:07

Ok, vou arranjar aqui pra você.

 

- - - - - - - - - - - - - Editado

 

No caso está sumonando um wolf.

 

local removeTime = 1.0 --time to remove the clones
local mana = 1000
local HAVE_CLONE = 655370 --storage to know if you have clones or not
local arr = {
{
{0, 0, 0},
{0, 2, 0},
{0, 1, 0}
}
}
local function removeCreatures(cid, creature)
setPlayerStorageValue(cid, HAVE_CLONE, 0)
if isCreature(creature) == TRUE then
doRemoveCreature(creature)
end
end
function onTargetTile(cid, pos)
local creature = doSummonCreature("wolf", pos)
doCreatureAddMana(cid, -2000)
doCreatureSay(cid, "Utevo Aura", TALKTYPE_ORANGE_1)
doConvinceCreature(cid, creature)
addEvent(removeCreatures, removeTime * 5000, cid, creature)
return TRUE
end
local combat = {}
for i = 1, 1 do
combat[i] = createCombatObject()
setCombatParam(combat[i], COMBAT_PARAM_EFFECT, CONST_ME_POFF)
setCombatArea(combat[i], createCombatArea(arr[i]))
_G["onTargetTile" .. i] = onTargetTile
setCombatCallback(combat[i], CALLBACK_PARAM_TARGETTILE, "onTargetTile" .. i)
end
function onCastSpell(cid, var)
local level = getPlayerLevel(cid)
if getPlayerStorageValue(cid, HAVE_CLONE) < 1 then
if level > 350 then
doCombat(cid, combat[1], var)
else
doCombat(cid, combat[1], var)
end
setPlayerStorageValue(cid, HAVE_CLONE, 1)
else
doPlayerSendCancel(cid, "O wolf ja foi sumonado.")
end
end

Editado Agosto 5 por Newtonnotwen

andreelmA
05 de agosto de 2012 às 11:15

como altero para summonar uma crystal spider?

 

e quando entro no servidor , fala que wolf ja foi invocado mais ele não aparece :@

Editado Agosto 5 por andreelm

NewtonnotwenN
05 de agosto de 2012 às 11:20

 

local removeTime = 1.0 --time to remove the clones

local mana = 1000

local HAVE_CLONE = 655370 --storage to know if you have clones or not

local arr = {

{

{0, 0, 0},

{0, 2, 0},

{0, 1, 0}

}

}

 

local function removeCreatures(cid, creature)

setPlayerStorageValue(cid, HAVE_CLONE, 0)

if isCreature(creature) == TRUE then

doRemoveCreature(creature)

end

end

 

function onTargetTile(cid, pos)

local creature = doSummonCreature("crystal spider", pos)

doCreatureAddMana(cid, -2000)

doCreatureSay(cid, "Utevo Aura", TALKTYPE_ORANGE_1)

doConvinceCreature(cid, creature)

addEvent(removeCreatures, removeTime * 5000, cid, creature)

return TRUE

end

 

local combat = {}

for i = 1, 1 do

combat = createCombatObject()

setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_POFF)

setCombatArea(combat, createCombatArea(arr))

_G["onTargetTile" .. i] = onTargetTile

setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile" .. i)

end

 

function onCastSpell(cid, var)

local level = getPlayerLevel(cid)

if getPlayerStorageValue(cid, HAVE_CLONE) < 1 then

if level > 350 then

doCombat(cid, combat[1], var)

else

doCombat(cid, combat[1], var)

end

setPlayerStorageValue(cid, HAVE_CLONE, 1)

else

doPlayerSendCancel(cid, "a crystal spider ja foi sumonada.")

end

end

 

 

Laranja: nome do monstro

Vermelho: altere de acordo com o(a)

 

- - - - - - - - - - - - - - - - - - -Daqui pra baixo os créditos são totalmente de lordbug99

By: lordbug99

 

Vai em creaturescript/script abre login.lua e antes do ultimo end coloca:

 

setPlayerStorageValue(cid, 655370, 0)

Editado Agosto 5 por Newtonnotwen

DemonbholderD
05 de agosto de 2012 às 23:05

Vamos aguardar o feedback do membro que criou o tópico para mover para dúvidas sanadas.

andreelmA
06 de agosto de 2012 às 13:13

Obrigado funcionou perfeitamente :D

desculpa a demora pra falar, pq sabe não tenho tempo ...

NewtonnotwenN
06 de agosto de 2012 às 13:45

Ok.

 

Duvida sanada.