aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorchirvasitua <stuart-little@users.noreply.github.com>2021-07-05 15:21:42 -0400
committerchirvasitua <stuart-little@users.noreply.github.com>2021-07-05 15:21:42 -0400
commit681a9a839f640eca601225a1ca34693983726bf7 (patch)
tree16cc3d387eb452fc835a2804e1035698c9de2ecf
parentd5f2a0c9f3ee311ab8e8d14f6cb67efbc01250ec (diff)
downloadperlweeklychallenge-club-681a9a839f640eca601225a1ca34693983726bf7.tar.gz
perlweeklychallenge-club-681a9a839f640eca601225a1ca34693983726bf7.tar.bz2
perlweeklychallenge-club-681a9a839f640eca601225a1ca34693983726bf7.zip
1st commit on 120_lua
-rwxr-xr-xchallenge-120/stuart-little/lua/ch-1.lua14
-rwxr-xr-xchallenge-120/stuart-little/lua/ch-2.lua13
2 files changed, 27 insertions, 0 deletions
diff --git a/challenge-120/stuart-little/lua/ch-1.lua b/challenge-120/stuart-little/lua/ch-1.lua
new file mode 100755
index 0000000000..5a4f791867
--- /dev/null
+++ b/challenge-120/stuart-little/lua/ch-1.lua
@@ -0,0 +1,14 @@
+#!/usr/bin/env lua
+
+-- run <script> <number>
+
+inpt = arg[1]
+out = 0
+t={0,2,1,3}
+
+for i=1,4 do
+ out = out + 4^(i-1) * t[(inpt & 3) + 1]
+ inpt = inpt >> 2
+end
+
+print(string.format("%d",out))
diff --git a/challenge-120/stuart-little/lua/ch-2.lua b/challenge-120/stuart-little/lua/ch-2.lua
new file mode 100755
index 0000000000..00ff816e3a
--- /dev/null
+++ b/challenge-120/stuart-little/lua/ch-2.lua
@@ -0,0 +1,13 @@
+#!/usr/bin/env lua
+
+-- run <script> <time>
+
+function angl(h,m)
+ rawDiff = math.abs((h % 12)*30 + m/2 - m * 6)
+ return math.min(rawDiff, 360-rawDiff)
+end
+
+for h,m in string.gmatch(arg[1], "(%w+):(%w+)") do
+ print(angl(h,m))
+end
+