Base Control - Database

local oreProcessEnabled = false
local powerEnabled = false
local quarryEnabled = false
local reactorEnabled = false

function save()
  fs.makeDir("saves")
  local file = fs.open("saves/data", "w")

  file.writeLine(oreProcessEnabled)
  file.writeLine(powerEnabled)
  file.writeLine(quarryEnabled)
  file.writeLine(reactorEnabled)

  file.close()
end

function load()

  if fs.exists("saves/control") == false then
    save()
  end

  local file = fs.open("saves/control","r")

  local fileData = {}
  local line

  repeat
  line = file.readLine()
    table.insert(fileData, line)
  until line == nil

  file.close()

  oreProcessEnabled = fileData[1]
  powerEnabled = fileData[2]
  quarryEnabled = fileData[3]
  reactorEnabled = fileData[4]
end

rednet.open("back")
while true do
    senderId, msg, protocall = rednet.receive()

    if protocall == "dataRetreive" then
        if msg == "oreProcess" then
            rednet.broadcast(oreProcessEnabled, "dataOut")
        end
        if msg == "power" then
            rednet.broadcast(powerEnabled, "dataOut")
        end
        if msg == "quarry" then
            rednet.broadcast(quarryEnabled, "dataOut")
        end
        if msg == "reactor" then
            rednet.broadcast(reactorEnabled, "dataOut")
        end
    end

    if protocall == "dataStore" then
        if msg == "oreProcessTrue" then
            oreProcessEnabled = true
        end
        if msg == "oreProcessFalse" then
            oreProcessEnabled = false
        end
        if msg == "powerTrue" then
            oreProcessEnabled = true
        end
        if msg == "powerFalse" then
            oreProcessEnabled = false
        end
        if msg == "quarryTrue" then
            oreProcessEnabled = true
        end
        if msg == "quarryFalse" then
            oreProcessEnabled = false
        end
        if msg == "reactorTrue" then
            oreProcessEnabled = true
        end
        if msg == "reactorFalse" then
            oreProcessEnabled = false
        end
    end
end