Baú com tempo (Recompensa aleatória)

Tingasgo · Agosto 3, 2017

Testado em TFS 0.3.6l 8.54

Estou apenas trazendo para o fórum pois não encontrei ^^ caso tenha eu removo... explicando o sistema seria um baú que a cada determinado tempo ele pode ser aberto novamente mas sempre irá vir algum item diferente (configurável)...

Vamos ao script...

Primeiro adicione isso em

actions.xml

Dentro da pasta scripts crie um arquivo chamado "timechest.lua" e adicione isso dentro

Mostrar conteúdo oculto

-- Time Chest by Limos
local config = {
exhausttime = 7200, -- time in seconds
exhauststorage = 2301,
level = 50 -- minimum level to open the chest
}

function onUse(cid, item, fromPosition, itemEx, toPosition)

local rewarditems = {
{id = 2152, count = math.random(1, 50)},
{id = 2498, count = 1},
{id = 2492, count = 1},
{id = 2488, count = 1}
}

if(getPlayerLevel(cid) < config.level) then
doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
doPlayerSendCancel(cid, "You need to be level "..config.level.." to open the chest.")
return true
end
if(exhaustion.check(cid, config.exhauststorage)) then
local time = exhaustion.get(cid, config.exhauststorage)
local hours, minutes, seconds = math.floor (time / 3600), math.floor ((time - ((math.floor (time / 3600)) * 3600))/ 60), time - ((math.floor (time/60)) * 60)
if time >= 3600 then
text = hours.." "..(hours > 1 and "hours" or "hour")..", "..minutes.." "..(minutes > 1 and "minutes" or "minute").." and "..seconds.." "..(seconds > 1 and "seconds" or "second")
elseif time >= 120 then
text = minutes.." "..(minutes > 1 and "minutes" or "minute").." and "..seconds.." "..(seconds > 1 and "seconds" or "second")
else
text = seconds.." "..(seconds > 1 and "seconds" or "second")
end
doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "It is empty. You need to wait "..text.." before you can get a reward again.")
return true
end
local i = math.random(1, #rewarditems)
local info = getItemInfo(rewarditems.id)
if(rewarditems.count > 1) then
text = rewarditems.count .. " " .. info.plural
else
text = info.article .. " " .. info.name
end
local item = doCreateItemEx(rewarditems.id, rewarditems.count)
if(doPlayerAddItemEx(cid, item, false) ~= RETURNVALUE_NOERROR) then
doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
text = "You have found a reward. It is to heavy or you have not enough space."
else
text = "You have found " .. text .. "."
exhaustion.set(cid, config.exhauststorage, config.exhausttime)
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, text)
return true
end

Versão com chance:

Mostrar conteúdo oculto

-- Time Chest by Limos
local config = {
exhausttime = 7200, -- time in seconds
exhauststorage = 2301,
level = 50 -- minimum level to open the chest
}

function onUse(cid, item, fromPosition, itemEx, toPosition)

local rewarditems = {
{id = 2492, chance = 5, count = 1}, -- start with the lowest chances
{id = 2498, chance = 10, count = 1},
{id = 2488, chance = 15, count = 1},
{id = 2152, chance = 70, count = math.random(1, 50)}
}

if(getPlayerLevel(cid) < config.level) then
doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
doPlayerSendCancel(cid, "You need to be level "..config.level.." to open the chest.")
return true
end

if(exhaustion.check(cid, config.exhauststorage)) then
local time = exhaustion.get(cid, config.exhauststorage)
local hours, minutes, seconds = math.floor (time / 3600), math.floor ((time - ((math.floor (time / 3600)) * 3600))/ 60), time - ((math.floor (time/60)) * 60)
if time >= 3600 then
text = hours.." "..(hours > 1 and "hours" or "hour")..", "..minutes.." "..(minutes > 1 and "minutes" or "minute").." and "..seconds.." "..(seconds > 1 and "seconds" or "second")
elseif time >= 120 then
text = minutes.." "..(minutes > 1 and "minutes" or "minute").." and "..seconds.." "..(seconds > 1 and "seconds" or "second")
else
text = seconds.." "..(seconds > 1 and "seconds" or "second")
end
doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "It is empty. You need to wait "..text.." before you can get a reward again.")
return true
end

