10 lines
234 B
Text
10 lines
234 B
Text
open "output.txt" for writing as #1
|
|
close #1
|
|
|
|
system("mkdir " + "f:\docs")
|
|
if open(2, "f:\docs\output.txt") then
|
|
print "Subdirectory or file already exists"
|
|
else
|
|
open "f:\docs\output.txt" for writing as #2
|
|
close #2
|
|
end if
|