Jump to content

Revolução Tibiana no UnderWar 07/08/2021 - SÁBADO - 16:00hrs

Crie sua conta, chame sua guild e venha participar desse MEGA RECOMEÇO no UnderWar!

São 14 anos de OT e você comemora junto com a gente... Muitos eventos, sorteios e premiações nessa data tão especial!

Muitas atualizações em um NOVO UNDERWAR!

UNDERWAR ESTA ONLINE!

Pedido [MODS] Event Survival, necessário um item para utilizar a alavanca


Recommended Posts

DBO TFS 0.4

 

Consegui um sistema na net do evento survive, nesse evento você usa uma alavanca a cada X horas e enfrenta vários mobs e se sobreviver até o final você recebe um premio.

Eu gostaria que para você acessar o evento você precise ter um certo item e após utilizar a alavanca esse item irá sumir da sua backpack

 

Spoiler

<?xml version="1.0" encoding="UTF-8"?>
<!--
                ULTIMATE SURVIVAL - Codigo feito por Omega / Pedido por vinnevinne
-->
 
<mod name="Ultimate Survival" version="1.0" author="Omega" enabled="yes">
<config name="ultimatelib"><![CDATA[
USurvival = {
    posi = {x=110, y=151, z=11},
    posf = {x=121, y=162, z=11},
    posc = {x=116, y=159, z=11},
    
    waves = {
    [1] = {monsters = {"wolf","wolf beast"}, count = 30, reward = {exp = 0, item = 3956, amount = 5, money = 100}},
    [2] = {monsters = {"shadow beast","shadow lion","shadow skeleton","shadow prisioner","shadow tombler"}, count = 40, reward = {exp = 0, item = 3956, amount = 10, money = 1000}},
    [3] = {monsters = {"raditz","nappa","turles","bardock","broly","gotenks","vegeta","king vegeta","goku","gogeta","vegetto"}, count = 50, reward = {exp = 0, item = 3956, amount = 15, money = 10000}},
    },
    exhaust = 1 * 24 * 60 * 60, -- Tempo em segundos ate poder entrar novamente na arena (1 * 24 * 60 * 60 = 1 dia)
    
    final_reward = {item = 2160, amount = 100, exp = 300000, money = 500000},
    
    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, 30)
                    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..' has started! FIGHT!')
    end
end
]]></config>

<action actionid="4599" event="script" override="yes"><![CDATA[
domodlib('ultimatelib')
function onUse(cid, item)
    if getPlayerStorageValue(cid, USurvival.storage_ex) <= os.time() then
        if #getPlayersInArea(USurvival.posi, USurvival.posf) == 0 then
            doCleanArena()
            doTeleportThing(cid, USurvival.posc)
            doPlayerSendTextMessage(cid, 21, 'The Survival will Start in 60 seconds! Be ready to face your destiny!')
            addEvent(doStartWave, 60000, 1, cid)
            setPlayerStorageValue(cid, USurvival.storage_wave, 1)
            setPlayerStorageValue(cid, USurvival.storage_ex, os.time() + USurvival.exhaust)
            if item.itemid % 2 == 1 then
                doTransformItem(item.uid, item.itemid+1)
            else
                doTransformItem(item.uid, item.itemid-1)
            end
        else
            doPlayerSendCancel(cid, 'Someone is already in the arena.')
            doSendMagicEffect(getThingPos(cid), 2)
        end
    else
        local left = getPlayerStorageValue(cid, USurvival.storage_ex) - os.time()
        left = {hour = math.floor(left/3600), minutes = math.ceil((left % 3600)/60)}
        doPlayerSendCancel(cid, 'You have to wait '.. left.hour ..'h and '..left.minutes..'min.')
        doSendMagicEffect(getThingPos(cid), 2)
    end
    return true
end
]]></action>

<event type="login" name="US Login" event="script"><![CDATA[
domodlib('ultimatelib')
function onLogin(cid)
    registerCreatureEvent(cid,'UltimateSurvival1')
    registerCreatureEvent(cid,'UltimateSurvival2')
    if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
        doSendMagicEffect(getThingPos(cid), 10)
    end
    return true
end
]]></event>

<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, 30000, wave + 1, cid)
                doPlayerSendTextMessage(cid, 22, 'Congratulations! Next wave will start in 30 seconds!')
            else
                doPlayerSendTextMessage(cid, 22, 'CONGRATULATIONS! YOU HAVE BEATEN THE SURVIVAL!')
                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', 'This was awarded to '..getCreatureName(cid)..' for completing the Ultimate Survival.')
                    doItemSetAttribute(medal,'name', 'Ultimate Survival Medal')
                end
                doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
            end
        end
    end
    return true