local chance = math.random(1,100)
for i = 1, #rewarditems, 1 do
if(chance < rewarditems.chance) then
local info = getItemInfo(rewarditems.id)
if(rewarditems.count > 1) then
text = rewarditems.count .. " " .. info.plural
else
text = info.article .. " " .. info.name
end

local item = doCreateItemEx(rewarditems.id, rewarditems.count)
if(doPlayerAddItemEx(cid, item, false) ~= RETURNVALUE_NOERROR) then
doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
text = "You have found a reward. It is to heavy or you have not enough space."
else
text = "You have found " .. text .. "."
exhaustion.set(cid, config.exhauststorage, config.exhausttime)
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, text)
return true
else
chance = chance - rewarditems.chance
end
end
end

Versão com level e chance:

Mostrar conteúdo oculto

-- Time Chest by Limos
local config = {
exhausttime = 7200, -- time in seconds
exhauststorage = 2301,
level = 25 -- minimum level to open the chest
}

function onUse(cid, item, fromPosition, itemEx, toPosition)

local rewarditems = {
[25] = {
tilllevel = 50,
{id = 3982, chance = 5, count = 1}, -- start with the lowest chances
{id = 2476, chance = 10, count = 1},
{id = 2479, chance = 15, count = 1},
{id = 2148, chance = 70, count = math.random(1, 50)}
},
[50] = {
tilllevel = 100,
{id = 7730, chance = 5, count = 1},
{id = 2466, chance = 10, count = 1},
{id = 2497, chance = 15, count = 1},
{id = 2152, chance = 70, count = math.random(1, 20)}
},
[100] = {
tilllevel = 200,
{id = 2492, chance = 5, count = 1},
{id = 2498, chance = 10, count = 1},
{id = 2195, chance = 15, count = 1},
{id = 2152, chance = 70, count = math.random(20, 50)}
},
[200] = {
tilllevel = 10000,
{id = 2472, chance = 5, count = 1},
{id = 2470, chance = 10, count = 1},
{id = 2157, chance = 15, count = 1},
{id = 2160, chance = 70, count = math.random(1, 5)}
}
}

if(getPlayerLevel(cid) < config.level) then
doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
doPlayerSendCancel(cid, "You need to be level "..config.level.." to open the chest.")
return true
end

if(exhaustion.check(cid, config.exhauststorage)) then
local time = exhaustion.get(cid, config.exhauststorage)
local hours, minutes, seconds = math.floor (time / 3600), math.floor ((time - ((math.floor (time / 3600)) * 3600))/ 60), time - ((math.floor (time/60)) * 60)
if time >= 3600 then
text = hours.." "..(hours == 1 and "hour" or "hours")..", "..minutes.." "..(minutes == 1 and "minute" or "minutes").." and "..seconds.." "..(seconds == 1 and "second" or "seconds")
elseif time >= 120 then
text = minutes.." "..(minutes == 1 and "minute" or "minutes").." and "..seconds.." "..(seconds == 1 and "second" or "seconds")
else
text = seconds.." "..(seconds == 1 and "second" or "seconds")
end
doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "It is empty. You need to wait "..text.." before you can get a reward again.")
return true
end

local chance = math.random(1,100)
for v, x in pairs(rewarditems) do
if(getPlayerLevel(cid) >= v and getPlayerLevel(cid) < x.tilllevel) then
level = v
end
end

for i = 1, #rewarditems[level], 1 do
if(chance < rewarditems[level].chance) then
local info = getItemInfo(rewarditems[level].id)
if(rewarditems[level].count > 1) then
text = rewarditems[level].count .. " " .. info.plural
else
text = info.article .. " " .. info.name
end

