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.

---
 .../simpleslides/automata/automatarc-global.lua    | 63 ++++++++++++++++++++++
 1 file changed, 63 insertions(+)
 create mode 100644 module/tex/context/third/simpleslides/automata/automatarc-global.lua

(limited to 'module/tex/context/third/simpleslides/automata/automatarc-global.lua')

diff --git a/module/tex/context/third/simpleslides/automata/automatarc-global.lua b/module/tex/context/third/simpleslides/automata/automatarc-global.lua
new file mode 100644
index 0000000..22f8fd9
--- /dev/null
+++ b/module/tex/context/third/simpleslides/automata/automatarc-global.lua
@@ -0,0 +1,63 @@
+--
+--------------------------------------------------------------------------------
+--         FILE:  automatarc-global.lua
+--        USAGE:  with ConTeXt
+--  DESCRIPTION:  default settings for the automaton module
+--       AUTHOR:  Philipp Gesang (Phg), <megas.kapaneus@gmail.com>
+--      VERSION:  1.0
+--      CREATED:  13/08/10 10:35:46 CEST
+--------------------------------------------------------------------------------
+--
+
+if not mplife then return 1 end
+
+mplife.setup.global = {}
+
+do
+    local c = {}
+
+--        c.file = "sships.gol"
+--        c.init = gol.parse_file(c.file) 
+--        c.last = c.init -- for successive mode
+
+          c.rule = gol.parse_rule("B3/S23") -- default Conway
+
+        c.aspect = 3/4 -- actually 1/(x/y), for eca mode
+
+      c.extendxy = 0
+       c.extendx = 0
+       c.extendy = 0
+
+       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.global = c
+end
+
+return mplife.setup.global
-- 
cgit v1.2.3