[Draconic Evolution] Draconic reactor control

--конфигурация (можно изменять)

local red_edge = 7895 -- после этой температуры, термометр станет красного цвета
local green_edge = 7780 -- до этой температуры, термометр будет зеленого цвета
-- все, что между этими цифрами, будет голубого цвета
--____________________________________________________________________________
--ниже лучше ничего не менять


local cpt = require("component")
local io = require("io")
local term = require("term")
local event = require("event")
local fs = require("filesystem")
--local color = require("colors")
local gpu = cpt.gpu
local fileName = "/home/gtadrs15.txt"
local fileWrite
local fileRead
local crash

local color = { }
color["red"]   = 0xFF0000
color["green"] = 0x00FF00
color["yellow"] = 0xFFFF00
color["goodtmp"] = 0x00FFFF

local rForeground = gpu.getForeground()
gpu.setForeground(0x00F000)
--fromgtadrs15 = true
if not cpt.isAvailable("draconic_reactor") then
print ("подключите адаптер к стабилизатору реактора")
term.read()
return
end
local react = cpt.draconic_reactor

printf = function (s,...)
return io.write(s:format(...))
end
 function colorprintf(c,s,...)
 local oldcolor = gpu.getForeground()
  gpu.setForeground(c)
  printf (s,...)
  gpu.setForeground(oldcolor)
  end
fileWrite=io.open(fileName,"a")
fileWrite:close()

if upadr ~= nil or downadr ~= nil then

if cpt.get(downadr) == nil or cpt.get(upadr)==nil then
print ("упс, кто-то сломал ваши адаптеры и адреса изменились")
upadr=nil
downadr = nil
crash = true
term.read()
return
end
else fromgtadrs15 = true
end
if ( fromgtadrs15 == nil or fromgtadrs15 == true) and (crash==false or crash == nil) then
fileRead = io.open(fileName,"r")
upadr,downadr =fileRead:read("*l","*l")
fileRead:close()
end


while upadr == nil  or downadr == nil do
local i = 0
for address in cpt.list("flux_gate") do
i=i+1
end
if i < 2  then
print ("подключите адаптеры к флюкс-гейтам")
term.read()
return

end
print ("адреса подключенных флюкс-гейтов\n")

for address in cpt.list("flux_gate") do
print (address,"\n")
end

while upadr == nil do
print ('введите первые символы адресса гейта, отвечающего за поток')
upadr = cpt.get(io.read(),"flux_gate")
if upadr == nil then print ("Неверный адресс *incorrect address\n")

end
end
while downadr == nil or downadr == upadr do
print ("Введите первые символы адреса гейта отвечающего за сдерживание")
downadr = cpt.get(io.read(),"flux_gate")
if downadr == nil or downadr == upadr then print ("Неверный адресс\n")
end
end
local conf = true
while conf do

printf ("\nАдресс поточного гейта:       %s \n",upadr)
printf ("Адресс сдерживающего гейта:   %s \n",downadr)
print ("\nвсе верно\n\n1-Да, продолжить\n2-Нет, изменить")
local chk = io.read()
if chk  == "1" then conf = false
elseif chk == "2" then
upadr = nil
downadr = nil
term.clear()
conf = false
else
print ("\nне понял (введите 1 или 2) * i don't understald (type 1 or 2)\n")

end

end

crash = false
fromgtadrs15 = true
end
fileWrite=io.open(fileName,"w")
fileWrite:write(upadr.."\n"..downadr.."\n")
fileWrite:close()

--cpt.setPrimary("flux_gate",upadr)
local upgate = cpt.proxy(cpt.get(tostring(upadr)))
local downgate = cpt.proxy(cpt.get(tostring(downadr)))


function keydown(eventname,keyboardaddress,char,code,playername)
end

term.clear()

colorprintf(color["red"],"Нажмите ENTER, чтобы продолжить")
term.read()

prog = true
dynamic = false



while(prog==true) do

