diff options
author | Philipp Gesang <pgesang@ix.urz.uni-heidelberg.de> | 2010-08-15 20:14:01 +0200 |
---|---|---|
committer | Philipp Gesang <pgesang@ix.urz.uni-heidelberg.de> | 2010-08-15 20:14:01 +0200 |
commit | 665d59554d270d8a56a43a2007981463581a055d (patch) | |
tree | ec707d41ee3545c3af51cee3b81dd98a933c1f75 /examples/automatarc-gol.lua | |
parent | 2e2ea4b49f9f3101b4e09b77cd33fefc93c9c3cf (diff) | |
download | automata-backgrounds-665d59554d270d8a56a43a2007981463581a055d.tar.gz |
restructured directory layout and renamed most files.
Diffstat (limited to 'examples/automatarc-gol.lua')
-rw-r--r-- | examples/automatarc-gol.lua | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/examples/automatarc-gol.lua b/examples/automatarc-gol.lua new file mode 100644 index 0000000..09d2476 --- /dev/null +++ b/examples/automatarc-gol.lua @@ -0,0 +1,52 @@ +if not mplife then return 1 end + +mplife.setup.rc = {} + +do + local c = {} + + --c.file = "initial-gol/10x10_glider.gol" + --c.file = "initial-gol/gliders.gol" + --c.file = "initial-gol/ggun.gol" + c.file = "initial-gol/sships.gol" + c.rule = gol.parse_rule("B3/S23") -- default Conway + --c.init = gol.parse_file(c.file) + c.last = c.init -- for successive mode as used in slides + + c.aspect = 3/4 -- S6 and similar + + c.extendxy = 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.rc = c +end + +return mplife.setup.rc |