Ir para conteúdo
  • Cadastre-se

(Resolvido)Colocar tempo pra usar esse script


Ir para solução Resolvido por Storm,

Posts Recomendados

Galera to querendo colocar tempo nesse script na hora de usar o !responder

script aki

Se puder ajudar rep ++

Creditos do script

>>Nothing<<

 

Spoiler

local prize, question, answer, globalSto, t, sto = {}, nil, nil, 11789, {}, nil
local model = "$question\nPrêmio: $itemcountx $itemname\nUse !responder [resposta]"
function checkAsks()
	local sto = getGlobalStorageValue(globalSto) and getGlobalStorageValue(globalSto) or "nothing"
	local haveAsk = (type(sto) == "string" and sto ~= "nothing")
	if haveAsk then
		local t = string.explode(sto, ":::")
		local question = t[1]
		local answer = t[2]
		local prizeItem = t[3]
		local prizeCount = t[4]
		local str = ""
		str = string.gsub(model, "$question", question)
		str = string.gsub(str, "$itemcount", prizeCount)
		str = string.gsub(str, "$itemname", (getItemInfo(prizeItem).name))
		doBroadcastMessage(str)
		addEvent(checkAsks, 1000 * 60)
	end
end

function onSay(cid, words, param, channel)
sto = getGlobalStorageValue(globalSto) and getGlobalStorageValue(globalSto) or "nothing"
	if words == "!perguntar" then
		if not param then
			doPlayerSendTextMessage(cid, 20, "Parâmetro errado.")
			return true
		end
		t = string.explode(param, ":::")
		if #t ~= 4 then
			doPlayerSendTextMessage(cid, 20, "Certifique-se que o parâmetro está nesse modelo: '!perguntar Quanto e 1+1:::2:::2160:::1'.")
			return true
		end
		question = t[1]
		answer = t[2]
		prize.i = t[3]
		prize.c = t[4]
		if setGlobalStorageValue(globalSto, question .. ":::".. answer .. ":::".. (prize.i) .. ":::" .. (prize.c)) then
			doPlayerSendTextMessage(cid, 20, "Questão ativa.")
			checkAsks()
		end
	elseif words == "!responder" then
		if (type(sto) == "number" or sto == "nothing") then
			doPlayerSendTextMessage(cid, 22, "Nenhuma questão agora.")
			return true
		end
		t = string.explode(sto, ":::")
		answer = t[2]
		prize.i = t[3]
		prize.c = t[4]
		if string.lower(param) == string.lower(answer) then
			doPlayerSendTextMessage(cid, 20, "Resposta correta!")
			doPlayerAddItem(cid, prize.i, prize.c)
			doBroadcastMessage(getCreatureName(cid) .. " foi o primeiro a responder a questão corretamente e recebeu ".. (prize.c) .. "x "..(getItemInfo(prize.i).name) .. "!")
			doBroadcastMessage("A resposta era: "..answer..".")
			doSendMagicEffect(getThingPos(cid), 14)
			setGlobalStorageValue(globalSto, "nothing")
		else
			doPlayerSendTextMessage(cid, 20, "Resposta errada!")
		end
	end

	return true
end 

 

Link para o post
Compartilhar em outros sites
  • Solução

@iury alves potter 

local prize, question, answer, globalSto, t, sto = {}, nil, nil, 11789, {}, nil
local model = "$question\nPrêmio: $itemcountx $itemname\nUse !responder [resposta]"
function checkAsks()
    local sto = getGlobalStorageValue(globalSto) and getGlobalStorageValue(globalSto) or "nothing"
    local haveAsk = (type(sto) == "string" and sto ~= "nothing")
    if haveAsk then
        local t = string.explode(sto, ":::")
        local question = t[1]
        local answer = t[2]
        local prizeItem = t[3]
        local prizeCount = t[4]
        local str = ""
        str = string.gsub(model, "$question", question)
        str = string.gsub(str, "$itemcount", prizeCount)
        str = string.gsub(str, "$itemname", (getItemInfo(prizeItem).name))
        doBroadcastMessage(str)
        addEvent(checkAsks, 1000 * 60)
    end
end

local waittime = 5.0 -- Tempo de exhaustion
local storage = 581799

function onSay(cid, words, param, channel)
    sto = getGlobalStorageValue(globalSto) and getGlobalStorageValue(globalSto) or "nothing"
    if words == "!perguntar" then
        if not param then
            doPlayerSendTextMessage(cid, 20, "Parâmetro errado.")
            return true
        end
        t = string.explode(param, ":::")
        if #t ~= 4 then
            doPlayerSendTextMessage(cid, 20, "Certifique-se que o parâmetro está nesse modelo: '!perguntar Quanto e 1+1:::2:::2160:::1'.")
            return true
        end
        question = t[1]
        answer = t[2]
        prize.i = t[3]
        prize.c = t[4]
        if setGlobalStorageValue(globalSto, question .. ":::".. answer .. ":::".. (prize.i) .. ":::" .. (prize.c)) then
            doPlayerSendTextMessage(cid, 20, "Questão ativa.")
            checkAsks()
        end
    elseif words == "!responder" then
        if (type(sto) == "number" or sto == "nothing") then
            doPlayerSendTextMessage(cid, 22, "Nenhuma questão agora.")
            return true
        end
        if exhaustion.check(cid, storage) then
            doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Aguarde " .. exhaustion.get(cid, storage) .. " segundos para usar comando novamente.")
            return false
        end
        t = string.explode(sto, ":::")
        answer = t[2]
        prize.i = t[3]
        prize.c = t[4]
        if string.lower(param) == string.lower(answer) then
            doPlayerSendTextMessage(cid, 20, "Resposta correta!")
            doPlayerAddItem(cid, prize.i, prize.c)
            doBroadcastMessage(getCreatureName(cid) .. " foi o primeiro a responder a questão corretamente e recebeu ".. (prize.c) .. "x "..(getItemInfo(prize.i).name) .. "!")
            doBroadcastMessage("A resposta era: "..answer..".")
            doSendMagicEffect(getThingPos(cid), 14)
            setGlobalStorageValue(globalSto, "nothing")
        else
            doPlayerSendTextMessage(cid, 20, "Resposta errada!")
        end
        exhaustion.set(cid, storage, waittime)
    end
    return true
end

 

Link para o post
Compartilhar em outros sites

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

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo