Reactor-Turbine Control Program

--[[Stravides Reactor and Turbine Control Monitor ]]--
--  Nomenclature
--  brt Big Reactor Turbine
--  brr Big Reactor Reactor

local brt_One = peripheral.wrap("BigReactors-Turbine_2")
local brr_One = peripheral.wrap("BigReactors-Reactor_21")
function test1()
  print(T_SendStatus)
  print(T_energyStored)
  print(T_rotorSpeed)
  print(T_inputAmt)
  print(T_inputType)
  print(T_outputAmt)
  print(T_outputType)
  print(T_FlAmtMax)
  print(T_flFlowRate)
  print(T_flFlowRateMax)
  print(T_getEnergy)
end

function test2()
  print(T_IndSendStatus)
  print(R_SendStatus)
  print(R_EnergyStored)
  print(R_FuelTemp)
  print(R_Temp)
  print(R_HFL)
  print(R_GEP)
  print(R_CaseTemp)
  print(R_CType)
  print(R_HFType)
  print(R_HFAmt)
end

function test3()
  print(R_HFAmtMax)
  print(R_HFPct)
  print(R_coollvl)
  print(R_coolmax)
  print(R_coolpct)
  print(R_fuelUsed)
  print(R_fuelLevel)
  print(R_fuelMax)
  print(R_wasteLevel)
  print(R_fuelPct)
end

function prepMsg()
-- Turbine Variables
  local T_status        = brt_One.getActive()
  local T_energyStored  = brt_One.getEnergyStored()
  local T_rotorSpeed    = brt_One.getRotorSpeed("")
  local T_inputAmt      = brt_One.getInputAmount()
  local T_inputType     = brt_One.getInputType()
  local T_outputAmt     = brt_One.getOutputAmount()
  local T_outputType    = brt_One.getOutputType()
  local T_flAmtMax      = brt_One.getFluidAmountMax()
  local T_flFlowRate    = brt_One.getFluidFlowRate("")
  local T_flFlowRateMax = brt_One.getFluidFlowRateMax("")
  local T_getEnergy     = brt_One.getEnergyProducedLastTick("")
  local T_indStatus     = brt_One.getInductorEngaged()

-- Reactor Variables
  local R_status        = brr_One.getActive()
  local R_EnergyStored  = brr_One.getEnergyStored()
  local R_FuelTemp      = brr_One.getFuelTemperature()
  local R_Temp          = brr_One.getCasingTemperature()
  local R_HFL           = brr_One.getHotFluidProducedLastTick()
  local R_GEP           = brr_One.getEnergyProducedLastTick()
  local R_CaseTemp      = brr_One.getCasingTemperature()
  local R_CType         = brr_One.getCoolantType()
  local R_HFType        = brr_One.getHotFluidType()
  local R_HFAmt         = brr_One.getHotFluidAmount()
  local R_HFAmtMax      = brr_One.getHotFluidAmountMax()
  local R_HFPct         = R_HFAmt/R_HFAmtMax


  local R_coollvl       = brr_One.getCoolantAmount("")
  local R_coolmax       = brr_One.getCoolantAmountMax("")
  local R_coolpct       = R_coollvl/R_coolmax
  local R_fuelUsed      = brr_One.getFuelConsumedLastTick()
  local R_fuelLevel     = brr_One.getFuelAmount()
  local R_fuelMax       = brr_One.getFuelAmountMax()
  local R_wasteLevel    = brr_One.getWasteAmount()
  local R_fuelPct       = R_fuelLevel/R_fuelMax

local R_SendStatus
local T_SendStatus

if R_status==true
then R_SendStatus="Active"
else R_SendStatus="Offline"
end

if T_status==true
then T_SendStatus="Active"
else T_SendStatus="Offline"
end

if T_indStatus==true
then T_IndSendStatus="Engaged"
else T_IndSendStatus="Disengaged"
end

if T_outputType==NIL
then T_oputType="Empty"
else T_oputType=T_outputType
end

if T_inputType==NIL
then T_iputType="Empty"
else T_iputType=T_inputType
end

-- create message to send

test1()
  msg=T_SendStatus.."|"..T_energyStored.."|"..T_rotorSpeed.."|"..T_inputAmt.."|"..T_iputType.."|"..T_outputAmt.."|"..T_oputType.."|"..T_flAmtMax.."|"..T_flFlowRate.."|"..T_flFlowRateMax.."|"..T_getEnergy.."|"..T_IndSendStatus.."|"..R_SendStatus.."|"..R_EnergyStored.."|"..R_FuelTemp.."|"..R_Temp.."|"..R_HFL.."|"..R_GEP.."|"..R_CaseTemp.."|"..R_CType.."|"..R_HFType.."|"..R_HFAmt.."|"..R_HFAmtMax.."|"..R_HFPct.."|"..R_coollvl.."|"..R_coolmax.."|"..R_coolpct.."|"..R_fuelUsed.."|"..R_fuelLevel.."|"..R_fuelMax.."|"..R_wasteLevel.."|"..R_fuelPct

  rednet.open("bottom") -- Wireless Modem placed upon the Bottom of the Computer
  shell.run("clear")

  rednet.send(249,msg) -- Main screen
  end

print("Transferring Data to Main Display...")
print("Program is running <CTRL> <T> to stop")
while true do
  prepMsg()
  sleep(1)
end