Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- x, y = term.getSize()
- --names and programes
- words = {first = {name = "first", program = "program1"},
- second = {name = "second", program = "program2"},
- third = {name = "third", program = "program3"}}
- --positions
- pos = {math.ceil(y/4), math.ceil(y/4*2), math.ceil(y/4)*3}
- --variables
- sel = 1
- relay = true
- version = "v-.-.-"
- function center(text, str)
- term.setCursorPos(x/2 - math.floor(#text/2), str)
- write(text)
- end
- function left(text, str)
- term.setCursorPos(1, str)
- write(text)
- end
- function right(text, str)
- term.setCursorPos(x-#text, str)
- write(text)
- end
- function line(text, str)
- for i = 1, x do
- term.setCursorPos(i, str)
- write(text)
- end
- end
- function wline(text, str)
- for i = 1, y do
- term.setCursorPos(str, i)
- write(text)
- end
- end
- function window()
- term.clear()
- line("=", 1)
- line("=", y)
- wline("=", 1)
- wline("=", x)
- center(words.first.name, pos[1])
- center(words.second.name, pos[2])
- center(words.third.name, pos[3])
- right("========", y-1)
- right(" "..version, y)
- end
- function test()
- if sel == 1 then
- center("> "..words.first.name.." <", pos[1])
- elseif sel == 2 then
- center("> "..words.second.name.." <", pos[2])
- elseif sel == 3 then
- center("> "..words.third.name.." <", pos[3])
- end
- end
- window()
- test()
- print(a)
- while relay do
- local event, key = os.pullEvent()
- if key == keys.up and sel > 1 then sel = sel - 1
- window()
- test()
- elseif key == keys.down and sel < 3 then sel = sel + 1
- window()
- test()
- elseif key == keys.leftAlt then
- term.clear()
- relay = false
- term.setCursorPos(1, 1)
- elseif key == keys.enter and sel == 1 then
- shell.run(words.first.program)
- relay = false
- elseif key == keys.enter and sel == 2 then
- shell.run(words.second.program)
- relay = false
- elseif key == keys.enter and sel == 3 then
- shell.run(words.third.program)
- relay = false
- end
- end
- term.clear()
- term.setCursorPos(1, 1)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement