Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- turbine = {peripheral.find("BigReactors-Turbine")}
- m = peripheral.wrap("back")
- mt = peripheral.wrap("monitor_274")
- bank = {peripheral.find("tile_blockcapacitorbank_name")}
- m.setBackgroundColor(colors.blue)
- m.clear()
- local function nLineOne()
- lineOne = lineOne+1
- m.setCursorPos(1,lineOne)
- end
- local function nLineTwo()
- lineTwo = lineTwo+1
- m.setCursorPos(1,lineTwo)
- end
- local function getSpeed()
- for i = 1,4 do
- m.write("Turbine "..i..": is at : ".. math.floor(turbine[i].getRotorSpeed()).." RPM")
- nLineOne()
- end
- for i = 5,8 do
- mt.write("Turbine "..i..": is at : ".. math.floor(turbine[i].getRotorSpeed()).." RPM")
- end
- local function bk()
- if bank[1].getEnergyStored() > bank[1].getMaxEnergyStored()/2 then
- for i = 1,#turbine do
- turbine[i].setInductorEngaged(false)
- end
- else
- for i =1,#turbine do
- turbine[i].setInductorEngaged(true)
- end
- end
- end
- local function setSpeed()
- for i = 1,#turbine do
- if turbine[i].getRotorSpeed() < 1830 then
- turbine[i].setInductorEngaged(false)
- elseif turbine[i].getRotorSpeed() > 1840 then
- turbine[i].setInductorEngaged(true)
- end--if
- end--for
- end-- func
- local function isEngaged()
- for i = 4 do
- m.write("Turbine "..i..": inductor engaged: ".. tostring(turbine[i].getInductorEngaged()))
- nLineOne()
- end
- for i =5,8 do
- mt.write("Turbine "..i..": inductor engaged: ".. tostring(turbine[i].getInductorEngaged()))
- nLineTwo()
- end
- local function rfTick()
- for i = 1,4 do
- m.write("Turbine ".. i ..": produced : ".. math.ceil(turbine[i].getEnergyProducedLastTick()).." RF")
- nLineOne()
- end
- for i = 5,8 do
- mt.write("Turbine "..i..": procuced : "..math.ceil(turbine[i].getEnergyProducedLastTick()).." RF")
- end
- end
- end
- term.redirect(m)
- while true do
- bk()
- setSpeed()
- term.clear()
- term.setCursorPos(1,1)
- print("Turbine Info")
- getSpeed()
- rfTick()
- isEngaged()
- sleep(.5)
- end
- term.native()
Add Comment
Please, Sign In to add comment