test

-- This file contains functions for controlling a turbine system

-- Clear the terminal screen
function clear()
    mon.setBackgroundColor(colors.black)
    mon.clear()
    mon.setCursorPos(1,1)
end

-- Draw text on the terminal screen
function draw_text_term(x, y, text, text_color, bg_color)
    term.setTextColor(text_color)
    term.setBackgroundColor(bg_color)
    term.setCursorPos(x,y)
    write(text)
end

-- Draw text on the monitor screen
function draw_text(x, y, text, text_color, bg_color)
    mon.setBackgroundColor(bg_color)
    mon.setTextColor(text_color)
    mon.setCursorPos(x,y)
    mon.write(text)
end

-- Draw a line on the monitor screen
function draw_line(x, y, length, color)
    mon.setBackgroundColor(color)
    mon.setCursorPos(x,y)
    mon.write(string.rep(" ", length))
end

-- Draw a line on the terminal screen
function draw_line_term(x, y, length, color)
    term.setBackgroundColor(color)
    term.setCursorPos(x,y)
    term.write(string.rep(" ", length))
end

-- Draw a progress bar on the monitor screen
function progress_bar(x, y, length, minVal, maxVal, bar_color, bg_color)
    draw_line(x, y, length, bg_color) --background bar
    local barSize = math.floor((minVal/maxVal) * length)
    draw_line(x, y, barSize, bar_color) --progress so far
end

-- Draw a progress bar on the terminal screen
function progress_bar_term(x, y, length, minVal, maxVal, bar_color, bg_color)
    draw_line_term(x, y, length, bg_color) --background bar
    local barSize = math.floor((minVal/maxVal) * length)
    draw_line_term(x, y, barSize, bar_color) --progress so far
end

-- Draw the menu bar on the monitor screen
function menu_bar()
    draw_line(1, 1, monX, colors.blue)
    draw_text(2, 1, "      Turbine Control", colors.white, colors.blue)
    draw_line(1, 19, monX, colors.blue)
    draw_text(2, 19, "     Turbine Control", colors.white, colors.blue)
end

-- Main function for displaying turbine homepage
function turbine_homepage()
    while true do
        clear()
        menu_bar()
        terminal_screen()

        -- Get turbine status
        active = turbine.getActive()
        energy_stored = turbine.getEnergyStored()

        -- Display power status
        draw_text(2, 3, "Status: ", colors.yellow, colors.black)
        if active then
            draw_text(10, 3, "ONLINE", colors.lime, colors.black)
        else
            draw_text(10, 3, "OFFLINE", colors.red, colors.black)
        end

        -- Display router speed
        draw_text(2, 5, "Router Speed: ", colors.yellow, colors.black)
        local maxVal = 2000
        local minVal = math.floor(turbine.getRotorSpeed())
        draw_text(19, 5, minVal.." rpm", colors.white, colors.black)

        -- Draw progress bar based on router speed
        if minVal < 700 then
            progress_bar(2, 6, monX-2, minVal, maxVal, colors.lightBlue, colors.gray)
        elseif minVal < 900 then
            progress_bar(2, 6, monX-2, minVal, maxVal, colors.lime, colors.gray)
        elseif minVal < 1700 then
            progress_bar(2, 6, monX-2, minVal, maxVal, colors.lightBlue, colors.gray)
        elseif minVal < 1900 then
            progress_bar(2, 6, monX-2, minVal, maxVal, colors.lime, colors.gray)
        elseif minVal < 2000 then
            progress_bar(2, 6, monX-2, minVal, maxVal, colors.yellow, colors.gray)
        elseif minVal >= 2000 then
            progress_bar(2, 6, monX-2, minVal, maxVal, colors.red, colors.gray)
        end

        -- Display steam level
        draw_text(2, 8, "Steam Amount: ", colors.yellow, colors.black)
        local maxVal = 4000
        local minVal = math.floor(turbine.getInputAmount())
        draw_text(19, 8, minVal.." mB", colors.white, colors.black)
        progress_bar(2, 9, monX-2, minVal, maxVal, colors.lightGray, colors.gray)

        -- Display water level
        draw_text(2, 11, "Water Amount: ", colors.yellow, colors.black)
        local maxVal = 4000
        local minVal = math.floor(turbine.getOutputAmount())
        draw_text(19, 11, minVal.." mB", colors.white, colors.black)
        progress_bar(2, 12, monX-2, minVal, maxVal, colors.blue, colors.gray)

        -- Display RF production
        draw_text(2, 14, "RF/tick: ", colors.yellow, colors.black)
        rft = math.floor(turbine.getEnergyProducedLastTick())
        draw_text(19, 14, rft.." RF/T", colors.white, colors.black)

        -- Display RF storage
        draw_text(2, 15, "RF Stored:", colors.yellow, colors.black)
        local maxVal = 1000000
        local minVal = energy_stored
        local percent = math.floor((energy_stored/maxVal)*100)
        draw_text(19, 15, percent.."%", colors.white, colors.black)

        -- Display flow rate
        draw_text(2, 16, "Flow Rate: ", colors.yellow, colors.black)
        flow_rate = turbine.getFluidFlowRateMax()
        draw_text(19, 16, flow_rate.." mB/t", colors.white, colors.black)

        -- Display coil status
        engaged = turbine.getInductorEngaged()
        draw_text(2, 17, "Coils: ", colors.yellow, colors.black)
        if engaged then
            draw_text(19, 17, "Engaged", colors.lime, colors.black)
        else
            draw_text(19, 17, "Disengaged", colors.red, colors.black)
        end

        sleep(0.5)
    end