local item = doCreateItemEx(rewarditems[level].id, rewarditems[level].count)
if(doPlayerAddItemEx(cid, item, false) ~= RETURNVALUE_NOERROR) then
doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
text = "You have found a reward. It is to heavy or you have not enough space."
else
text = "You have found " .. text .. "."
exhaustion.set(cid, config.exhauststorage, config.exhausttime)
end
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, text)
return true
else
chance = chance - rewarditems[level].chance
end
end
end

Creio que seja facíl de configurar é só da uma lida ali no começo do script estou sem tempo de ficar explicando muito tempo só queria trazer pra k esse conteúdo ^^

Créditos: Limos "Otland"

Editado Agosto 3, 2017 por Tingasgo

PxN · Agosto 17, 2017

Ola amigo, estou tentando usar o com level e chance mas da este erro:

[17/08/2017 19:12:46] [Error - Action Interface] [17/08/2017 19:12:46] data/actions/scripts/timechest.lua:onUse[17/08/2017 19:12:46] Description: [17/08/2017 19:12:46] data/actions/scripts/timechest.lua:70: attempt to compare number with nil[17/08/2017 19:12:46] stack traceback:[17/08/2017 19:12:46]     data/actions/scripts/timechest.lua:70: in function <data/actions/scripts/timechest.lua:8>

Linha numero 70:

if(chance < rewarditems[level].chance) then

Tem como me ajudar?

Tingasgo · Agosto 17, 2017

Em 17/08/2017 em 22:15, PxN disse:

Ola amigo, estou tentando usar o com level e chance mas da este erro:

[17/08/2017 19:12:46] [Error - Action Interface] [17/08/2017 19:12:46] data/actions/scripts/timechest.lua:onUse[17/08/2017 19:12:46] Description: [17/08/2017 19:12:46] data/actions/scripts/timechest.lua:70: attempt to compare number with nil[17/08/2017 19:12:46] stack traceback:[17/08/2017 19:12:46]     data/actions/scripts/timechest.lua:70: in function <data/actions/scripts/timechest.lua:8>

Linha numero 70:

if(chance < rewarditems[level].chance) then

Tem como me ajudar?

Expand

Envia o script inteiro caso tenha feito alguma alteração

PxN · Agosto 17, 2017

Não fiz nenhuma alteração amigo.

PxN · Agosto 19, 2017

alguem?

Tingasgo · Agosto 19, 2017

Em 19/08/2017 em 23:40, PxN disse:

Ok. Desculpe o encomodo. Obrigado por tudo.

Retired.

Expand

Desculpa, tenta me marcar quando perguntar algo pra mim eu nunca entro aqui e se você não me marcar não vou ver... O meu ta funcionando... eu testei que base você usa?

Benny · Agosto 19, 2017

Não quero ver mais post nenhum sobre o ocorrido.

Obrigado por trazer conteúdo ao fórum

Taiger · Agosto 20, 2017

Ué, deletaram as criticas pq? E até a advertencia do membro da equipe? Não estou entendendo mais nada.

@Tingasgo É PDA amigo, ele me pediu ajuda mas não sou programador.

Drakopoulos · Agosto 20, 2017

Dei uma revisada no script, ta ai

