--1.5.2 Veszkapcsolo program capacitor bankhoz by: "Kacsa"
capacitor = peripheral.wrap("top")
rsctrl = right
alarm = bottom
cap = 4000000
max = 90
norm = 9
min = 5

--Terminalmeret
maxw, maxh = term.getSize()
centerw = (maxw) / 2
centerh = (maxh) / 2

--Script
while true do

--Szazalekertek
	energyLevel = capacitor.getEnergyStored()
	makePercent = 100
	difference = (cap) - (energyLevel)
	fillAmount = (energyLevel) / (cap)
	fillPercentage = (fillAmount) * (100)
	fillInt = math.floor(fillPercentage)


	if fillInt < min then
		redstone.setOutput(rsctrl, true)
		redstone.setOutput(alarm, true)
		term.setCursorPos(centerw - 8, centerh + 2)
		term.setTextColor(32)
		term.write("Energy generation active")
	end
	if fillInt > norm then
		redstone.setOutput(alarm, false)
	end
	if fillInt > max then
		redstone.setOutput(rsctrl, false)
		term.setCursorPos(centerw - 8, centerh + 1)
		term.setTextColor(16384)
		term.write("Energy generation inactive")
	end
	if redstone.getOutput(rsctrl) == false then
		term.setCursorPos(centerw - 8, centerh + 1)
		term.setTextColor(16384)
		term.write("Energy generation inactive")
	else
		term.setTextColor(32)
		term.write("Energy generation active")
	end

--Monitor
	term.setTextColor(3)
	term.setCursorPos(centerw - 12, 1)
	term.write("Stored: "..energyLevel.."MJ")
	term.setCursorPos(maxw - 11, 1)
	term.write("Energy: "..fillInt.."%")

--End
	sleep(2.5)
	term.clear()
end