diff options
author | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-01-12 17:15:07 +0100 |
---|---|---|
committer | Context Git Mirror Bot <phg42.2a@gmail.com> | 2016-01-12 17:15:07 +0100 |
commit | 8d8d528d2ad52599f11250cfc567fea4f37f2a8b (patch) | |
tree | 94286bc131ef7d994f9432febaf03fe23d10eef8 /tex/context/base/meta-imp-tab.mkiv | |
parent | f5aed2e51223c36c84c5f25a6cad238b2af59087 (diff) | |
download | context-8d8d528d2ad52599f11250cfc567fea4f37f2a8b.tar.gz |
2016-01-12 16:26:00
Diffstat (limited to 'tex/context/base/meta-imp-tab.mkiv')
-rw-r--r-- | tex/context/base/meta-imp-tab.mkiv | 73 |
1 files changed, 0 insertions, 73 deletions
diff --git a/tex/context/base/meta-imp-tab.mkiv b/tex/context/base/meta-imp-tab.mkiv deleted file mode 100644 index a4affbea4..000000000 --- a/tex/context/base/meta-imp-tab.mkiv +++ /dev/null @@ -1,73 +0,0 @@ -%D \module -%D [ file=meta-tab, -%D version=2003.03.21, % very old but now with splitter -%D title=\METAPOST\ Graphics, -%D subtitle=Dummy (External) Graphics, -%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. - -\startuseMPgraphic{TallyBar} - height := (10/12) * LineHeight ; - span := ( 4/10) * LineHeight ; - drift := ( 1/10) * LineHeight ; - def d = (uniformdeviate drift) enddef ; - for i := 1 upto \MPvar{n} : - draw - if (i mod 5)=0 : - ((-d-4.5span,d)--(+d-0.5span,height-d)) - else : - ((-d,+d)--(+d,height-d)) - fi - shifted (span*i,d-drift) withpen pencircle ; - endfor ; - currentpicture := currentpicture scaled .75 ; -\stopuseMPgraphic - -\setupMPvariables - [TallyBar] - [n=0] - -\unexpanded\def\tallynumeral#1% - {\dontleavehmode - \lower.25\exheight\hbox{\useMPgraphic{TallyBar}{n=#1}}} - -\unexpanded\def\tallynumerals#1% - {\dontleavehmode - \begingroup - \scratchcounter#1\relax - \doloop - {\ifnum\scratchcounter>\plusfive - \lower.25\exheight\hbox{\useMPgraphic{TallyBar}{n=5}}% - \advance\scratchcounter-\plusfive - \space - \else - \lower.25\exheight\hbox{\useMPgraphic{TallyBar}{n=\the\scratchcounter}}% - \exitloop - \fi}% - \endgroup} - -\let\FunnyBar\tallynumeral - -\defineconversion[tally][\tallynumerals] - -\continueifinputfile{meta-imp-tab.mkiv} - -\starttext - - \starttabulate[|pr|c|] - \NC \tallynumerals {24} \NC \NR - \NC \tallynumerals {12} \NC \times \NR - \HL - \NC \tallynumerals{288} \NC = \NR - \stoptabulate - - \tallynumerals{"FFFF} - -\stoptext - -\endinput |