jNo

Um script de frags, que mostre em vermelho, de forma inteligente se for possível, a quantidade de frags que estou e a quantidade pra alcançar e pegar a skull, exemplo: 13:05 You currently have 2 frags today, 2 this week and 2 this month. 13:05 Last frag at 12 March 2017 13:03:11 on level 1041 (Peso). 13:05 You have [7/15] frags to red skull. 13:05 You have [7/30] frags to black skull. -- Unjustified kills -- NOTE: *Banishment and *BlackSkull variables are >summed up< -- (dailyFragsToRedSkull + dailyFragsToBanishment) with their -- *RedSkull equivalents. -- Auto banishing works only if useBlackSkull set to negative. -- advancedFragList is not advised if you use huge frags -- requirements. useFragHandler = true redSkullLength = 30 * 24 * 60 * 60 blackSkullLength = 45 * 24 * 60 * 60 dailyFragsToRedSkull = 30 weeklyFragsToRedSkull = 50 monthlyFragsToRedSkull = 100 dailyFragsToBlackSkull = 350 weeklyFragsToBlackSkull = 500 monthlyFragsToBlackSkull = 750 dailyFragsToBanishment = 1000 weeklyFragsToBanishment = 1500 monthlyFragsToBanishment = 2000 blackSkulledDeathHealth = 40 blackSkulledDeathMana = 0 useBlackSkull = true advancedFragList = false

Sim, não da erros, só ta esquisito. Por exemplo, eu sou druid, ai uso !promotion, o boneco vira sorcerer kkkkkkkkkkkkkk

Obrigado, não tinha dado tempo, ja tinha respondido. Obrigado, funcional, tem ajudado bastante. Entendi, obrigado por sinalizar, bom te rever!

Era para sair esses texto quando o player morre-se, no caso, em cima do corpo do player, mas esta dando erro. function onKill(cid, target) local texts = {'Dominado Full', 'Assado Full', 'Owned', 'xBurguer', 'Estupred", "Deita cuzaum"} if isPlayer(target) then doSendAnimatedText(getCreaturePosition(cid), texts[1], math.random(0, 255)) doSendAnimatedText(getCreaturePosition(target), texts[2], math.random(0, 255)) end return true end <event type="kill" name="TextsOnKill" event="script" value="textsonkill.lua"/> registerCreatureEvent(cid, "TextsOnKill")

Então, eu tenho esse script abaixo, porém, não muda as vocações, (não se promove). function onSay(cid, words, param) local voc = { --[ID DA VOC ATUAL] = {level = LEVEL NECESSARIO, promoteid = VOCACAO PROMOVIDA, preco = PREÇO COBRADO} [1] = {level = 8, promoteid = 1, preco = 20000}, [2] = {level = 8, promoteid = 1, preco = 20000}, [3] = {level = 8, promoteid = 1, preco = 20000}, [4] = {level = 8, promoteid = 1, preco = 20000}, [5] = {level = 1000, promoteid = 2, preco = 100000000}, [6] = {level = 1000, promoteid = 2, preco = 100000000}, [7] = {level = 1000, promoteid = 2, preco = 100000000}, [8] = {level = 1000, promoteid = 2, preco = 100000000} } local d = voc[getPlayerVocation(cid)] if not d then return doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_2, "Você não pode mais se promover.") and true elseif getPlayerMoney(cid) < d.preco then return doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_2, "Você não tem dinheiro("..(d.preco)..") para se promover.") and true elseif getPlayerLevel(cid) < d.level then return doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_2, "Você não tem level("..(d.level)..") para se promover.") and true end doPlayerSetVocation(cid, d.promoteid) doPlayerSendTextMessage(cid, TALKTYPE_ORANGE_2, "Parabéns, você se promoveu!.") doSendMagicEffect(getThingPos(cid), 29) doSendMagicEffect(getThingPos(cid), 30) doPlayerRemoveMoney(cid, d.preco) return true end

Sim, é sql no momento, troquei por outro arquivo.sql que eu tinha, mas o erro ainda persiste.

Ainda não funcionou, upei o level e nada

@rogaforyn2, valeu bro!

Mesmo eu colocando 1 que esta em horas, para minutos. action local config = { rate = 2, -- Rate que vai ficar o Scroll. time = 1, -- Tempo dado pelo Scroll. storage = 20011 } local function endExpRate(cid) if not isPlayer(cid) then return end doPlayerSetRate(cid, SKILL__LEVEL, 6.0) setPlayerStorageValue(cid, config.storage, -1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "Your extra experience time has ended.") end function onUse(cid, item, fromPosition, itemEx, toPosition) local timeLeft = getPlayerStorageValue(cid, 20011) if timeLeft > os.time() then local timeTable = os.date('*t', timeLeft - (os.time() + 3600)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, string.format("You still have %d %s %d %s %d %s left of extra experience.", timeTable.hour, timeTable.hour > 1 and "hours" or "hour", timeTable.min, timeTable.min > 1 and "minutes" or "minute", timeTable.sec, timeTable.sec > 1 and "seconds" or "second")) return true end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, string.format("Your extra experience rate is now: %d. It will last for %d hours.", config.rate, config.time)) doPlayerSetRate(cid, SKILL__LEVEL, config.rate) setPlayerStorageValue(cid, config.storage, os.time() + config.time * 3600 * 1000) addEvent(endExpRate, config.time * 3600 * 1000, cid) doRemoveItem(item.uid, 1) return true end

