From 30fb64f5ffae371dce9944d0701f55a764b26782 Mon Sep 17 00:00:00 2001 From: Yann Herklotz Date: Fri, 5 Aug 2022 10:07:56 +0100 Subject: Add text --- presentation.mkiv | 45 +++---------- s-present-split.mkiv | 184 +++++++++++++++++++++++++++++++++++++++++++++++++++ type-imp-ymhgd.mkiv | 2 +- 3 files changed, 194 insertions(+), 37 deletions(-) create mode 100644 s-present-split.mkiv diff --git a/presentation.mkiv b/presentation.mkiv index e6192d2..0d283db 100644 --- a/presentation.mkiv +++ b/presentation.mkiv @@ -1,45 +1,18 @@ \usemodule[present-split] -\setuppapersize[SW][SW] -\setupbodyfont[ymhgd,12pt] - -\setupbackgrounds - [page] - [background={numberb}] - -\definecolor [ColorOne] [x=E0C2B8] -\definecolor [ColorTwo] [x=ACCDC7] - -\defineoverlay[numberb][\useMPgraphic{numberb}] +\startdocument + [title=On Formalising Predicated Execution and Predicate-Aware Scheduling, + subtitle=Yann Herklotz, + location=INI'22] -\startuseMPgraphic{numberb} - StartPage ; - picture Left, Right ; - numeric Shift ; Shift := -TextWidth - BackSpace - RightEdgeDistance/2 ; - fill Page withcolor "ColorOne" ; - fill Page leftenlarged Shift withcolor "ColorTwo" ; - if RealPageNumber > 1 : - Left := Right := textext("\bf\pagenumber") ysized 3cm ; - clip Right to boundingbox Right shifted ( bbwidth(Right)/2,0) ; - clip Left to boundingbox Left shifted (-bbwidth(Left) /2,0) ; - draw Left shifted (-Shift,2.25cm) withcolor "ColorTwo" ; - draw Right shifted (-Shift,2.25cm) withcolor "ColorOne" ; - fi ; - StopPage ; -\stopuseMPgraphic +\Topic{Forms of Predicated Execution} -\setuphead[Topic][number=yes] +\Topic{Knuth} -\startdocument - [title=Some Quotes, - subtitle=that you probably know by now] +\Topic{Reich} - \Topic{Tufte} \input tufte - \Topic{Knuth} \input knuth - \Topic{Reich} \input reich - \Topic{Zapf} \input zapf - \Topic{Materie} \input materie +\Topic{Zapf} - %Topic{Stork} \input stork +\Topic{Materie} \stopdocument diff --git a/s-present-split.mkiv b/s-present-split.mkiv new file mode 100644 index 0000000..ae3b1df --- /dev/null +++ b/s-present-split.mkiv @@ -0,0 +1,184 @@ +%D \module +%D [ file=s-present-split, % s-pre-14, +%D version=1999.08.20, +%D title=\CONTEXT\ Style File, +%D subtitle=Presentation Environment Split, +%D author=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 In the process of making a couple of simple styles for \EUROTEX\ 99, I came to +%D this one. The joke is in the pagenumber. This style can be used for short +%D presentations with much text. + +\startmodule[present-split] + + +\setupbodyfont[ymhgd,12pt] + +%D Since we expect text, we can best be very tolerant. + +\setuptolerance + [verytolerant,stretch] + +%D As most styles we choose a large screen page size. + +\setuppapersize[SW][SW] + +\setuplayout + [width=fit, + rightedge=4cm, + margin=0pt, + rightedgedistance=1cm, + height=middle, + header=0pt, + footer=0pt, + topspace=1cm, + backspace=1cm] + +\setupbackgrounds + [page] + [background={numberb}] + +%D We only use two colors, named \type {ColorOne} and \type {ColorTwo}: + +\definecolor [ColorOne] [x=E0C2B8] +\definecolor [ColorTwo] [x=ACCDC7] + +\defineoverlay[numberb][\useMPgraphic{numberb}] + +\startuseMPgraphic{numberb} + StartPage ; + picture Left, Right ; + numeric Shift ; Shift := -TextWidth - BackSpace - RightEdgeDistance/2 ; + fill Page withcolor "ColorOne" ; + fill Page leftenlarged Shift withcolor "ColorTwo" ; + if RealPageNumber > 1 : + Left := Right := textext("\bf\pagenumber") ysized 3cm ; + clip Right to boundingbox Right shifted ( bbwidth(Right)/2,0) ; + clip Left to boundingbox Left shifted (-bbwidth(Left) /2,0) ; + draw Left shifted (-Shift,2.25cm) withcolor "ColorTwo" ; + draw Right shifted (-Shift,2.25cm) withcolor "ColorOne" ; + fi ; + StopPage ; +\stopuseMPgraphic + +%D We use the simple label typesetting present in \METAPOST\ because digits are +%D seldom kerned so real \TEX ing is not needed. As in the previous method, we let +%D the graphics overlap so that we don't get white lines due to rounding problems in +%D viewers. +%D +%D We put a button behind the text (this overlay is calculated each page). + +\defineoverlay + [nextpage] + [\overlaybutton{nextpage}] + +\setupbackgrounds + [text] + [backgroundoffset=.5cm, + background=nextpage] + +%D We still have to turn on interaction mode. + +\setupinteraction + [state=start, + display=new, + menu=on] + +\setupinteraction + [color=, + contrastcolor=] + +%D Next we define structuring commands. + +\definehead[Topic] [chapter] \setuphead[Topic] [style=\ssc\bf] +\definehead[Subject][section] \setuphead[Subject][style=\ssa\bf] + +\setuphead + [Topic,Subject] + [number=no, + after={\blank[big]}] + +%D Because we will provide a menu, we don't offer lists. + +\let\Topics \gobbleoneargument +\let\Subjects\relax + +%D The table of contents goes to the right edge. + +\startinteractionmenu[right] + \setupinteraction + [color=black, + contrastcolor=Two] + \placelist + [Topic] + [alternative=f, + frame=off, + criterium=all,] + \vfill +\stopinteractionmenu + +\setuplist + [Topic] + [width=\rightedgewidth, + maxwidth=\rightedgewidth, + style=\ssxx\bf, + width=fit] + +%D We safe some space: + +\setupwhitespace + [medium] + +\setupblank + [medium] + +%D In the titlepage, we still use the \TEX\ overlays, so that we don't have to +%D define a second graphic. + +\unexpanded\def\TitlePage#1% + {\StartTitlePage#1\StopTitlePage} + +\unexpanded\def\StartTitlePage + {\startstandardmakeup + \setupalign[middle] + \enforced\protected\def\\{\vfil\ssa\setupinterlinespace} + \ssc\bf\setupinterlinespace + \vfil} + +\unexpanded\def\StopTitlePage + {\vfil\vfil\vfil + \stopstandardmakeup} + +\startsetups document:start + \StartTitlePage + \documentvariable{title} + \doifsomething {\documentvariable{subtitle}} { + \\ + \documentvariable{subtitle} + } + \doifsomething {\documentvariable{location}} { + \\ + \documentvariable{location} + } + \StopTitlePage +\stopsetups + +\startsetups document:stop + % +\stopsetups + +\stopmodule + +%D This is it. + +\continueifinputfile{s-present-split.mkiv} + +\usemodule[present-common] + +\inputpresentationfile{examples/present-split-001.tex} diff --git a/type-imp-ymhgd.mkiv b/type-imp-ymhgd.mkiv index 306022a..ccc0301 100644 --- a/type-imp-ymhgd.mkiv +++ b/type-imp-ymhgd.mkiv @@ -15,7 +15,7 @@ \starttypescript [ymhgd] \definetypeface [ymhgd] [rm] [serif] [libertinus] [default] [rscale=1.73] - \definetypeface [ymhgd] [ss] [sans] [libertinus] [default] [rscale=1.73] + \definetypeface [ymhgd] [ss] [sans] [lato] [default] [rscale=1.73] \definetypeface [ymhgd] [tt] [mono] [iosevka] [default] [rscale=1.55] \definetypeface [ymhgd] [mm] [math] [libertinus] [default] [rscale=1.73] \stoptypescript -- cgit