9 lines
164 B
Text
9 lines
164 B
Text
OPEN "INPUT.TXT" FOR INPUT AS #1
|
|
OPEN "OUTPUT.TXT" FOR OUTPUT AS #2
|
|
DO UNTIL EOF(1)
|
|
LINE INPUT #1, Data$
|
|
PRINT #2, Data$
|
|
LOOP
|
|
CLOSE #1
|
|
CLOSE #2
|
|
SYSTEM
|