KPR-BM-BM(TELEPIT)

term.clear()
term.setCursorPos(1,1)
print("startup.boot fajlok ellenorzese...")
sleep(0.5)

if fs.exists("startup.boot") then
startup = "van"
else
startup = "nincs"
end

if fs.exists("disk/startup.boot") then
lemez = "van"
else
lemez = "nincs"
end

if fs.exists("disk2/startup.boot") then
lemez2 = "van"
else
lemez2 = "nincs"
end

if fs.exists("disk3/startup.boot") then
lemez3 = "van"
else
lemez3 = "nincs"
end

if fs.exists("disk4/startup.boot") then
lemez4 = "van"
else
lemez4 = "nincs"
end

if fs.exists("disk5/startup.boot") then
lemez5 = "van"
else
lemez5 = "nincs"
end

if fs.exists("disk6/startup.boot") then
lemez6 = "van"
else
lemez6 = "nincs"
end

if fs.exists("disk7/startup.boot") then
lemez7 = "van"
else
lemez7 = "nincs"
end

sleep(1)

term.clear()
term.setCursorPos(1,1)

if startup == "van" then
shell.run("bm2.inf")
print("1 - " .. bname)
end

if lemez == "van" then
shell.run("disk/bm2.inf")
print("2 - " .. bname)
end

if lemez2 == "van" then
shell.run("disk2/bm2.inf")
print("3 - " .. bname)
end

if lemez3 == "van" then
shell.run("disk3/bm2.inf")
print("4 - " .. bname)
end

if lemez4 == "van" then
shell.run("disk4/bm2.inf")
print("5 - " .. bname)
end

if lemez5 == "van" then
shell.run("disk5/bm2.inf")
print("6 - " .. bname)
end

if lemez6 == "van" then
shell.run("disk6/bm2.inf")
print("7 - " .. bname)
end

if lemez7 == "van" then
shell.run("disk7/bm2.inf")
print("8 - " .. bname)
end

term.write("Szam>")
local bevitel = read()

if bevitel == "0" then
print("Kilepes...")
elseif bevitel == "1" then
shell.run("startup.boot")
elseif bevitel == "2" then
shell.run("disk/startup.boot")
elseif bevitel == "3" then
shell.run("disk2/startup.boot")
elseif bevitel == "4" then
shell.run("disk3/startup.boot")
elseif bevitel == "5" then
shell.run("disk4/startup.boot")
elseif bevitel == "6" then
shell.run("disk5/startup.boot")
elseif bevitel == "7" then
shell.run("disk6/startup.boot")
elseif bevitel == "8" then
shell.run("disk7/startup.boot")
else
print("Nincs ilyen szam!")
sleep(1.5)
term.clear()
term.setCursorPos(1,1)
bevitel()
end