-- Simple Respawner System (with pCall) v1.0.1
-- by Benbirkralm

function eventPlayerDied(n)
pcall(tfm.exec.respawnPlayer,n)
end

function eventNewPlayer(n)
eventPlayerDied(n)
end

-- Simple Shop System v6.6.6
-- by Benbirkralm
devs={Benbirkralm=9e9}
players={}

function eventNewPlayer(n)
players[n]={money=0, moneyPlus=1}
end

for n in pairs (tfm.get.room.playerList) do
eventNewPlayer(n)
end

function eventPlayerWon(n)
if players[n].moneyPlus==1 then
players[n].money=players[n].money+1
elseif players[n].moneyPlus==2 then
players[n].money=players[n].money+3
elseif players[n].moneyPlus==3 then
players[n].money=players[n].money+5
elseif players[n].moneyPlus=="<R>MAX" then
players[n].money=players[n].money+10
end
end

function shop(n,c)
if c=="shop" then
if players[n].moneyPlus=="<r>MAX" then
ui.addTextArea(666,"+Money:"..players[n].moneyPlus)
else
ui.addTextArea(666,"+Money:"..players[n].moneyPlus.."<br><R><a href='event:moneyplus'>UPGRADE to level "..players[n].moneyPlus+1.."")
end
end

function eventChatCommand(n,c)
shop(n,c)
end

function eventTextAreaCallback(n, id, cb)
if cb=="moneyplus" then
if players[n].moneyPlus==1 then
if players[n].money>=3 then
players[n].moneyPlus=2
players[n].money=players[n].money-3
else
print("You can't afford that!")
elseif players[n].moneyPlus==2 then
if players[n].money>=10 then
players[n].moneyPlus=3
players[n].money=players[n].money-10
else
print("You can't afford that!")
elseif players[n].moneyPlus==3 then
if players[n].money>25 then
players[n].moneyPlus="<r>MAX"
players[n].money=players[n].money-25
else
print("You can't afford that!")
end
end

-- Simple Map Testing Script v1.1.8b
-- by Benbirkralm
p={}
m={0}
tfm.exec.newGame(m[math.random(#m)])

function eventNewPlayer(n)
p[n]={queue=false, s={}}
end

for b in pairs (tfm.get.room.playerList) do
eventNewPlayer(b)
end

function eventChatCommand(n,c) --- !666666
if players[n].queue==true
print("You already have a map in queue.")
else
table.insert(players[n].s,n)
table.insert(maps,c)
players[n].queue=true
end
if c=="queuelist" then
pcall(maps, print)
end

function eventNewGame()
for n in pairs (players[n].s) do
players[n].s={}
local m=tfm.get.room.currentMap
table.remove(maps,m)
end

-- Simple Respawner System (with OOP) v1.0.2
-- by Benbirkralm

framework={
r=function(a)tfm.exec.respawnPlayer(a)end
}



function eventPlayerDied(n)
framework.r(n)
end

function eventNewPlayer(n)
eventPlayerDied(n)
end

feed={text=""}
x=0
y=x+1
dead=true
won=true
left=true
new=true
cheese=true

function eventChatCommand(n, cmd)
if cmd=="log" then
ui.addPopup(2,3,feed.text,n,320,200,200)
end
end

function eventPlayerDied(name)
x=x+1
feed.text=""..feed.text.."<font color='#6D4A2D'>"..x..".</font><font color='#EE6353'>"..name.." </font><font color='#ffffff'>dead! <br>"
end

function eventPlayerWon(name)
x=x+1
feed.text=""..feed.text.."<font color='#6D4A2D'>"..x..".</font><font color='#F0C019'>"..name.." </font><font color='#ffffff'has >won! <br>"
end

function eventPlayerLeft(name)
x=x+1
feed.text=""..feed.text.."<font color='#6D4A2D'>"..x..".</font><font color='#4EB84A'>"..name.." </font><font color='#ffffff'>has left the room! <br>"
end

function eventNewPlayer(name)
x=x+1
feed.text=""..feed.text.."<font color='#6D4A2D'>"..x..".</font><font color='#1AEDFF'>"..name.." </font><font color='#ffffff'>has joined to the room! <br>"
end

function eventPlayerRespawn(name)
x=x+1
feed.text=""..feed.text.."<font color='#6D4A2D'>"..x..".</font><font color='#326EE9'>"..name.." </font><font color='#ffffff'>respawned! <br>"
end

function eventPlayerGetCheese(name)
x=x+1
feed.text=""..feed.text.."<font color='#6D4A2D'>"..x..".</font><font color='#8080FF'>"..name.." </font><font color='#ffffff'>got cheese! <br>"
end

--[[
Script by Benbirkralm~~
LogBook v1.1.2
]]

-- Simple add time command v1.0.0
-- by Benbirkralm

i=120

function eventLoop(t, r)
i=i-0.5
end

function eventNewGame()
tfm.exec.setGameTime(i)
end

function addTime(n,c)
i=i+c
end

function eventChatCommand(n,c)
addTime(n,c)
print("You added<v>"..c.." <n>seconds!")
end