RosettaCodeData/Task/File-input-output/SenseTalk/file-input-output-2.sensetalk
2023-07-01 13:44:08 -04:00

14 lines
290 B
Text

put "input.txt" into inputFile
put "output.txt" into outputFile
open file inputFile
open file outputFile for writing
repeat forever
read from file inputFile until return
if it is empty then exit repeat
write it to file outputFile
end repeat
close file inputFile
close file outputFile