From fcbf63e62c627deae76c1b8cb8c0876c536ed811 Mon Sep 17 00:00:00 2001
From: Jari Vetoniemi <jari.vetoniemi@indooratlas.com>
Date: Mon, 16 Mar 2020 18:49:26 +0900
Subject: Fresh start

---
 jni/ruby/sample/rcs.awk | 33 +++++++++++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 jni/ruby/sample/rcs.awk

(limited to 'jni/ruby/sample/rcs.awk')

diff --git a/jni/ruby/sample/rcs.awk b/jni/ruby/sample/rcs.awk
new file mode 100644
index 0000000..e64af5b
--- /dev/null
+++ b/jni/ruby/sample/rcs.awk
@@ -0,0 +1,33 @@
+BEGIN {
+  sw = 40.0;
+  dw = 78.0;
+  hdw = dw / 2.0;
+  w = 20.0;
+  h =1.0;
+  d = 0.2;
+  ss="abcdefghijklmnopqrstuvwxyz0123456789!#$%^&*()-=\\[];'`,./";
+  rnd = srand();
+}
+
+{
+  xr = -hdw; y = h * 1.0; maxxl = -999;
+  s = "";
+  while (xr < hdw) {
+    x = xr * (1 + y) - y * w / 2;
+    i = (x / (1 + h) + sw /2);
+    c = (0 < i && i < length($0)) ? substr($0, i, 1) : "0";
+    y = h - d * c;
+    xl = xr - w * y / (1 + y);
+    if (xl < -hdw || xl >= hdw || xl <= maxxl) {
+      t = rand() * length(ss);
+      c = substr(ss, t, 1);
+    }
+    else {
+      c = substr(s, xl + hdw, 1);
+      maxxl = xl;
+    }
+    s = s c;
+    xr = xr + 1;
+  }
+  print s;
+}
-- 
cgit v1.2.3