energie

local modem = peripheral.wrap("right")
local mon = peripheral.wrap("top")


modem.open(4)


local kapacitapos = 0
local x=1
while true do
local event, modemSide, senderChannel,replyChannel, message, senderDistance = os.pullEvent("modem_message")
--local kapacita, kapacitapos = tonumber(kapacita), tonumber(kapacitapos)


mon.clear()
mon.setCursorPos(1,1)
rftik1 = message[1]/1000
rftik2 = message[2]/1000

rftik1 = math.floor(rftik1)
rftik2 = math.floor(rftik2)

mon.setCursorPos(1,x)
mon.write("Reactor Fluid Cooler")
mon.setCursorPos(1,x+1)
mon.write("RF/tik : "..rftik1.." KRf")
mon.setCursorPos(1,x+2)
mon.write("Reactor Solid Cooler")
if rftik2>0 then
mon.setCursorPos(1,x+3)
mon.setTextColor(colors.lime)
mon.write("RF/tik : "..rftik2.." KRf")
mon.setTextColor(colors.white)
else
mon.setCursorPos(1,x+3)
mon.setTextColor(colors.red)
mon.write("RF/tik : "..rftik2.." KRf")
mon.setTextColor(colors.white)
end

mon.setCursorPos(1,x+5)
mon.write("Celkova energie: "..rftik1+rftik2.." KRf")
--print("Vzdalenost vysilace: "..senderDistance)
--print("ZPrava : "..message)

end

sleep(1)

end