[Encerrado] Script de efeito

[mage toper 0]

Galera to precisando de um script de efeito q vai fica aparecendo em cima de determimandos player quando ele falaar /top

 

eu tenho um começo do script de como tenque ficar e +/-  a sim 

 

local FRASES = {"TOP SEASON"} -- Auto-Mensagens.
local TEMPO = 1 -- Intervalo de Tempo em segundos.
local EFFECT = {21, 2, 5, 11, 15, 19, 22, 28, 29, 33, 32, 35, 39, 53, 54, 78, 77} -- Intervalo de Tempo em segundos.

local function doSendAutoMessage(cid, pos)
doSendAnimatedText(getThingPos(cid), FRASES[math.random(#FRASES)], math.random(255))
doSendMagicEffect(getThingPos(cid), EFFECT[math.random(#EFFECT)])
end

 

 

mais ai quero que fica repetindo sem parar. e que verifica se o player tem a storage

[Crypter 136]

local text = {"TOP SEASON"} -- Auto-Mensagens.
local time = 1 -- Intervalo de Tempo em segundos.
local effects = {21, 2, 5, 11, 15, 19, 22, 28, 29, 33, 32, 35, 39, 53, 54, 78, 77} -- Intervalo de Tempo em segundos.
local storage,key = 3423423,1

local function doSendMessageAndEffect(cid, position, loop)
	if getPlayerStorageValue(cid,storage) ~= key then return end 
	doSendAnimatedText(position, text[math.random(#text)], math.random(255))
	doSendMagicEffect(position, effects[math.random(#effects)])
	
	if loop then
		addEvent(doSendMessageAndEffect,time*1000,cid, getThingPos(cid),true)
	end
end

function onSay(cid, words, param)
	local position = getThingPos(cid)
	doSendMessageAndEffect(cid, position,true)
	return true
end 

 

[mage toper 0]

  Em 16/09/2018 em 23:05, Crypter disse:

local text = {"TOP SEASON"} -- Auto-Mensagens.
local time = 1 -- Intervalo de Tempo em segundos.
local effects = {21, 2, 5, 11, 15, 19, 22, 28, 29, 33, 32, 35, 39, 53, 54, 78, 77} -- Intervalo de Tempo em segundos.
local storage,key = 3423423,1

local function doSendMessageAndEffect(cid, position, loop)
	if getPlayerStorageValue(cid,storage) ~= key then return end 
	doSendAnimatedText(position, text[math.random(#text)], math.random(255))
	doSendMagicEffect(position, effects[math.random(#effects)])
	
	if loop then
		addEvent(doSendMessageAndEffect,time*1000,cid, getThingPos(cid),true)
	end
end

function onSay(cid, words, param)
	local position = getThingPos(cid)
	doSendMessageAndEffect(cid, position,true)
	return true
end 

 

Expand  

mt obrigado mais teria como colocar tempo pra usar? tipo os cara pode usar toda hora ai fica subindo um monte ao mesmo tempo que ta causando lag no servido tipo queria colocar tempo pra usar. ah e e tem como fazer um comando no meio pra desativar? tipo /season on e /season off

[Kuro o Shiniga 87]

 

/effetc on  - ativa o efeito

/effect off - desativa o efeito

<talkaction access="4" words="/effect" event="script" value="nomedoarquivo.lua"/>

local efeitos = {{22,10,2,33,32,12,40,5,3,4,18,19,20}} --- efeitos 
local TEMPO = 1

local str = 9394834


for l, k in ipairs(efeitos) do
local function doEffect(cid, pos)
if isPlayer(cid) then
ppos = getThingPos(cid)
doSendMagicEffect(pos, math.random(#efeitos[l]))
L_K = addEvent(doEffect, TEMPO*1000, cid, ppos)
setPlayerStorageValue(cid, str, 1)
end
	end

	function onSay(cid, words, param)
	if param == "on" and getPlayerStorageValue(cid, str) < 1 then
	pos = getThingPos(cid)
	doSendMagicEffect(pos, math.random(#efeitos[l]))
	addEvent(doEffect, TEMPO*1000, cid, pos)
	doPlayerSendTextMessage(cid,MESSAGE_STATUS_WARNING,"Effect Start.")

elseif param == "off" and getPlayerStorageValue(cid, str) == 1 then
stopEvent(L_K)
doPlayerSendTextMessage(cid,MESSAGE_STATUS_WARNING,"Effect Pause.")
setPlayerStorageValue(cid, str, -1)
return true
	end
		end
			end

 

Editado Setembro 18, 2018 por Pinpao

[Crypter 136]

local text = {"TOP SEASON"} -- msg
local time = 1 -- tempo para enviar a msg novamente
local effects = {21, 2, 5, 11, 15, 19, 22, 28, 29, 33, 32, 35, 39, 53, 54, 78, 77} -- efeitos aleatorios que saiem
local storage_quest,key = 3423423,1 -- storage da quest pra usar o comando
local storage_OnOff = 3423424 -- storage que salva se ta ou não ativado
local storage_exhaustion,time_exhaustion = 3423425,10 -- tempo para usar o comando novamente

local function doSendMessageAndEffect(cid, position, loop)
	if getPlayerStorageValue(cid,storage_OnOff) == 0 then return end -- para de enviar caso desative
	doSendAnimatedText(position, text[math.random(#text)], math.random(255))
	doSendMagicEffect(position, effects[math.random(#effects)])
	if loop then
		addEvent(doSendMessageAndEffect,time*1000,cid, getThingPos(cid),true)
	end
end

function onSay(cid, words, param)
	
	if getPlayerStorageValue(cid, storage_quest) ~= key then 
		return doPlayerSendCancel(cid, "You need a storage value.") -- msg caso não tenha a storage
	elseif exhaustion.check(cid, storage_exhaustion) then
		return doPlayerSendCancel(cid, "Wait ".. exhaustion.get(cid,storage_exhaustion) .." seconds.")
	end 
	--
	exhaustion.set(cid,time_exhaustion)
	--
	if param == "on" then
		if getPlayerStorageValue(cid, storage_OnOff ) == 1 then return doPlayerSendCancel(cid, "You have already activated this.") end
		doSendMessageAndEffect(cid, getThingPos(cid), true)
		setPlayerStorageValue(cid, storage_OnOff, 1)
    		doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, "You have successfully activated. To disable, talk /top off")
	elseif param == "off" then
		if getPlayerStorageValue(cid, storage_OnOff) == 0 then return doPlayerSendCancel(cid, "You can not disable this.") end 
		setPlayerStorageValue(cid, storage_OnOff, 0)
    		doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, "You have successfully disabled. To activate, talk /top on")
    	elseif (param ~= "on") or (param ~= "off") then
    		doPlayerSendCancel(cid, "You can activate with the 'on' parameter and deactivate with the 'off'. Example /top on to enable ...")
	end
	
	return true
end

 

Caso sua dúvida foi solucionada, marque a melhor resposta para o tópico ser fechado.

Editado Setembro 18, 2018 por Crypter

[mage toper 0]

  Em 18/09/2018 em 21:02, Crypter disse:

local text = {"TOP SEASON"} -- msg
local time = 1 -- tempo para enviar a msg novamente
local effects = {21, 2, 5, 11, 15, 19, 22, 28, 29, 33, 32, 35, 39, 53, 54, 78, 77} -- efeitos aleatorios que saiem
local storage_quest,key = 3423423,1 -- storage da quest pra usar o comando
local storage_OnOff = 3423424 -- storage que salva se ta ou não ativado
local storage_exhaustion,time_exhaustion = 3423425,10 -- tempo para usar o comando novamente

local function doSendMessageAndEffect(cid, position, loop)
	if getPlayerStorageValue(cid,storage_OnOff) == 0 then return end -- para de enviar caso desative
	doSendAnimatedText(position, text[math.random(#text)], math.random(255))
	doSendMagicEffect(position, effects[math.random(#effects)])
	if loop then
		addEvent(doSendMessageAndEffect,time*1000,cid, getThingPos(cid),true)
	end
end

function onSay(cid, words, param)
	
	if getPlayerStorageValue(cid, storage_quest) ~= key then 
		return doPlayerSendCancel(cid, "You need a storage value.") -- msg caso não tenha a storage
	elseif exhaustion.check(cid, storage_exhaustion) then
		return doPlayerSendCancel(cid, "Wait ".. exhaustion.get(cid,storage_exhaustion) .." seconds.")
	end 
	--
	exhaustion.set(cid,time_exhaustion)
	--
	if param == "on" then
		if getPlayerStorageValue(cid, storage_OnOff ) == 1 then return doPlayerSendCancel(cid, "You have already activated this.") end
		doSendMessageAndEffect(cid, getThingPos(cid), true)
		setPlayerStorageValue(cid, storage_OnOff, 1)
    		doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, "You have successfully activated. To disable, talk /top off")
	elseif param == "off" then
		if getPlayerStorageValue(cid, storage_OnOff) == 0 then return doPlayerSendCancel(cid, "You can not disable this.") end 
		setPlayerStorageValue(cid, storage_OnOff, 0)
    		doPlayerSendTextMessage(cid, MESSAGE_STATUS_WARNING, "You have successfully disabled. To activate, talk /top on")
    	elseif (param ~= "on") or (param ~= "off") then
    		doPlayerSendCancel(cid, "You can activate with the 'on' parameter and deactivate with the 'off'. Example /top on to enable ...")
	end
	
	return true
end

 

Caso sua dúvida foi solucionada, marque a melhor resposta para o tópico ser fechado.

Expand  

 

Deu esse erro aki

 

[Error - TalkAction Interface] 
data/talkactions/scripts/testisnow.lua:onSay
Description: 
data/lib/034-exhaustion.lua:144: attempt to perform arithmetic on local 'mytempo' (a nil value)
stack traceback:
    data/lib/034-exhaustion.lua:144: in function 'set'
    data/talkactions/scripts/testisnow.lua:25: in function <data/talkactions/scripts/testisnow.lua:17>
 

Script do 034-exhaustion.lua Se precisar

  Mostrar conteúdo oculto

function getmytempo(number)
local s = number
local m = 0
local h = 0
    for a = 1, math.floor(number/60) do
    if s <= 59 then
    return {h = h, m = m, s = s}
    else
    s = s - 60
    m = m + 1
        if m >= 60 then
        m = 0
        h = h + 1
        end
    end
    end
    return {h = h, m = m, s = s}
end

function getStringmytempo(number)
local hour = ""
local minu = ""
local seco = ""
    if getmytempo(number).h <= 9 then
    hour = "0"..getmytempo(number).h..""
    else
    hour = ""..getmytempo(number).h..""
    end
    if getmytempo(number).m <= 9 then
    minu = "0"..getmytempo(number).m..""
    else
    minu = ""..getmytempo(number).m..""
    end
     if getmytempo(number).s <= 9 then
    seco = "0"..getmytempo(number).s..""
    else
    seco = ""..getmytempo(number).s..""
    end
return ""..hour..":"..minu..":"..seco..""
end

ballcooldown = 
{

    check = function (cid, megafuckie)

    if tonumber(getItemAttribute(getPlayerSlotItem(cid, 8).uid, ""..megafuckie.."")) == nil then
    return false
    end

    if tonumber(getItemAttribute(getPlayerSlotItem(cid, 8).uid, ""..megafuckie.."")) >= os.time(t) then
    return true
    end

    return false
    end,

    get = function (cid, megafuckie)
        if getItemAttribute(getPlayerSlotItem(cid, 8).uid, ""..megafuckie.."") == nil then
        return ""
        end
        local mytempo = math.ceil(getItemAttribute(getPlayerSlotItem(cid, 8).uid, ""..megafuckie.."") - os.time(t))
        local x = getStringmytempo(mytempo)
        return x
    end,

    numberget = function (cid, megafuckie)
        if getItemAttribute(getPlayerSlotItem(cid, 8).uid, ""..megafuckie.."") == nil then
        return 0
        end
        local x = math.ceil(getItemAttribute(getPlayerSlotItem(cid, 8).uid, ""..megafuckie.."") - os.time(t))
        return x
    end,

    set = function (cid, megafuckie, mytempo)

        doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, ""..megafuckie.."", os.time(t) + mytempo)

    end,

    clean = function (cid, megafuckie)
        doItemSetAttribute(getPlayerSlotItem(cid, 8).uid, ""..megafuckie.."", 0)
    end
}

exhaustion = 
{

    check = function (cid, storage)

        if(getPlayerFlagValue(cid, PLAYERFLAG_HASNOEXHAUSTION)) then

            return false

        end

        return getPlayerStorageValue(cid, storage) >= os.time(t)

    end,

    get = function (cid, storage)

        if isPlayer(cid) then

        if(getPlayerFlagValue(cid, PLAYERFLAG_HASNOEXHAUSTION)) then

            return false
        end

        end

        local exhaust = getPlayerStorageValue(cid, storage)

        if(exhaust > 0) then

            local left = exhaust - os.time(t)

            if(left >= 0) then

                return left

            end

        end

        return false
    end,

    set = function (cid, storage, mytempo)

        setPlayerStorageValue(cid, storage, os.time(t) + mytempo)

    end,

    make = function (cid, storage, mytempo)

        local exhaust = exhaustion.get(cid, storage)

        if(not exhaust) then

            exhaustion.set(cid, storage, mytempo)

            return true

        end

        return false

    end
}
 

 

Editado Setembro 19, 2018 por mage toper
Faltando informação

[Marshmello 271]

A questão neste suporte foi encerrada por falta de respostas. Este tópico está fechado e foi movido para Suporte - Tópicos Sem Resposta.

+ Caso a dúvida não tenha sido resolvida você poderá criar outro tópico solicitando ajuda.
* Lembre-se que é permitido dar UP no tópico a cada 24 horas para assim o destacar e manter movimentado.