Ir para conteúdo
Banner com Efeitos
BR seuserver.com.br DESCRIÇÃO: ANUNCIE AQUI neste countdown e dê maior visibilidade ao seu lançamento | Fórum Otserv | Downloads | Tutoriais | IA Especializada para otserv | Lista de Servidores | mais de 10 anos de conteúdos! INICIA EM:

[PEDIDO] Sistema de Refinar Item para TFS 1.0

Por TioSlash
em Suporte Tibia OTServer

Featured Replies

Postado

Olá galera to com os seguintes erros nesse sistema:

Lua Script Error: [Action Interface]
data/actions/scripts/other/upgradesystemhammer.lua:onUse
data/actions/scripts/other/upgradesystemhammer.lua:42: attempt to compare number with nil
stack traceback:
        [C]: in function '__lt'
        data/actions/scripts/other/upgradesystemhammer.lua:42: in function <data/actions/scripts/other/upgradesystemhammer.lua:35>

O action está em spoiler aqui em baixo:

 

--- Sistema de Upgrade de itens feito por Killua.
--- Sistema feito com base no do Bronson Server.
 
local vocations = {1, 2, 4, 5, 6, 7, 8} -- Vocações que podem refinar itens
 
local ids_bloqueados = {2160, 5706, 2463} -- Itens que não podem ser refinados
 
local controle = {
    {level = 0, quantOre = 1, chance = 100}, -- Level do item, quantidade de Iron Ore necessaria, chance de sucesso
    {level = 1, quantOre = 2, chance = 90},
    {level = 2, quantOre = 3, chance = 80},
    {level = 3, quantOre = 4, chance = 70},
    {level = 4, quantOre = 5, chance = 60},
    {level = 5, quantOre = 6, chance = 50},
    {level = 6, quantOre = 7, chance = 40},
    {level = 7, quantOre = 8, chance = 30},
    {level = 8, quantOre = 9, chance = 20},
    {level = 9, quantOre = 10, chance = 10}
}
 
function getItemLevel(uid)
    if uid > 0 then
        return getItemAttribute(uid, "lvl") or 0
    end
    return false
end
 
function doItemAddLevel(uid, count)
    if uid > 0 and tonumber(count) > 0 then
        return doItemSetAttribute(uid, "lvl", getItemLevel(uid) + count)
    end
    return false
end
 
function onUse(cid, item, fromPosition, itemEx, toPosition)
    if not isInArray(vocations, getPlayerVocation(cid)) then
        return doPlayerSendCancel(cid, "Sua vocacao nao pode refinar.")
    elseif isInArray(ids_bloqueados, itemEx.uid) then
        return doPlayerSendCancel(cid, "Este item nao pode ser refinado.")
    end 
    
    if getItemName(itemId).attack > 0 or getItemName(itemId).defense > 0 or getItemName(itemId).armor > 0 then
        for _, upgrade in pairs(controle) do
            local atk = getItemAttribute(itemEx.uid, "attack") or getItemName(itemId).attack
            local def = getItemAttribute(itemEx.uid, "defense") or getItemName(itemId).defense
            local arm = getItemAttribute(itemEx.uid, "armor") or getItemName(itemId).armor
            local chance = math.random(1, 100)
            if getItemLevel(itemEx.uid) == upgrade.level then
               if doPlayerRemoveItem(cid, 5880, upgrade.quantOre) then
                   doSendMagicEffect(getThingPos(itemEx.uid), CONST_ME_CRAPS)
                  if chance <= upgrade.chance then
                      if getItemLevel(itemEx.uid) == 0 then
                          doItemSetAttribute(itemEx.uid, "description", "Esse item foi refinado por" ..getCreatureName(cid))
                      end
                      doItemAddLevel(itemEx.uid, 1)
                      doItemSetAttribute(itemEx.uid, "name", getItemNameById(itemEx.itemid).. " + " ..getItemLevel(itemEx.uid))
                      doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce refinou com sucesso! Agora seu "..getItemNameById(itemEx.itemid).." eh level " ..getItemLevel(itemEx.uid))
                      if getItemName(itemId).attack > 0 then
                          doItemSetAttribute(itemEx.uid, "attack", atk + 1)
                          return true
                      elseif getItemName(itemId).armor > 0 then
                          doItemSetAttribute(itemEx.uid, "armor", arm + 1)
                          return true
                      elseif getItemName(itemId).defense > 0 and getItemName(itemId).attack <= 0 then
                          doItemSetAttribute(itemEx.uid, "defense", def + 1)
                          return true
                      end
                  else
                      doTransformItem(itemEx.uid, 2256)
                      doItemSetAttribute(itemEx.uid, 'name', "metal trash")
                      doItemSetAttribute(itemEx.uid, 'attack', 0)
                      doItemSetAttribute(itemEx.uid, 'armor', 0)
                      doItemSetAttribute(itemEx.uid, 'defense', 0)
                      doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce falhou.")
                      return true
                  end
              else
                  doPlayerSendCancel(cid, "Voce nao tem iron ores o suficiente. Voce precisa de "..upgrade.quantOre.." iron ores.")
              end
          end
      end
  else
      doPlayerSendCancel(cid, "Esse item nao pode ser refinado.")
  end
  return true
