RosettaCodeData/Task/Take-notes-on-the-command-line/Zkl/take-notes-on-the-command-line.zkl
2017-09-25 22:28:19 +02:00

9 lines
246 B
Text

const notesName="NOTES.TXT";
args:=vm.arglist;
if (not args)
{ try{ File(notesName).read(*).text.print(); } catch{println("no file")} }
else{
f:=File(notesName,"a+");
f.writeln(Time.Date.ctime(),"\n\t",args.concat(" "));
f.close();
}