Scripting [AJUDA] SCRIPT

FiNub · Julho 3, 2018

alguem poderia me ajudar com esse script de survival? tipo, eu queria que após puxar a alavanca e voce fosse teleportado para dentro do survival, o piso verde ficasse vermelho, so quem poderia puxar a alavanca é o primeiro da fila que esta de frente para a alavanca, e o time nao precisaria estar completo. poderia ir 1 pessoa, 2, 3 no maximo 4, e adicionar um tempo para cada wave, tipo, se um player entrou no survival pra trolar o evento e deixar 1 bixo vivo, assim ninguem vai poder entrar no survival, entao botar um tempo de 30 min para cada wave, sendo assim que quando matar todos os bixos ja vai direto para a outra wave quem puder me ajudar, nao so a mim mais para o restante que usa esse script, dou rep++

script

Spoiler

<?xml version="1.0" encoding="UTF-8"?>


<mod name="Ultimate Survival" version="1.0" author="Omega" enabled="yes">
<config name="ultimatelib"><![CDATA[
USurvival = {
   posi = {x=579, y=337, z=14},
   posf = {x=609, y=353, z=14},
   posc = {x=594, y=345, z=14},

   waves = {
   [1] = {monsters = {'dragon', 'dragon lord'}, count = 30, reward = {exp = 0, item = 2148, amount = 1, money = 100}},
   [2] = {monsters = {'dragon lord', 'frost dragon'}, count = 6, reward = {exp = 0, item = 2152, amount = 1, money = 1000}},
   [3] = {monsters = {'hydra', 'serpent spawn'}, count = 10, reward = {exp = 0, item = 2160, amount = 1, money = 10000}},
   },
   exhaust = 1 * 24 * 60 * 60, -- Tempo em segundos até poder entrar novamente na arena (1 * 24 * 60 * 60 = 1 dia)

   final_reward = {item = 2160, amount = 100, exp = 10000, money = 100000},

   storage_ex = 607069,
   storage_wave = 607089,
}

function isWalkable(pos)-- by Nord / editado por Omega
if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then
return false
elseif isCreature(getTopCreature(pos).uid) then
return false
elseif getTileInfo(pos).protection then
return false
elseif hasProperty(getThingFromPos(pos).uid, 3) or hasProperty(getThingFromPos(pos).uid, 7) then
return false
end
return true
end

function doSpawnMonsters(monsters, pos, radius, limit)
   if not pos.x or not pos.y or not pos.z or not type(monsters) == 'table' then
       return false
   end
       local radius = tonumber(radius)
   if radius > 5 then
       radius = 5
   elseif radius < 2 then
       radius = 2
   end
   if not limit or limit < 1 then
       limit = 1
   elseif limit > radius ^ 2 then
       limit = math.floor((radius*1.5) ^ 2)
   end

   local k = 0
   local tries = 0
   repeat
       for x = pos.x - radius, pos.x + radius do
           for y = pos.y - radius, pos.y + radius do
               if isWalkable({x=x, y=y, z=pos.z}) then
                   local monster = monsters[math.random(1, #monsters)]
                   local chance = math.random(1, 100)
                   if k == limit then
                       break
                   elseif chance <= 8 and doCreateMonster(monster, {x=x, y=y, z=pos.z}) then
                       k = k + 1
                   end
               end
           end
       end
       tries = tries + 1
   until k >= limit or tries >= 500
   return k >= limit and true or false
end

function getPlayersInArea(pos1,pos2)
   local players = {}
   if pos1.x and pos1.y and pos2.x and pos2.y and pos1.z == pos2.z then
       for a = pos1.x, pos2.x do
           for b = pos1.y,pos2.y do
               local pos = {x=a,y=b,z=pos1.z}
               if isPlayer(getTopCreature(pos).uid) then
                   table.insert(players,getTopCreature(pos).uid)
               end
           end
       end
       return players
   else
       return false
   end
end

function getMonstersInArea(pos1,pos2)
   local players = {}
   if pos1.x and pos1.y and pos2.x and pos2.y and pos1.z == pos2.z then
       for a = pos1.x, pos2.x do
           for b = pos1.y,pos2.y do
               local pos = {x=a,y=b,z=pos1.z}
               if isMonster(getTopCreature(pos).uid) then
                   table.insert(players,getTopCreature(pos).uid)
               end
           end
       end
       return players
   else
       return false
   end
end

function doCleanArena()
   local monsters = getMonstersInArea(USurvival.posi, USurvival.posf)
   for _, cid in pairs(monsters) do
       doRemoveCreature(cid)
   end
end

function doStartWave(waveID, cid)
   if not isCreature(cid) then return false end
   if USurvival.waves[waveID] then
       wave = USurvival.waves[waveID]
       doSpawnMonsters(wave.monsters, USurvival.posc, 5, wave.count)
       doPlayerSendTextMessage(cid, 21, 'Wave '..waveID..' Comecou! LUTE!')
   end
end
]]></config>

<event type="kill" name="UltimateSurvival1" event="script"><![CDATA[
domodlib('ultimatelib')
function onKill(cid, target)
   if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then
       if #getMonstersInArea(USurvival.posi, USurvival.posf) == 1 then
           local wave = getPlayerStorageValue(cid, USurvival.storage_wave)
           if USurvival.waves[wave+1] then
               setPlayerStorageValue(cid, USurvival.storage_wave, wave + 1)
               addEvent(doStartWave, 5000, wave + 1, cid)
               doPlayerSendTextMessage(cid, 22, 'Parabens! A Proxima Wave Comecara Em 5 Segundos!')
           else
               doPlayerSendTextMessage(cid, 22, 'PARABENS! VOCE FOI BATIDO A SOBREVIVENCIA FINAL!')
               local reward = USurvival.final_reward
               if reward.item then
                   doPlayerAddItem(cid, reward.item, (reward.amount or 1), false)
               end
               if reward.exp then
                   doPlayerAddExp(cid, reward.exp)
               end
               if reward.money then
                   doPlayerAddMoney(cid, reward.money)
               end
               local medal = doPlayerAddItem(cid, 5785, 1, false)
               if medal then
                   doItemSetAttribute(medal, 'description', 'Este Foi Concedido A '..getCreatureName(cid)..' Por Completar O Ultimate Survival.')
                   doItemSetAttribute(medal,'name', 'Ultimate Survival Medal')
               end
               doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
           end
       end
   end
   return true
end

]]></event>

</mod>

mapa

Spoiler

sem ninguém dentro do survival

id do piso verde: 9565

com gente dentro do survival

id do piso vermelho: 9562

Editado Julho 3, 2018 por Emanueldk (veja o histórico de edições)

Entrar

Scripting [AJUDA] SCRIPT

Posts Recomendados

FiNub 22

Link para o post

Compartilhar em outros sites

Participe da conversa

Quem Está Navegando 0 membros estão online

Conteúdo Similar

TibiaKing

Open Tibia Server

Redes Sociais

Anuncie no TibiaKing

Fóruns

Anuncie

Informação Importante