Split text block into random amount of words Topic is solved

[chango]

I have some large text blocks and I want to split then into lines with a set or random amount of words

SO my sudo is

Open textX file
Loop until words remaining is less than 15 (length of string)
Count 15 - 20 spaces (in between word space) String = Words(count)
Add full stop
Carriage return
Loop
Save FileX

Any help would be much appreciated

[Albireo]

Have you started with any solution?
Where did you get stuck?
(Open file? count spaces / new lines or...)

[chango]

Opening files and reading into a array I can do i thought there might be a simple regex formula for counting spaces and then stopping, I might try a .slpit function and pass it back to the txt file. I'll post what i have when I've got my head around regex.

[Odlanir]

Some like this ?

Code: Select all

word_per_row := 5
list=
(
 Fusce nisi dolor, venenatis sed nunc sed, aliquam condimentum libero. Fusce dictum mauris sit amet fermentum interdum. Donec ullamcorper aliquet odio, et pulvinar mi auctor ut. Duis ut eleifend ligula. Phasellus tincidunt, enim sed euismod faucibus, ipsum sem
 ultrices nunc, vel eleifend velit nunc ac neque. Duis feugiat diam et semper gravida. Fusce ac lectus id mi cursus auctor. Maecenas lobortis velit ac lorem convallis, at tristique urna mattis. Aliquam eu feugiat odio. Quisque porta nunc a nisi pharetra cursus. Proin eleifend
 tincidunt neque ut tincidunt. Praesent nunc elit, lacinia quis condimentum vitae, sagittis et lectus. Suspendisse at interdum lorem, non cursus nulla. Maecenas suscipit ac lacus eget pellentesque.
Donec ut turpis quam. Vivamus placerat sollicitudin nunc eget laoreet. Maecenas vitae velit elit. Phasellus ac finibus odio. Aliquam erat volutpat. Praesent nunc lorem, convallis a pharetra sed, luctus ac quam. Class aptent taciti sociosqu ad litora torquent per conubia nostra, per inceptos himenaeos. Curabitur semper imperdiet semper. Donec eget tempor libero. Morbi eleifend dolor eu mi fermentum, nec hendrerit elit accumsan. Aliquam id tellus pellentesque, dignissim nisi eu, porta dui. Nullam suscipit dolor in ipsum iaculis tempor. Nulla semper et metus sit amet venenatis. Vivamus ut tincidunt velit. 
)
;------------------------------------------------------------------------------------------------***
; I use a list but if you want to read from a file uncomment the line below
; FileRead, List, your_input_file.txt
;------------------------------------------------------------------------------------------------***

for k, v in StrSplit(RegExReplace(list,"\s+"," ")," ") {
   if (Mod(k,word_per_row)) = 0
      str .= v "`n" 
   else str .= v " " 
}
FileDelete, outFile.txt
FileAppend, %str%, outFile.txt
run, outFile.txt
ExitApp

[chango]

Thanks Odlanir ! I'll give that a try when I get home and let you know how it goes.. again many thanks for the help

[chango]

@Odlanir

That is insane lol So simple and yet so perfect for the task I need it for .. many many thanks mate

[Odlanir]

Glad if worked OK for your needs !

[Chunjee]

I have some large text blocks and I want to split then into lines with a set or random amount of words

SO my sudo is

Open textX file
Loop until words remaining is less than 15 (length of string)
Count 15 - 20 spaces (in between word space) String = Words(count)
Add full stop
Carriage return
Loop
Save FileX

the highlighted solution does not add a "full stop" and doesn't select a random amount of words fyi.