1

mon = peripheral.wrap("top")
mon.setTextColor(colors.lightGray)
mon.setTextScale(1)
mon.setCursorPos(1,1)
mon.clear()

function msg(spalte, zeile, text)
  mon.setCursorPos(spalte,zeile)
  text = mon.write(text)
end

mon.setTextColor(colors.lightGray)
msg(1,01,"1. Buy")
msg(1,02,"50 Ore")
msg(1,03,"Here")
msg(1,07,"2. Sell")
msg(1,08,"50 Ore")
msg(1,09,"Here")
msg(1,11,"to get")
msg(1,12,"100k")
msg(1,13,"Boxes")

mon.setTextColor(colors.yellow)
while true do
  msg(1,04,"       ")
  msg(1,10,"       ")
  sleep(1)
  msg(1,04,"->")
  msg(1,10,"->")
  sleep(1)
  msg(1,04,"-->")
  msg(1,10,"-->")
  sleep(1)
  msg(1,04,"--->")
  msg(1,10,"--->")
  sleep(1)
  msg(1,04,"---->")
  msg(1,10,"---->")
  sleep(1)
  msg(1,04,"----->")
  msg(1,10,"----->")
  sleep(1)
  msg(1,04,"------>")
  msg(1,10,"------>")
  sleep(1)
end