local mon=peripheral.wrap("monitor_1")
local ae=peripheral.wrap("appeng_me_tilecontroller_0")

local mon_h,mon_v=mon.getSize()

local timer=os.startTimer(5)

local function setupScreen()
   mon.clear()
   mon.setCursorPos(1,mon_v)
   mon.setBackgroundColor(colours.white)
   mon.setTextColor(colours.black)
   mon.write(string.rep(" ",mon_h))
   mon.setCursorPos(2,mon_v)
   mon.write("AE")
end

local function updateMonitorAE()

   local free=ae.getFreeBytes()
   local total=ae.getTotalBytes()

   mon.setCursorPos(5,mon_v)
   mon.setBackgroundColor(colours.white)

   if free>(total/2) then
      mon.setTextColor(colours.black)
   elseif free<1000 then
      mon.setTextColor(colours.red)
   else
      mon.setTextColor(colours.yellow)
   end

   mon.write(ae.getFreeBytes())
   mon.write("/"..ae.getTotalBytes().."     ")
   sleep(5)
end

setupScreen()
updateMonitorAE()

while true do
   local e,p = os.pullEvent()
   if e=="timer" and p==timer then
       updateMonitorAE()
   end
end