diff options
author | Hans Hagen <pragma@wxs.nl> | 2019-10-28 20:03:50 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg@phi-gamma.net> | 2019-10-28 20:03:50 +0100 |
commit | f58a2cb5d22c5931581274db1f0ec85ac903b747 (patch) | |
tree | ba324713b8c0f2ee9465238d3cf867de3fb41dc5 /doc/context/sources/general/manuals/luametafun/luametafun-groups.tex | |
parent | 24f6f7de245bdff10f21984a9a3c6af3d31fa1f1 (diff) | |
download | context-f58a2cb5d22c5931581274db1f0ec85ac903b747.tar.gz |
2019-10-28 18:22:00
Diffstat (limited to 'doc/context/sources/general/manuals/luametafun/luametafun-groups.tex')
-rw-r--r-- | doc/context/sources/general/manuals/luametafun/luametafun-groups.tex | 52 |
1 files changed, 52 insertions, 0 deletions
diff --git a/doc/context/sources/general/manuals/luametafun/luametafun-groups.tex b/doc/context/sources/general/manuals/luametafun/luametafun-groups.tex new file mode 100644 index 000000000..b29ab3cbf --- /dev/null +++ b/doc/context/sources/general/manuals/luametafun/luametafun-groups.tex @@ -0,0 +1,52 @@ +% language=us + +\environment luametafun-style + +\startcomponent luametafun-groups + +\startchapter[title={Groups}] + +This is just a quick example of an experimental features. + +\startbuffer +\startMPcode + fill fullcircle scaled 2cm shifted ( 5mm,2cm) withcolor "darkblue" ; + fill fullcircle scaled 2cm shifted (15mm,2cm) withcolor "darkblue" ; + + fill fullcircle scaled 2cm shifted ( 5mm,-2cm) withcolor "darkgreen" ; + fill fullcircle scaled 2cm shifted (15mm,-2cm) withcolor "darkgreen" ; + + draw image ( + fill fullcircle scaled 4cm withcolor "darkred" ; + fill fullcircle scaled 4cm shifted (2cm,0) withcolor "darkred" ; + + setgroup currentpicture to boundingbox currentpicture + withtransparency (1,.5) ; + ) ; + + draw image ( + fill fullcircle scaled 3cm withcolor "darkyellow" + withtransparency (1,.5) ; + fill fullcircle scaled 3cm shifted (2cm,0) withcolor "darkyellow" + withtransparency (1,.5) ; + ) ; + + addbackground withcolor "darkgray" ; +\stopMPcode +\stopbuffer + +\typebuffer[option=TEX] + +A group create an object that when transparency is applied is treated as +a group. + +\startlinecorrection + \getbuffer +\stoplinecorrection + +(Groups might become more powerful in the future, like reusable components but +then some more juggling is needed.) + +\stopchapter + +\stopcomponent |