• 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 Mar Abr 07, 2020 11:13 am

    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?

    4 participantes

    2Thông báo Re: Items que cree un pet :3 Mar Abr 07, 2020 2: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
    4 participantes
    http://www.tibiaface.com

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

    smith24

    avatar
    Miembro
    Miembro
    Muchas gracias lo probare <3

    4 participantes

    4Thông báo Re: Items que cree un pet :3 Mar Abr 07, 2020 10: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 %

    4 participantes

    5Thông báo Re: Items que cree un pet :3 Mar Abr 07, 2020 10: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
    4 participantes
    http://www.tibiaface.com

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

    Ownergod

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

    4 participantes

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

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    Ownergod escribió:Esto sirve para 8.6? MAYA.?

    si sirve



    Items que cree un pet :3 YNU5B25
    4 participantes
    http://www.tibiaface.com

    8Thông báo Re: Items que cree un pet :3 Dom Feb 07, 2021 3:36 am

    ale_dro3

    ale_dro3
    Miembro
    Miembro
    Que tal maya, me genera este error en consola, espero me puedas ayudar.

    [7/2/2021 1:35:17] >>> Loading actions... [Error - LuaInterface::loadFile] cannot open data/actions/scripts/summon_monster.lua: No such file or directory
    [7/2/2021 1:35:17] [Error - Event::checkScript] Cannot load script (data/actions/scripts/summon_monster.lua)
    [7/2/2021 1:35:17] cannot open data/actions/scripts/summon_monster.lua: No such file or directory

    USO OTX 2

    4 participantes

    9Thông báo Re: Items que cree un pet :3 Lun Feb 08, 2021 9:29 am

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    ale_dro3 escribió:Que tal maya, me genera este error en consola, espero me puedas ayudar.

    [7/2/2021 1:35:17] >>> Loading actions... [Error - LuaInterfaceFile] cannot open data/actions/scripts/summon_monster.lua: No such file or directory
    [7/2/2021 1:35:17] [Error - EventScript] Cannot load script (data/actions/scripts/summon_monster.lua)
    [7/2/2021 1:35:17] cannot open data/actions/scripts/summon_monster.lua: No such file or directory

    USO OTX 2

    dice que no encuentra la direccion del archivo revise su linea en el xml y coloque bien la direccion



    Items que cree un pet :3 YNU5B25
    4 participantes
    http://www.tibiaface.com

    10Thông báo Re: Items que cree un pet :3 Mar Feb 09, 2021 4:16 pm

    ale_dro3

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

    MAYA, NO SE SI SOY YO O NO LO VEO PERO CREO FALTA EL LUA DE SUMMON MOSNTER QUE VA EN ACTIONS, NO SE SI POR ESO ME MARQUE ESE ERROR, YA VERIFIQUE LO DE XML Y NO VEO EL ERROR.

    4 participantes

    11Thông báo Re: Items que cree un pet :3 Mar Feb 09, 2021 9:47 pm

    [Admin] God Maya

    [Admin] God Maya
    Administrador
    Administrador
    ale_dro3 escribió:
    <script>
          <event name="summonDeath"/>
       </script>

    MAYA, NO SE SI SOY YO O NO LO VEO PERO CREO FALTA EL LUA DE SUMMON MOSNTER QUE VA EN ACTIONS, NO SE SI POR ESO ME MARQUE ESE ERROR, YA VERIFIQUE LO DE XML Y NO VEO EL ERROR.


    aqui lo tienes

    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



    Items que cree un pet :3 YNU5B25
    4 participantes
    http://www.tibiaface.com

    Contenido patrocinado


    4 participantes

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