ED

Pet System

Por eduardo190696, 04 de ago. de 2011 em Actions e Talkactions

otserv
tibia
script
32
8.3k
eduardo190696E
04 de agosto de 2011 às 15:38

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

thumbsupsmiley.png

 

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

Editado Abril 28 por eduardobean

Kvn007K
04 de agosto de 2011 às 15:55

não entendi

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

eduardo190696E
04 de agosto de 2011 às 16:21

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

é um evolution system basicamente

alldakieA
04 de agosto de 2011 às 16:52

Ótimo,

Muito obrigado por compartilhar...

eduardo190696E
05 de agosto de 2011 às 16:00

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 por eduardobean

alldakieA
05 de agosto de 2011 às 16:06

Tudo bem...

 

REP+

 

 

HyuugaxH
05 de agosto de 2011 às 16:47

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...

eduardo190696E
05 de agosto de 2011 às 19:21

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

HyuugaxH
05 de agosto de 2011 às 20:25

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...

eduardo190696E
06 de agosto de 2011 às 11:00

(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

Kvn007K
06 de agosto de 2011 às 12:38

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

eduardo190696E
06 de agosto de 2011 às 13:38

Função Remove Pet ADC

Editado Agosto 9 por eduardobean

Kvn007K
10 de agosto de 2011 às 20:34

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.

Reka1739R
11 de agosto de 2011 às 10:07

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

eduardo190696E
11 de agosto de 2011 às 15:20

deu storage re adc

 

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