API - minimalizace

min1 = ""
min2 = ""
min3 = ""

f=fs.open("/C/system/RAM/user","r")
user=f.readLine()
f.close()

data = fs.open ("/C/system/RAM/"..user.."/prlists", "r")
zapisovac = data.readLine ()
data.close ()
fs.delete ("/C/system/RAM/prlist")
fs.delete ("/C/system/RAM/prlists")

function minimalizator ()
    if fs.exists ("/C/system/RAM/"..user.."/m1") then
    data = fs.open ("/C/system/RAM/"..user.."/m1", "r")
    min1 = data.readLine ()
    data.close ()
    end

    if fs.exists ("/C/system/RAM/"..user.."/m2") then
    data = fs.open ("/C/system/RAM/"..user.."/m2", "r")
    min2 = data.readLine ()
    data.close ()
    end

    if fs.exists ("/C/system/RAM/"..user.."/m3") then
    data = fs.open ("/C/system/RAM/"..user.."/m3", "r")
    min3 = data.readLine ()
    data.close ()
    end

if min1 == zapisovac then
    shell.run ("/C/system/desktop.lua")
elseif min2 == zapisovac then
    shell.run ("/C/system/desktop.lua")
elseif min3 == zapisovac then
    shell.run ("/C/system/desktop.lua")
    end

if min1 == "" then
    min1 = zapisovac
    data = fs.open ("/C/system/RAM/"..user.."/m1", "w")
    data.writeLine (min1)
    data.close ()
    zapis ()
    end

if min2 == "" then
    min2 = zapisovac
    data = fs.open ("/C/system/RAM/"..user.."/m2", "w")
    data.writeLine (min2)
    data.close ()
    zapis ()
    end

if min3 == "" then
    min3 = zapisovac
    data = fs.open ("/C/system/RAM/"..user.."/m3", "w")
    data.writeLine (min3)
    data.close ()
    zapis ()
    end

min3 = min2
min2 = min1
min1 = zapisovac
    data = fs.open ("/C/system/RAM/"..user.."/m1", "w")
    data.writeLine (min1)
    data.close ()
    data = fs.open ("/C/system/RAM/"..user.."/m2", "w")
    data.writeLine (min2)
    data.close ()
    data = fs.open ("/C/system/RAM/"..user.."/m3", "w")
    data.writeLine (min3)
    data.close ()
    zapis ()
end

function zapis ()
    if fs.exists ("/C/system/RAM/"..user.."/m1") then
    if not fs.exists ("/C/system/RAM/"..user.."/m2") then
            if fs.exists ("/C/system/RAM/"..user.."/m3") then
                shell.run ("rename", "/C/system/RAM/"..user.."/m3", "/C/system/RAM/"..user.."/m2")
                end
                end
                end
if not fs.exists ("/C/system/RAM/"..user.."/m1") then
    if fs.exists ("/C/system/RAM/"..user.."/m2") then
            if fs.exists ("/C/system/RAM/"..user.."/m3") then
                shell.run ("rename", "/C/system/RAM/"..user.."/m2", "/C/system/RAM/"..user.."/m1")
                shell.run ("rename", "/C/system/RAM/"..user.."/m3", "/C/system/RAM/"..user.."/m2")
                end
                end
                end
if not fs.exists ("/C/system/RAM/"..user.."/m1") then
    if fs.exists ("/C/system/RAM/"..user.."/m2") then
            if not fs.exists ("/C/system/RAM/"..user.."/m3") then
                shell.run ("rename", "/C/system/RAM/"..user.."/m2", "/C/system/RAM/"..user.."/m1")
                end
                end
                end
if not fs.exists ("/C/system/RAM/"..user.."/m1") then
    if not fs.exists ("/C/system/RAM/"..user.."/m2") then
            if fs.exists ("/C/system/RAM/"..user.."/m3") then
                shell.run ("rename", "/C/system/RAM/"..user.."/m3", "/C/system/RAM/"..user.."/m1")
                end
                end
                end
    if fs.exists ("/C/system/RAM/"..user.."/prlist") then
        fs.delete ("/C/system/RAM/"..user.."/prlist")
        fs.delete ("/C/system/RAM/"..user.."/prlists")
        end
    data = fs.open ("/C/system/RAM/"..user.."/prlist", "w")
    data.writeLine (min1)
    data.writeLine (min2)
    data.writeLine (min3)
    data.close ()
    shell.exit ()
    shell.run("/C/desktop.lua")
    end

    minimalizator ()