Pet System

[eduardo190696 47]

Bom Galerinha do Xtibia, Estou mais uma vez postando um script Meo

 

Bom, esse meu pet system é pelas talkaction, e tem o buypet por action.

 

 

Atualizações

 

 

Novidade - V4

 

 

!remove reformulado, !creat editado para evitar quais quer possivel bug

 

Novidades - V3

 

 

!remove summon

 

 

Novidades - V2

 

 

Não pode mais sumonar dentro de pz

 

 

 

PET SYSTEM

 

Versão 8.~

crie um arquivo chamado petsystem.lua em Talkaction/scripts

 

e adicione isso dentro

 

 

 

function onSay(cid, words, param, itemEx, params)

 

local summons = getCreatureSummons(cid)

 

if words == "!remove" then

for _, k in ipairs(summons) do

doRemoveCreature(k)

end

end

end

 

local pet = {

["Dragon Hatchling"] = {25,34},

["Dragon"] = {35,54},

["Dragon Lord"] = {55,84},

["Ghastly Dragon"] = {85,99},

["Undead Dragon"] = {100,9999}

}

 

for k,v in pairs(pet) do -- 0

if words == "!creat" then -- 1

if getPlayerLevel(cid) >= v[1] and getPlayerLevel(cid) < v[2] then -- 2

if getPlayerStorageValue(cid, 78552) == 1 then -- 3

if (table.maxn(summons) < 1)then -- 4

if getTilePzInfo(getCreaturePosition(cid)) == false then --5

x = doSummonCreature(k, getCreaturePosition(cid))

doConvinceCreature(cid, x)

doCreatureSay(cid, k ..", go!", 1)

 

doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 2)

 

else

doPlayerSendCancel(cid,"You can summon in Pz.")

return true

end -- 5

else

doPlayerSendCancel(cid,"You can summon only 1 Pet.")

return true

end -- 4

else

doPlayerSendCancel(cid,"You no have Pet.")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "You no have Pet.")

end -- 3

else

doPlayerSendCancel(cid,"You no have level for use Pet.")

end -- 2

end -- 1

end -- 0

return true

end

 

 

 

 

Versão 9.~

 

 

crie um arquivo chamado petsystem.lua em Talkaction/scripts

 

e adicione isso dentro

 

 

 

 

 

function onSay(cid, words, param, itemEx)

local summons = getCreatureSummons(cid)

if words == "!remove" then

for _, k in ipairs(summons) do

doRemoveCreature(k)

end

end

local pet = {

["Rat"] = {1,5},

["Dragon"] = {6,60}

}

for k,v in pairs(pet) do -- 0

if words == "!creat" then -- 1

if getPlayerLevel(cid) >= v[1] and getPlayerLevel(cid) <= v[2] then -- 2

if getPlayerStorageValue(cid, 78552) == 1 then -- 3

if (table.maxn(summons) < 1)then -- 4

if getTilePzInfo(getCreaturePosition(cid)) == false then -- 5

x = doSummonCreature(k, getCreaturePosition(cid))

doConvinceCreature(cid, x)

doCreatureSay(cid, k ..", go!", 1)

doSendMagicEffect(getThingPos(getCreatureSummons(cid)[1]), 2)

else

doPlayerSendCancel(cid,"You can summon in Pz.")

return true

end -- 5

else

doPlayerSendCancel(cid,"You can summon only 1 Pet.")

return true

end -- 4

else

doPlayerSendCancel(cid,"You no have Pet.")

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "You no have Pet.")

end -- 3

else

doPlayerSendCancel(cid,"You no have level for use Pet.")

end -- 2

end -- 1

end -- 0

return true

end

 

 

e isso em Talkaction.xml

	<talkaction words="!creat" event="script" value="petsystem.lua"/>

e Isso

	<talkaction words="!remove" event="script" value="petsystem.lua"/>

 

BUY PET

 

crie um arquivo chamado petitem.lua em Actions/scripts

 

