enc

address = "5652cb7e-1978-435e-83c6-00314fb7098b"
port = 27001
delay = 0.2
radius = 25
displaySphere = true
title = "Starlight Draconic Energy Core"



local component = require("component")
local term = require("term")
local modem = component.modem
local core = component.proxy(address)
local colors = require("colors")
local gpu = component.gpu
gpu.setResolution(80,25)
w,h = gpu.getResolution()


term.clear()
print(port)

function loop()
  read()
  broadcast()
  display()
  os.sleep(delay)
end

function read()
  st = core.getEnergyStored()
  mx = core.getMaxEnergyStored()
  rt = core.getTransferPerTick()
  md = "null"
  if (core.canExtract()) then
    md = "extract"
  elseif (core.canReceive()) then
    md = "receive"
  end
end

function broadcast()
  modem.broadcast(port, st, mx, rt, md)
end

function display()
  term.clear()
  term.setCursor(math.floor((w/2)-(#message/2)),1)
  gpu.setForeground(0x00ffff)
  term.write(message)


  term.setCursor(1,2)
  gpu.setForeground(0x00ffff)
  term.write("Power Stored: ")
  gpu.setForeground(0xffff00)
  term.write(math.floor(st).."RF")

  term.setCursor(1,3)
  gpu.setForeground(0x00ffff)
  term.write("Transfer Rate: ")
  gpu.setForeground(0xffff00)
  term.write(math.floor(rt).."RF/t")

  term.setCursor(1,4)
  gpu.setForeground(0x00ffff)
  term.write("Maximum Power Storage: ")
  gpu.setForeground(0xffff00)
  term.write(math.floor(mx).."RF")

  if displaySphere then
    sphere()
  end
end

function sphere()

  if (math.floor(100*st/mx) >= 80) then
    scolor = 0x00ff00
  elseif (math.floor(100*st/mx) <=20) then
    scolor = 0xff0000
  else
    scolor = 0xffff40
  end

end


while true do
  loop()
end