end

]]></event>

<event type="preparedeath" name="UltimateSurvival2" event="script"><![CDATA[
domodlib('ultimatelib')
function onPrepareDeath(cid, killers)
    if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then
        doCreatureAddHealth(cid, getCreatureMaxHealth(cid), 65535, 256, true)
        doRemoveConditions(cid, false)
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
        doPlayerSendTextMessage(cid, 21, 'Too bad, you couldn\'t defeat the Ultimate Survival... Better luck next time.')
        local reward = USurvival.waves[getPlayerStorageValue(cid, USurvival.storage_wave)].reward
        if reward.item then
            doPlayerAddItem(cid, reward.item, reward.amount or 1)
        end
        if reward.exp then
            doPlayerAddExp(cid, reward.exp)
        end
        if reward.money then
            doPlayerAddMoney(cid, reward.money)
        end
        return false
    end
    return true
end
]]></event>

</mod>

 

Link to post
Share on other sites

E aí,

Testa assim:

Spoiler

<?xml version="1.0" encoding="UTF-8"?>
<!--
                ULTIMATE SURVIVAL - Codigo feito por Omega / Pedido por vinnevinne
-->
 
<mod name="Ultimate Survival" version="1.0" author="Omega" enabled="yes">
<config name="ultimatelib"><![CDATA[
USurvival = {
    posi = {x=110, y=151, z=11},
    posf = {x=121, y=162, z=11},
    posc = {x=116, y=159, z=11},
    
    waves = {
    [1] = {monsters = {"wolf","wolf beast"}, count = 30, reward = {exp = 0, item = 3956, amount = 5, money = 100}},
    [2] = {monsters = {"shadow beast","shadow lion","shadow skeleton","shadow prisioner","shadow tombler"}, count = 40, reward = {exp = 0, item = 3956, amount = 10, money = 1000}},
    [3] = {monsters = {"raditz","nappa","turles","bardock","broly","gotenks","vegeta","king vegeta","goku","gogeta","vegetto"}, count = 50, reward = {exp = 0, item = 3956, amount = 15, money = 10000}},
    },
    exhaust = 1 * 24 * 60 * 60, -- Tempo em segundos ate poder entrar novamente na arena (1 * 24 * 60 * 60 = 1 dia)
    
    final_reward = {item = 2160, amount = 100, exp = 300000, money = 500000},
    
    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, 30)
                    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..' has started! FIGHT!')
    end
end
]]></config>

<action actionid="4599" event="script" override="yes"><![CDATA[
domodlib('ultimatelib')
function onUse(cid, item)

    local taskItem = {
        checkItem = 1547,
        countItem = 1
    }

    if getPlayerItemCount(cid, taskItem.checkItem) >= taskItem.countItem then
        if getPlayerStorageValue(cid, USurvival.storage_ex) <= os.time() then
            if #getPlayersInArea(USurvival.posi, USurvival.posf) == 0 then
                doCleanArena()
                doPlayerRemoveItem(cid, taskItem.checkItem, taskItem.countItem)
                doTeleportThing(cid, USurvival.posc)
                doPlayerSendTextMessage(cid, 21, 'The Survival will Start in 60 seconds! Be ready to face your destiny!')
                addEvent(doStartWave, 60000, 1, cid)
                setPlayerStorageValue(cid, USurvival.storage_wave, 1)
                setPlayerStorageValue(cid, USurvival.storage_ex, os.time() + USurvival.exhaust)
                if item.itemid % 2 == 1 then
                    doTransformItem(item.uid, item.itemid+1)
                else
                    doTransformItem(item.uid, item.itemid-1)
                end
            else
                doPlayerSendCancel(cid, 'Someone is already in the arena.')
                doSendMagicEffect(getThingPos(cid), 2)
            end
        else
            local left = getPlayerStorageValue(cid, USurvival.storage_ex) - os.time()
            left = {hour = math.floor(left/3600), minutes = math.ceil((left % 3600)/60)}
            doPlayerSendCancel(cid, 'You have to wait '.. left.hour ..'h and '..left.minutes..'min.')
            doSendMagicEffect(getThingPos(cid), 2)
        end
    end
    return true
end
]]></action>

<event type="login" name="US Login" event="script"><![CDATA[
domodlib('ultimatelib')
function onLogin(cid)
    registerCreatureEvent(cid,'UltimateSurvival1')
    registerCreatureEvent(cid,'UltimateSurvival2')
    if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
        doSendMagicEffect(getThingPos(cid), 10)
    end
    return true
end
]]></event>

