Ir para conteúdo

jeremias

Membro
  • Registro em

  • Última visita

Tudo que jeremias postou

  1. Olá Pessoal, refiz o script do comando /newtype, deixei o código um pouco mais legível e compactado. Corrigi um erro que quando você adicionava mais outfits no seu cliente o comando não reconhecia, agora basta você configura no script a quantidade de outfits que tem no seu cliente e pronto. como coloco em meu servidor? --< Script reformulado por Jeremias 14/03/2017 local quantidadeDeOutfits = 1500 -- < coloque a quantidade de outfits do seu servidor. function onSay(cid, words, param, channel) if(param == "") then return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Complemente o comando com o parametro adequado.") end param = string.explode(param, ",") if (words == "/newtype") and (not param[2]) then if (tonumber(param[1]) <= quantidadeDeOutfits) then doCreatureChangeOutfit(cid, {lookType = param[1]}) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Esta Outfit nao existe.") end else doCreatureChangeOutfit(getPlayerByName(param[2]), {lookType = param[1]}) end return true end Caso tenha alguma sugestão para implementar no script é só falar.
  2. Olá pessoal, resolvi adaptar o script do comando !spells ou !jutsus, essa adaptação consiste em prevenir que Staffs como GM, CM, ADM, tomem debug ao usar o comando. Recomendado para Staffs iniciantes ou esquecidos que usem o comando. Como coloco em meu servidor ? -- Adaptado por Jeremias 13/03/2018. function onSay(cid, words, param) if (getPlayerGroupId(cid) >= 3) then return doPlayerSendTextMessage(cid, 19, "Staff nao tem jutsus.") end local count = getPlayerInstantSpellCount(cid) local text = "" local t = {} for i = 0, count - 1 do local spell = getPlayerInstantSpellInfo(cid, i) if spell.level ~= 0 then if spell.manapercent > 0 then spell.mana = spell.manapercent .. "%" end table.insert(t, spell) end end table.sort(t, function(a, b) return a.level < b.level end) local prevLevel = -1 for i, spell in ipairs(t) do local line = "" if prevLevel ~= spell.level then if i ~= 1 then line = "\n" end line = line .. "Spells for Level " .. spell.level .. "\n" prevLevel = spell.level end text = text .. line .. " " .. spell.words .. " - " .. spell.name .. " : " .. spell.mana .. "\n" end doShowTextDialog(cid, 2175, text) return TRUE end Uma adaptação simples que previne dbugs desnecessários.
  3. Acho que esse Script deve resolver seu problema. -- Script Adaptado por Jeremias // Tibiaking.com 12/03/2018 local itemsIniciais = { head = 7436, armor = 2665, legs = 2427, boots = 7387, ring = 2138, bag = 1999, gold = 2160, quantidadeDeGold = 10, sword = 2417} function onLogin(cid) if getPlayerStorageValue(cid, 30001) < 1 then doPlayerAddItem(cid, itemsIniciais.ring, 1, false, CONST_SLOT_NECKLACE) doPlayerAddItem(cid, itemsIniciais.head, 1, false, CONST_SLOT_HEAD) doPlayerAddItem(cid, itemsIniciais.bag, 1, false, CONST_SLOT_BACKPACK) doPlayerAddItem(cid, itemsIniciais.sword, 1, false, CONST_SLOT_LEFT) doPlayerAddItem(cid, itemsIniciais.gold, itemsIniciais.quantidadeDeGold, false, CONST_SLOT_RIGHT) doPlayerAddItem(cid, itemsIniciais.armor, 1, false, CONST_SLOT_ARMOR) doPlayerAddItem(cid, itemsIniciais.legs, 1, false, CONST_SLOT_LEGS) doPlayerAddItem(cid, itemsIniciais.boots, 1, false, CONST_SLOT_BOOTS) doPlayerSendTextMessage(cid, 19, "Voce acaba de receber seus item iniciais.") end setPlayerStorageValue(cid, 30001, 1) return TRUE end
  4. Veja se no executável que você usa pra deixar o servidor online, acusa algum erro.
  5. A distro esta apontando algum erro?
  6. jeremias postou uma resposta no tópico em Suporte Tibia OTServer
    Qual é o erro? que esta dando ?
  7. Poder ser, tente usar outra distro.
  8. Fiz alguns testes aqui, a distro não acusou nenhum erro. Tente usar ela em outro local do mapa.
  9. Gostei muito, nunca tinha parado pra dar uma olhada nessa linguagem. Já tenho uma noção grande de como funciona, pois estudei java que é semelhante.
  10. jeremias postou uma resposta no tópico em Suporte Tibia OTServer
    Manda o Script...
  11. jeremias postou uma resposta no tópico em Suporte Tibia OTServer
    Sim é possível.
  12. Olá, veja este tutorial.
  13. Olá, acho que esse script ira resolver seu problema, apague esse ai e cole este no lugar. ---Script adaptado por Shazam // Tibiaking local config = { useFragHandler = getBooleanFromString(getConfigValue('useFragHandler')), advancedFragList = getBooleanFromString(getConfigValue('advancedFragList')) } local tempo = 60 -- Tempo em segundos para usar o comando novamente. local storage = 5839 -- Storage function onSay(cid, words, param, channel) if exhaustion.check(cid, storage) then doPlayerSendTextMessage(cid, 19, "Aguarde " .. exhaustion.get(cid, storage) .. " para usar o comando novamente!") return false end if(not config.useFragHandler) then return false end local time = os.time() local times = {today = (time - 86400), week = (time - (7 * 86400))} local contents, result = {day = {}, week = {}, month = {}}, db.getResult("SELECT `pd`.`date`, `pd`.`level`, `p`.`name` FROM `player_killers` pk LEFT JOIN `killers` k ON `pk`.`kill_id` = `k`.`id` LEFT JOIN `player_deaths` pd ON `k`.`death_id` = `pd`.`id` LEFT JOIN `players` p ON `pd`.`player_id` = `p`.`id` WHERE `pk`.`player_id` = " .. getPlayerGUID(cid) .. " AND `k`.`unjustified` = 1 AND `pd`.`date` >= " .. (time - (30 * 86400)) .. " ORDER BY `pd`.`date` DESC") if(result:getID() ~= -1) then repeat local content = { name = result:getDataString("name"), level = result:getDataInt("level"), date = result:getDataInt("date") } if(content.date > times.today) then table.insert(contents.day, content) elseif(content.date > times.week) then table.insert(contents.week, content) else table.insert(contents.month, content) end until not result:next() result:free() end local size = { day = table.maxn(contents.day), week = table.maxn(contents.week), month = table.maxn(contents.month) } if(config.advancedFragList) then local result = "Frags gained today: " .. size.day .. "." if(size.day > 0) then for _, content in ipairs(contents.day) do result = result .. "\n* " .. os.date("%d %B %Y %X at ", content.date) .. content.name .. " on level " .. content.level end result = result .. "\n" end result = result .. "\nFrags gained this week: " .. (size.day + size.week) .. "." if(size.week > 0) then for _, content in ipairs(contents.week) do result = result .. "\n* " .. os.date("%d %B %Y %X at ", content.date) .. content.name .. " on level " .. content.level end result = result .. "\n" end result = result .. "\nFrags gained this month: " .. (size.day + size.week + size.month) .. "." if(size.month > 0) then for _, content in ipairs(contents.month) do result = result .. "\n* " .. os.date("%d %B %Y %X at ", content.date) .. content.name .. " on level " .. content.level end result = result .. "\n" end local skullEnd = getPlayerSkullEnd(cid) if(skullEnd > 0) then result = result .. "\nYour " .. (getCreatureSkullType(cid) == SKULL_RED and "red" or "black") .. " skull will expire at " .. os.date("%d %B %Y %X", skullEnd) end doPlayerPopupFYI(cid, result) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You currently have " .. size.day .. " frags today, " .. (size.day + size.week) .. " this week and " .. (size.day + size.week + size.month) .. " this month.") if(size.day > 0) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Last frag at " .. os.date("%d %B %Y %X", contents.day[1].date) .. " on level " .. contents.day[1].level .. " (" .. contents.day[1].name .. ").") end local skullEnd = getPlayerSkullEnd(cid) if(skullEnd > 0) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Your " .. (getCreatureSkullType(cid) == SKULL_RED and "red" or "black") .. " skull will expire at " .. os.date("%d %B %Y %X", skullEnd)) end end exhaustion.set(cid, storage, tempo) return true end
  14. A distro aponta algum erro?
  15. É só adicionar os dois sistemas, por level e por Stone, se não me engano a Base do KPDO tem esse sistema de evolução por level, procure nela.
  16. Sou muito mais o estilo de NTO.
  17. Olá pessoal, venho trazer um tutorial de como por fundo musical no site é um processo simples creio que todos vão conseguir executa-lo sem erros. 1° Passo: Procure pela pasta Templates do seu site abra o arquivo index.tpl com o editor. Configure o trecho de código abaixo com as informações necessárias e cole no arquivo, faça como está na imagem. <embed src = "Endereço da musica" autostart = "true" loop = "true" width = "0" height="0"> 2° Ultimo passo(Detalhes): Obrigado pela atenção, espero que seja útil o tutorial.
  18. Por favor,mande as configurações do system...
  19. jeremias postou uma resposta no tópico em Suporte & Pedidos
    Topico abandonado
  20. jeremias postou uma resposta no tópico em Suporte Tibia OTServer
    Essas Imagens Podem Ajudar Vcs
  21. jeremias postou uma resposta no tópico em Suporte Tibia OTServer
    {EXCLUIDO}
  22. Eae Galera, To precissando do Site Warheim completo com tudo Se alguem tiver porfavor me passe, URGENTE!
  23. Eae Galera, Como faço para colocar a layout do warheim em um site sem dar erros ? ajudem rapido porfavor?
  24. Eae Galera do TK queria Saber Como Remover esta Barra da imagem abaixo do client Old do KPDO, Porfavor me ajudem rep+ Link da Imagem: http://imgur.com/fmGgGML
  25. Pronto Imagem dos Templates Colocada!

Informação Importante

Confirmação de Termo