J4dson

@J4dson Claro que é possível.
 

local summons = {"Demon", "Orc", "Spider", "Rat", "Tarantula", "Orc Leader"} local maxSummons = 4 function onUse(cid)     local s = maxSummons - #getCreatureSummons(cid)     local str = "Voce sumonou"          if s == 0 then                  doPlayerSendCancel(cid, "Voce ja tem 4 summons.")         return false     end          for r = 1, s do         local m = doCreateMonster(summons[math.random(1, #summons)], getThingPos(cid))                  doConvinceCreature(cid, m)         str = str .." " .. m ..","     end          doPlayerSendTextMessage(cid, 27, str)     return true end  
@DBKO
Amigo, caso não queria esses monstros, só põe na tabela qual você quer.

Simplicidade é o último grau de sofisticação!

Entra num char god e testa cada um desses efeitos usando /x numero

no lugar do numero vc vai colocando de 0 até 41 e se gostar de algum apenas coloque no items.xml o nome dele m minúsculo sem o "const_ani_" na frente
 
CONST_ANI_SPEAR = 0 CONST_ANI_BOLT = 1 CONST_ANI_ARROW = 2 CONST_ANI_FIRE = 3 CONST_ANI_ENERGY = 4 CONST_ANI_POISONARROW = 5 CONST_ANI_BURSTARROW = 6 CONST_ANI_THROWINGSTAR = 7 CONST_ANI_THROWINGKNIFE = 8 CONST_ANI_SMALLSTONE = 9 CONST_ANI_DEATH = 10 CONST_ANI_LARGEROCK = 11 CONST_ANI_SNOWBALL = 12 CONST_ANI_POWERBOLT = 13 CONST_ANI_POISON = 14 CONST_ANI_INFERNALBOLT = 15 CONST_ANI_HUNTINGSPEAR = 16 CONST_ANI_ENCHANTEDSPEAR = 17 CONST_ANI_REDSTAR = 18 CONST_ANI_GREENSTAR = 19 CONST_ANI_ROYALSPEAR = 20 CONST_ANI_SNIPERARROW = 21 CONST_ANI_ONYXARROW = 22 CONST_ANI_PIERCINGBOLT = 23 CONST_ANI_WHIRLWINDSWORD = 24 CONST_ANI_WHIRLWINDAXE = 25 CONST_ANI_WHIRLWINDCLUB = 26 CONST_ANI_ETHEREALSPEAR = 27 CONST_ANI_ICE = 28 CONST_ANI_EARTH = 29 CONST_ANI_HOLY = 30 CONST_ANI_SUDDENDEATH = 31 CONST_ANI_FLASHARROW = 32 CONST_ANI_FLAMMINGARROW = 33 CONST_ANI_SHIVERARROW = 34 CONST_ANI_ENERGYBALL = 35 CONST_ANI_SMALLICE = 36 CONST_ANI_SMALLHOLY = 37 CONST_ANI_SMALLEARTH = 38 CONST_ANI_EARTHARROW = 39 CONST_ANI_EXPLOSION = 40 CONST_ANI_CAKE = 41 CONST_ANI_WEAPONTYPE = 254 CONST_ANI_NONE = 255 Espero ter ajudado.

bom, ali naquele script que você botou da frozen starlight é só você editar nessa parte aqui:
 
<attribute key="shootType" value="shiverarrow"/>
 
onde está shivearrow você muda para um desses da lista que o BeatiFul Pain postou aqui no fórum
 
segue o link da lista > http://www.tibiaking.com/forum/topic/30269-todos-os-shoot-type/
 
depois que você escolher um é só mudar.
 
Exemplo:
    <item id="2361" article="a" name="frozen starlight">
        <attribute key="weight" value="420"/>
        <attribute key="attack" value="60"/>
        <attribute key="weaponType" value="distance"/>
        <attribute key="shootType" value="energyball"/>
        <attribute key="hitChance" value="90" />
        <attribute key="range" value="10"/>
    </item>
 
