ref: a13fe4fe5ec0c2c37482722c4dbcb4a611a61b18
parent: 90570d39b831350087a58bb8068be8245c10794c
author: glenda <glenda@ship.of.the.fools>
date: Wed Nov 5 05:29:49 EST 2025
code aesthetics
--- a/oktr
+++ b/oktr
@@ -1,17 +1,11 @@
#!/bin/rc
-# ok, turing. reader
+# ok, turing social network reader
rfork e
-#slp = .5
#prev = 5 # preview lines
posts = 1
inp = 0
-fn more {-
-
-}
-
# begin
while (! ~ $inp q ) {@@ -30,7 +24,9 @@
echo
}
-echo ... load more? q - quit, anything else cont.
+echo ...
+echo load more? q - quit, anything else cont.
+
posts = `{ echo $posts + 11 | bc } inp = `{read}}
--
⑨