jeremias

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.

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.

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.

@Samuel Cstr! "PastaDoSite\upload\layouts\tibiacom\basic.css" ou apenas vá à pasta do site e pesquise "basic".

@jeremias
 
Existe esta funcao: combat:setArea(createCombatArea(AREA_CIRCLE5X5)), onde voce define qual a area maxima que voce pode usar o item/magia, isso pode te ajudar? 

@jeremias deixa eu ver se entendi corretamente você quer que as armas ataquem apenas usando ela no alvo?
@jeremias isso aqui talvez possa te ajudar
 
 

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.

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. 

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. 

Creio que você deve esta usando um efeito >  255,  e sua distro esta com efeitos limitados até 255. Se for isto então é preciso que você rompa esse limite. Leia o tópico a seguir e aplique no seu server.
 

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. 

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.

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. 

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. 

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  

Poder ser, tente usar outra distro.

Olá rapaziada fiz um video ensinando alguns conceitos basicos de C++ e mostrei como criar uma calculadora basicona, fiz esse video com intuito de ajudar e mostrar um pouco desse linguagem que foi ultilizada para fazer o nosso amado tibia :D
 

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  

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.

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.

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.

Olá pessoal, está disponível para Dowload  as templetes do antigo NTO Panzer, em breve postarei o site completo! vlw. 
não se esqueçam do REP+ 
                                                                                                                                                           
Créditos  pela produção das Templates: NTO PANZER. 
 
Dowload: http://www.mediafire.com/download/abctzye7lg78t92/TemplatesNtopanzer.rar
 
Scan: https://www.virustotal.com/pt/file/2a184d2216d5b6f9045945d9bec972f9c71c9c641ce31d669c45f65823b7ecd7/analysis/1447852459/
 

 

Olá pessoal, está disponível para Dowload  as templetes do antigo NTO Panzer, em breve postarei o site completo! vlw. 
não se esqueçam do REP+ 
                                                                                                                                                           
Créditos  pela produção das Templates: NTO PANZER. 
 
Dowload: http://www.mediafire.com/download/abctzye7lg78t92/TemplatesNtopanzer.rar
 
Scan: https://www.virustotal.com/pt/file/2a184d2216d5b6f9045945d9bec972f9c71c9c641ce31d669c45f65823b7ecd7/analysis/1447852459/
 

 

Olá pessoal, está disponível para Dowload  as templetes do antigo NTO Panzer, em breve postarei o site completo! vlw. 
não se esqueçam do REP+ 
                                                                                                                                                           
Créditos  pela produção das Templates: NTO PANZER. 
 
Dowload: http://www.mediafire.com/download/abctzye7lg78t92/TemplatesNtopanzer.rar
 
Scan: https://www.virustotal.com/pt/file/2a184d2216d5b6f9045945d9bec972f9c71c9c641ce31d669c45f65823b7ecd7/analysis/1447852459/
 

 

Olá pessoal, está disponível para Dowload  as templetes do antigo NTO Panzer, em breve postarei o site completo! vlw. 
não se esqueçam do REP+ 
                                                                                                                                                           
Créditos  pela produção das Templates: NTO PANZER. 
 
Dowload: http://www.mediafire.com/download/abctzye7lg78t92/TemplatesNtopanzer.rar
 
Scan: https://www.virustotal.com/pt/file/2a184d2216d5b6f9045945d9bec972f9c71c9c641ce31d669c45f65823b7ecd7/analysis/1447852459/