summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/grph-pat.mkxl
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/mkiv/grph-pat.mkxl')
-rw-r--r--tex/context/base/mkiv/grph-pat.mkxl119
1 files changed, 0 insertions, 119 deletions
diff --git a/tex/context/base/mkiv/grph-pat.mkxl b/tex/context/base/mkiv/grph-pat.mkxl
deleted file mode 100644
index 92fd5ad74..000000000
--- a/tex/context/base/mkiv/grph-pat.mkxl
+++ /dev/null
@@ -1,119 +0,0 @@
-%D \module
-%D [ file=grph-par,
-%D version=2016.07.08,
-%D title=\CONTEXT\ Graphic Macros,
-%D subtitle=Patterns,
-%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 works ok in Okular and MuPDF but somehow xforms don't work in Acrobat
-%D (full nor reader). Also the basic offset is kind of unspecified. So \unknown\
-%D we're dealing with a fragile feature. So, don't rely on where the first (ulr)
-%D tile occurs.
-%D
-%D The two commands introduced here are not documented (yet).
-
-\writestatus{loading}{ConTeXt Graphic Macros / Patterns}
-
-\unprotect
-
-\registerctxluafile{grph-pat}{}
-
-\permanent\tolerant\protected\def\registerpattern[#1]#*[#2]%
- {\begingroup
- \letdummyparameter\c!name \s!dummy
- \letdummyparameter\c!width \v!auto
- \letdummyparameter\c!height \v!auto
- \letdummyparameter\c!hoffset\zeropoint
- \letdummyparameter\c!voffset\zeropoint
- \unless\iftok{#2}\emptytoks
- \setdummyparameter\c!name{#1}%
- \getdummyparameters[#2]%
- \orelse\ifhastok={#1}%
- \getdummyparameters[#1]%
- \else
- \setdummyparameter\c!name{#1}%
- \fi
- \dowithnextboxcs\syst_boxes_registerpattern_indeed\hbox}
-
-\immutable\edef\v!auto_m{-\v!auto}
-
-\def\syst_boxes_registerpattern_indeed
- {%\finalizeobjectbox\nextbox
- \edef\p_width {\dummyparameter\c!width}%
- \edef\p_height {\dummyparameter\c!height}%
- \edef\p_hoffset{\dummyparameter\c!hoffset}%
- \edef\p_voffset{\dummyparameter\c!voffset}%
- \scratchwidth \dimexpr\ifx\p_width \v!auto\wd \nextbox\else\p_width \fi\relax
- \scratchheight \dimexpr\ifx\p_height \v!auto\htdp\nextbox\else\p_height \fi\relax
- \scratchhoffset\dimexpr\ifx\p_hoffset\v!auto\scratchwidth /2\orelse\ifx\p_hoffset\v!auto_m-\scratchwidth /2\else\p_hoffset\fi\relax
- \scratchvoffset\dimexpr\ifx\p_voffset\v!auto\scratchheight/2\orelse\ifx\p_voffset\v!auto_m-\scratchheight/2\else\p_voffset\fi\relax
- \clf_registerpattern
- name {\dummyparameter\c!name}
- number \nextbox
- width \scratchwidth
- height \scratchheight
- hoffset \scratchhoffset
- voffset \scratchvoffset
- \relax
- \endgroup}
-
-\permanent\tolerant\protected\def\applypattern[#1]#*[#2]%
- {\hbox\bgroup
- \letdummyparameter\c!name \s!dummy
- \letdummyparameter\c!width \zeropoint
- \letdummyparameter\c!height\zeropoint
- \unless\iftok{#2}\emptytoks
- \setdummyparameter\c!name{#1}%
- \getdummyparameters[#2]%
- \orelse\ifhastok={#1}%
- \getdummyparameters[#1]%
- \else
- \setdummyparameter\c!name{#1}%
- \fi
- \clf_applypattern
- name {\dummyparameter\c!name}
- number \nextbox
- width \dimexpr\dummyparameter\c!width\relax
- height \dimexpr\dummyparameter\c!height\relax
- \relax
- \box\nextbox
- \egroup}
-
-\protect
-
-\continueifinputfile{grph-pat.mkxl}
-
-\nopdfcompression
-
-\starttext
-
- \registerpattern[demo]{It \darkred Works!}
-
- \framed[offset=overlay]{\applypattern[demo][width=7cm,height=4cm]}
-
- \blank
-
- \registerpattern[name=more,hoffset=0bp,voffset=0pt]{\externalfigure[cow.pdf][width=1cm]}
-
- \framed[offset=overlay]{\applypattern[name=more,width=7cm,height=4cm]}
-
- \blank
-
- \registerpattern[name=more,hoffset=auto,voffset=auto]{\externalfigure[cow.pdf][width=1cm]}
-
- \framed[offset=overlay]{\applypattern[name=more,width=7cm,height=4cm]}
-
- \blank
-
- \registerpattern[name=more,hoffset=-auto,voffset=-auto]{\externalfigure[cow.pdf][width=1cm]}
-
- \framed[offset=overlay]{\applypattern[name=more,width=7cm,height=4cm]}
-
-\stoptext
-