command

local Stargate
local ReactorCount = 0
local Reactor = {}
local TurbineCount = 0
local Turbine = {}
local Capacitor = {}
local CapConnections = 0
local Computers = {}
local CompCount = 0
local Started = false
local Status = "normal"
local on = on
local hasRun = false
local CommandLabel = ShipRegistration
local CommandDrive = peripheral.wrap("bottom")

--Debug--
Debug = true


--Enderio Capacitor Bank Calculations--
CapCount = 1154
CapBasic = 1000000
CapStandard = 5000000
CapVibrant = 25000000
CapType = (CapBasic)
TotalCapacity = (CapCount) * (CapType)

--Enderio Capacitor Bank Fill Levels--
EmptyLevel = (TotalCapacity * 0.01)
LowLevel = (TotalCapacity * 0.15)
MedLevel = (TotalCapacity * 0.35)
HighLevel = (TotalCapacity * 0.65)
FullLevel = (TotalCapacity * 0.95)

--Program Functions--

--Debug--
function debugPeripherals()

  shell.run("clear")
  print("Debug On")
  print("----------")
  print(" ")
  print("Reactors Connected:   ", ReactorCount)
  if ReactorCount ~= 0 then
    i = 1
      while i <= ReactorCount do
        print("Reactor "..i.." Connected: ", Reactor[i].getConnected())
        i = i + 1
      end
  end
  print("Turbines Connected:   ", TurbineCount)
  if TurbineCount ~= 0 then
    i = 1
    while i <= TurbineCount do
      print("Turbine "..i.." Connected:  ", Turbine[i].getConnected())
      i = i + 1
    end
  end
  print("Cap. Banks Connected: ", CapConnections)
  print("Capacitor Count:    ", CapCount)
  print("Capacitor Type:     ", CapType)
  print("Total Capacity:  ", TotalCapacity)
  print("Computers Connected:   ", CompCount)
  print("Stargate Connected: ")
  print(" ")
  print("Press any key to Continue.")
  wait = read()

  shell.run("clear")
  print("Debug On")
  print("----------")
  print()
  print("Empty Level:  ", EmptyLevel)
  print("Low Level:    ", LowLevel)
  print("Medium Level: ", MedLevel)
  print("High Level:   ", HighLevel)
  print("Full Level:   ", FullLevel)
  print()
  print("Press any key to Continue")
  wait = read()
  end


