(Resolvido)[PEDIDO] Summon Monsters

[dbko 1]

Alguem pode criar uma script pra mim que eu sumone uns 4 tipos diferentes de monstro numa spell só 

 

REP + pra quem ajudar

@UP Ajuda AE

Editado Outubro 29, 2014 por dbko (veja o histórico de edições)

[machine 7]

data\spells\scripts\summon crie mixsummon.lua ou qualquer outro nome que quiser, lembre se trocar, troque no spells.xml também.

local max = 1

function onCastSpell(cid, var)

local dir = getPlayerLookDir(cid)
local ppos = getPlayerPosition(cid)

if(dir==1)then
ppos.x = ppos.x + 1
elseif(dir==2)then
ppos.y = ppos.y + 1
elseif(dir==3)then
ppos.x = ppos.x - 1
elseif(dir==0)then
ppos.y = ppos.y - 1
end
local count, pos = #getCreatureSummons(cid), getThingPos(cid)
if count == max then
doPlayerSendCancel(cid, 'Voce nao pode sumonar mais criaturas.')
doSendMagicEffect(pos, CONST_ME_POFF)
return false
end
local summon = getCreatureSummons(cid)
local MaximoSummon = 4
if (table.maxn(summon) < MaximoSummon) then
local spider = doConvinceCreature(cid, doCreateMonster("spider", ppos))
local wolf = doConvinceCreature(cid, doCreateMonster("wolf", ppos))
local orc = doConvinceCreature(cid, doCreateMonster("orc", ppos))
local demon = doConvinceCreature(cid, doCreateMonster("demon", ppos))
        doPlayerSendTextMessage(cid, 22, "Voce summonou quatro criaturas!")
end
end

Entendendo o script acima

local spider = doConvinceCreature(cid, doCreateMonster("spider", ppos))
local wolf = doConvinceCreature(cid, doCreateMonster("wolf", ppos))
local orc = doConvinceCreature(cid, doCreateMonster("orc", ppos))
local demon = doConvinceCreature(cid, doCreateMonster("demon", ppos))

 

onde esta em vermelho é os monsters, troque para qual quiser.

 

data\spells abra o spells.xml e adicione a seguinte linha

    <instant name="Summon 4 Monsters" words="mixsummon" lvl="25" params="1" exhaustion="2000" needlearn="0" event="script" value="summon/mixsummon.lua">
        <vocation id="1"/>
        <vocation id="2"/>
        <vocation id="5"/>
        <vocation id="6"/>
    </instant>

testa ai

[dbko 1]

Deu certo não sempre ta dando erro na primeira linha de monsters

EX :

 

local spider = doConvinceCreature(cid, doCreateMonster("spider", ppos))

Editado Outubro 30, 2014 por dbko (veja o histórico de edições)

[machine 7]

qual erro?

[dbko 1]

Não ta lendo a primeira linha que você ponha o monstro ja tentei de tudo e não ta lendo

[machine 7]

hmm, aqui eu testei e funcionou certinho, sem nenhum erro..

 

se você não postar o que aparece na distro fica difícil eu te ajudar, já que sou iniciante..

 

Vê o que aparece na distro, tipo esses erros aqui:

 

(luaDoCreateMonster) Monster with name 'spider' not found

ou

(luaDoCreateMonster) Cannot create monster:

ou

(luaDoConvinceCreature) Creature not found

 

e fala pra mim, pra vê se eu consigo te ajudar, e mais uma pergunta, o teu servidor tem esses monsters que você botou né?

[Orochi Elf 499]

Eu fiz assim: Voce usa a magia sem ter nenhum summon, o script vai sumonar 4 monstros aleatórios de acordo com a tabela, porém se voce tiver 2 summons ele vai sumonar apenas 2, e assim vai funcionando. Ele sempre vai completar a quantidade que falta de summons pra chegar a 4.

 

Não teste.

 

local summons = {"Demon", "Orc", "Spider", "Rat", "Tarantula", "Orc Leader"}
local maxSummons = 4

