From 9e736bba72b800956869b518c0073b4ff71d1bd3 Mon Sep 17 00:00:00 2001 From: Marius Date: Thu, 21 Jul 2011 20:20:14 +0300 Subject: beta 2011.07.21 19:17 --- tex/context/base/cont-new.mkii | 2 +- tex/context/base/cont-new.mkiv | 2 +- tex/context/base/context.mkii | 2 +- tex/context/base/context.mkiv | 2 +- tex/context/base/meta-imp-fen.mkiv | 137 +++++++++++++++++++++ tex/context/base/status-files.pdf | Bin 23789 -> 23801 bytes tex/context/base/status-lua.pdf | Bin 162205 -> 162205 bytes tex/generic/context/luatex/luatex-fonts-merged.lua | 2 +- 8 files changed, 142 insertions(+), 5 deletions(-) create mode 100644 tex/context/base/meta-imp-fen.mkiv (limited to 'tex') diff --git a/tex/context/base/cont-new.mkii b/tex/context/base/cont-new.mkii index 17dcba9f9..e59582530 100644 --- a/tex/context/base/cont-new.mkii +++ b/tex/context/base/cont-new.mkii @@ -11,7 +11,7 @@ %C therefore copyrighted by \PRAGMA. See mreadme.pdf for %C details. -\newcontextversion{2011.07.21 18:09} +\newcontextversion{2011.07.21 19:17} %D This file is loaded at runtime, thereby providing an %D excellent place for hacks, patches, extensions and new diff --git a/tex/context/base/cont-new.mkiv b/tex/context/base/cont-new.mkiv index 83c7d3d20..13cc66be2 100644 --- a/tex/context/base/cont-new.mkiv +++ b/tex/context/base/cont-new.mkiv @@ -11,7 +11,7 @@ %C therefore copyrighted by \PRAGMA. See mreadme.pdf for %C details. -\newcontextversion{2011.07.21 18:09} +\newcontextversion{2011.07.21 19:17} %D This file is loaded at runtime, thereby providing an %D excellent place for hacks, patches, extensions and new diff --git a/tex/context/base/context.mkii b/tex/context/base/context.mkii index 312e192ad..f9e00a44c 100644 --- a/tex/context/base/context.mkii +++ b/tex/context/base/context.mkii @@ -20,7 +20,7 @@ %D your styles an modules. \edef\contextformat {\jobname} -\edef\contextversion{2011.07.21 18:09} +\edef\contextversion{2011.07.21 19:17} %D For those who want to use this: diff --git a/tex/context/base/context.mkiv b/tex/context/base/context.mkiv index 90da5a12c..8bf36d10f 100644 --- a/tex/context/base/context.mkiv +++ b/tex/context/base/context.mkiv @@ -20,7 +20,7 @@ %D your styles an modules. \edef\contextformat {\jobname} -\edef\contextversion{2011.07.21 18:09} +\edef\contextversion{2011.07.21 19:17} %D For those who want to use this: diff --git a/tex/context/base/meta-imp-fen.mkiv b/tex/context/base/meta-imp-fen.mkiv new file mode 100644 index 000000000..e130f0636 --- /dev/null +++ b/tex/context/base/meta-imp-fen.mkiv @@ -0,0 +1,137 @@ +%D \module +%D [ file=meta-imp-fen, +%D version=2011.07.21, +%D title=\METAPOST\ Graphics, +%D subtitle=Fences, +%D author=Wolfgang Schuster & Hans Hagen, +%D date=\currentdate, +%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}] +%C +%C This module is part of the \CONTEXT\ macro||package and is +%C therefore copyrighted by \PRAGMA. See mreadme.pdf for +%C details. + +%D The shape and background example code was posted by Wolfgang on the +%D \CONTEXT\ list and due to request by Aditya has been turned into +%D library. + +\startMPinclusions + vardef BasicBraceSymbol (expr rotation) = + save p ; path p ; + z1 = (-233, 0) ; + z2 = (-220, 22) ; + z3 = (-155, 211) ; + z4 = (-200, 690) ; + z5 = (-142, 1033) ; + z6 = ( -97, 1106) ; + z7 = ( -71, 1125) ; + z8 = ( -61, 1104) ; + z9 = ( -80, 1077) ; + z10 = (-108, 1002) ; + z11 = (-129, 666) ; + z12 = (-117, 207) ; + z13 = (-197, 19) ; + z14 = (-208, 0) ; + z15 = (-197, -19) ; + z16 = (-117, -207) ; + z17 = (-129, -666) ; + z18 = (-108,-1026) ; + z19 = ( -80,-1077) ; + z20 = ( -61,-1104) ; + z21 = ( -71,-1125) ; + z22 = ( -97,-1106) ; + z23 = (-143,-1031) ; + z24 = (-199, -673) ; + z25 = (-155, -211) ; + z26 = (-220, -22) ; + p := z1 for i= 2 upto 14 : .. z[i] endfor + & z14 for j=15 upto 26 : .. z[j] endfor + .. z1 + & cycle ; + p := p rotated rotation ; + p := p ysized 100 ; + p shifted - center p + enddef ; + vardef LeftBraceSymbol = + save p, b ; path p, b ; b := fullsquare xscaled OverlayWidth yscaled OverlayHeight ; + setbounds currentpicture to b ; + p := BasicBraceSymbol(0) ysized OverlayHeight ; + fill p shifted (-xpart lrcorner currentpicture + xpart lrcorner p,0) withcolor OverlayColor ; + setbounds currentpicture to b ; + enddef ; + vardef RightBraceSymbol = + save p, b ; path p, b ; b := fullsquare xscaled OverlayWidth yscaled OverlayHeight ; + setbounds currentpicture to b ; + p := BasicBraceSymbol(180) ysized OverlayHeight ; + fill p shifted (xpart lrcorner currentpicture - xpart lrcorner p,0) withcolor OverlayColor ; + setbounds currentpicture to b ; + enddef ; + vardef TopBraceSymbol = + save p, b ; path p, b ; b := fullsquare xscaled OverlayWidth yscaled OverlayHeight ; + setbounds currentpicture to b ; + p := BasicBraceSymbol(270) xsized OverlayWidth ; + fill p shifted (0,ypart ulcorner currentpicture - ypart ulcorner p) withcolor OverlayColor ; + setbounds currentpicture to b ; + enddef ; + vardef BottomBraceSymbol = + save p, b ; path p, b ; b := fullsquare xscaled OverlayWidth yscaled OverlayHeight ; + setbounds currentpicture to b ; + p := BasicBraceSymbol(90) xsized OverlayWidth ; + fill p shifted (0,ypart lrcorner currentpicture - ypart lrcorner p) withcolor OverlayColor ; + setbounds currentpicture to b ; + enddef ; +\stopMPinclusions + +\startuniqueMPgraphic{brace_left} LeftBraceSymbol ; \stopuniqueMPgraphic +\startuniqueMPgraphic{brace_right} RightBraceSymbol ; \stopuniqueMPgraphic +\startuniqueMPgraphic{brace_top} TopBraceSymbol ; \stopuniqueMPgraphic +\startuniqueMPgraphic{brace_bottom} BottomBraceSymbol ; \stopuniqueMPgraphic + +\defineoverlay[leftbrace] [\uniqueMPgraphic{brace_left}] +\defineoverlay[rightbrace] [\uniqueMPgraphic{brace_right}] +\defineoverlay[topbrace] [\uniqueMPgraphic{brace_top}] +\defineoverlay[bottombrace][\uniqueMPgraphic{brace_bottom}] + +\continueifinputfile{meta-imp-fen.mkiv} + +\starttext + +\startTEXpage \uniqueMPgraphic{brace_left} \stopTEXpage +\startTEXpage \uniqueMPgraphic{brace_right} \stopTEXpage +\startTEXpage \uniqueMPgraphic{brace_top} \stopTEXpage +\startTEXpage \uniqueMPgraphic{brace_bottom} \stopTEXpage + +\framedtext + [frame=off, + offset=2em, + background={leftbrace,rightbrace,topbrace,bottombrace}, + backgroundcolor=red]{\input{knuth}} + +\setupTABLE[frame=off,offset=1ex] +\setupTABLE[row][each][align={middle,lohi}] + +\bTABLE + \bTR + \bTD[nr=3,background=leftbrace] drei \eTD + \bTD[nr=2,background=leftbrace] zwei \eTD + \bTD f \eTD + \bTD o \eTD + \bTD u \eTD + \bTD r \eTD + \bTD [nr=3,background=rightbrace] three \eTD + \eTR + \bTR + \bTD [background=leftbrace] eins \eTD + \bTD [background={topbrace,bottombrace}] null \eTD + \bTD [background=rightbrace] one \eTD + \bTD [nr=2,background=rightbrace] two \eTD + \eTR + \bTR + \bTD v \eTD + \bTD i \eTD + \bTD e \eTD + \bTD r \eTD + \eTR +\eTABLE + +\stoptext diff --git a/tex/context/base/status-files.pdf b/tex/context/base/status-files.pdf index a948649ea..2ddaeab2c 100644 Binary files a/tex/context/base/status-files.pdf and b/tex/context/base/status-files.pdf differ diff --git a/tex/context/base/status-lua.pdf b/tex/context/base/status-lua.pdf index 8358053b6..025410651 100644 Binary files a/tex/context/base/status-lua.pdf and b/tex/context/base/status-lua.pdf differ diff --git a/tex/generic/context/luatex/luatex-fonts-merged.lua b/tex/generic/context/luatex/luatex-fonts-merged.lua index 939a141ce..b1d46ed0b 100644 --- a/tex/generic/context/luatex/luatex-fonts-merged.lua +++ b/tex/generic/context/luatex/luatex-fonts-merged.lua @@ -1,6 +1,6 @@ -- merged file : luatex-fonts-merged.lua -- parent file : luatex-fonts.lua --- merge date : 07/21/11 18:09:15 +-- merge date : 07/21/11 19:17:10 do -- begin closure to overcome local limits and interference -- cgit v1.2.3