if cpt.get(upadr) ~= nil and cpt.get(downadr) ~= nil and cpt.isAvailable("draconic_reactor") then
tst1 = react.getReactorInfo()
if cpt.isAvailable("draconic_rf_storage") then
local core = cpt.draconic_rf_storage


local coreT = core.getEnergyStored()/10^12
local coreB = core.getEnergyStored()/10^9
local coreM = core.getEnergyStored()/10^6
local coreK = core.getEnergyStored()/10^3
if core.getEnergyStored() > 10^12 then
printf ("накоплено в ядре: %0.3f T\n\n",coreT)
elseif core.getEnergyStored() > 10^9 then
printf ("накоплено в ядре: %0.3f B\n\n",coreB)
elseif core.getEnergyStored() > 10^6 then
printf ("накоплено в ядре: %0.3f M\n\n",coreM)
elseif core.getEnergyStored() > 10^3 then
printf ("накоплено в ядре: %0.3f K\n\n",coreK)
else
printf ("накоплено в ядре: %d K\n\n",core.getEnergyStored())
end
end
if tst1.temperature<green_edge then
printf ("температура:_______   %0.2f\n",tst1.temperature)
elseif tst1.temperature>=green_edge and tst1.temperature<red_edge then
printf ("температура:_______   ") colorprintf(color.goodtmp,"%0.2f\n",tst1.temperature)
else
printf ("температура:_______   ") colorprintf(color.red,"%0.2f\n",tst1.temperature)
end
printf ("вырабатывает:______   %d \n",tst1.generationRate)

printf ("поток:_____________   %d \n",upgate.getFlow())
--printf ("верхний поток (upper flow):_____   %d \n",upgate.getSignalLowFlow())
printf ("итоговая мосч:_____   ") colorprintf(color.yellow,"%d \n",tst1.generationRate - downgate.getFlow())
printf ("поглащает:_________   %d \n",tst1.fieldDrainRate)
printf ("\nмощность поля:_____   %d / %d (%0.2f %%) \n", tst1.fieldStrength,tst1.maxFieldStrength,(tst1.fieldStrength/tst1.maxFieldStrength)*100)
printf ("насыщенность:______   %d / %d (%0.2f %%) \n",tst1.energySaturation,tst1.maxEnergySaturation,(tst1.energySaturation/tst1.maxEnergySaturation)*100)
printf ("топливо:___________   %d / %d (%0.2f %%) \n",tst1.fuelConversion,tst1.maxFuelConversion,(tst1.fuelConversion/tst1.maxFuelConversion)*100)
printf ("расход топлива:______ %d",tst1.fuelConversionRate)
if (tst1.fuelConversion/tst1.maxFuelConversion)*100 > 78 then
colorprintf (colr.red,"\nКРИТИЧЕСКИЙ УРОВЕНЬ ТОПЛИВА, ПОДГОТОВЬТЕ РЕАКТОР К ВЫКЛЮЧЕНИЮ\n")
end
print ("\n(y) измененить потрк, (g) выход, (r) изменить адреса гейдов \n")
event.listen ("key_down",keydown)
-- if dynamic == false then event.pull(keydown) end
function keydown(eventname,keyboardaddress,char,code,playername)

if code == 21 then do
x=term.read()
hflow = upgate.getSignalLowFlow()
sum = hflow+x
hflow=upgate.setSignalLowFlow(sum)
end

 --elseif code == 32 then dynamic = not dynamic

 elseif code == 19 then do
 upadr = nil
 downadr = nil
 prog = false
 fromgtadrs15 = false
 fs.remove(fileName)
 event.ignore("key_down",keydown)
 end

elseif code == 34 then do prog = false
event.ignore("key_down",keydown)
end
end

end
 os.sleep(0.5)
term.clear()
 else print ("Не ломайте адаптеры")
 event.ignore("key_down",keydown)
 term.read()
 return
 end
end
gpu.setForeground(rForeground)