28 lines
496 B
Text
28 lines
496 B
Text
#! /usr/local/bin/aime -a
|
|
|
|
if (argc() == 1) {
|
|
file f;
|
|
text s;
|
|
|
|
f.affix("NOTES.TXT");
|
|
|
|
while (~f.line(s)) {
|
|
o_(s, "\n");
|
|
}
|
|
} else {
|
|
date d;
|
|
file f;
|
|
|
|
f.open("NOTES.TXT", OPEN_APPEND | OPEN_CREATE | OPEN_WRITEONLY, 0644);
|
|
|
|
d.now;
|
|
|
|
f.form("/f4/-/f2/-/f2/ /f2/:/f2/:/f2/\n", d.year, d.y_month,
|
|
d.m_day, d.d_hour, d.h_minute, d.m_second);
|
|
|
|
for (integer i, text s in 1.args) {
|
|
f.bytes(i ? ' ' : '\t', s);
|
|
}
|
|
|
|
f.byte('\n');
|
|
}
|