Ir para conteúdo

(Resolvido)[Pedido 2 Scripts] Double ex por x player online e /anuncio.

Por CarlosHenrique7457
em Suporte Tibia OTServer (Resolvidos)

Featured Replies

Postado

Estas mensagens foram para verificar onde estava o erro, que, aparentemente, não existia. Você, na verdade, havia editado incorretamente o arquivo pokeexp.lua.

local function playerAddExp(cid, exp)
doPlayerAddExp(cid, exp)
doSendAnimatedText(getThingPos(cid), exp, 215)
end
function onDeath(cid, corpse, deathList)
       
--if not isCreature(cid) then return true end
if isSummon(cid) or not deathList or getCreatureName(cid) == "Evolution" then return true end --alterado v1.8
    -------------Edited Golden Arena-------------------------   --alterado v1.7 \/\/
    if getPlayerStorageValue(cid, 22546) == 1 then
       setGlobalStorageValue(22548, getGlobalStorageValue(22548)-1)
       if corpse.itemid ~= 0 then doItemSetAttribute(corpse.uid, "golden", 1) end  --alterado v1.8   
    end  
    if getPlayerStorageValue(cid, 22546) == 1 and getGlobalStorageValue(22548) == 0 then
       local wave = getGlobalStorageValue(22547)
       for _, sid in ipairs(getPlayersOnline()) do
           if isPlayer(sid) and getPlayerStorageValue(sid, 22545) == 1 then
              if getGlobalStorageValue(22547) < #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 20, "Wave "..wave.." will begin in "..timeToWaves.."seconds!")  
                 doPlayerSendTextMessage(sid, 28, "Wave "..wave.." will begin in "..timeToWaves.."seconds!")
                 addEvent(creaturesInGolden, 100, GoldenUpper, GoldenLower, false, true, true)
                 addEvent(doWave, timeToWaves*1000)
              elseif getGlobalStorageValue(22547) == #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 20, "Você foi o último sobrevivente da Golden arena tome sua recompensa!")
                 doPlayerAddItem(sid, 2152, getPlayerStorageValue(sid, 22551)*2)    --premio
                 setPlayerStorageValue(sid, 22545, -1)
                 doTeleportThing(sid, getClosestFreeTile(sid, posBackGolden), false)
                 setPlayerRecordWaves(sid)
              end
           end
       end
       if getGlobalStorageValue(22547) == #wavesGolden+1 then
          endGoldenArena()
       end
    end
    ---------------------------------------------------   /\/\
local givenexp = getWildPokemonExp(cid)
---local killer = getItemAttribute(corpse.uid, "corpseowner") 
if givenexp > 0 then
for a = 1, #deathList do
local pk = deathList[a]
---
local list = getSpectators(getThingPosWithDebug(pk), 30, 30, false)
if isCreature(pk) then
   local expTotal = math.floor(givenexp * getDamageMapPercent(pk, cid))
   if getGlobalStorageValue(4091) > -1 then
    expTotal = math.floor(expTotal * getGlobalStorageValue(4091))