-- Time Chest by Limoslocal config = {    exhausttime = 7200, -- time in seconds    exhauststorage = 2301,    level = 25 -- minimum level to open the chest} function onUse(cid, item, fromPosition, itemEx, toPosition) local rewarditems = {    [25] = {        tilllevel = 50,        {id = 3982, chance = 5, count = 1}, -- start with the lowest chances        {id = 2476, chance = 10, count = 1},        {id = 2479, chance = 15, count = 1},        {id = 2148, chance = 70, count = math.random(1, 50)}    },    [50] = {        tilllevel = 100,        {id = 7730, chance = 5, count = 1},        {id = 2466, chance = 10, count = 1},        {id = 2497, chance = 15, count = 1},        {id = 2152, chance = 70, count = math.random(1, 20)}    },    [100] = {        tilllevel = 200,        {id = 2492, chance = 5, count = 1},        {id = 2498, chance = 10, count = 1},        {id = 2195, chance = 15, count = 1},        {id = 2152, chance = 70, count = math.random(20, 50)}    },    [200] = {        tilllevel = 500,        {id = 2472, chance = 5, count = 1},        {id = 2470, chance = 10, count = 1},        {id = 2157, chance = 15, count = 1},        {id = 2160, chance = 70, count = math.random(1, 5)}    }}     if(getPlayerLevel(cid) < config.level) then        doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)        doPlayerSendCancel(cid, "You need to be level "..config.level.." to open the chest.")        return true    end    if getPlayerStorageValue(cid, config.exhauststorage) and getPlayerStorageValue(cid, config.exhauststorage) - os.time(t) > 0 then        local time = getPlayerStorageValue(cid, config.exhauststorage) - os.time(t)        local hours, minutes, seconds = math.floor (time / 3600), math.floor ((time - ((math.floor (time / 3600)) * 3600))/ 60), time - ((math.floor (time/60)) * 60)        if time >= 3600 then            text = hours.." "..(hours == 1 and "hour" or "hours")..", "..minutes.." "..(minutes == 1 and "minute" or "minutes").." and "..seconds.." "..(seconds == 1 and "second" or "seconds")        elseif time >= 120 then            text = minutes.." "..(minutes == 1 and "minute" or "minutes").." and "..seconds.." "..(seconds == 1 and "second" or "seconds")        else            text = seconds.." "..(seconds == 1 and "second" or "seconds")        end        doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)        doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "It is empty. You need to wait "..text.." before you can get a reward again.")        return true    end     local chance = math.random(1,100)    for v, x in pairs(rewarditems) do        if(getPlayerLevel(cid) >= v and getPlayerLevel(cid) < x.tilllevel) then            level = v			till = x.tilllevel        end    end    for a, b in pairs(rewarditems[level]) do	if b == till then return true end        if(chance < b.chance) then            local info = getItemInfo(b.id)            if(b.count > 1) then   				text = b.count .. " " .. info.plural            else				text = info.article .. " " .. info.name            end             local item = doCreateItemEx(b.id, b.count)            if(doPlayerAddItemEx(cid, item, false) ~= RETURNVALUE_NOERROR) then                doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)                text = "You have found a reward. It is to heavy or you have not enough space."            else                text = "You have found " .. text .. "."                exhaustion.set(cid, config.exhauststorage, config.exhausttime)            end            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, text)            return true        else            chance = chance - b.chance        end    endend

Benny · Agosto 20, 2017

Em 20/08/2017 em 00:01, Taiger disse:

Ué, deletaram as criticas pq? E até a advertencia do membro da equipe? Não estou entendendo mais nada.

@Tingasgo É PDA amigo, ele me pediu ajuda mas não sou programador.

Expand

Deletei porquê eu quis, e eu já tinha avisado que não queria mais nada sobre o ocorrido.

Em 20/08/2017 em 02:14, Drakopoulos disse:

Dei uma revisada no script, ta ai

