summaryrefslogtreecommitdiff
path: root/tex/context/base/m-hemistich.mkiv
diff options
context:
space:
mode:
authorContext Git Mirror Bot <phg42.2a@gmail.com>2016-01-12 17:15:07 +0100
committerContext Git Mirror Bot <phg42.2a@gmail.com>2016-01-12 17:15:07 +0100
commit8d8d528d2ad52599f11250cfc567fea4f37f2a8b (patch)
tree94286bc131ef7d994f9432febaf03fe23d10eef8 /tex/context/base/m-hemistich.mkiv
parentf5aed2e51223c36c84c5f25a6cad238b2af59087 (diff)
downloadcontext-8d8d528d2ad52599f11250cfc567fea4f37f2a8b.tar.gz
2016-01-12 16:26:00
Diffstat (limited to 'tex/context/base/m-hemistich.mkiv')
-rw-r--r--tex/context/base/m-hemistich.mkiv120
1 files changed, 0 insertions, 120 deletions
diff --git a/tex/context/base/m-hemistich.mkiv b/tex/context/base/m-hemistich.mkiv
deleted file mode 100644
index 7a849d415..000000000
--- a/tex/context/base/m-hemistich.mkiv
+++ /dev/null
@@ -1,120 +0,0 @@
-%D \module
-%D [ file=m-hemistich,
-%D version=2013.08.26,
-%D title=\CONTEXT\ Extra Modules,
-%D subtitle=Hemistiches,
-%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 This is an experimental module for Idris. More is possible but not now.
-
-\unprotect
-
-\installcorenamespace{hemistich}
-
-\installcommandhandler \??hemistich {hemistich} \??hemistich
-
-\setuphemistich
- [\c!width=\v!local,
- \c!distance=4\emwidth,
- \c!separator=\vl\hskip.25em\vl]
-
-\unexpanded\def\hemistiches
- {\dosingleempty\dohemistiches}
-
-\unexpanded\def\dohemistiches
- {\dodohemistiches\empty}
-
-\unexpanded\def\dodohemistiches#1[#2]#3#4%
- {\dontleavehmode
- \begingroup
- \doifelseassignment{#2}
- {\edef\currenthemistich{#1}%
- \setupcurrenthemistich[#2]}
- {\def\currenthemistich{#2}}%
- \doifelse{\hemistichparameter\c!width}\v!local
- {\scratchwidth\availablehsize}
- {\scratchwidth\hemistichparameter\c!width\relax}%
- \spaceskip\zeropoint\s!plus\plusone\s!fill\relax
- \dostarttagged\t!division\currenthemistich
- \hbox to \scratchwidth\bgroup
- \scratchwidth.5\dimexpr\scratchwidth-\hemistichparameter\c!distance\relax
- \hbox to \scratchwidth\bgroup
- \dostarttagged\t!construct\c!lefttext
- \usehemistichstyleandcolor\c!leftstyle\c!leftcolor#3%
- \dostoptagged
- \egroup
- \hss
- \begingroup
- \dostarttagged\t!construct\c!separator
- \usehemistichstyleandcolor\c!separatorstyle\c!separatorcolor
- \hemistichparameter\c!separator
- \dostoptagged
- \endgroup
- \hss
- \hbox to \scratchwidth\bgroup
- \dostarttagged\t!construct\c!righttext
- \usehemistichstyleandcolor\c!rightstyle\c!rightcolor#4%
- \dostoptagged
- \egroup
- \egroup
- \dostoptagged
- \endgroup}
-
-\unexpanded\def\hemistichescaesura#1#2#3%
- {\dodohemistiches\empty[\c!separator={#2}]{#1}{#3}}
-
-\appendtoks
- \setvalue{\currenthemistich}{\dohemistiches{\currenthemistich}}%
-\to \everydefinehemistich
-
-\protect
-
-\continueifinputfile{m-hemistich.mkiv}
-
-\setuphemistich
- [leftcolor=darkred,
- separatorcolor=darkgreen,
- rightcolor=darkblue]
-
-\setupwhitespace
- [big]
-
-\starttext
-
-% \righttoleft
-
-\hemistichescaesura{left side of the brain}{equals}{right side of the brain}
-
-\hemistiches{left side of the brain}{right side of the brain}
-
-\startitemize
- \startitem
- \hemistiches{left side of the brain}{right side of the brain}
- \startitemize
- \startitem
- \hemistiches{left side of the brain}{right side of the brain}
- \startitemize
- \startitem
- \hemistiches{left side of the brain}{right side of the brain}
- \stopitem
- \stopitemize
- \stopitem
- \stopitemize
- \startitem
- \hemistiches{left side of the brain}{right side of the brain}
- \stopitem
- \stopitem
-\stopitemize
-
-\startitemize
-\item \hemistiches{left side of the brain}{right side of the brain}
-\stopitemize
-
-\stoptext
-