menu

function CUI(m)
n = 1
l = #m
while true do
term.clear()
term.setCursorPos(1,1)
term.setTextColor(colors.green)
print("Devil Inc. Softwares")
term.setTextColor(colors.white)
term.setCursorPos(1,2)
for i=1, l, 1 do
if i==n then print(">"..m[i].."<") else print(" ",m[i]) end
end
a, b = os.pullEventRaw()
if a =="key" then
if b == 200 and n>1 then n=n-1 end
if b == 208 and n<l then n=n+1 end
if b == 28 then break end
end
end
term.clear() term.setCursorPos(1,1)
return n
end


--[[Password]]--
function password()

term.clear()
term.setCursorPos(1,1)
term.write("Admin Enter Password: ")
password = read("*")
if password == "placeholder" then
 print("Correct")
  else
 print("Incorrect") sleep(2)
 os.reboot()
end
end
--[Yes/No Options]]--
function yN()
local n=1
while true do
local x,y=term.getCursorPos()
term.clearLine()
if n == 1 then write(">Yes< No") else write(" Yes >No<") end
term.setCursorPos(x,y)
a, b=os.pullEvent()
while a ~="key" do a,b =os.pullEvent() end
if b == 203 and n==2 then n=1 end
if b == 205 and n==1 then n=2 end
if b == 28 then print("") break end
end
if n==1 then return true end
if n==2 then return true end
return false
end

--[[print Online]]--
function online(var)

 if n==1 then term.setTextColor(colors.lime) print(var.." Online") sleep(2) os.reboot() end
 if n==2 then term.setTextColor(colors.red) print(var.." Offline") sleep(2) os.reboot() end
 if n==3 then os.reboot() end
end
--[[Print On]]--
function on(var)

 if n==1 then term.setTextColor(colors.lime) print(var.." On") sleep(2) os.reboot() end
 if n==2 then term.setTextColor(colors.red) print(var.." Off") sleep(2) os.reboot() end
 if n==3 then os.reboot() end
end

--[[Write function]]--
function writeState(filename, _state)
    file = fs.open(filename, "w")
    file.write(_state)
    file.close()
end
--[[Read Function]]--

function readState(filename)
     if not fs.exists(filename) then
        writeState(stateFile, state)
        return
     end
     file = fs.open(filename, "r")
     state = file.readLine()
     file.close()
end
--[[Tables]]--

local n = 1
local options={
"Lights",
"Doors",
"Shields",
"Options:Admins Only",
"Buildcraft Machines",
"Industrial Machines",
"Forestry Machines",
}
local lights={
"On",
"Off",
"Back"
}
local doors={
"Open",
"Close",
"Back"
}
local shields={
"On",
"Off",
"Back"
}
local buildcraftmachines ={
"Pumps",
"Refinery",
"Back"
}
local industrialcraftmachines ={
"Nuclear Reactor",
"Power Production",
"Back"
}
local forestrymachines ={
"Peat Farm",
"Tree Farm",
"Rubber Tree Farm",
"Cactus Farm",
"Pumpkin Farm",
"Reed Farm",
"Still",
"Bio Generator",
"Back"
}

local subbuildcraft ={
"On",
"Off",
"Back"
}

local subindustrialcraft ={
"On",
"Off",
"Back",
}

local subforestry ={
"On",
"Off",
"Back"
}
--[[Executed Commands]]--

readState(stateFile)

local n=CUI(options)
--[[Lights]]--
if n == 1 then local n=CUI(lights)
  on("Lights")
end

--[[Doors]]--
if n == 2 then local n=CUI(doors)
  if n == 1 then term.setTextColor(colors.lime) print("Doors Open") redstone.setOutput("right", true) state == "on" writeState(stateFile, state) sleep(2) os.reboot() end
  if n == 2 then term.setTextColor(colors.red) print("Doors Close") sleep(2) os.reboot() end
  if n == 3 then os.reboot() end
end
--[[Shields]]--
if n == 3 then local n =CUI(shields)
  online("Shields")
end
--[[Password]]--
if n == 4 then password() end

--[[Buildcraft Pumps]]--
if n == 5 then local n=CUI(buildcraftmachines)
  if n == 1 then local n=CUI(subbuildcraft)
    online("Pumps")

--[[Buildcraft Refinery]]--
  elseif n == 2 then local n=CUI(subbuildcraft)
    online("Refinery")

  elseif n == 3 then os.reboot() end
end
--[[Industrialcraft Nuclear Reactor]]--
if n == 6 then local n=CUI(industrialcraftmachines)
  if n == 1 then local n=CUI(subindustrialcraft)
   online("Nuclear Reactor")
--[[Power Production]]--
  elseif n == 2 then local n=CUI(subindustrialcraft) end
   online("Power Production")

  elseif n == 3 then os.reboot()
end
--[[Peat Farm]]--
if n == 7 then local n=CUI(forestrymachines)
  if n == 1 then local n=CUI(subforestry)
     online("Peat Farm")

--[[Tree Farm]]--
  elseif n == 2 then local n=CUI(subforestry)
     online("Tree Farm")
--[[Rubber Tree Farm]]--
  elseif n == 3 then local n=CUI(subforestry)
     online("Rubber Tree Farm")
--[[Cactus Farm]]--
  elseif n == 4 then local n=CUI(subforestry)
     online("Cactus Farm")
--[[Pumpkin Farm]]--
  elseif n == 5 then local n=CUI(subforestry)
     online("Pumpkin Farm")
--[[Reed Farm]]--
  elseif n == 6 then local n=CUI(subforestry)
     online("Reed Farm")
--[[Stillery]]--
  elseif n == 7 then local n=CUI(subforestry)
     online("Stillery")
--[[Bio Generation]]--
  elseif n == 8 then local n=CUI(subforestry)
     if n == 1 then term.setTextColor(colors.lime) print("Bio Generation Enabled") sleep(2) os.reboot() end
     if n == 2 then term.setTextColor(colors.red) print("Bio Generation Disabled") sleep(2) os.reboot() end
     if n == 3 then os.reboot()end

  elseif n == 9 then os.reboot() end

end