OpenLaineOS

-- OpenLaineOS ver 1.1(beta)
forms=require("forms")
local term = require("term")
local shell = require("shell")
local computer = require("computer")
local component = require("component")
local os = require("os")
local img = require "imglib"
-- Переменные
os_ver = "1.1"
Form1=forms.addForm()
Form1.border=2
-- Обои скоро будут...
-- Всё
-- Выход
exitForm=forms.addForm()
exitForm.border=2
exitForm.W=35
exitForm.H=7
exitForm.left=math.floor((Form1.W-exitForm.W)/2)
exitForm.top =math.floor((Form1.H-exitForm.H)/2)
exitForm:addLabel(8,3,"Вы хотите выйти в консоль?")
exitForm:addButton(5,5,"Да",function() forms.stop() term.clear() end)
exitForm:addButton(18,5,"Нет",function() Form1:setActive() end)
-- Управление
controlForm=forms.addForm()
controlForm.border=2
controlForm.W=31
controlForm.H=7
controlForm.left=math.floor((Form1.W-controlForm.W)/2)
controlForm.top =math.floor((Form1.H-controlForm.H)/2)
controlForm:addLabel(8,3,"Что хотите сделать?")
controlForm:addButton(5,5,"Выключить",function() computer.shutdown(true) end)
controlForm:addButton(18,5,"Перезагрузить",function() computer.shutdown(reboot) end)
controlForm:addButton(20,1, "X" , function() Form1:setActive() end)
controlForm:addLabel(2,1,"Система")
-- Обновление
UpForm=forms.addForm()
UpForm.border=2
UpForm.W=80
UpForm.H=12
UpForm.left=math.floor((Form1.W-UpForm.W)/2)
UpForm.top =math.floor((Form1.H-UpForm.H)/2)
UpForm:addLabel(8,3,"Обновить систему? Ваша версия:")
UpForm:addLabel(8,4,os_ver)
UpForm:addLabel(3,8,"Примичание: если вы сделайте установку обновлений вручную то, вам нужно будет")
UpForm:addLabel(3,9,"в программах найти файл 'Custon update'")
UpForm:addLabel(3,10,"Примичание: Все данные пользователя при обновлении остаются")
UpForm:addButton(5,5,"Обновить",function() term.clear() os.execute("pastebin run ZkfNN8as installer") end)
UpForm:addButton(50,5,"Загрузить инсталлер и сделать установку вручную",function() os.execute("pastebin get ZkfNN8as installOS")  end)
UpForm:addButton(70,1, "X" , function() Form1:setActive() end)
UpForm:addLabel(2,1,"Обновление системы(beta)")
-- Кнопаны на столе
Btn1=Form1:addButton(2,2,"Выход",function() exitForm:setActive() end)
Btn1.color=0x818585
Btn2=Form1:addButton(11,2,"Управление",function() controlForm:setActive() end)
Btn2.color=0x818585
Btn3=Form1:addButton(21,2,"Программы",function() ProgForm:setActive() end)
Btn3.color=0x818585
Btn4=Form1:addButton(31,2,"О системе",function() os.execute("edit credits") os.execute("OS_start") end)
Btn4.color=0x818585
Btn4=Form1:addButton(44,2,"Выйти из системы",function() os.execute("Lock.lua") os.execute("OS_start") end)
Btn4.color=0x818585
Btn5=Form1:addButton(44,2,"Обновление системы",function() UpForm:setActive() end)
Btn5.color=0x818585
controlForm:addLabel(2,1,"Система")
-- Список программ
ProgForm=forms.addForm()
ProgForm.border=2
ProgForm:addLabel(2,1,"Программы")
Btn2=ProgForm:addButton(5,20,"X",function() Form1:setActive() end)
ProgForm.W=18
ProgForm.H=20
ProgForm.left=math.floor((Form1.W-ProgForm.W)/2)
ProgForm.top =math.floor((Form1.H-ProgForm.H)/2)
Btn2=ProgForm:addButton(5,3,"Midday commander",function() os.execute("mc") os.execute("OS_start") end)
Btn2.color=B0FAAF
Btn3=ProgForm:addButton(5,4,"RedBoardControl2",function() os.execute("redcontrol") os.execute("OS_start") end)
Btn3.color=B0FAAF
Btn4=ProgForm:addButton(5,5,"Tanspol(beta)",function() os.execute("Tans1") os.execute("OS_start") end)
Btn4.color=B0FAAF
Btn5=ProgForm:addButton(5,6,"Change Password",function() os.execute("edit Lock.lua") os.execute("OS_start") end)
Btn5.color=B0FAAF
Btn5=ProgForm:addButton(5,7,"Custom Update(beta)",function() os.execute("installOS") end)
Btn5.color=B0FAAF
forms.run(Form1)