Word wrap: Difference between revisions
Content deleted Content added
→{{header|REXX}}: added original version. |
→version 0: found an older version. -- ~~~~ |
||
Line 1,472:
=={{header|REXX}}==
===version 0===
This version was the original
<lang rexx>/*REXX pgm reads a file and displays it (with word wrap to the screen). */
parse arg iFID width
@= /*nullify the text (so far). */
$=
do k=1 for words(@);
_=$ x
if length(_)>width then
end /*k*/▼
▲ end /*k*/
▲_=x /*handle any word overflow. */
▲'''output''' is the same as version 1 using the '''L'''eft option (the default).
===version 1===
|