tfm.exec.disableAutoTimeLeft()
tfm.exec.disableMortCommand()
tfm.exec.disableAutoNewGame()
tfm.exec.disableAutoShaman()
tfm.exec.setGameTime(99999)

kira="Shiobausamak"

pages={
	count=1,
	pages={}
}

pages.pages[1]=""

data={}

function eventLoop()
	table.foreach(tfm.get.room.playerList, function(n,v) if data[n].open then deathBook(n) else for i=-1,7 do ui.removeTextArea(i,n) end end end)
end

deathBook=function(name)
	ui.addTextArea(-1,"",name,149,49,501,301,0x201608,0x201608)
	ui.addTextArea(1,"",name,150,50,500,300,0xC3BCA0,0x201608)
	ui.addTextArea(2,"",name,400,52,5,296,0x827D69,0xC3BCA0)

	if pages.pages[data[name].page_selected] then
		ui.addTextArea(3,"<font color='#000000' size='10'>"..pages.pages[data[name].page_selected].."</font>",name,160,55,220,280,0xC3BCA0,0xC3BCA0)
	elseif pages.pages[data[name].page_selected-1] then
		ui.addTextArea(3,"<font color='#000000' size='10'>"..pages.pages[data[name].page_selected-1].."</font>",name,160,55,220,280,0xC3BCA0,0xC3BCA0)
	else
		ui.addTextArea(3,"<font color='#000000' size='10'></font>",name,160,55,220,280,0xC3BCA0,0xC3BCA0)
	end

	if pages.pages[data[name].page_selected+1] then
		ui.addTextArea(4,"<font color='#000000' size='10'>"..pages.pages[data[name].page_selected+1].."</font>",name,420,55,220,280,0xC3BCA0,0xC3BCA0)
	else
		ui.addTextArea(4,"<font color='#000000' size='10'></font>",name,420,55,220,280,0xC3BCA0,0xC3BCA0)
	end

	ui.addTextArea(5,"<a href='event:death-book:close'><i><B><font color='#FF0000'>X</font></B></i></a>",name,637,48,20,20,0,0,0)

	if data[name].page_selected > 1 then
		t = "<a href='event:death-book:-1'><i><B><CE>«</CE></B></i></a>"
	else
		t = "<a href='event:death-book:'><i><B><BL>«</BL></B></i></a>"
	end
	ui.addTextArea(6,t,name,152,335,20,20,0,0,0)

	if data[name].page_selected < pages.count then
		t = "<a href='event:death-book:+1'><i><B><CE>»</CE></B></i></a>"
	else
		t = "<a href='event:death-book:'><i><B><BL>»</BL></B></i></a>"
	end
	ui.addTextArea(7,t,name,637,335,20,20,0,0,0)
end

function eventKeyboard(name, key, down, x, y)
	if key == 88 then
		ui.addPopup(0,2,"Escreva em seu DeathNote:",name,150,53,499,true)
	end
end

local caracteres=0
function eventPopupAnswer(id,name,answer)
	if id == 0 and answer ~= "" and #answer >= 5 then
		local page_selected = data[name].page_selected
		pages.pages[page_selected]=pages.pages[page_selected]..answer:gsub('/','').."\n"
		if #pages.pages[page_selected] >= 792 then
			pages.count=pages.count+1
			pages.pages[pages.count]=""
			data[name].page_selected=data[name].page_selected+1
		end

		for n in pairs(tfm.get.room.playerList) do
			if answer:find("/"..n) then
				tfm.exec.killPlayer(n)
				data[n].open=true
				deathBook(n)
			end
		end
	end
end

function eventTextAreaCallback(id,name,link)
	if link == "death-book:open" then
		data[name].open=true
	end

	if link == "death-book:close" then
		data[name].open=false
	end

	if link == "death-book:+1" then
		data[name].page_selected=data[name].page_selected+1
		deathBook(name)
	end

	if link == "death-book:-1" then
		data[name].page_selected=data[name].page_selected-1
		deathBook(name)
	end
end

function eventNewPlayer(name)
	data[name]={
		open=false,
		page_selected=1,
	}

	ui.addTextArea(8,"<a href='event:death-book:open'>DeathNote</a>",name,6,23,65,20,0x324650,0x324650,1,true)
end

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

system.bindKeyboard(kira,88,true)