-- Word cloud generator, creating textShapes from text file.
--
-- Auther: hTaka.
--
-- Before Executing. Modify Text-file path, font, size setting as you like.
-- Copy and paste to new script editer, And execute(Ctl+E).
--

-- Setting bounding region
cornerA = [100,100,200];
cornerB = [-100,-100,-200];

-- Open text file by read only
fp = openFile ("E:\\result_wordOnly.csv") mode:"r";

-- Create textshape line by line.
while (not eof fp) do
(
 myShape = text font:"‚l‚r –¾’©" text:(readLine fp) size:5;
 move myShape (random cornerA cornerB);
 convertToMesh myShape;
)

--Close fileStream
close fp