• TibiaFace

    Tibiaface | Una comunidad Open Tibia donde encontras : mapas, scripts, Otserver, npc y amigos etc ...

    .
    demo menumenu

    Afiliados



    Votar:

    Items que cree un pet :3

    Compartir:

    Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje (Página 1 de 1.)

    1Thông báo Items que cree un pet :3 el Mar Abr 07, 2020 12:13 pm

    smith24

    avatar
    Miembro
    Miembro
    Amigos quiero un items que cree un pet y que ese pet cure mana o health
    si se podra Ayuda plx <3
    Si se podra?

    2Thông báo Re: Items que cree un pet :3 el Mar Abr 07, 2020 3:38 pm

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    en data/actions/actions.xml agregamos

    Código:

    <action itemid="7488" event="script" value="catch_monster.lua"/>
    <action itemid="5468" event="script" value="summon_monster.lua"/>

    en data/actions/scripts/ creamos un archivo llamado catch_monster.lua y pegamos esto dentro

    Código:

    function onUse(cid, item, fromPosition, itemEx, toPosition)
       local desc = getItemAttribute(item.uid, 'description') == nil and getItemInfo(item.itemid).description or getItemAttribute(item.uid, 'description')

       local config = {
          storageExhaust = 55668,
          exhaustTime = 10,
          effect = CONST_ME_HITBYFIRE
       }
       
       if exhaustion.check(cid, config.storageExhaust) ~= false then
          return doPlayerSendCancel(cid, 'You must wait '..exhaustion.get(cid, config.storageExhaust)..' seconds to use this item again.')
       end
       
       if not isCreature(itemEx.uid) then
          if string.find(desc:lower(), 'catched monster:') ~= nil then
             local x, y = string.find(desc, ': %a+.')
             local a, b = string.find(desc, ': %a+ %a+.')
     
             if getTileInfo(getThingPos(cid)).protection then
                return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'You can\'t summon monster in protection zone.')
             end
     
             if a ~= nil then
                if #getCreatureSummons(cid) == 0 then
                   local x = doSummonMonster(cid, string.sub(desc, a + 2, b - 1))
                   doCreatureSay(cid, 'Go '..string.sub(desc, a + 2, b - 1)..'!', TALKTYPE_MONSTER_YELL)
                   doSendMagicEffect(getThingPos(x), config.effect)
                   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'You summoned monster.')
                else
                   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'You already have summon.')
                end
             elseif x ~= nil then
                if #getCreatureSummons(cid) == 0 then
                   local x = doSummonMonster(cid, string.sub(desc, x + 2, y - 1))
                   doCreatureSay(cid, 'Go '..string.sub(desc, x + 2, y - 1)..'!', TALKTYPE_MONSTER_YELL)
                   doSendMagicEffect(getThingPos(x), config.effect)
                   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'You summoned monster.')
                else
                   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'You already have summon.')
                end
             else
                doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'Unknow monster.')
             end
          else
             doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'You didn\'t catch anything into vial.')
          end
       elseif itemEx.uid == cid then
          if #getCreatureSummons(cid) > 0 then
             if string.find(desc:lower(), 'catched monster:') ~= nil then
                local x, y = string.find(desc, ': %a+.')
                if x ~= nil then
                   for k, v in pairs(getCreatureSummons(cid)) do
                      if getCreatureName(v):lower() == string.sub(desc, x + 2, y - 1) then
                         doRemoveCreature(v)
                         doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'Your summon backed to vial.')
                         break
                      end
                   end            
                else
                   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'Unknow monster.')
                end
             else
                doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'You didn\'t catch anything into vial.')
             end
          else
             doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'You didn\'t summon anything.')
          end
       else
          doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, 'You can summon catched monster if you will use it on tile or, on self if you want to that summon back to vial.')
       end
       
       exhaustion.set(cid, config.storageExhaust, config.exhaustTime)
       return true
    end

    ahora en data/creaturescripts/creaturescripts.xml agregamos

    Código:

    <event type="death" name="summonDeath" script="summon_death.lua"/>

    en data/creaturescripts/scripts/ copiamos cualquier archivo y renombramos summon_death.lua y pegamos esto dentro

    Código:

    function onDeath(cid, corpse, deathList)
       if isMonster(cid) then
          local x = getCreatureMaster(cid)
          if isPlayer(x) then
             if getPlayerItemCount(x, 5468) > 0 then
                doPlayerRemoveItem(x, 5468, 1)
                doPlayerAddItem(x, 7488, 1)
             end
          end
       end   
       return true
    end

    ahora nos vamos al moustro que queremos casar y que sea pet le agregamos esto dentro de su xml del monster

    debajo de esta tag

    Código:

    </flags>

    agregamos esto

    Código:

    <script>
          <event name="summonDeath"/>
       </script>


    y listo



    Items que cree un pet :3 YNU5B25
    https://www.tibiaface.com

    3Thông báo Re: Items que cree un pet :3 el Mar Abr 07, 2020 5:34 pm

    smith24

    avatar
    Miembro
    Miembro
    Muchas gracias lo probare <3

    4Thông báo Re: Items que cree un pet :3 el Mar Abr 07, 2020 11:24 pm

    smith24

    avatar
    Miembro
    Miembro
    Hermano me da error e.e! lo que quiero es que al crear un monster me regenere mana por % para ser mas claro no importa si no crea el monster lo que quiero es que al crear dicho monster me regenere mana por %

    5Thông báo Re: Items que cree un pet :3 el Mar Abr 07, 2020 11:29 pm

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    bueno aqui tienes el monster

    Código:

    <?xml version="1.0" encoding="UTF-8"?>
    <monster name="Healer" nameDescription="Healer" race="blood" experience="0" speed="900" manacost="1000">
        <health now="1900" max="1900"/>
        <look type="35" head="114" body="114" legs="114" feet="114" corpse="5995"/>
        <targetchange interval="4000" chance="50"/>
        <strategy attack="10" defense="90"/>
        <flags>
            <flag summonable="1"/>
            <flag attackable="1"/>
            <flag hostile="1"/>
            <flag illusionable="0"/>
            <flag convinceable="0"/>
            <flag pushable="0"/>
            <flag canpushitems="1"/>
            <flag canpushcreatures="1"/>
            <flag targetdistance="1"/>
            <flag runonhealth="0"/>
        </flags>

        <script>
            <event name="curar"/>
        </script>

        <attacks>
        </attacks>
        <defenses armor="42" defense="60">
        <defense name="healing" interval="5000" chance="300" min="5000" max="8000">
          <attribute key="areaEffect" value="blueshimmer"/>
        </defense>
        <defense name="invisible" interval="1000" chance="20" duration="2000">
                <attribute key="areaEffect" value="blueshimmer"/>
        </defense>
        </defenses>
        <immunities>
            <immunity physical="0"/>
            <immunity energy="0"/>
            <immunity fire="0"/>
            <immunity poison="0"/>
            <immunity lifedrain="0"/>
            <immunity paralyze="1"/>
            <immunity outfit="1"/>
            <immunity drunk="1"/>
            <immunity invisible="1"/>
        </immunities>
        <voices interval="4000" chance="300">
            <voice sentence="can i heal u?" />
            <voice sentence="are you injured?" />
        </voices>
        <loot capacity="1900">
        </loot>
    </monster>

    ahora te vas a creaturescripts.xml

    Código:

    <event type="cast" name="curar" event="script" value="curar.lua"/>

    ahora en creaturescripts/script copia cualquier archivo y renombrar por curar.lua y pega esto dentro

    Código:

    -- summon heal master v1.1
    -- by leyendario.
       local config = {
       heal = 1000,
       mana = 1000, -- put 0 if you dont want him to recover mana.
       condition = "yes", -- put no if you dont want him to remove the conditions (fire, poison, etc).
       }
     
    function onCast(cid, target)
     
       local master = getCreatureMaster(cid)
       if master then
          local conditions = {CONDITION_POISON, CONDITION_FIRE, CONDITION_ENERGY, CONDITION_PARALYZE, CONDITION_DRUNK, CONDITION_DROWN, CONDITION_CURSED}
          local party = getPartyMembers(master)
          local pos = getCreaturePosition(master)
          if not getPlayerParty(master) then
             doCreatureAddHealth(master, config.heal)
             doCreatureAddMana(master, config.mana)
             doSendMagicEffect(pos, 12)
             if (config.condition == "yes") then
                for i, todos in ipairs(conditions) do
                   doRemoveCondition(master, todos)
                end
             end
             return true
          end
          for _, miembros in pairs(party) do
             doCreatureAddMana(miembros, config.mana)
             doCreatureAddHealth(miembros, config.heal)
             pos = getCreaturePosition(miembros)
             doSendMagicEffect(pos, 12)
             if (config.contidion == "yes") then
                for i, todos in ipairs(conditions) do
                   doRemoveCondition(miembros, todos)
                end
             end
          end
       end
       return true
    end

    credits: leyendario



    Items que cree un pet :3 YNU5B25
    https://www.tibiaface.com

    6Thông báo Re: Items que cree un pet :3 el Lun Abr 13, 2020 10:40 pm

    Ownergod

    Ownergod
    Nuevo Miembro
    Nuevo Miembro
    Esto sirve para 8.6? MAYA.?

    7Thông báo Re: Items que cree un pet :3 el Lun Abr 13, 2020 10:42 pm

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    [Tienes que estar registrado y conectado para ver este vínculo] escribió:Esto sirve para 8.6? MAYA.?

    si sirve



    Items que cree un pet :3 YNU5B25
    https://www.tibiaface.com

    Contenido patrocinado


    Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje (Página 1 de 1.)

    Permisos de este foro:
    No puedes responder a temas en este foro.

     

    BienvenidosTibiaFace es una comunidad de Open Tibia. Para participar debes estar registrado (click para Regístrate).