<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, 30000, wave + 1, cid)
                doPlayerSendTextMessage(cid, 22, 'Congratulations! Next wave will start in 30 seconds!')
            else
                doPlayerSendTextMessage(cid, 22, 'CONGRATULATIONS! YOU HAVE BEATEN THE SURVIVAL!')
                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', 'This was awarded to '..getCreatureName(cid)..' for completing the Ultimate Survival.')
                    doItemSetAttribute(medal,'name', 'Ultimate Survival Medal')
                end
                doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
            end
        end
    end
    return true
end

]]></event>

<event type="preparedeath" name="UltimateSurvival2" event="script"><![CDATA[
domodlib('ultimatelib')
function onPrepareDeath(cid, killers)
    if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then
        doCreatureAddHealth(cid, getCreatureMaxHealth(cid), 65535, 256, true)
        doRemoveConditions(cid, false)
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
        doPlayerSendTextMessage(cid, 21, 'Too bad, you couldn\'t defeat the Ultimate Survival... Better luck next time.')
        local reward = USurvival.waves[getPlayerStorageValue(cid, USurvival.storage_wave)].reward
        if reward.item then
            doPlayerAddItem(cid, reward.item, reward.amount or 1)
        end
        if reward.exp then
            doPlayerAddExp(cid, reward.exp)
        end
        if reward.money then
            doPlayerAddMoney(cid, reward.money)
        end
        return false
    end
    return true
end
]]></event>

</mod>

 

 

Edited by Kyle Bellini (see edit history)
Link to post
Share on other sites

21 horas atrás, Kyle Bellini disse:

E aí,

Testa assim:

  Ocultar conteúdo


<?xml version="1.0" encoding="UTF-8"?>
<!--
                ULTIMATE SURVIVAL - Codigo feito por Omega / Pedido por vinnevinne
-->
 
<mod name="Ultimate Survival" version="1.0" author="Omega" enabled="yes">
<config name="ultimatelib"><![CDATA[
USurvival = {
    posi = {x=110, y=151, z=11},
    posf = {x=121, y=162, z=11},
    posc = {x=116, y=159, z=11},
    
    waves = {
    [1] = {monsters = {"wolf","wolf beast"}, count = 30, reward = {exp = 0, item = 3956, amount = 5, money = 100}},
    [2] = {monsters = {"shadow beast","shadow lion","shadow skeleton","shadow prisioner","shadow tombler"}, count = 40, reward = {exp = 0, item = 3956, amount = 10, money = 1000}},
    [3] = {monsters = {"raditz","nappa","turles","bardock","broly","gotenks","vegeta","king vegeta","goku","gogeta","vegetto"}, count = 50, reward = {exp = 0, item = 3956, amount = 15, money = 10000}},
    },
    exhaust = 1 * 24 * 60 * 60, -- Tempo em segundos ate poder entrar novamente na arena (1 * 24 * 60 * 60 = 1 dia)
    
    final_reward = {item = 2160, amount = 100, exp = 300000, money = 500000},
    
    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, 30)
                    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..' has started! FIGHT!')
    end
end
]]></config>

<action actionid="4599" event="script" override="yes"><![CDATA[
domodlib('ultimatelib')
function onUse(cid, item)

    local config = {
        checkItem = 1547, <!-- ID do item que deseja verificar/remover -->
        countItem = 1 <!-- Quantidade que deseja verificar/remover -->
    }

    if getPlayerItemcount(cid, config.checkItem) >= config.countItem then
        if getPlayerStorageValue(cid, USurvival.storage_ex) <= os.time() then
            if #getPlayersInArea(USurvival.posi, USurvival.posf) == 0 then
                doCleanArena()
                doPlayerRemoveItem(cid, config.checkItem, config.countItem)
                doTeleportThing(cid, USurvival.posc)
                doPlayerSendTextMessage(cid, 21, 'The Survival will Start in 60 seconds! Be ready to face your destiny!')
                addEvent(doStartWave, 60000, 1, cid)
                setPlayerStorageValue(cid, USurvival.storage_wave, 1)
                setPlayerStorageValue(cid, USurvival.storage_ex, os.time() + USurvival.exhaust)
                if item.itemid % 2 == 1 then
                    doTransformItem(item.uid, item.itemid+1)
                else
                    doTransformItem(item.uid, item.itemid-1)
                end
            else
                doPlayerSendCancel(cid, 'Someone is already in the arena.')
                doSendMagicEffect(getThingPos(cid), 2)
            end
        else
            local left = getPlayerStorageValue(cid, USurvival.storage_ex) - os.time()
            left = {hour = math.floor(left/3600), minutes = math.ceil((left % 3600)/60)}
            doPlayerSendCancel(cid, 'You have to wait '.. left.hour ..'h and '..left.minutes..'min.')
            doSendMagicEffect(getThingPos(cid), 2)
        end
    end
    return true
end
]]></action>

