ReactorControl

reactor = peripheral.wrap("back")

local totalenergy
local totalenergylasttick = 0
local comparelasttick
local crinsertion
local emax=10000000

reactor.setAllControlRodLevels(0)

function main()
    while true do
        reactorcheck = reactor.getConnected()
        active = reactor.getActive()
        numbercontrol = reactor.getNumberOfControlRods()
        totalenergy = reactor.getEnergyStored()
        lasttick = reactor.getEnergyProducedLastTick()

        --Is energy being used, should I turn on?
        comparelasttick = totalenergy - totalenergylasttick
        print(totalenergylasttick)
        print(comparelasttick)
        if comparelasttick == 0 then
            reactor.setActive(false)
        else
            reactor.setActive(true)
        end

        monitor.clear()
        print("Backup Fusion Reactor")
        print("---------------------")

        stractive = tostring(active)
        print("Active :" .. stractive)

        strtotalenergy= tostring(totalenergy)
        print("Total Energy :" .. strtotalenergy)

        strlasttick = tostring(lasttick)
        print("Energy Produced Last Tick :" .. strlasttick )

        for i=0,numbercontrol-1 do
            crinsertion = reactor.getControlRodLevel(i)
            print("Control Rod " .. i .. " : " .. crinsertion)
        end

        local e=reactor.getEnergyStored()
        local p=math.floor(100*e/emax)
        local a=p<100

        reactor.setAllControlRodLevels(p-1)

        os.startTimer(1)
        totalenergylasttick = totalenergy

        local event,p1,p2,p3,p4,p5 = os.pullEvent()
        if event == "key" then
            reactor.setActive(true)
                break
        elseif event == "peripheral_detach" or event == "peripheral" or event == "monitor_resize" then
                print("1")
        elseif not (event == "timer" or event=="disk" or event=="disk_eject") then
                print("2")
        end

    end
end

main()