Word wrap: Difference between revisions

=={{header|Phixmonti}}==

<lang Phixmonti>include ..\Utilitys.pmt

72 var long

0 >ps

"Lorem ipsum dolor sit amet, consectetur adipiscing elit. Maecenas varius sapien

vel purus hendrerit vehicula. Integer hendrerit viverra turpis, ac sagittis arcu

pharetra id. Sed dapibus enim non dui posuere sit amet rhoncus tellus

consectetur. Proin blandit lacus vitae nibh tincidunt cursus. Cum sociis natoque

penatibus et magnis dis parturient montes, nascetur ridiculus mus. Nam tincidunt

purus at tortor tincidunt et aliquam dui gravida. Nulla consectetur sem vel

felis vulputate et imperdiet orci pharetra. Nam vel tortor nisi. Sed eget porta

tortor. Aliquam suscipit lacus vel odio faucibus tempor. Sed ipsum est,

condimentum eget eleifend ac, ultricies non dui. Integer tempus, nunc sed

venenatis feugiat, augue orci pellentesque risus, nec pretium lacus enim eu

nibh."

split

len for drop

pop swap len ps> + >ps

tps long > if ps> drop len >ps nl endif

print " " print

ps> 1 + >ps

endfor

drop ps> drop

</lang>