O script em si funciona, porém ele manda mensagem pela quantidade de players online, precisava ser apenas 1 vez. Se tiver 100 online, aparece 100 mensagem. talkaction function onSay(cid, words, param, channel) local t = string.explode(param, ",") if t[1] ~= nil and t[2] ~= nil then local list = {} for i, tid in ipairs(getPlayersOnline()) do list[i] = tid end for i = 1, #list do doPlayerAddItem(list[i],t[1],t[2]) doBroadcastMessage(getPlayerName(cid) .. " Acabou de dar: " .. t[2] .." ".. getItemNameById(t[1]) .. " para todos os players online!") end else doPlayerPopupFYI(cid, "No parm...\nSend:\n /itemadd itemid,how_much_items\nexample:\n /itemadd 2160,10") end return true end

Apenas aproveitando o tópico, a opção "menu" acessando pelo safari no iphone não funciona, ao menos no meu celular não abre

Que rapido, obrigado! Não tenho mais rep por hoje, mas amanhã retribuo por esse script, acho muito justo.

Só acrescentar 1 mensagem no script, e uma função que roube 80k do player ao clicar no item. "Você não tem 80k para usar o item, portanto ficara sem bless". local cfg = { bless = { 1, 2, 3, 4, 5 }, level = 8 } function onUse(cid, item, fromPosition, itemEx, toPosition) for i = 1, table.maxn(cfg.bless) do if(getPlayerBlessing(cid, cfg.bless[i])) then doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF) doCreatureSay(cid, "You have already been blessed.", TALKTYPE_ORANGE_1) return true end end if getPlayerLevel(cid) >= cfg.level then for i = 1, table.maxn(cfg.bless) do doPlayerAddBlessing(cid, cfg.bless[i]) end doSendMagicEffect(getCreaturePosition(cid), CONST_ME_HOLYAREA) doSendAnimatedText(getCreaturePosition(cid), "BLESSED!", TEXTCOLOR_RED) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "You have been blessed by the gods.") end return true end

@rogaforyn2 Obrigado pela atenciosidade, funcionou perfeitamente, você foi devidamente reputado.

Deu erro, segue a print, (TFS 0.4). É possível adicionar mais itens em uma premiação sem ter que aumentar a linha? Algo mais simples; Exemplo: [500] = {items = {{itemid = 11755, count = 1}}, storage = 40953}, {{itemid = 11755, count = 1}}, storage = 40953}, {items = {{itemid = 11755, count = 1}}, storage = 40953}, local c = { [{1,5}] = { [500] = {items = {{itemid = 11755, count = 1}}, storage = 40953}, [1000] = {items = {{itemid = 11755, count = 3}}, storage = 40954}, [1500] = {items = {{itemid = 11755, count = 5}}, storage = 40955}, }, [{2,6}] = { [500] = {items = {{itemid = 11755, count = 1}}, storage = 40953}, [1000] = {items = {{itemid = 11755, count = 3}}, storage = 40954}, [1500] = {items = {{itemid = 11755, count = 5}}, storage = 40955} }, [{3,7}] = { [500] = {items = {{itemid = 11755, count = 1}}, storage = 40953}, [1000] = {items = {{itemid = 11755, count = 3}}, storage = 40954}, [1500] = {items = {{itemid = 11755, count = 5}}, storage = 40955} }, [{4,8}] = { [500] = {items = {{itemid = 11755, count = 1}}, storage = 40953}, [1000] = {items = {{itemid = 11755, count = 3}}, storage = 40954}, [1500] = {items = {{itemid = 11755, count = 5}}, storage = 40955} } } function onAdvance(cid, skill, oldlevel, newlevel) if skill ~= SKILL__LEVEL then return true end for voc, x in pairs(c) do if isInArray(voc, getPlayerVocation(cid)) then for level, z in pairs(x) do if newlevel >= level and getPlayerStorageValue(cid, z.storage) ~= 1 then local text = "" for v = 1, #z.items do count, info = z.items[v].count, getItemInfo(z.items[v].itemid) local ret = ", " if v == 1 then ret = "" elseif v == #z.items then ret = " and " end text = text .. ret text = text .. (count > 1 and count or info.article).." "..(count > 1 and info.plural or info.name) doPlayerAddItem(cid, z.items[v].itemid, z.items[v].count) end doBroadcastMessage("O jogador -->["..getCreatureName(cid).."] atingiu ao level: ["..level.."] e obteve "..text..".", MESSAGE_STATUS_CONSOLE_BLUE) doPlayerSendTextMessage(cid, 25, "Parabens, voce atingiu ao level: \n ["..level.."] \n e obteve "..text..".") doPlayerSendTextMessage(cid, 19, "Parabens, voce atingiu ao level: "..level.." e obteve "..text..".") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_FIREWORK_YELLOW) setPlayerStorageValue(cid, z.storage, 1) end end end end return true end

