TEST8. TEST %%WHILE, %%EWHILE, AND INDIRECT STRINGS. The above line should appear in 4 increments. %FO F5 %STRING LINE1 SU 'TEST8. ' %STRING LINE2 SU 'TEST8. TEST %WHILE, ' 1 %STRING LEN3 LENGTH 'TEST8. TEST %WHILE, %EWHILE, ' %STRING LINE3 SU 'TEST8. TEST %WHILE, %EWHILE, ' 1 LEN3 %STRING LEN4 LENGTH 'TEST8. TEST %WHILE, %EWHILE, AND INDIRECT STRINGS.' %STRING LINE4 SU 'XXXTEST8. TEST %WHILE, %EWHILE, AND INDIRECT STRINGS.' 4 LEN4 %FO F2 %SET ILINE 1 %WHILE ILINE 4 <= % STRING LINE CONCAT 'LINE' ILINE % STRING OUTLINE AT LINE % COPY OUTLINE % SET ILINE ILINE 1 + % EWHILE %FO F10.3 %INPUT TESTLIB!TEST9