-- Time Chest by Limoslocal config = {    exhausttime = 7200, -- time in seconds    exhauststorage = 2301,    level = 25 -- minimum level to open the chest} function onUse(cid, item, fromPosition, itemEx, toPosition) local rewarditems = {    [25] = {        tilllevel = 50,        {id = 3982, chance = 5, count = 1}, -- start with the lowest chances        {id = 2476, chance = 10, count = 1},        {id = 2479, chance = 15, count = 1},        {id = 2148, chance = 70, count = math.random(1, 50)}    },    [50] = {        tilllevel = 100,        {id = 7730, chance = 5, count = 1},        {id = 2466, chance = 10, count = 1},        {id = 2497, chance = 15, count = 1},        {id = 2152, chance = 70, count = math.random(1, 20)}    },    [100] = {        tilllevel = 200,        {id = 2492, chance = 5, count = 1},        {id = 2498, chance = 10, count = 1},        {id = 2195, chance = 15, count = 1},        {id = 2152, chance = 70, count = math.random(20, 50)}    },    [200] = {        tilllevel = 500,        {id = 2472, chance = 5, count = 1},        {id = 2470, chance = 10, count = 1},        {id = 2157, chance = 15, count = 1},        {id = 2160, chance = 70, count = math.random(1, 5)}    }}     if(getPlayerLevel(cid) < config.level) then        doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)        doPlayerSendCancel(cid, "You need to be level "..config.level.." to open the chest.")        return true    end    if getPlayerStorageValue(cid, config.exhauststorage) and getPlayerStorageValue(cid, config.exhauststorage) - os.time(t) > 0 then        local time = getPlayerStorageValue(cid, config.exhauststorage) - os.time(t)        local hours, minutes, seconds = math.floor (time / 3600), math.floor ((time - ((math.floor (time / 3600)) * 3600))/ 60), time - ((math.floor (time/60)) * 60)        if time >= 3600 then            text = hours.." "..(hours == 1 and "hour" or "hours")..", "..minutes.." "..(minutes == 1 and "minute" or "minutes").." and "..seconds.." "..(seconds == 1 and "second" or "seconds")        elseif time >= 120 then            text = minutes.." "..(minutes == 1 and "minute" or "minutes").." and "..seconds.." "..(seconds == 1 and "second" or "seconds")        else            text = seconds.." "..(seconds == 1 and "second" or "seconds")        end        doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)        doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "It is empty. You need to wait "..text.." before you can get a reward again.")        return true    end     local chance = math.random(1,100)    for v, x in pairs(rewarditems) do        if(getPlayerLevel(cid) >= v and getPlayerLevel(cid) < x.tilllevel) then            level = v			till = x.tilllevel        end    end    for a, b in pairs(rewarditems[level]) do	if b == till then return true end        if(chance < b.chance) then            local info = getItemInfo(b.id)            if(b.count > 1) then   				text = b.count .. " " .. info.plural            else				text = info.article .. " " .. info.name            end             local item = doCreateItemEx(b.id, b.count)            if(doPlayerAddItemEx(cid, item, false) ~= RETURNVALUE_NOERROR) then                doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)                text = "You have found a reward. It is to heavy or you have not enough space."            else                text = "You have found " .. text .. "."                exhaustion.set(cid, config.exhauststorage, config.exhausttime)            end            doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, text)            return true        else            chance = chance - b.chance        end    endend

Expand

Grato por tentar ajudar

Vinc · Outubro 11, 2017

corrigindo uma parte do tempo, e uma pequena otimização, que ele mostraria os segundos errados se estivesse entre 60 e 119 segundos faltando, que cairia no 3 caso, o else, mas os segundos variam só de 0 a 59
use %(modulo) para obter o resto inteiro da divisão, exemplo de como funciona esse operador : 3%3 = 0, 4%3 = 1, 5%3 = 2, 6%3 = 0

Mostrar conteúdo oculto

	if(exhaustion.check(cid, config.exhauststorage)) then
		local time = exhaustion.get(cid, config.exhauststorage)
		local hours, minutes, seconds = math.floor(time / 3600), math.floor(time / 60) % 60, time % 60
		if time >= 3600 then
			text = hours.." "..(hours == 1 and "hour" or "hours")..", "..minutes.." "..(minutes == 1 and "minute" or "minutes").." and "..seconds.." "..(seconds == 1 and "second" or "seconds")
		elseif time >= 120 then
			text = minutes.." "..(minutes == 1 and "minute" or "minutes").." and "..seconds.." "..(seconds == 1 and "second" or "seconds")
		else
			seconds = time % 120
			text = seconds.." "..(seconds == 1 and "second" or "seconds")
		end
		doSendMagicEffect(getThingPos(cid), CONST_ME_POFF)
		doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "It is empty. You need to wait "..text.." before you can get a reward again.")
		return true
	end

Entrar

Baú com tempo (Recompensa aleatória)

Posts Recomendados

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar