11 lines
227 B
Text
11 lines
227 B
Text
|
Module FileInputOutput {
|
||
|
|
Edit "Input.txt"
|
||
|
|
Document Doc$
|
||
|
|
Load.Doc Doc$, "Input.txt"
|
||
|
|
Report Doc$
|
||
|
|
Print "Press a key:";Key$
|
||
|
|
Save.Doc Doc$, "Output.txt"
|
||
|
|
Edit "Output.txt"
|
||
|
|
}
|
||
|
|
FileInputOutput
|