NewsScreen 1.0

shell.run("clear")


black = colors.black
red = colors.red
green = colors.green
white = colors.white
blue = colors.blue
bnorm = black
tnorm = white
brown = colors.brown
cyan = colors.cyan
orange = colors.orange
yellow = colors.yellow
pink = colors.pink
purple = colors.purple

function cbut(cx, cy, text, bcol, tcol)
term.setCursorPos(cx, cy)
term.setBackgroundColor(bcol)
term.setTextColor(tcol)
print(text)
term.setBackgroundColor(bnorm)
term.setTextColor(tnorm)
end

cbut(3,2, "                                           ", red, black)
cbut(3,3, "     Neuigkeiten in BurningKeysCity [BKC]  ", red, black)
cbut(3,4, "                                           ", red, black)


cbut(3,11, "   Rechtsklick um weiter zu scrollen       ", orange, black)


news = {
[1] = " AKW & Shop Grunstücke werden errichtet    ",
[2] = " Neue GS werden angelegt                   ",
[3] = " Ind. Fert. Machine wird Installiert       ",
[4] = " ChestShop wird erichtet                   ",
[5] = " Stadtplan wurde eingerichtet              ",
[5] = " AKWs werden installiert, siehe Stadtplan  ",
}

cbut(3, 6,"                                           ", blue, black)
cbut(3, 7, news[1], blue, black)
cbut(3, 8,"                                           ", blue, black)

nr = 1
ma = table.maxn(news)
ma = ma + 1
function gBut(zh)
cbut(3, 6,"                                     ", blue, black)
cbut(3, 7, news[zh], blue, black)
cbut(3, 8,"                                     ", blue, black)
nr = nr + 1
if nr == ma then
nr = 1
end
end

while true do
evt, side, x, y = os.pullEvent("monitor_touch")
if evt == "monitor_touch" then
gBut(nr)





end




        end
--------------------------------------------