startup

textTable={
  "Welcome to NanoTech!",
  "NanoTech specialzes in Computercraft items.",
  "We also sell hand made computercraft programs",
  "Besides pre-made programs you can request",
  "custom made programs Which will be written",
  "specificly for you!",
  "",
  "You can see information about custom programs",
  "at the monitor behind you.",

}

m=peripheral.wrap("top")
s=peripheral.wrap("right")
function writeText()
  m.setCursorPos(1,1)
m.clear()
    m.setTextScale(1)
  nearPlayers=s.getPlayerNames()
  --print(nearPlayers)
  --print(nearPlayers[1])
  if nearPlayers[1]~=nil then
    print(nearPlayers)
    nearPlayers=nearPlayers[1]
    m.write("Hello ")
    m.setTextColor(32)
    m.write(nearPlayers)
    m.setTextColor(1)
  end
  for line,text in ipairs(textTable) do
    m.setCursorPos(1,line+2)
    m.write(text)
  end
end

while true do
  writeText()
  sleep(1)
end