aboutsummaryrefslogtreecommitdiff
path: root/challenge-119
diff options
context:
space:
mode:
authorchirvasitua <stuart-little@users.noreply.github.com>2021-07-05 19:42:33 -0400
committerchirvasitua <stuart-little@users.noreply.github.com>2021-07-05 19:42:33 -0400
commit42d66b2a8f658f73c1c37d42248a86d760a11009 (patch)
tree89407792b5af686663bf37bcb89de4a7d1e2c987 /challenge-119
parentf8dd423c77ab9ead395a964bbecbf27639b09796 (diff)
downloadperlweeklychallenge-club-42d66b2a8f658f73c1c37d42248a86d760a11009.tar.gz
perlweeklychallenge-club-42d66b2a8f658f73c1c37d42248a86d760a11009.tar.bz2
perlweeklychallenge-club-42d66b2a8f658f73c1c37d42248a86d760a11009.zip
1st commit on 119_lua
Diffstat (limited to 'challenge-119')
-rwxr-xr-xchallenge-119/stuart-little/lua/ch-1.lua5
-rwxr-xr-xchallenge-119/stuart-little/lua/ch-2.lua18
2 files changed, 23 insertions, 0 deletions
diff --git a/challenge-119/stuart-little/lua/ch-1.lua b/challenge-119/stuart-little/lua/ch-1.lua
new file mode 100755
index 0000000000..ef9a6daa31
--- /dev/null
+++ b/challenge-119/stuart-little/lua/ch-1.lua
@@ -0,0 +1,5 @@
+#!/usr/bin/env lua
+
+-- run <script> <number>
+
+print((arg[1] & 15)*16 + (arg[1] >> 4 & 15))
diff --git a/challenge-119/stuart-little/lua/ch-2.lua b/challenge-119/stuart-little/lua/ch-2.lua
new file mode 100755
index 0000000000..c10111e775
--- /dev/null
+++ b/challenge-119/stuart-little/lua/ch-2.lua
@@ -0,0 +1,18 @@
+#!/usr/bin/env lua
+
+-- run <script> <number>
+
+function nxt(s)
+ a,b=string.match(s:reverse(),"(3*)(.*)")
+ pre,threes=b:reverse(),a
+ if pre:len() ~= 0 then
+ return math.floor(pre+1) .. string.sub(string.rep("12",threes:len()),1,threes:len())
+ end
+ return string.sub(string.rep("12",s:len()),1,s:len()+1)
+end
+
+out="0"
+for i=1,arg[1] do
+ out=nxt(out)
+end
+print(out)