function onCastSpell(cid)
    local s = maxSummons - #getCreatureSummons(cid)
    local str = "Voce sumonou"
    
    if s == 0 then
        
        doPlayerSendCancel(cid, "Voce ja tem 4 summons.")
        return false
    end
    
    for r = 1, s do
        local m = doCreateMonster(summons[math.random(1, #summons)], getThingPos(cid))
        
        doConvinceCreature(cid, m)
        str = str .." " .. m ..","
    end
    
    doPlayerSendTextMessage(cid, 27, str)
    return true
end

[dbko 1]

Orochi sua script ta funcional vlws so que eu quero que sumone os 4 monsters qe eu coloco não quero aleatorio

local summons = {"Edo Tensei Itachi", "Edo Tensei Deidara", "Edo Tensei Nagato", "Edo Tensei Sasori"}

local maxSummons = 4

function onCastSpell(cid)
local s = maxSummons - #getCreatureSummons(cid)
local str = "Voce sumonou"

if s == 0 then

doPlayerSendCancel(cid, "Voce ja tem 4 summons.")
return false
end

for r = 1, s do
local m = doCreateMonster(summons[math.random(1, #summons)], getThingPos(cid))

doConvinceCreature(cid, m)
str = str .." " .. m ..","
end

doPlayerSendTextMessage(cid, 27, str)
return true
end

 

[machine 7]

@dbko você colocou esses monsters ai no script que eu passei?

 

"Edo Tensei Itachi", "Edo Tensei Deidara", "Edo Tensei Nagato", "Edo Tensei Sasori" ?

[dbko 1]

@machine coloquei sim e não tava funfando :x

[J4dson 0]

@Orochi Elf

 

Boa Tarde,

É possível usar este seu script com item? A pessoa usa o item, o item some, e acaba sumonando entre estes quatros? Por favor.

@Orochi Elf

 

Boa Tarde,

É possível usar este seu script com item? A pessoa usa o item, o item some, e acaba sumonando entre estes quatros? Por favor.

[xWhiteWolf 3007]

fiz uma versãozinha aqui, espero que vc curta

function onCastSpell(cid, var)
local pos = getPlayerPosition(cid)
local maxsummon = 4 -- numero máximo de summons


local possible = {
{x = pos.x, y = pos.y - 2, z = pos.z, stackpos = 0},
{x = pos.x, y = pos.y + 2, z = pos.z, stackpos = 0},
{x = pos.x - 2, y = pos.y, z = pos.z, stackpos = 0},
{x = pos.x + 2, y = pos.y, z = pos.z, stackpos = 0},
{x = pos.x - 2, y = pos.y - 1, z = pos.z, stackpos = 0},
{x = pos.x + 2, y = pos.y - 1, z = pos.z, stackpos = 0},
{x = pos.x + 2, y = pos.y + 1, z = pos.z, stackpos = 0},
{x = pos.x - 2, y = pos.y + 1, z = pos.z, stackpos = 0},
{x = pos.x - 1, y = pos.y - 2, z = pos.z, stackpos = 0},
{x = pos.x + 1, y = pos.y - 2, z = pos.z, stackpos = 0},
{x = pos.x + 1, y = pos.y + 2, z = pos.z, stackpos = 0},
----
{x = pos.x, y = pos.y - 1, z = pos.z, stackpos = 0},
{x = pos.x, y = pos.y + 1, z = pos.z, stackpos = 0},
{x = pos.x - 1, y = pos.y, z = pos.z, stackpos = 0},
{x = pos.x + 1, y = pos.y, z = pos.z, stackpos = 0},
{x = pos.x - 1, y = pos.y + 1, z = pos.z, stackpos = 0},
{x = pos.x - 1, y = pos.y - 1, z = pos.z, stackpos = 0},
{x = pos.x + 1, y = pos.y - 1, z = pos.z, stackpos = 0},
{x = pos.x + 1, y = pos.y + 1, z = pos.z, stackpos = 0},
------
{x = pos.x - 1, y = pos.y + 2, z = pos.z, stackpos = 0}
}


local mobs = { -- monstros que serão sumonados (coloque o nome deles)
[1] = "Clone Spider",
[2] = "Demon Skeleton",
[3] = "Dog",
[4] = "Bug"
}
summonpos = 0


for k = 1, #mobs do
alert = false
local summons = getCreatureSummons(cid)
if #summons < maxsummon then 
for i = 1, #possible do
if isWalkable(possible[i], true, false, true) then
summonpos = possible[i]
end
end


if summonpos ~= 0 then
if #summons >= 1 then
for j = 1, #summons do
if getCreatureName(summons[j]):lower() == string.lower(mobs[k]) then
alert = true
end
end
end


if alert == false then
doConvinceCreature(cid, doCreateMonster(mobs[k], summonpos))
doSendMagicEffect(pos, 12)
doSendMagicEffect(summonpos, 10)
else
doPlayerSendCancel(cid, "You already have this kinda of summon.")
doSendMagicEffect(pos, 2)
end
else
doPlayerSendCancel(cid, "There is not enough room.")
doSendMagicEffect(pos, 2)
return true
end
else
doSendMagicEffect(pos, 2)
doPlayerSendCancel(cid, "You cannot summon more than "..maxsummon.." creature(s).")
break
end
end 
end

<instant name="Volatile Spiderling" words="utevo res tera" lvl="40" mana="20" prem="1" selftarget="1" exhaustion="2000" groups="1,2000" icon="88" needlearn="0" event="script" value="especiais/assistedsuicide.lua">
<vocation id="5"/>
<vocation id="6"/>
<vocation id="7"/>
<vocation id="8"/>
</instant>

[Orochi Elf 499]

@J4dson

Claro que é possível.

 

local summons = {"Demon", "Orc", "Spider", "Rat", "Tarantula", "Orc Leader"}
local maxSummons = 4

function onUse(cid)
    local s = maxSummons - #getCreatureSummons(cid)
    local str = "Voce sumonou"
    
    if s == 0 then
        
        doPlayerSendCancel(cid, "Voce ja tem 4 summons.")
        return false
    end
    
    for r = 1, s do
        local m = doCreateMonster(summons[math.random(1, #summons)], getThingPos(cid))
        
        doConvinceCreature(cid, m)
        str = str .." " .. m ..","
    end
    
    doPlayerSendTextMessage(cid, 27, str)
    return true
end

 

@DBKO

Amigo, caso não queria esses monstros, só põe na tabela qual você quer.

[J4dson 0]

Orochi Elf

Pow, obrigadão!

Mas não seria para summoner!

Seria monsters mesmo, normais, sakas?

O carinha usa o item e aleatoriamente nasce um monstro - entre as 4 opções.

Não como summon, como monstro mesmo. xD!

Pow, obrigadão mesmo!

Gente fina a galera daqui.

[xWhiteWolf 3007]

prontissimo

local summons = {"Demon", "Orc", "Spider", "Rat", "Tarantula", "Orc Leader"}
local maxSummons = 4

 function onUse(cid, item, frompos, itemEx, topos)
    
    for r = 1, maxSummons do
        local m = doCreateMonster(summons[math.random(1, #summons)], getThingPos(cid))
    end
    doRemoveItem(item.uid)
    doPlayerSendTextMessage(cid, 27, "Monstros sumonados com sucesso")
    return true
end

[Orochi Elf 499]

 

prontissimo

local summons = {"Demon", "Orc", "Spider", "Rat", "Tarantula", "Orc Leader"}
local maxSummons = 4

 function onUse(cid, item, frompos, itemEx, topos)
    
    for r = 1, maxSummons do
        local m = doCreateMonster(summons[math.random(1, #summons)], getThingPos(cid))
    end
    doRemoveItem(item.uid)
    doPlayerSendTextMessage(cid, 27, "Monstros sumonados com sucesso")
    return true
end

 

Sim, ta prontinho

Só que você poderia também tirar a variavel "m", deixar apenas como a função kkk

[xWhiteWolf 3007]

Só que você poderia também tirar a variavel "m", deixar apenas como a função kkk

nem queria falar nada mas ficou ruim assim porque foi você que fez... auheuhauhuheuha

[Orochi Elf 499]

nem queria falar nada mas ficou ruim assim porque foi você que fez... auheuhauhuheuha

Da uma olhadinha no código todo ..

 

Não fiz nada em vão

[xWhiteWolf 3007]

uhauheuhauhea eu tava brincando cara, relaxa

[Orochi Elf 499]

uhauheuhauhea eu tava brincando cara, relaxa

Nuss, eu fui abrir citação e acabei te dando rep '-'

 

 

Eu sou muito esquentado :"c