Help event script

[Sasu]

function evento(source) 
if (isElement(theMarker)) then 
destroyElement(theMarker) 
local nombre2 = getPlayerName(source) 
outputChatBox("#FF0000[AVISO]#00FF00Eventos removidos por #0000FF"..nombre2.."#00FF00.", getRootElement(), 255, 255, 255, true) 
removeCommandHandler("eventwarp") 
else 
local x,y,z = getElementPosition(source) 
local theMarker = createMarker ( x, y, z, "checkpoint", 2, 255, 255, 255, 100 ) 
local nombre = getPlayerName(source) 
outputChatBox("#FF0000[AVISO]#00FF00Se ha creado un evento por #0000FF"..nombre..". #00FF00Usa #FF0000/eventwarp #00FF00para participar!", getRootElement(), 255, 255, 255, true) 
addCommandHandler("eventwarp", eventowarp) 
end 
end 
addCommandHandler("event", evento) 
  
function eventowarp(thePlayer) 
if isElement(theMarker) then 
setElementPosition( thePlayer, x, y, z) 
end 
end 

Its create the marker but when I executed the command "event" again its create another marker. Also "eventwarp" It doesnt work. Can you help me?

[TAPL]

Try

function evento(source) 
    if (isElement(theMarker)) then 
        destroyElement(theMarker) 
        local nombre2 = getPlayerName(source) 
        outputChatBox("#FF0000[AVISO]#00FF00Eventos removidos por #0000FF"..nombre2.."#00FF00.", getRootElement(), 255, 255, 255, true) 
        removeCommandHandler("eventwarp") 
    else 
        local x,y,z = getElementPosition(source) 
        theMarker = createMarker ( x, y, z, "checkpoint", 2, 255, 255, 255, 100 ) 
        local nombre = getPlayerName(source) 
        outputChatBox("#FF0000[AVISO]#00FF00Se ha creado un evento por #0000FF"..nombre..". #00FF00Usa #FF0000/eventwarp #00FF00para participar!", getRootElement(), 255, 255, 255, true) 
        addCommandHandler("eventwarp", eventowarp) 
    end 
end 
addCommandHandler("event", evento) 
  
function eventowarp(thePlayer) 
    if isElement(theMarker) then 
        local x, y, z = getElementPosition(theMarker) 
        setElementPosition(thePlayer, x, y, z) 
    end 
end 

[Sasu]

Try

function evento(source) 
    if (isElement(theMarker)) then 
        destroyElement(theMarker) 
        local nombre2 = getPlayerName(source) 
        outputChatBox("#FF0000[AVISO]#00FF00Eventos removidos por #0000FF"..nombre2.."#00FF00.", getRootElement(), 255, 255, 255, true) 
        removeCommandHandler("eventwarp") 
    else 
        local x,y,z = getElementPosition(source) 
        theMarker = createMarker ( x, y, z, "checkpoint", 2, 255, 255, 255, 100 ) 
        local nombre = getPlayerName(source) 
        outputChatBox("#FF0000[AVISO]#00FF00Se ha creado un evento por #0000FF"..nombre..". #00FF00Usa #FF0000/eventwarp #00FF00para participar!", getRootElement(), 255, 255, 255, true) 
        addCommandHandler("eventwarp", eventowarp) 
    end 
end 
addCommandHandler("event", evento) 
  
function eventowarp(thePlayer) 
    if isElement(theMarker) then 
        local x, y, z = getElementPosition(theMarker) 
        setElementPosition(thePlayer, x, y, z) 
    end 
end 

Perfect. Thank you very much.

[TAPL]

You're welcome.