monitor = peripheral.wrap("top")
write = monitor.write
color = monitor.setTextColor
SetPos = monitor.setCursorPos
Scale = monitor.setTextScale
day = "27"
month = "December"

entries = {
	entry1 = "Public Energy",
	entry2 = "Public Storage Room",
	entry3 = "More SubClaims",
	entry4 = "Finished Planning Room",
	entry5 = "New Member : Brayd3n",
	entry6 = "",
	entry7 = "",
	entry8 = "",
	entry9 = "" }

iEntry = {
	infoentry1 = "Public Energy uses tesseracts",
	infoentry2 = "the frequency is 137.",
	infoentry3 = "",
	infoentry4 = "",
	infoentry5 = "",
	infoentry6 = "",
	infoentry7 = "",
	infoentry8 = "",
	infoentry9 = ""}

page = 1

members = {"Brayd3n (The Clockmaker)","MajesticRuler (Suggestion Box)"}

SetPos(25,1)
color(colors.red)
Scale(1)
function drawBoard()
	write"Anonymouse Board"
		SetPos(5,3)
		color(colors.blue)
		write(" "..day.." of "..month.. ": ")
		color(colors.white)
	if entries.entry1 ~= "" then
		SetPos(1,5)
		write("+ "..entries.entry1.." +")
		sleep(1)
	end
	if entries.entry2 ~= "" then
		SetPos(1,6)
		write("+ "..entries.entry2.." +")
		sleep(1)
	end
	if entries.entry3 ~= "" then
		SetPos(1,7)
		write("+ "..entries.entry3.." +")
		sleep(1)
	end
	if entries.entry4 ~= "" then
		SetPos(1,8)
		write("+ "..entries.entry4.." +")
		sleep(1)
	end
	if entries.entry5 ~= "" then
		SetPos(1,9)
		write("+ "..entries.entry5.." +")
		sleep(1)
	end
	if entries.entry6 ~= "" then
		SetPos(1,10)
		write("+ "..entries.entry6.." +")
		sleep(1)
	end
	if entries.entry7 ~= "" then
		SetPos(1,11)
		write("+ "..entries.entry7.." +")
		sleep(1)
	end
	if entries.entry8 ~= "" then
		SetPos(1,12)
		write("+ "..entries.entry8.." +")
		sleep(1)
	end
	if entries.entry9 ~= "" then
		SetPos(1,13)
		write("+ "..entries.entry9.." +")
		sleep(1)
	end
	SetPos(40,3)
	color(colors.blue)
	write"Information"
	SetPos(35,5)
	color(colors.white)
	sleep(1)
	write(iEntry.infoentry1)
	SetPos(35,6)
	sleep(1)
	write(infoentry2)
	SetPos(35,7)
	sleep(1)
	write(iEntry.infoentry3)
	SetPos(35,8)
	sleep(1)
	write(iEntry.infoentry4)
	SetPos(35,9)
	sleep(1)
	write(iEntry.infoentry5)
	SetPos(35,10)
	sleep(1)
	write(iEntry.infoentry6)
	SetPos(35,11)
	sleep(1)
	write(iEntry.infoentry7)
	SetPos(35,12)
	sleep(1)
	write(iEntry.infoentry8)
	SetPos(35,13)
	sleep(1)
	write(iEntry.infoentry9)
	monitor.setBackgroundColor(colors.green)
	SetPos(1,10)
	write("Members")
	monitor.setBackgroundColor(colors.black)
end

while true do
	term.clear()
	if page == 1 then
		drawBoard()
	end
	event, side, x, y = os.pullEvent("monitor_touch")
end