Source Browser ?

1%D \module
2%D   [       file=meta-blb,
3%D        version=2018.04.12,
4%D          title=\METAPOST\ Graphics,
5%D       subtitle=Blobs,
6%D         author=Hans Hagen,
7%D           date=\ currentdate,
8%D      copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
9%C
10%C This module is part of the \CONTEXT\ macro||package and is
11%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
12%C details.
13
14\writestatus{loading}{MetaPost Graphics / Blobs}
15
16\registerctxluafile{meta-blb}{}
17
18\unprotect
19
20\permanent\protected\def\MPLIBgetblobscaledcm#1#2#3#4#5#6#7#8#9%
21  {\clf_mpgetblob\MPtextbox#1\relax
22   \setbox\MPbox\hpack\bgroup
     \dotransformnextbox{#2}{#3}{#4}{#5}{#6}{#7}%
24       \vpack to \zeropoint\bgroup
25          \vss
26          \hpack to \zeropoint \bgroup
27           % \fastsxsy{#8}{#9}{\raise\dp\MPtextbox\box\MPtextbox}%
28             \fastsxsy{#8}{#9}{\box\MPtextbox}%
29             \hss
30         \egroup
31       \egroup
32   \egroup
33   \smashbox\MPbox
34   \box\MPbox}
35
36%D An example of usage:
37
38\definefontfeature[followtext][liga=no]
39
40\permanent\protected\def\MPLIBfollowtext#1#2%
41  {\begingroup
42   \scratchcounter#1\relax
43   \setbox\scratchbox\hbox{\addff{followtext}#2}%
44   \clf_MPLIBconvertfollowtext\scratchcounter\scratchbox
45   \endgroup}
46
47%D New:
48
49\newtoks\mpblobtext
50
51\permanent\protected\mpblobtext{\global\setbox\mptextbox\vbox{\clf_mpblobtext}}
52
53\protect \endinput
54