--Peripheral Search--
function peripheralSearch()

  print("Initializing Connections...")
  sleep(.2)

  for a,b in pairs(peripheral.getNames()) do

    if peripheral.getType(b) == "BigReactors-Turbine" then
      print("Big Reactors Turbine Synced.")
      Turbine[#Turbine+1] = peripheral.wrap(b)
      TurbineCount = TurbineCount + 1
      sleep(.15)

    elseif peripheral.getType(b) == "tile_blockcapacitorbank_name" then
      print("Enderio Capacitor Bank Synced.")
      Capacitor[#Capacitor+1] = peripheral.wrap(b)
      CapConnections = CapConnections + 1
      sleep(.15)

    elseif peripheral.getType(b) == "BigReactors-Reactor" then
      print("Big Reactors Reactor Synced.")
      Reactor[#Reactor+1] = peripheral.wrap(b)
      ReactorCount = ReactorCount + 1
      sleep(.15)

    elseif peripheral.getType(b) == "stargate" then
      print("Stargate Controller Synced")
      Stargate = peripheral.wrap(b)
      sleep(.15)

    elseif peripheral.getType(b) == "computer" then
      print("Computer Terminal Synced.")
      Computers[#Computers+1] = peripheral.wrap(b)
      CompCount = CompCount + 1
      sleep(.15)

    elseif peripheral.getType(b) == "drive" then
      if b.isPresent == true then
        DiskLabel = b.getLabel()
      end

      if DiskLabel == CommandLabel then
        print("Command Program Identified.")
      else
        print("Unconnected Drive")
      end

    else
      print("Incompatible Device.")
      sleep(.15)
    end
  end

sleep(5)
print()
print()
print()
end

--System Start--
function systemStart(Boot)

  if Boot == false then

    print("Starting Computers.")
    sleep(.15)
    print("Please Wait..")

    for a,b in pairs(Computers) do
      b.turnOn()
      sleep(.25)
    end

    Started = true
    print("All Computers Started")
    sleep(.2)

  else

    for k,v in pairs(Computers) do
        if v.isOn() == false then
          v.turnOn()
          if Debug == true then
            print("Connection Reestablished")
          end
        end
    end
  end
end

-- Big Reactors Turbine Spinup--
function turbineSpinup()
  i = 1
  while i <= TurbineCount do
    Flow= Turbine[i].getFluidFlowRateMax()
      if Flow >= 1000 then
        Speed = "High"
      else
        Speed = "Low"
      end
    if Speed == "High" and Turbine[i].getRotorSpeed() < 1750 then
      Turbine[i].setInductorEngaged(false)

    elseif Speed == "Low" and Turbine[i].getRotorSpeed() < 750 then
      Turbine[i].setInductorEngaged(false)

    elseif Speed == "High" and Turbine[i].getRotorSpeed() >= 1750 then
      if Turbine[i].getInductorEngaged() == false then
        Turbine[i].setInductorEngaged(true)
      end

    elseif Speed == "Low" and Turbine[i].getRotorSpeed() >= 750 then
      if Turbine[i].getInductorEngaged() == false then
        Turbine[i].setInductorEngaged(true)
      end
    elseif Turbine[i].getRotorSpeed() == 0 then
      if Turbine[i].getInductorEngaged() == true then
        Turbine[i].setInductorEngaged(false)
      end
    end
  i =i +1
  end
end


--System ShutDown--
--Yellow Alert--
--Red Alert--
--Defense Systems--
--Offensive Systems--
--WarpCore Operations--
--Stargate Command--
--Self Destruct Sequence--
--Full Power Operation--
--Overdrive Operation--

--Economy Operation--
function economy()

  CapEnergyStored = Capacitor[1].getEnergyStored()
  EnergyStored = (CapEnergyStored) * (CapCount)

  if Debug == true then
    print(EnergyStored)
  end

  if EnergyStored <= EmptyLevel or EnergyStored == 0 then
    Reactor[1].setAllControlRodLevels(27)
    Turbine[1].setFluidFlowRateMax(1270)
    Turbine[2].setFluidFlowRateMax(1270)
    turbineSpinup()

  elseif EnergyStored >= EmptyLevel and EnergyStored <= LowLevel then
    Reactor[1].setAllControlRodLevels(28)
    Turbine[1].setFluidFlowRateMax(1270)
    Turbine[2].setFluidFlowRateMax(1270)
    turbineSpinup()

  elseif EnergyStored >= LowLevel and EnergyStored <= MedLevel then
    Reactor[1].setAllControlRodLevels(49)
    Turbine[1].setFluidFlowRateMax(1270)
    Turbine[2].setFluidFlowRateMax(550)
    turbineSpinup()

  elseif EnergyStored >= MedLevel and EnergyStored < HighLevel then
    Reactor[1].setAllControlRodLevels(65)
    Turbine[1].setFluidFlowRateMax(1270)
    Turbine[2].setFluidFlowRateMax(0)
    turbineSpinup()

   elseif EnergyStored >= HighLevel and EnergyStored <= FullLevel then
    Reactor[1].setAllControlRodLevels(85)
    Turbine[1].setFluidFlowRateMax(550)
    Turbine[2].setFluidFlowRateMax(0)
    turbineSpinup()

  elseif EnergyStored >= FullLevel then
    Reactor[1].setAllControlRodLevels(100)
    Turbine[1].setFluidFlowRateMax(0)
    if Turbine[2].getFluidFlowRateMax() == 0 then
      Turbine[2].setFluidFlowRateMax(0)
    end
    turbineSpinup()
  end
  print("Running Economy Operation")
end


--Normal Running Operations--
function normalOperation()

  CapEnergyStored = Capacitor[1].getEnergyStored()
  EnergyStored = (CapEnergyStored) * (CapCount)

  if Debug == true then
    print(EnergyStored)
  end

if EnergyStored >= 0 and EnergyStored <= MedLevel then
    Reactor[1].setAllControlRodLevels(28)
    i = 1
    while i <= TurbineCount do
      if Turbine[i].getInductorEngaged() == false then
        Turbine[i].setInductorEngaged(true)
      end

      Turbine[i].setFluidFlowRateMax(1270)
      i = i + 1
    end
    turbineSpinup()

  elseif EnergyStored >= MedLevel and EnergyStored <= FullLevel then
    Reactor[1].setAllControlRodLevels(69)
    i = 1
    while i <= TurbineCount do
      if Turbine[i].getInductorEngaged() == false then
        Turbine[i].setInductorEngaged(true)
      end

      Turbine[i].setFluidFlowRateMax(550)
      i = i + 1
    end
    turbineSpinup()

  else
    Reactor[1].setAllControlRodLevels(100)
    i = 1
    while i <= TurbineCount do
      if Turbine[i].getInductorEngaged() == true then
        Turbine[i].setInductorEngaged(false)
      end
      i = i + 1
    end
  end
  print("Running Normal Operation")
end

--Run Routine--

peripheralSearch()

if Debug == true then
  debugPeripherals()
end

systemStart(Started)

while true do
   local myTimer = os.startTimer(5)
  local evt = {os.pullEvent()}
  if evt[1] == "timer" and evt[2] == myTimer and on then

    if not hasRun and CommandDrive.getDiskLabel() == CommandLabel then --# checking if it has been run yet or not
      hasRun = not hasRun
      for k,v in pairs({peripheral.find("computer")}) do
        v.reboot() --# I think this is function name
      end
    end

    if Status == "normal" then
      normalOperation()
      systemStart(Started)

    elseif Status == "economy" then
      economy()
      systemStart(Started)

    end

  elseif evt[1] == "disk" then
    hasRun = false
    for a,b in pairs(Computers) do
      b.turnOn()
    end
    on = true

  elseif evt[1] == "disk_eject" then

    for a,b in pairs(Computers) do
      b.shutdown()
    end
    on = false
  end
  os.cancelTimer(myTimer)
end