local myorders = {}
local i
local k
if fs.exists("my.orders") then
  local fh = io.open("my.orders", "r")
  while true do
    local line = fh:read("*l")
    if not line then
      break
    else
      table.insert(myorders,line)
    end
  end
  fh:close()
end
table.remove(myorders,1)
k = table.maxn(myorders)
fh = io.open("my.orders", "w")
for i = 1,k do
  fh:write(myorders[i])
  fh:write("\n")
end
fh:close()