From 665d59554d270d8a56a43a2007981463581a055d Mon Sep 17 00:00:00 2001
From: Philipp Gesang <pgesang@ix.urz.uni-heidelberg.de>
Date: Sun, 15 Aug 2010 20:14:01 +0200
Subject: restructured directory layout and renamed most files.

---
 examples/automatarc-eca.lua | 48 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 48 insertions(+)
 create mode 100644 examples/automatarc-eca.lua

(limited to 'examples/automatarc-eca.lua')

diff --git a/examples/automatarc-eca.lua b/examples/automatarc-eca.lua
new file mode 100644
index 0000000..a56833e
--- /dev/null
+++ b/examples/automatarc-eca.lua
@@ -0,0 +1,48 @@
+if not mplife then return 1 end
+
+mplife.setup.rc = {}
+
+do
+    local c = {}
+
+    c.file = "initial-eca/w40r.eca"
+    c.init = eca.parse_file(c.file)
+    c.rule = eca.gen_rule(110)
+
+    c.clip = "left"
+
+    c.aspect = 3/4 -- default for S6 slide format
+
+    c.pensize = .1
+    c.color = { r = .6, g = .6, b = .8 }
+    c.opacity = 1/3
+    c.fade = true
+    c.gestalt = "unitsquare" -- try "unitcircle"
+
+    c.firstframe = 1
+    c.frames = 5
+
+    c.preamble = [[
+\setupcolors[state=start]
+\setupbackgrounds[state=start]
+\setuppapersize[S6][S6]
+
+\setuppagenumbering[state=stop,location=]
+
+\defineoverlay[back][\ctxlua{mplife.successive()}]
+
+\setupbackgrounds [page] [background=back]
+]]
+    c.before_frame = [[
+\startMPcode
+pickup pencircle xyscaled (.25*]] .. c.pensize .. [[pt, ]] .. c.pensize .. [[pt) rotated 45;
+]]
+    c.after_frame = [[
+currentpicture := currentpicture xysized (\the\paperwidth, \the\paperheight);
+\stopMPcode
+]]
+
+    mplife.setup.rc = c
+end
+
+return mplife.setup.rc
-- 
cgit v1.2.3