local function explode_player(player)
	if player and player.valid
	and player.mo and player.mo.valid 
	and player.mo.health then
		player.lives = $ + 1
		
		P_KillMobj(player.mo)
	end
end

COM_AddCommand("explode", explode_player)


local function lock_curses()  //locks changing
if server.lock == false 
server.lock = true
print("LOCKED TOGGLING")
elseif server.lock == true
server.lock = false
print("UNLOCKED TOGGLING")
end
  for p in players.iterate do
	if p and p.valid then
       p.lock = server.lock 
       p.inhud = false
     end
	end
end

COM_AddCommand("curselock", lock_curses, COM_ADMIN) 


local function force_curse(porr, field) //force curse/s
local numb = 0
if (field ~= nil) then
for p in players.iterate do
 if p and p.valid then
   repeat
    numb = $ + 1
   if string.sub(field, numb, numb) != " " 
    A_set(p, numb)
    SONICCURSES.curses[numb - 1] = tonumber(string.sub(field, numb, numb))
   end
     until numb > 2 or string.sub(field, numb + 1, numb + 1) == ""
   end
  end
 end
end

COM_AddCommand("curseforce", force_curse, COM_ADMIN) 


local function evil_command() //explode all alive players
 for p in players.iterate do
  if p and p.valid then
   P_KillMobj(p.mo)
  end
 end
end

COM_AddCommand("explodeall", evil_command, COM_ADMIN)
