cube_power_monitor

--[[

Cube Power Monitor

Power Detect / Base status / Reactor/engines control

Attach Thermal Expansion energy cells via wired modem and networking cable

Calculates power stored percentage and sends to channel 1 for base status display
Turns Big Reactor/Engines on/off with signals to channel 3

--]]

local status_channel = 1
local reactor_control_channel = 3
local engine_control_channel = 4

local modem = peripheral.wrap('top')
local wlan = peripheral.wrap('back')

local cubes = {}
local cube_capacity = 0
local total_capacity = 0

function round(num, dec)
  local shift = 10^(dec or 2)
  return math.floor(num * shift + 0.5) / shift
end

function reactor_on()
  print('Turning reactor on!')
  wlan.transmit(reactor_control_channel,10,"REACTOR_ON")
end

function reactor_off()
  print('Turning reactor off!')
  wlan.transmit(reactor_control_channel,10,"REACTOR_OFF")
end

function engines_on()
  print('Turning engines on!')
  wlan.transmit(engine_control_channel,10,"ENGINES_ON")
end

function engines_off()
  print('Turning engines off!')
  wlan.transmit(engine_control_channel,10,"ENGINES_OFF")
end

-- Get list of cubes only
local connected = modem.getNamesRemote()
for i=1, #connected do
  if string.match(peripheral.getType(connected[i]),"thermalexpansion_cell") then
    print ("Found cube "..connected[i])
    table.insert(cubes,connected[i])
    -- Calculate total capacity
    cube_capacity = modem.callRemote(connected[i],"getMaxEnergyStored")
    total_capacity = total_capacity + cube_capacity
  end
end

print ('Total Capacity='..total_capacity)
print ('Loop...')

-- Status loop
while true do

  local cube_stored = 0
  local total_stored = 0

  for i=1, #cubes do
    cube_stored = modem.callRemote(cubes[i],"getEnergyStored")
    total_stored = total_stored + cube_stored
  end

  percent = round(total_stored / total_capacity * 100,2)
  print(total_stored..'/'..total_capacity..' = '..percent..'%')

  if percent < 40 then
    reactor_on()
  end

  if percent < 70 then
    engines_on()
  end

  if percent > 90 then
    reactor_off()
    engines_off()
  end

  wlan.transmit(status_channel,10,"power_percent="..percent)
  sleep(5)

end