OPEN "syspri_b.i" FOR INPUT AS #1 OPEN "syspri_b.out" FOR OUTPUT AS #2 LINE INPUT #1, a$ WHILE 1 i = 1 IF LEN(a$) > 0 THEN WHILE MID$(a$, i, 1) = " " OR ASC(MID$(a$, i, 1)) = 9 i = i + 1 WEND b$ = MID$(a$, i, LEN(a$)) ELSE b$ = a$ END IF PRINT #2, b$ LINE INPUT #1, a$ WEND