e adicione isso dentro

 

 

 

function onUse(cid, words, param, item)

 

doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Parabéns você comprou um Pet")

setPlayerStorageValue(cid, 78552, 1)

doRemoveItem(item.uid,1)

end

 

 

 

e isso em Action.xml

 

	  <action itemid="3905" event="script" value="petitem.lua" allowfaruse="1"/>

 

CONFIGURANDO

["nome"] = {Level minimo para usar ,Level maximo para usar},

 

Exemplo :

["Demon"] = {100,150},

 

OBS : O ultimo monstro da tabela não deve ter uma virgula no final. Todos que tiveram antes dele tem que ter a virgula.

 

Exemplo :

 

["Rat"] = {1,5}, << COM VIRGULA PORQUE VEM ANTES DO ULTIMO MONSTRO.

["Dragon"] = {6,60} << Sem birgula PORQUE É O ULTIMO MONSTRO

 

Só isso pessoal Thx a todos e da um rep ai e.e n caio o dedo

 

Caso houver algum erro favor postar aqui, para que possa ser resolvido.

Editado Abril 29, 2012 por eduardobean

[Kvn007 6]

não entendi

o player usa tipo o demon do level 100, quando chega level 150 o que acontece?

[eduardo190696 47]

ele pode usar o demon do lvl 100 até o 150 depois do 150 não pode mais

é um evolution system basicamente

[alldakie 160]

Ótimo,

Muito obrigado por compartilhar...

[eduardo190696 47]

De nada

só falta o rep e.e

 

@edit

 

para evitar posts, valeu ai TonyHanks pega um pra vc tb e.e

Editado Agosto 5, 2011 por eduardobean

[alldakie 160]

Tudo bem...

 

REP+

 

 

[Hyuugax 0]

Eduardo...

quais são as funções

oq fala pro pet aparecer

como é a formula do dmg? se é proprio ou é simplesmente um summoncreature

 

preciso testar como funciona...

[eduardo190696 47]

script editado

 

Hyuugax

 

a formula depende da que vc vai por na tag no talkactions qualquer uma que vc por pega.

 

dmg < WTF ? que merda é essa

 

DESCRIÇÂO

 

O sistem uma quantidade maxima que pode ser sumonado é só um por vez

 

tem que ter o level para usar

 

e tem que comprar o item com o pet pra poder soltalo

[Hyuugax 0]

script editado

 

Hyuugax

 

a formula depende da que vc vai por na tag no talkactions qualquer uma que vc por pega.

 

dmg < WTF ? que merda é essa

 

DESCRIÇÂO

 

O sistem uma quantidade maxima que pode ser sumonado é só um por vez

 

tem que ter o level para usar

 

e tem que comprar o item com o pet pra poder soltalo

bom kra

testei no global 8.6 e aparece que n tenho lvl pra comprar o pet...

mesmo mechendo nas paradas do script...

 

 

ai aparece a seguinte msn...

 

 

(vc não tem level para sumonar o pet)

coisa do tipo...

[eduardo190696 47]

(vc não tem level para sumonar o pet)

estou tentando descobrir o porque esta aparecendo e a parte do lvl n sei n vo rever o script mais auqi pega sux

 

Hyuugax testa agora

 

Hyuugax , eu to usando ele em um 9.1, editado um pouco pq mudaram algumas funções

[Kvn007 6]

nao tem como voce fazer um comando para o pet Deslogar?

[eduardo190696 47]

Função Remove Pet ADC

Editado Agosto 9, 2011 por eduardobean

[Kvn007 6]

Só vou avisar que na hora que atualizou você retirou a storage que o item adiciona no comando. Então qualquer um que não usou o item pode sumonar.

[Reka1739 0]

você poderia colocar um sistema de nível para o pet

[eduardo190696 47]

deu storage re adc

 

ai complica d+ amigo pet com lvl nem rola, pq se foce fácil fazer os poke ot já teriam