--Selection Sample code atm :D
function Select(...)
  Msg = {"See you in hell!", "Prepare to DIE!!!!", "Who do you want to kill master...", "Destroy your PC! You are the 100,000,000th winner! Destroy your PC now to claim!", "Connecting to IRC... Connection failed", "Theres cake. Behind you. Yes. There."}
  local Table = {...}
  x,y = term.getSize()
  local Fit = math.floor(x)
  shell.run("clear")
  local function ClearOption(One, Two)
    term.setCursorPos(1, One)
    for n=1,3 do
      term.clearLine()
      term.setCursorPos(1, One+n)
    end
    term.setCursorPos(1, One+1)
    print(" "..Two)
  end
  local function SetOption(One, Two)
    term.setCursorPos(1, One)
    print(string.rep("=", string.len(Two)+2))
    print("="..Two.."=")
    write(string.rep("=", string.len(Two)+2))
  end
  function Startup()
    Status = 4
    No = 2
    SetOption(1, Table[1])
    while (Status-3) < Fit do
    if Table[No] then
    ClearOption(Status, Table[No])
    end
    No = No+1
    Status = Status+3
    end
    Status = 1
    No = 1
  end
  Startup()
  while true do
    event,param1,param2 = os.pullEvent()
    if event == "key" and param1 == 200 and Status > 1 and Table[No-1] then --Up. 208 is down
      ClearOption(Status, Table[No])
      No = No-1
      Status = Status-3
      SetOption(Status, Table[No])

    elseif event == "key" and param1 == 208 and Status < Fit and Table[No+1] then
      ClearOption(Status, Table[No])
      No = No+1
      Status = Status+3
      SetOption(Status, Table[No])
    elseif event == "key" and param1 == 28 then
      shell.run("clear")
      print(Msg[No])
      sleep(3)
      shell.run("clear")
      Startup()
    end
  end
end
Select("Bye", "Die", "Kill", "Destroy", "IRC", "Lie")