Размещение текста в пределах экрана

function mysplit(str, n, range)
  -- str - получаем строку, n - число символов, после которых разбиваем, range - сколько смотрим в поисках пробела
  do
    -- Проверяем, что строка длинная
    if #str <= n + 1 then
      return str
    end
    -- Переменные
    newline = "\n"
    tmp = str
    -- Вставляем символ \n в каждый n-й символ
    for i = 1, #str / n do
      -- но только если видим пробел в пределах range символов
      for space = i, i + range do
        if string.sub(tmp, space, space) == " " or string.sub(tmp, space, space) == "-" or space == i + range then
          tmp = tmp:sub(1, (n * i) + space) .. newline .. tmp:sub((n * i) + space)
          -- нашли один раз и хватит
          break
        end
      end
    end
  end
  return tmp
end

display.newText({
        parent   = myParent,
        text     = "This is a long enough text to be on two lines",  
        width    = display.contentWidth*0.6,  
        height   = display.contentHeight*0.25,  
        x        = display.contentWidth*0.5,
        y        = display.contentHeight*0.5,
        fontSize = 24,
        align    = "center",
    })

function wrap(str, limit, indent, indent1)
   indent = indent or ""
   indent1 = indent1 or indent
   limit = limit or 72
   local here = 1-#indent1
   local function check(sp, st, word, fi)
      if fi - here > limit then
         here = st - #indent
         return "\n"..indent..word
      end
   end
   return indent1..str:gsub("(%s+)()(%S+)()", check)
end
 
local txt = "Если у начальника хорошее настроение, его легко можно спутать с человеком. Самое опасное - это на следующий день общаться с шефом, исходя из этой иллюзии."
 
print( wrap( txt, 64, "  ", "    " ) )

     for i = 1, #str/n, n do
          tmp = tmp:sub(1, i - 1) .. "/n" .. tmp:sub(i + 1)
     end

function mysplit(str, n)
  -- str - получаем строку, n - число символов, после которых разбиваем
  do
    -- Проверяем, что строка длинная
    if #str <= n + 1 then
      return str
    end
    -- Переменные
    newline = "\n"
    tmp = str
    -- Вставляем символ \n в каждый n-й символ
    for i = 1, #str / n do
      tmp = tmp:sub(1, n * i) .. newline .. tmp:sub((n * i) + 1)
    end
  end
  return tmp
end
 
local a = "dfhkjdshhfkjsdh hhjh hjhjh jhjhjhj hjhjhjhj hjhjhjhjhj"
print(mysplit(a, 10))