end
   local party = getPartyMembers(pk)
   if isInParty(pk) and getPlayerStorageValue(pk, 4875498) <= -1 then
      expTotal = math.floor(expTotal/#party)         --alterado v1.6.1
      for i = 1, #party do
          if isInArray(list, party[i]) then  
if getPlayerLevel(pk) <= 50 then
             playerAddExp(party[i], expTotal * 200) 
elseif getPlayerLevel(pk) >= 51 and getPlayerLevel(pk) <= 75 then
             playerAddExp(party[i], expTotal * 130)
elseif getPlayerLevel(pk) >= 76 and getPlayerLevel(pk) <= 100 then
             playerAddExp(party[i], expTotal * 80)
elseif getPlayerLevel(pk) >= 101 and getPlayerLevel(pk) <= 150 then
             playerAddExp(party[i], expTotal * 40)
elseif getPlayerLevel(pk) >= 151 and getPlayerLevel(pk) <= 250 then
             playerAddExp(party[i], expTotal * 20)
elseif getPlayerLevel(pk) >= 251 and getPlayerLevel(pk) <= 350 then
             playerAddExp(party[i], expTotal * 10)
elseif getPlayerLevel(pk) >= 351 then
             playerAddExp(party[i], expTotal * 5)
    end
          end
      end
   elseif not isInParty(pk) then
if getPlayerLevel(pk) <= 50 then
    playerAddExp(pk, math.floor(200 * expTotal))
elseif getPlayerLevel(pk) >= 51 and getPlayerLevel(pk) <= 75 then
    playerAddExp(pk, math.floor(130 * expTotal))
elseif getPlayerLevel(pk) >= 76 and getPlayerLevel(pk) <= 100 then
    playerAddExp(pk, math.floor(80 * expTotal))
elseif getPlayerLevel(pk) >= 101 and getPlayerLevel(pk) <= 150 then
    playerAddExp(pk, math.floor(40 * expTotal))
elseif getPlayerLevel(pk) >= 151 and getPlayerLevel(pk) <= 250 then
    playerAddExp(pk, math.floor(20 * expTotal))
elseif getPlayerLevel(pk) >= 251 and getPlayerLevel(pk) <= 350 then
    playerAddExp(pk, math.floor(10 * expTotal))
elseif getPlayerLevel(pk) >= 351 then
    playerAddExp(pk, math.floor(5 * expTotal))
    return true end  
   end      
end
end
end
if isNpcSummon(cid) then
  local master = getCreatureMaster(cid)
  doSendMagicEffect(getThingPos(cid), getPlayerStorageValue(cid, 10000))
  doCreatureSay(master, getPlayerStorageValue(cid, 10001), 1)
  doRemoveCreature(cid)
return false
end
if corpse.itemid ~= 0 then   --alterado v1.8
   doItemSetAttribute(corpse.uid, "level", getPokemonLevel(cid))
   doItemSetAttribute(corpse.uid, "gender", getPokemonGender(cid)) 
end
return true
end

não respondo pms solicitando suporte em programação/scripting

  • Citar
  • Mention
    • Respostas 35
    • Visualizações 1.6k
    • Created
    • Última resposta

    Top Posters In This Topic

    Popular Days

    Most Popular Posts

    • zipter98
      zipter98

      Double loot você pode fazer em lua por gambiarra ou com algumas modificações nas sources (C++). Talvez mais tarde eu atualize o código com isso. data/creaturescripts/scripts: local config = {     c

    • zipter98
      zipter98

      Estas mensagens foram para verificar onde estava o erro, que, aparentemente, não existia. Você, na verdade, havia editado incorretamente o arquivo pokeexp.lua. local function playerAddExp(cid, exp)

    • Wakon
      Wakon

      Criei o script de anuncio pra você: Em "Data/talkactions/scripts" copie e cole um arquivo .lua e renomeie para anuncio.lua, apague tudo e cole isso: function onSay(cid, words, param) local b = str

    Postado
    • Autor

    Ok Obrigado novamente.


    Poderia me ajudar em mas uma coisa?

    Meu sistema de Double exp para vip nao esta funfando tbm
    So aparece a mensagem, mas nao funciona.
    Meu sistema vip na verdade e Premium, é premio free e premium vip.

    Ajudei? da um Rep+, não custa nada. ;D:P

     

    Servidor de PokeTibia ja online.

    Pagina: https://www.facebook.com/PokemonxStore?ref=bookmarks

    Grupo: https://www.facebook.com/groups/257989224406246/

    Site: http://pokexstore.wix.com/pokexstore

  • Citar
  • Mention
    • Postado

    pokeexp.lua:

    local function playerAddExp(cid, exp)
doPlayerAddExp(cid, exp)
doSendAnimatedText(getThingPos(cid), exp, 215)
end
function onDeath(cid, corpse, deathList)
       
--if not isCreature(cid) then return true end
if isSummon(cid) or not deathList or getCreatureName(cid) == "Evolution" then return true end --alterado v1.8
    -------------Edited Golden Arena-------------------------   --alterado v1.7 \/\/
    if getPlayerStorageValue(cid, 22546) == 1 then
       setGlobalStorageValue(22548, getGlobalStorageValue(22548)-1)
       if corpse.itemid ~= 0 then doItemSetAttribute(corpse.uid, "golden", 1) end  --alterado v1.8   
    end  
    if getPlayerStorageValue(cid, 22546) == 1 and getGlobalStorageValue(22548) == 0 then
       local wave = getGlobalStorageValue(22547)
       for _, sid in ipairs(getPlayersOnline()) do
           if isPlayer(sid) and getPlayerStorageValue(sid, 22545) == 1 then
              if getGlobalStorageValue(22547) < #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 20, "Wave "..wave.." will begin in "..timeToWaves.."seconds!")  
                 doPlayerSendTextMessage(sid, 28, "Wave "..wave.." will begin in "..timeToWaves.."seconds!")
                 addEvent(creaturesInGolden, 100, GoldenUpper, GoldenLower, false, true, true)
                 addEvent(doWave, timeToWaves*1000)
              elseif getGlobalStorageValue(22547) == #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 20, "Você foi o último sobrevivente da Golden arena tome sua recompensa!")
                 doPlayerAddItem(sid, 2152, getPlayerStorageValue(sid, 22551)*2)    --premio
                 setPlayerStorageValue(sid, 22545, -1)
                 doTeleportThing(sid, getClosestFreeTile(sid, posBackGolden), false)
                 setPlayerRecordWaves(sid)
              end
           end
       end
       if getGlobalStorageValue(22547) == #wavesGolden+1 then
          endGoldenArena()
       end
    end
    ---------------------------------------------------   /\/\
local givenexp = getWildPokemonExp(cid)
---local killer = getItemAttribute(corpse.uid, "corpseowner") 
if givenexp > 0 then
for a = 1, #deathList do
local pk = deathList[a]
---
local list = getSpectators(getThingPosWithDebug(pk), 30, 30, false)
if isCreature(pk) then
   local expTotal = math.floor(givenexp * getDamageMapPercent(pk, cid))
   if getGlobalStorageValue(4091) > -1 then
    expTotal = math.floor(expTotal * getGlobalStorageValue(4091))
end
   local party = getPartyMembers(pk)
   if isInParty(pk) and getPlayerStorageValue(pk, 4875498) <= -1 then
      expTotal = math.floor(expTotal/#party)         --alterado v1.6.1
      for i = 1, #party do
          if isInArray(list, party[i]) then  
            local m = isPremium(party[i]) and 2 or 1
            if getPlayerLevel(pk) <= 50 then
                playerAddExp(party[i], m * expTotal * 200) 
            elseif getPlayerLevel(pk) >= 51 and getPlayerLevel(pk) <= 75 then
                playerAddExp(party[i], m * expTotal * 130)
            elseif getPlayerLevel(pk) >= 76 and getPlayerLevel(pk) <= 100 then
                playerAddExp(party[i], m * expTotal * 80)
            elseif getPlayerLevel(pk) >= 101 and getPlayerLevel(pk) <= 150 then
                playerAddExp(party[i], m * expTotal * 40)
            elseif getPlayerLevel(pk) >= 151 and getPlayerLevel(pk) <= 250 then
                playerAddExp(party[i], m * expTotal * 20)
            elseif getPlayerLevel(pk) >= 251 and getPlayerLevel(pk) <= 350 then
                playerAddExp(party[i], m * expTotal * 10)
            elseif getPlayerLevel(pk) >= 351 then
                playerAddExp(party[i], m * expTotal * 5)
            end
          end
      end
   elseif not isInParty(pk) then
    if isPremium(pk) then
        expTotal = math.floor(expTotal * 2)
    end
if getPlayerLevel(pk) <= 50 then
    playerAddExp(pk, math.floor(200 * expTotal))
elseif getPlayerLevel(pk) >= 51 and getPlayerLevel(pk) <= 75 then
    playerAddExp(pk, math.floor(130 * expTotal))
elseif getPlayerLevel(pk) >= 76 and getPlayerLevel(pk) <= 100 then
    playerAddExp(pk, math.floor(80 * expTotal))
elseif getPlayerLevel(pk) >= 101 and getPlayerLevel(pk) <= 150 then
    playerAddExp(pk, math.floor(40 * expTotal))
elseif getPlayerLevel(pk) >= 151 and getPlayerLevel(pk) <= 250 then
    playerAddExp(pk, math.floor(20 * expTotal))
elseif getPlayerLevel(pk) >= 251 and getPlayerLevel(pk) <= 350 then
    playerAddExp(pk, math.floor(10 * expTotal))
elseif getPlayerLevel(pk) >= 351 then
    playerAddExp(pk, math.floor(5 * expTotal))
    return true end  
   end      
end
end
end
if isNpcSummon(cid) then
  local master = getCreatureMaster(cid)
  doSendMagicEffect(getThingPos(cid), getPlayerStorageValue(cid, 10000))
  doCreatureSay(master, getPlayerStorageValue(cid, 10001), 1)
  doRemoveCreature(cid)
return false
end
if corpse.itemid ~= 0 then   --alterado v1.8
   doItemSetAttribute(corpse.uid, "level", getPokemonLevel(cid))
   doItemSetAttribute(corpse.uid, "gender", getPokemonGender(cid)) 
end
return true
end

    não respondo pms solicitando suporte em programação/scripting

  • Citar
  • Mention
    • Postado
    • Autor

    Eu queria que fosse so 20% de exp para vip
    Maws ae por nao ter falado.

    Ajudei? da um Rep+, não custa nada. ;D:P

     

    Servidor de PokeTibia ja online.

    Pagina: https://www.facebook.com/PokemonxStore?ref=bookmarks

    Grupo: https://www.facebook.com/groups/257989224406246/

    Site: http://pokexstore.wix.com/pokexstore

  • Citar
  • Mention
    • Postado

    ...

    local function playerAddExp(cid, exp)
doPlayerAddExp(cid, exp)
doSendAnimatedText(getThingPos(cid), exp, 215)
end
function onDeath(cid, corpse, deathList)
       
--if not isCreature(cid) then return true end
if isSummon(cid) or not deathList or getCreatureName(cid) == "Evolution" then return true end --alterado v1.8
    -------------Edited Golden Arena-------------------------   --alterado v1.7 \/\/
    if getPlayerStorageValue(cid, 22546) == 1 then
       setGlobalStorageValue(22548, getGlobalStorageValue(22548)-1)
       if corpse.itemid ~= 0 then doItemSetAttribute(corpse.uid, "golden", 1) end  --alterado v1.8   
    end  
    if getPlayerStorageValue(cid, 22546) == 1 and getGlobalStorageValue(22548) == 0 then
       local wave = getGlobalStorageValue(22547)
       for _, sid in ipairs(getPlayersOnline()) do
           if isPlayer(sid) and getPlayerStorageValue(sid, 22545) == 1 then
              if getGlobalStorageValue(22547) < #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 20, "Wave "..wave.." will begin in "..timeToWaves.."seconds!")  
                 doPlayerSendTextMessage(sid, 28, "Wave "..wave.." will begin in "..timeToWaves.."seconds!")
                 addEvent(creaturesInGolden, 100, GoldenUpper, GoldenLower, false, true, true)
                 addEvent(doWave, timeToWaves*1000)
              elseif getGlobalStorageValue(22547) == #wavesGolden+1 then
                 doPlayerSendTextMessage(sid, 20, "Você foi o último sobrevivente da Golden arena tome sua recompensa!")
                 doPlayerAddItem(sid, 2152, getPlayerStorageValue(sid, 22551)*2)    --premio
                 setPlayerStorageValue(sid, 22545, -1)
                 doTeleportThing(sid, getClosestFreeTile(sid, posBackGolden), false)
                 setPlayerRecordWaves(sid)
              end
           end
       end
       if getGlobalStorageValue(22547) == #wavesGolden+1 then
          endGoldenArena()
       end
    end
    ---------------------------------------------------   /\/\
local givenexp = getWildPokemonExp(cid)
---local killer = getItemAttribute(corpse.uid, "corpseowner") 
if givenexp > 0 then
for a = 1, #deathList do
local pk = deathList[a]
---
local list = getSpectators(getThingPosWithDebug(pk), 30, 30, false)
if isCreature(pk) then
   local expTotal = math.floor(givenexp * getDamageMapPercent(pk, cid))
   if getGlobalStorageValue(4091) > -1 then
    expTotal = math.floor(expTotal * getGlobalStorageValue(4091))
end
   local party = getPartyMembers(pk)
   if isInParty(pk) and getPlayerStorageValue(pk, 4875498) <= -1 then
      expTotal = math.floor(expTotal/#party)         --alterado v1.6.1
      for i = 1, #party do
          if isInArray(list, party[i]) then  
            local m = isPremium(party[i]) and 1.2 or 1
            if getPlayerLevel(pk) <= 50 then
                playerAddExp(party[i], m * expTotal * 200) 
            elseif getPlayerLevel(pk) >= 51 and getPlayerLevel(pk) <= 75 then
                playerAddExp(party[i], m * expTotal * 130)
            elseif getPlayerLevel(pk) >= 76 and getPlayerLevel(pk) <= 100 then
                playerAddExp(party[i], m * expTotal * 80)
            elseif getPlayerLevel(pk) >= 101 and getPlayerLevel(pk) <= 150 then
                playerAddExp(party[i], m * expTotal * 40)
            elseif getPlayerLevel(pk) >= 151 and getPlayerLevel(pk) <= 250 then
                playerAddExp(party[i], m * expTotal * 20)
            elseif getPlayerLevel(pk) >= 251 and getPlayerLevel(pk) <= 350 then
                playerAddExp(party[i], m * expTotal * 10)
            elseif getPlayerLevel(pk) >= 351 then
                playerAddExp(party[i], m * expTotal * 5)
            end
          end
      end
   elseif not isInParty(pk) then
    if isPremium(pk) then
        expTotal = math.floor(expTotal * 1.2)
    end
if getPlayerLevel(pk) <= 50 then
    playerAddExp(pk, math.floor(200 * expTotal))
elseif getPlayerLevel(pk) >= 51 and getPlayerLevel(pk) <= 75 then
    playerAddExp(pk, math.floor(130 * expTotal))
elseif getPlayerLevel(pk) >= 76 and getPlayerLevel(pk) <= 100 then
    playerAddExp(pk, math.floor(80 * expTotal))
elseif getPlayerLevel(pk) >= 101 and getPlayerLevel(pk) <= 150 then
    playerAddExp(pk, math.floor(40 * expTotal))
elseif getPlayerLevel(pk) >= 151 and getPlayerLevel(pk) <= 250 then
    playerAddExp(pk, math.floor(20 * expTotal))
elseif getPlayerLevel(pk) >= 251 and getPlayerLevel(pk) <= 350 then
    playerAddExp(pk, math.floor(10 * expTotal))
elseif getPlayerLevel(pk) >= 351 then
    playerAddExp(pk, math.floor(5 * expTotal))
    return true end  
   end      
end
end
end
if isNpcSummon(cid) then
  local master = getCreatureMaster(cid)
  doSendMagicEffect(getThingPos(cid), getPlayerStorageValue(cid, 10000))
  doCreatureSay(master, getPlayerStorageValue(cid, 10001), 1)
  doRemoveCreature(cid)
return false
end
if corpse.itemid ~= 0 then   --alterado v1.8
   doItemSetAttribute(corpse.uid, "level", getPokemonLevel(cid))
   doItemSetAttribute(corpse.uid, "gender", getPokemonGender(cid)) 
end
return true
end

    não respondo pms solicitando suporte em programação/scripting

  • 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