end

-- Function for displaying terminal screen
function terminal_screen()
    term.clear()
    draw_line_term(1, 1, 55, colors.blue)
    draw_text_term(13, 1, "Turbine Control", colors.white, colors.blue)
    draw_line_term(1, 19, 55, colors.blue)
    draw_text_term(13, 19, "by jaranvil aka jared314", colors.white, colors.blue)

    draw_text_term(1, 3, "Current program:", colors.white, colors.black)
    draw_text_term(1, 4, "Turbine Control v", colors.blue, colors.black)

    draw_text_term(1, 6, "Installer:", colors.white, colors.black)
    draw_text_term(1, 7, "pastebin.com/p4zeq7Ma", colors.blue, colors.black)

    draw_text_term(1, 9, "Please give me your feedback, suggestions,", colors.white, colors.black)
    draw_text_term(1, 10, "and errors!", colors.white, colors.black)

    draw_text_term(1, 11, "reddit.com/r/br_controls", colors.blue, colors.black)
end

-- Function for testing turbine connection
function test_turbine_connection()
    turbine = peripheral.wrap(name)  --wrap turbine
    c = turbine.getConnected()
    if unexpected_condition then error() end
end

-- Function for testing monitor connection
function test_monitor_connection()
    mon = peripheral.wrap(side) --wrap monitor
    monX, monY = mon.getSize() --get monitor size
    if unexpected_condition then error() end
end

-- Test if the entered monitor and turbine can be wrapped
function test_configs()
    term.clear()
    draw_line_term(1, 1, 55, colors.blue)
    draw_text_term(10, 1, "BigReactor Controls v", colors.white, colors.blue)
    draw_line_term(1, 19, 55, colors.blue)
    draw_text_term(10, 19, "by jaranvil aka jared314", colors.white, colors.blue)
    sleep(.4)
    draw_text_term(1, 3, "Wrapping peripherals...", colors.blue, colors.black)
    sleep(.15)
    draw_text_term(2, 5, "wrap monitor...", colors.white, colors.black)
    sleep(0.1)
    if pcall(test_monitor_connection) then
        draw_text_term(18, 5, "success", colors.lime, colors.black)
    else
        draw_text_term(1, 4, "Error:", colors.red, colors.black)
        draw_text_term(1, 8, "Could not connect to monitor on right", colors.red, colors.black)
        draw_text_term(1, 9, "Valid sides are 'left', 'right', 'top', 'bottom' and 'back'", colors.white, colors.black)
        draw_text_term(1, 11, "Press Enter to continue...", colors.gray, colors.black)
        wait = read()
    end

    sleep(0.1)
    draw_text_term(2, 6, "wrap turbine...", colors.white, colors.black)
    sleep(0.1)
    if pcall(test_turbine_connection) then
        draw_text_term(18, 6, "success", colors.lime, colors.black)
    else
        draw_text_term(1, 8, "Error:", colors.red, colors.black)
        draw_text_term(1, 9, "Could not connect to ", colors.red, colors.black)
        draw_text_term(1, 10, "Turbine must be connected with networking cable and wired modem", colors.white, colors.black)
        draw_text_term(1, 12, "Press Enter to continue...", colors.gray, colors.black)
        wait = read()
    end

    sleep(0.1)
    draw_text_term(1, 10, "Setup Complete!", colors.lime, colors.black)
    sleep(3)

    auto = auto_string == "true"
    turbine_homepage()
end

-- Function for starting the program
function start()
    for k,v in pairs(rs.getSides()) do
        if peripheral.getType(v) == "BigReactors-Turbine" then
            name = v
        elseif peripheral.getType(v) == "monitor" then
            side = v
        end
    end
    test_configs()
    clear()
end

start()