<event type="login" name="US Login" event="script"><![CDATA[
domodlib('ultimatelib')
function onLogin(cid)
    registerCreatureEvent(cid,'UltimateSurvival1')
    registerCreatureEvent(cid,'UltimateSurvival2')
    if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
        doSendMagicEffect(getThingPos(cid), 10)
    end
    return true
end
]]></event>

<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, 30000, wave + 1, cid)
                doPlayerSendTextMessage(cid, 22, 'Congratulations! Next wave will start in 30 seconds!')
            else
                doPlayerSendTextMessage(cid, 22, 'CONGRATULATIONS! YOU HAVE BEATEN THE SURVIVAL!')
                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', 'This was awarded to '..getCreatureName(cid)..' for completing the Ultimate Survival.')
                    doItemSetAttribute(medal,'name', 'Ultimate Survival Medal')
                end
                doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
            end
        end
    end
    return true
end

]]></event>

<event type="preparedeath" name="UltimateSurvival2" event="script"><![CDATA[
domodlib('ultimatelib')
function onPrepareDeath(cid, killers)
    if isInArea(getThingPos(cid), USurvival.posi, USurvival.posf) then
        doCreatureAddHealth(cid, getCreatureMaxHealth(cid), 65535, 256, true)
        doRemoveConditions(cid, false)
        doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid)))
        doPlayerSendTextMessage(cid, 21, 'Too bad, you couldn\'t defeat the Ultimate Survival... Better luck next time.')
        local reward = USurvival.waves[getPlayerStorageValue(cid, USurvival.storage_wave)].reward
        if reward.item then
            doPlayerAddItem(cid, reward.item, reward.amount or 1)
        end
        if reward.exp then
            doPlayerAddExp(cid, reward.exp)
        end
        if reward.money then
            doPlayerAddMoney(cid, reward.money)
        end
        return false
    end
    return true
end
]]></event>

</mod>

 

 

deu erro na distro

Link to post
Share on other sites

22 horas atrás, Kyle Bellini disse:

Vi que tinha deixado uma letra minúscula em uma das funções, editei o meu post ali acima.. Mas tem certeza que foi o script que causou esse erro?

sim o jogo abre normal ai adicionei o script o jogo n abre ai apago o script volta ao normal, no caso o seu script editado

Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Similar Content

    • By elielder
      .Qual servidor ou website você utiliza como base? 
      otx 2.15 - 8.60
      Qual o motivo deste tópico? 
      Preciso fazer uma verificação na Spell "jump up e Jump down" (levitate) que se o player estiver trapado com doCreatureSetNoMove, ele não possa usar  o jump.
      provavelmente eu tenha que fazer alguma alteração na source. se alguem puder me ajudar.
       
      Você tem o código disponível? Se tiver publique-o aqui: 
       
      Spells.cpp

       
       
    • By Heyron
      Ola pessoal, preciso de uma modificação no sistema Advanced Sound.
       
      Quero um script que leia em tempo real todos os efeitos de magias que aparecem no campo de visão do personagem, e se tal efeito aparecer na tela, o script chama a função: sendScreanSound.
       
      Cada efeito mágico que aparecer, reproduz um arquivo de áudio diferente, dentro da pasta do OTCLient.
       
       
       
       
       
       
    • By Doidodepeda
      Alguém pra ajudar em um tutorial 2021 completao de como fazer, acessar e botar o ot online no unbutu 16.04
    • By iyagod
      Ola galera, gostaria de um script de boss diario igual ao global, procurei muito e só achei pra TFS 1.X+
      EX: Oberon
       
      Onde existe uma alavanca com 5 lugares, podendo ir de 1 até 5 players
      Se quiser ir sozinho pode, ou se for em time tbm...
      Quando puxa alavanca, quem esta nos pisos é teleportado p uma sala e um boss é sumonado, se dar 15min  toma kick
      E que nao possa entrar ngm enquanto tiver gente na sala, assim que sair qm ta la ou for kickado/ morto) o boss reseta liberando a sala pros proximos...
      quem entrou só pode voltar a fazer com o cooldown depois de 24h
       
      Uso TFS 0.4
      Alguem tem algo parecido?
       
       
       
       
    • By ashwese
      Está surgindo algum erro? Se sim coloque-o aqui. 
       
         
      Você tem alguma imagem que possa auxiliar no problema? Se sim, coloque-a aqui. 
       
      Client_Wars_[5.9].rar
×
×
  • Create New...

Important Information

Confirmação de Termo