NextUI 2.0 Startup

local function s(...) return sleep(...) end
local function aw(...) return write(...) end
local function p(...) return print(...) end
local function tw(...) return term.write(...) end
local function scp(...) return term.setCursorPos(...) end
local function sbc(...) return term.setBackgroundColor(...) end
local function stc(...) return term.setTextColor(...) end
local function tc(...) return term.clear(...) end
local function tcl(...) return term.clearLine(...) end
local function r(...) return shell.run(...) end
local function sp(...) return textutils.slowPrint(...) end
local function sw(...) return textutils.slowWrite(...) end
local function fse(...) return fs.exists(...) end
local function pul(...) return paintutils.loadImage(...) end
local function pud(...) return paintutils.drawImage(...) end
local function pfb(...) return paintutils.drawFilledBox(...) end
local function su(...) return os.shutdown(...) end
local function re(...) return os.reboot(...) end
local function pdp(...) return paintutils.drawPixel(...) end

args = {...}
speakerPresent = 0
local w, h = term.getSize()

function nilToBrak(str)
    if str == nil then str = "Brak" end
    return str
end

function findPeripherals()
    peripherals = {}

    peripherals[1] = nilToBrak(peripheral.getType("top"))
    peripherals[2] = nilToBrak(peripheral.getType("bottom"))
    peripherals[3] = nilToBrak(peripheral.getType("left"))
    peripherals[4] = nilToBrak(peripheral.getType("right"))
    peripherals[5] = nilToBrak(peripheral.getType("front"))
    peripherals[6] = nilToBrak(peripheral.getType("back"))

    return peripherals
end

peripherals = findPeripherals()
for i=1,6 do
    if peripherals[i] == "speaker" then speakerPresent = i end
end

function bsod(powod)
    sbc(colors.blue)
    tc()
    sbc(colors.blue)
    stc(colors.white)
    ac = w/2
    scp(ac-2,3)
    sbc(colors.white)
    stc(colors.black)
    p("NextUI")
    sbc(colors.blue)
    stc(colors.white)
    scp(1,6)
    p[[System NextUI napotkal problem i musial zostac zatrzymany. Jesli widzisz ten ekran po raz pierwszy poczekaj na ponowny       rozruch komputera, jednakze jesli blad bedzie sie powtarzal byc moze konieczna bedzie naprawa systemu NextUI. Aby jej dokonac   uruchom Program Instalacyjny NextUI oraz postepuj z jego wskazowkami.
    Trwa zbieranie informacji na temat Bledu STOP]]
    if speakerPresent ~= 0 then
        speaker = peripheral.find("speaker")
        speaker.playNote("chime")
        s(0.5)
        speaker.playNote("chime")
        s(0.5)
        speaker.playNote("chime")
        s(0.5)
        speaker.playNote("chime")
        s(0.5)
        speaker.playNote("chime")
        end
    s(4)
    p("Nazwa bledu: ", powod)
    p("")
    p("")
    s(10)
    re()
end

sbc(colors.black)
tc()
sbc(colors.black)
scp(1,1)
sbc(colors.gray)
stc(colors.white)
sp("NextUI 2.0")
if speakerPresent ~= 0 then
scp(1,3)
sp("Loading sound extension...")
speaker = peripheral.find("speaker")
speaker.playNote("chime")
s(0.1)
speaker.playNote("bass")
s(0.1)
speaker.playNote("guitar")
end
scp(1,5)
sp("Booting into NextExplorer...")

shell.setDir("/")
if pcall(shell.run("/os/main/menu")) then
    r("/os/main/menu")
else
    if pcall(shell.run("/os/main/menu.backup")) then
        r("/os/main/menu")
    else
        bsod("NextKernel General Error")
    end
end