end  

 
Quem souber me ajuda agradeço!
Valendo +REP / Melhor Resposta!

Editado por TioSlash (veja o histórico de edições)

1609891_3.png

Trimera

Tibia Old 7.4

 

 

  • Citar
  • Mention
    • Respostas 16
    • Visualizações 2.7k
    • Created
    • Última resposta

    Top Posters In This Topic

    Popular Days

    Postado

    Acho que é isso... ;x 

    --- Sistema de Upgrade de itens feito por Killua.
    --- Sistema feito com base no do Bronson Server.
     
    local vocations = {1, 2, 4, 5, 6, 7, 8} -- Vocações que podem refinar itens
     
    local ids_bloqueados = {2160, 5706, 2463} -- Itens que não podem ser refinados
     
    local controle = {
        {level = 0, quantOre = 1, chance = 100}, -- Level do item, quantidade de Iron Ore necessaria, chance de sucesso
        {level = 1, quantOre = 2, chance = 90},
        {level = 2, quantOre = 3, chance = 80},
        {level = 3, quantOre = 4, chance = 70},
        {level = 4, quantOre = 5, chance = 60},
        {level = 5, quantOre = 6, chance = 50},
        {level = 6, quantOre = 7, chance = 40},
        {level = 7, quantOre = 8, chance = 30},
        {level = 8, quantOre = 9, chance = 20},
        {level = 9, quantOre = 10, chance = 10}
    }
     
    function getItemLevel(uid)
        if uid > 0 then
            return getItemAttribute(uid, "lvl") or 0
        end
        return false
    end
     
    function doItemAddLevel(uid, count)
        if uid > 0 and tonumber(count) > 0 then
            return doItemSetAttribute(uid, "lvl", getItemLevel(uid) + count)
        end
        return false
    end
     
    function onUse(cid, item, fromPosition, itemEx, toPosition)
        if not isInArray(vocations, getPlayerVocation(cid)) then
            return doPlayerSendCancel(cid, "Sua vocacao nao pode refinar.")
    return false
    end
        elseif isInArray(ids_bloqueados, itemEx.uid) then
            return doPlayerSendCancel(cid, "Este item nao pode ser refinado.")
    return false
        end 
        
        if getItemName(itemId).attack > 0 or getItemName(itemId).defense > 0 or getItemName(itemId).armor > 0 then
            for _, upgrade in pairs(controle) do
                local atk = getItemAttribute(itemEx.uid, "attack") or getItemName(itemId).attack
                local def = getItemAttribute(itemEx.uid, "defense") or getItemName(itemId).defense
                local arm = getItemAttribute(itemEx.uid, "armor") or getItemName(itemId).armor
                local chance = math.random(1, 100)
                if getItemLevel(itemEx.uid) == upgrade.level then
                   if doPlayerRemoveItem(cid, 5880, upgrade.quantOre) then
                       doSendMagicEffect(getThingPos(itemEx.uid), CONST_ME_CRAPS)
                      if chance <= upgrade.chance then
                          if getItemLevel(itemEx.uid) == 0 then
                              doItemSetAttribute(itemEx.uid, "description", "Esse item foi refinado por" ..getCreatureName(cid))
                          end
                          doItemAddLevel(itemEx.uid, 1)
                          doItemSetAttribute(itemEx.uid, "name", getItemNameById(itemEx.itemid).. " + " ..getItemLevel(itemEx.uid))
                          doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce refinou com sucesso! Agora seu "..getItemNameById(itemEx.itemid).." eh level " ..getItemLevel(itemEx.uid))
                          if getItemName(itemId).attack > 0 then
                              doItemSetAttribute(itemEx.uid, "attack", atk + 1)
                              return true
                          elseif getItemName(itemId).armor > 0 then
                              doItemSetAttribute(itemEx.uid, "armor", arm + 1)
                              return true
                          elseif getItemName(itemId).defense > 0 and getItemName(itemId).attack <= 0 then
                              doItemSetAttribute(itemEx.uid, "defense", def + 1)
                              return true
                          end
                      else
                          doTransformItem(itemEx.uid, 2256)
                          doItemSetAttribute(itemEx.uid, 'name', "metal trash")
                          doItemSetAttribute(itemEx.uid, 'attack', 0)
                          doItemSetAttribute(itemEx.uid, 'armor', 0)
                          doItemSetAttribute(itemEx.uid, 'defense', 0)
                          doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce falhou.")
                          return true
                      end
                  else
                      doPlayerSendCancel(cid, "Voce nao tem iron ores o suficiente. Voce precisa de "..upgrade.quantOre.." iron ores.")
                  end
              end
          end
      else
          doPlayerSendCancel(cid, "Esse item nao pode ser refinado.")
      end
      return true
    end  

     
    Ou isso... :D
     

    --- Sistema de Upgrade de itens feito por Killua.
    --- Sistema feito com base no do Bronson Server.
     
    local vocations = {1, 2, 4, 5, 6, 7, 8} -- Vocações que podem refinar itens
     
    local ids_bloqueados = {2160, 5706, 2463} -- Itens que não podem ser refinados
     
    local controle = {
        {level = 0, quantOre = 1, chance = 100}, -- Level do item, quantidade de Iron Ore necessaria, chance de sucesso
        {level = 1, quantOre = 2, chance = 90},
        {level = 2, quantOre = 3, chance = 80},
        {level = 3, quantOre = 4, chance = 70},
        {level = 4, quantOre = 5, chance = 60},
        {level = 5, quantOre = 6, chance = 50},
        {level = 6, quantOre = 7, chance = 40},
        {level = 7, quantOre = 8, chance = 30},
        {level = 8, quantOre = 9, chance = 20},
        {level = 9, quantOre = 10, chance = 10}
    }
     
    function getItemLevel(uid)
        if uid > 0 then
            return getItemAttribute(uid, "lvl") or 0
        end
        return false
    end
     
    function doItemAddLevel(uid, count)
        if uid > 0 and tonumber(count) > 0 then
            return doItemSetAttribute(uid, "lvl", getItemLevel(uid) + count)
        end
        return false
    end
     
    function onUse(cid, item, fromPosition, itemEx, toPosition)
        if not isInArray(vocations, getPlayerVocation(cid)) then
    doPlayerSendCancel(cid, "Sua vocacao nao pode refinar.")
        return true
    end
        elseif isInArray(ids_bloqueados, itemEx.uid) then
    doPlayerSendCancel(cid, "Este item nao pode ser refinado.")
        return true
        end 
        
        if getItemName(itemId).attack > 0 or getItemName(itemId).defense > 0 or getItemName(itemId).armor > 0 then
            for _, upgrade in pairs(controle) do
                local atk = getItemAttribute(itemEx.uid, "attack") or getItemName(itemId).attack
                local def = getItemAttribute(itemEx.uid, "defense") or getItemName(itemId).defense
                local arm = getItemAttribute(itemEx.uid, "armor") or getItemName(itemId).armor
                local chance = math.random(1, 100)
                if getItemLevel(itemEx.uid) == upgrade.level then
                   if doPlayerRemoveItem(cid, 5880, upgrade.quantOre) then
                       doSendMagicEffect(getThingPos(itemEx.uid), CONST_ME_CRAPS)
                      if chance <= upgrade.chance then
                          if getItemLevel(itemEx.uid) == 0 then
                              doItemSetAttribute(itemEx.uid, "description", "Esse item foi refinado por" ..getCreatureName(cid))
                          end
                          doItemAddLevel(itemEx.uid, 1)
                          doItemSetAttribute(itemEx.uid, "name", getItemNameById(itemEx.itemid).. " + " ..getItemLevel(itemEx.uid))
                          doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce refinou com sucesso! Agora seu "..getItemNameById(itemEx.itemid).." eh level " ..getItemLevel(itemEx.uid))
                          if getItemName(itemId).attack > 0 then
                              doItemSetAttribute(itemEx.uid, "attack", atk + 1)
                              return true
                          elseif getItemName(itemId).armor > 0 then
                              doItemSetAttribute(itemEx.uid, "armor", arm + 1)
                              return true
                          elseif getItemName(itemId).defense > 0 and getItemName(itemId).attack <= 0 then
                              doItemSetAttribute(itemEx.uid, "defense", def + 1)
                              return true
                          end
                      else
                          doTransformItem(itemEx.uid, 2256)
                          doItemSetAttribute(itemEx.uid, 'name', "metal trash")
                          doItemSetAttribute(itemEx.uid, 'attack', 0)
                          doItemSetAttribute(itemEx.uid, 'armor', 0)
                          doItemSetAttribute(itemEx.uid, 'defense', 0)
                          doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Voce falhou.")
                          return true
                      end
                  else
                      doPlayerSendCancel(cid, "Voce nao tem iron ores o suficiente. Voce precisa de "..upgrade.quantOre.." iron ores.")
                  end
              end
          end
      else
          doPlayerSendCancel(cid, "Esse item nao pode ser refinado.")
      end
      return true
    end  

    Editado por karlkalvin (veja o histórico de edições)

                                   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~Assinatura~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
                                                                    pmnz1.jpg

  • Citar
  • Mention
    • Postado
    • Autor

    Obrigado pela ajuda meu amigo,
    mais infelizmente os dois deram erro no console:

    Primeiro Script deu esse erro:


    [Warning - Event::checkScript] Can not load script: scripts/other/upgradesystemhammer.lua
    data/actions/scripts/other/upgradesystemhammer.lua:38: 'end' expected (to close



    o Segundo deu esse outro erro:

    [Warning - Event::checkScript] Can not load script: scripts/other/upgradesystemhammer.lua


    data/actions/scripts/other/upgradesystemhammer.lua:40: 'end' expected (to close 'function' at line 35) near 'elseif'

    1609891_3.png

    Trimera

    Tibia Old 7.4

     

     

  • Citar
  • Mention
    • Postado

    Recomendo que você troque o Sistema

    http://www.tibiaking.com/forum/topic/11580-perfect-upgrade-system/ 

    Refine System q eu utilizo ^^

    tk-melhor.png

    jCYe89w.gif

     

    Eu no TK!.

    Tutoriais  :wow: :

     

    Ativar Report (Znote)

    (NEW) Shop Gesior

    [TFS 1.x] Crafting System

    Ligar/Desligar Servidor Pelo Site (ZnoteACC)

     

     

    Layouts   ;D :

     

    Dwarf (ZNOTE)

    Dars (Gesior)

    Amiroslo bootstrap (Znote)

    Dark-Tibia (Znote)

    Vestia (Gesior)

    DarkSandOTS Layout

    FODACE se é pouca coisa u.u

     

     

  • Citar
  • Mention
    • Postado
    • Autor

    Recomendo que você troque o Sistema

    http://www.tibiaking.com/forum/topic/11580-perfect-upgrade-system/ 

    Refine System q eu utilizo ^^

     

    Tentei mais da esse errro

     
    Lua Script Error: [Action Interface]
data/actions/scripts/upgrade.lua:onUse
data/lib/upgradesystem.lua:75: attempt to call global 'getItemInfo' (a nil value)
stack traceback:
        [C]: in function 'getItemInfo'
        data/lib/upgradesystem.lua:75: in function 'new'
        data/actions/scripts/upgrade.lua:6: in function <data/actions/scripts/upgrade.lua:1>

    1609891_3.png

    Trimera

    Tibia Old 7.4

     

     

  • Citar
  • Mention

    • Participe da conversa

    Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

    Visitante
    Responder
    Ir para a lista de tópicos

    Quem Está Navegando 0

    • Nenhum usuário registrado visualizando esta página.

    Estatísticas dos Fóruns

    • Tópicos 96.9k
    • Posts 519.6k

    Informação Importante

    Confirmação de Termo

    I accept