Livro com escrituras bobas (modificável)

--[[
	Project's author: Nettoork#0000
]]--

pagina1 = " Eu"
pagina2 = " Sou"
pagina3 = " Seu"
pagina4 = " Vizinho"
maxpag = 4 -- Limite de páginas
pags={pagina1,pagina2,pagina3,pagina4}
-- Script --
pagcont = 1
function openBook(playerName)

	ui.addTextArea(1,"",playerName,290,100,250,250,0x603A1B,0x603A1B,1,true)
	ui.addTextArea(2,"",playerName,286,96,250,250,0xffffff,0xffffff,1,true)
	ui.addTextArea(3,"",playerName,282,92,250,250,0x77197A,0x603A1B,1,true)
	ui.addTextArea(4,"",playerName,480,190,50,50,0x603A1B,0x503117,1,true)
	ui.addTextArea(5,"<a href='event:abrir'>  ",playerName,497,198,15,15,0x010101,0x010101,1,true)
	ui.addTextArea(6,"",playerName,503,216,3,14,0x010101,0x010101,1,true)
	ui.addTextArea(7,"<p align='center'><font size='35' face='Soopafresh'>Livro 1\n<p align='center'><font size='20' face='Verdana'>Aprendiz",playerName,340,140,0,0,0,0,1,true)

end

openBook(playerName)

function openedBook(playerName)

	ui.addTextArea(8,'',playerName,290,100,250,250,0x603A1B,0x603A1B,1,true)
	ui.addTextArea(9,'',playerName,286,96,250,250,0xffffff,0xffffff,1,true)
	ui.addTextArea(10,"<font color='#010101' size='13'>"..pags[pagcont],playerName,296,96,240,220,0xffffff,0xffffff,0,true)
	ui.addTextArea(11,"<a href='event:fechar'>    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n    \n",playerName,280,95,10,255,0x603A1B,0x603A1B,1,true)
	ui.addTextArea(12,"<font size='18' color='#010101'><p align='center'>"..pagcont.."/"..maxpag,playerName,300,318,240,0,1,1,0,true)
	ui.addTextArea(13,"<font size='30'><a href='event:passpage'>→",playerName,500,310,0,0,1,1,0,true)
	ui.addTextArea(14,"<font size='30'><a href='event:unpasspage'>←",playerName,300,310,0,0,1,1,0,true)

end
function eventTextAreaCallback(id,playerName,link)

	if link == "abrir" then
		openedBook(playerName)
	for i = 1,7 do
		ui.removeTextArea(i,playerName)
	end

	end
	if link == "passpage" then
		if pagcont <= maxpag-1 then
			pagcont = pagcont + 1
			openedBook(playerName)
		end
	end

	if link == "unpasspage" then
		if pagcont ~= 1 then
			pagcont = pagcont - 1
			openedBook(playerName)
		end
	end

	if link == "fechar" then
		openBook(playerName)
		for i = 8,14 do
			ui.removeTextArea(i,playerName)
		end
	end

end