5 lines
270 B
Text
5 lines
270 B
Text
SYSTEM(DIR="\docs") ! create argument if not existent, make it current
|
|
OPEN(FILE="output.txt", "NEW") ! in current directory
|
|
|
|
SYSTEM(DIR="C:\docs") ! create C:\docs if not existent, make it current
|
|
OPEN(FILE="output.txt", "NEW") ! in C:\docs
|