@Edit, uma dica já que não da pra usar o frozen starlight voando, use o shootType energyball, como no exemplo acima, vai ficar mais parecido

<attribute key="shootType" value="energyball"/> Só editar 

de nada amigo marque como melhor resposta para o tópico fica resolvido 

Boa noite.
Após vários testes e correções de bugs, e é claro, estudar algumas tags.
 
Segue abaixo seu script:
 
Em actions.xml adicione a seguinte tag:
<action actionid="XXXXX" script="ferreiro.lua"/> Registre a actionID de acordo com a alavanca registrada no MapEditor.
Lembre-se de adicionar alguma actiondID nos caixotes para que não possam ser arrastados, pois adicionei uma parte no script pelo qual só funciona se o caixote estiver no lugar, mas vale a pena deixá-los fixo.
 
Agora crie o arquivo "ferreiro.lua" na pasta script e cole o seguinte código:
local boxid = XXXX -- ID da Caixa que receberá os itens local box1 = {x=000, y=000, z=0, stackpos=1}  -- Coordenada da Caixa de Combinação local box2 = {x=000, y=000, z=0, stackpos=1}  -- Coordenada da Caixa Final local item1, item2 = XXXX, XXXX -- ID do ITEM1, ID do ITEM2 local reward = XXXX -- ID do Item Recompensa function onUse(cid, item, fromPosition, itemEx, toPosition)     local container, container2 = getTileItemById(box1, boxid), getTileItemById(box2, boxid)     if container.uid > 0 then         if container2.uid > 0 then             if getContainerItem(container.uid, 0).uid >= 1 then                              if getContainerItem(container.uid, 0).itemid == item1 then                     if getContainerItem(container.uid, 1).itemid == item2 then                         doRemoveItem(getContainerItem(container.uid, 0).uid, 1)                         doRemoveItem(getContainerItem(container.uid, 0).uid, 1)                         doAddContainerItem(getThingFromPos(box2).uid, reward)                         doPlayerSendTextMessage(cid, 4, "Parabéns pela combinação.")                         return false                     else                         doPlayerSendCancel(cid, "Você precisa de um "..getItemNameById(item2).." no segundo slot para combinar.")                     return true                     end                 else                     doPlayerSendCancel(cid, "Você precisa de um "..getItemNameById(item1).." no primeiro slot para combinar.")                 return true                 end             else                 doPlayerSendCancel(cid, "Não há itens no caixote.")             end         else             doPlayerSendCancel(cid, "O caixote de premiação não está no lugar correto.")         end     else         doPlayerSendCancel(cid, "O caixote não está no lugar correto.")     end          return true end Lembre-se de configurar a parte inicial do script.
 
Testei e funcionou perfeitamente comigo.
Teste e poste o resultado.
 
Boa sorte.

Não testei.
local cfg = {     remove = true, -- Remover ao ultilizar?     position = {x = 123, y = 321, z = 7}, -- posição necessária para sumonar o monstro.     monster = "Rat", } function onUse(cid)     local pos = getThingPos(cid)          if pos.x == cfg.position.x and pos.y == cfg.position.y and pos.z == cfg.position.z then         local monster = doSummonCreature(cfg.monster, pos)                  doConvinceCreature(cid, monster)         doPlayerSendCancel(cid, "Voce sumonou um "..cfg.monster) else doPlayerSendCancel(cid, "Voce precisa estar em uma determinada posiçao para ultilizar este item.")     end          if cfg.remove then                  doRemoveItem(item.uid, 1)     end     return true end

Cara, se der bosta, desculpa, estou começando :c
function onUse (cid, item, fromPosition, itemEx, toPosition) doSummonCreature("Demon", {x=92, y=127, z=7} ) return true end Aí é só você configurar, trocar "Demon" pelo nome do monstro, e "x=92, y=127, z=7" pelas coordenadas