diff options
author | Karl Berry <karl@freefriends.org> | 2009-04-07 18:02:49 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2009-04-07 18:02:49 +0000 |
commit | b573aa158f30a6ecc44fa5351a35f5bbe2d9e159 (patch) | |
tree | 0a2bfa3693cdc76a343b75131243f02dc47cb3e8 /Master/texmf-dist/tex/context/third/simple-slides/simpleslides-s-BigNumber.tex | |
parent | e197f005f34969dd6b8bc3720c3eb10a2fd3d358 (diff) |
new context package context-simpleslides (6apr09)
git-svn-id: svn://tug.org/texlive/trunk@12653 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/context/third/simple-slides/simpleslides-s-BigNumber.tex')
-rw-r--r-- | Master/texmf-dist/tex/context/third/simple-slides/simpleslides-s-BigNumber.tex | 226 |
1 files changed, 226 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/context/third/simple-slides/simpleslides-s-BigNumber.tex b/Master/texmf-dist/tex/context/third/simple-slides/simpleslides-s-BigNumber.tex new file mode 100644 index 00000000000..f0d890b0fb8 --- /dev/null +++ b/Master/texmf-dist/tex/context/third/simple-slides/simpleslides-s-BigNumber.tex @@ -0,0 +1,226 @@ +%D \module +%D [ file=simpleslides-s-BigNumber, +%D version=2009.03.30 +%D title=\CONTEXT\ Style File, +%D subtitle=Presentation Module --- Big Number Style, +%D author=Aditya Mahajan and Thomas A. Schmitz, +%D date=\PRESTITdate, +%D copyright={Aditya Mahajan and Thomas A. Schmitz}] +%C +%C Copyright 2007 Aditya Mahajan and Thomas A. Schmitz +%C This file may be distributed under the GNU General Public License v. 2.0. + +%D This file provides the \quotation{BigNumber} style for the presentation +%D module. It is loaded at runtime. + +\writestatus{simpleslides}{loading Big Number style} + +\startmodule[simpleslides-s-BigNumber] + +\unprotect + +%D First, we change the page layout to have more space all around + +\setuplayout [width=fit, + margin=2cm, + height=fit, + leftmargindistance=.8cm, + rightmargindistance=0cm, + header=18mm, + footer=0cm, + topspace=.8cm, + backspace=2cm, + location=singlesided] + +\setuplayout [simpleslides:layout:horizontal][header=18mm] +\setuplayout [simpleslides:layout:vertical] [header=0mm] +\setuplayout [simpleslides:layout:title] + +\setuplayer[simpleslides:layer:slidetitle] + [width=\paperwidth, + height=\paperheight,x=20mm] + +%D Next we a generic frames, which will be used by other macros to +%D get a consistent look and feel. + +\defineframed[simpleslides:framed:small] + [frame=off,offset=0pt, + width=1.7cm,align=middle] + +%D These macros are used for placing figures/pictures: + +\define\NormalHeight {\textheight} +\define\NormalWidth {.476\textwidth} +\define\PictureFrameHeight {\textheight} +\define\PictureFrameWidth {.476\textwidth} + +%D This module has two color schemes, a blue one and a red one. + +\startsetups simpleslides:setups:blue +\definecolor [simpleslides:contrastcolor] [r=0.8,g=0.8,b=0.9] +\definecolor [simpleslides:backgroundcolor] [s=.88] +\definecolor [simpleslides:textcolor] [s=0] +\stopsetups + +\startsetups simpleslides:setups:red +\definecolor [simpleslides:contrastcolor] [r=0.45,] +\definecolor [simpleslides:backgroundcolor] [s=.18] +\definecolor [simpleslides:textcolor] [s=1] +\stopsetups + +%D Now we choose the scheme that the user asked for + +\doifsetupselse{simpleslides:setups:\moduleparameter{simpleslides}{color}} + {\setups{simpleslides:setups:\moduleparameter{simpleslides}{color}}} + {\setups{simpleslides:setups:blue}} + +\setupcolors[textcolor={simpleslides:textcolor}] + + +%D The characteristic feature of this module is that the page number is drawn in +%D big letters on the slide. First we define the font used to draw the number. +%D The is a bit verbose since \MKII\ and \MKIV\ have different ways of loading +%D fonts. + +\beginOLDTEX +\loadmapfile[qhv-ec.map] +\definefontsynonym [BigNumberFont] [ec-qhvb] +\endOLDTEX + +\beginXETEX +\loadmapfile[qhv-ec.map] +\definefontsynonym [BigNumberFont] [ec-qhvb] +\endXETEX + +\beginLUATEX +\definefontsynonym [BigNumberFont] [name:texgyreherosbold] +\endLUATEX + +\definefont [NumberFont] [BigNumberFont at 30pt] + + +%D We use \METAPOST\ to draw backgrounds. First, we define a few helper macros +%D to place text inside \METAPOST + +\definetextext[simpleslides:sometxt:left] {\TaspresentSometxtLeft} +\definetextext[simpleslides:sometxt:right]{\TaspresentSometxtRight} + +\unexpanded\def\TaspresentSometxtLeft#1% + {\getvalue{simpleslides:framed:small} + {\color[simpleslides:contrastcolor] + {\NumberFont #1}}} + +\unexpanded\def\TaspresentSometxtRight#1% + {\getvalue{simpleslides:framed:small} + {\color[simpleslides:backgroundcolor] + {\NumberFont #1}}} + +%D Now we define a \METAPOST| graphic that draws the number. The exact +%D dimensions have been found by trial and error. + +\startuseMPgraphic{simpleslides:MP:ornament} +StartPage ; +save Left, Right ; +picture Left, Right ; + +Left := \sometxt [simpleslides:sometxt:left]{\folio} ysized 6cm; +Right := \sometxt[simpleslides:sometxt:right]{\folio} ysized 6cm; + +save LeftBox, RightBox ; +path LeftBox, RightBox ; + +save split ; numeric split ; +split := if PageNumber < 10 : 1/2 else : 2/3 fi ; + +LeftBox := llcorner Left -- split[llcorner Left, lrcorner Left] + -- split[ulcorner Left, urcorner Left] -- ulcorner Left --cycle ; + +RightBox := lrcorner Right -- split[lrcorner Right, llcorner Right] + -- split[urcorner Right, ulcorner Right] -- urcorner Right --cycle ; + +if PageNumber >= 10 : +RightBox := RightBox shifted split[lrcorner Right, llcorner Right] ; +fi; + +clip Left to LeftBox ; +clip Right to RightBox ; + +save corner; pair corner ; +corner := lrcorner Field[Text][Text] shifted (.2cm,-1cm) ; % same as x2 + +labeloffset := 0bp; + +label.ulft(Left, corner) ; +label.urt (Right, corner) ; + +StopPage ; +\stopuseMPgraphic + +%D We also use \METAPOST\ to draw the horizontal and vertical page backgrounds. + +\startuniqueMPgraphic{simpleslides:MP:horizontal} +StartPage ; +fill Page withcolor \MPcolor{simpleslides:contrastcolor} ; +fill Field[Text][Text] enlarged 0.2cm + withcolor \MPcolor{simpleslides:backgroundcolor} ; +StopPage ; +\stopuniqueMPgraphic + +\startuniqueMPgraphic{simpleslides:MP:vertical} +StartPage ; +fill Page withcolor \MPcolor{simpleslides:contrastcolor} ; + +z1 = urcorner Field[Text][Text] shifted (.2cm,0) ; +z2 = lrcorner Field[Text][Text] shifted (.2cm,-.2cm) ; +z3 = z1 shifted (-8.05cm,0) ; +z4 = (x3,y2) ; + +save Main ; +path Main ; +Main := z1 -- z2 -- z4 -- z3 --cycle ; + +fill Main withcolor \MPcolor{simpleslides:backgroundcolor} ; +StopPage ; +\stopuniqueMPgraphic + + +%D We define these backgrounds as overlays: + +\defineoverlay + [simpleslides:background:horizontal] + [\useMPgraphic{simpleslides:MP:horizontal}] + +\defineoverlay + [simpleslides:background:vertical] + [\useMPgraphic{simpleslides:MP:vertical}] + +\defineoverlay + [simpleslides:background:title] + [\useMPgraphic{simpleslides:MP:horizontal}] + +\defineoverlay + [simpleslides:background:ornament] + [\useMPgraphic{simpleslides:MP:ornament}] + +%D The slide title is placed on the top of the text area. The layer takes care +%D of the positioning. + +\setupSlideTitle + [\c!after=, + \c!alternative=layer, + \c!width=\textwidth, + \c!height=2.5cm, + \c!command=\doSlideTitle] + + +%D Squares are used as the first level of itemizations + +\definesymbol[1][$\square$] +\setupitemize[1][inmargin] +%\setupitemize[each][joinedup,unpacked] + +\protect +\stopmodule + +\endinput + |