Data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · cb5bb5e222
commit cb5bb5e222
parent 7387c8f97b
199093 changed files with 3378972 additions and 0 deletions
--- a/Task/Take-notes-on-the-command-line/BASIC/take-notes-on-the-command-line.basic
+++ b/Task/Take-notes-on-the-command-line/BASIC/take-notes-on-the-command-line.basic
@ -0,0 +1,16 @@
+IF LEN(COMMAND$) THEN
+    OPEN "notes.txt" FOR APPEND AS 1
+    PRINT #1, DATE$, TIME$
+    PRINT #1, CHR$(9); COMMAND$
+    CLOSE
+ELSE
+    d$ = DIR$("notes.txt")
+    IF LEN(d$) THEN
+        OPEN d$ FOR INPUT AS 1
+        WHILE NOT EOF(1)
+            LINE INPUT #1, i$
+            PRINT i$
+        WEND
+        CLOSE
+    END IF
+END IF