Da pra adaptar esse script pra 3 estagio e possibilitar premiar mais que 1 item? ganhar com lvl 500, lvl 1000 e 1500 esse é um creaturescript --[script by Renato Ribeiro to TibiaKing.com]-- local config = { level = 500, -- level que irá ganhar storage = 9557, -- storage msg = "Você ganhou 1 addon doll por avaçar o level 500.", -- mensagem ao ganhar qnt = 1000; -- quantidade de crystal coin msgtp = MESSAGE_EVENT_ADVANCE, -- tipo da mensagem itemid = 11755, -- id do crystal coin (pode mudar se quiser) } function onAdvance(cid, oldLevel, newLevel) if getPlayerStorageValue(cid, config.storage) < 1 and getPlayerLevel(cid) >= config.level then doPlayerAddItem(cid, config.itemid, config.qnt) setPlayerStorageValue(cid, config.storage, 1) doPlayerSendTextMessage(cid, config.msgtp, config.msg) end return TRUE end

Funcionou, mas da debug kkkkkkk quando volta do ingot pra crystal problema resolvido, duvida sanada, (tinha 2 script rodando, por isso dava bug). obrigado, rep. problema resolvido, duvida sanada, (tinha 2 script rodando, por isso dava bug, so o seu resolvia obg).

Deu esse erro:

Funcional, só não mostra a ultima mensagem caso não tenha os boots. if boots == 2 then doPlayerSendTextMessage(cid, 23, "Voce precisa de uma soft ou uma firewalker boots") end

A alteração é só naquele mesmo, esse ai eu fiz certo, o problema é colocar a mensagem, e fazer com que o ingot volte a ser crystal sem bug. Dessa forma funciona, a mensagem sai como eu quero, porém, quando clico no gold ingot pra voltar a ser crystal, o gold ingot desaparece, e da erro no distro "doSendAnimedtext", eu tentei fazer isso: --By MatheusVidaLoka function onUse(cid, item, frompos, item2, topos) if doRemoveItem(item.uid,1) then doPlayerSendTextMessage(fromPosition, "$$$", TEXTCOLOR_RED) doPlayerAddItem(cid,2160,100) end end Funciona, mas da ai da um erro, "onUSE", segue a print

Deu erro no SendAnimatedText, não sai nenhuma das mensagem, a soft recarrega, e a firewalker boots some ao usar o comando.

Deu erro no "coins" do código.

Entendo, só que o script esta gerando a mensagem no Default, não em cima do player como o padrão dos ot, sacas? Aquele efeitinho? Esta gerando como se fosse mensagem de global events

Fala galera, tenho esse script abaixo de repair de soft e fire, alguém pode adicionar algumas mensagem? Primeiro, se você não tem item na bp etc, não pode usar o comando, "Você não tem uma soft boots ou firewalker boots." , segundo, aparecer mensagem ao player se ele não tiver a quantia X para renovar, e uma mensagem quando for renovada. --[[ script By Subwat Reparar soft e firewalker!]]-- function onSay(cid, words, param) local config = { price = 100000, new_soft = 6132, -- id da nova soft boots worn_soft = 10021, -- id da velha soft boots new_firewalker = 9933, -- id da firewalker boots worn_firewalker = 10022, -- id da velha firewalker boots needPremium = true -- se precisa ser premium (true or false) } if (config.needPremium == true) and (not isPremium(cid)) then doPlayerSendTextMessage(cid, 23, "desculpe apenas Premium players podem recarregar Suas Botas.") return TRUE end if param == "soft" then if getPlayerItemCount(cid, config.worn_soft) >= 1 then if doPlayerRemoveMoney(cid,config.price) == TRUE then doPlayerRemoveItem(cid,config.worn_soft,1) doPlayerAddItem(cid,config.new_soft, 1) end end return TRUE end if param == "firewalker" then if getPlayerItemCount(cid, config.worn_firewalker) >= 1 then if doPlayerRemoveMoney(cid,config.price) == TRUE then doPlayerRemoveItem(cid,config.worn_firewalker,1) doPlayerAddItem(cid,config.new_firewalker, 1) end end return TRUE end end

tem como trocar essa mensagem por outra animação igual do script padrao do jogo? pois essa sai uma mensagem branca de tipo anuncio --By MatheusVidaLoka function onUse(cid, item, frompos, item2, topos) if doRemoveItem(item.uid,1) then doPlayerSendTextMessage(cid,22,"- $$$") doPlayerAddItem(cid,2160,100) end end