RosettaCodeData/Task/Create-a-file/Liberty-BASIC/create-a-file.basic

13 lines
193 B
Plaintext

nomainwin
open "output.txt" for output as #f
close #f
result = mkdir( "F:\RC")
if result <>0 then notice "Directory not created!": end
open "F:\RC\output.txt" for output as #f
close #f
end