summaryrefslogtreecommitdiff
path: root/graphics/pgf/contrib/luatikz/example/spiral.lua
diff options
context:
space:
mode:
Diffstat (limited to 'graphics/pgf/contrib/luatikz/example/spiral.lua')
-rw-r--r--graphics/pgf/contrib/luatikz/example/spiral.lua16
1 files changed, 16 insertions, 0 deletions
diff --git a/graphics/pgf/contrib/luatikz/example/spiral.lua b/graphics/pgf/contrib/luatikz/example/spiral.lua
new file mode 100644
index 0000000000..12c135062e
--- /dev/null
+++ b/graphics/pgf/contrib/luatikz/example/spiral.lua
@@ -0,0 +1,16 @@
+tikz.within( '*' )
+
+local pi = p{ 0, 0 }
+local pdx = p{ 0.25, 0 }
+local pdy = p{ 0, 0.25 }
+
+for k = 1, 20
+do
+ local sign = 1
+ if k % 2 == 0 then sign = -1 end
+ local pn = pi + sign * k * pdx
+ local pn2 = pn + sign * k * pdy
+ draw{ line{ pi, pn }, line{ pn, pn2 } }
+ pi = pn2
+end
+