diff options
author | Marius <mariausol@gmail.com> | 2014-01-24 15:20:18 +0200 |
---|---|---|
committer | Marius <mariausol@gmail.com> | 2014-01-24 15:20:18 +0200 |
commit | 7d3f53a8898147b0cb36f76455f6a6003a6f4556 (patch) | |
tree | c6fc740d55de26bf71d34fb0783ea59aa2e62a92 /metapost | |
parent | d45943afbc4a24ed10f87162b238af07cde73ac5 (diff) | |
download | context-7d3f53a8898147b0cb36f76455f6a6003a6f4556.tar.gz |
beta 2014.01.24 14:17
Diffstat (limited to 'metapost')
-rw-r--r-- | metapost/context/base/mp-base.mpiv | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/metapost/context/base/mp-base.mpiv b/metapost/context/base/mp-base.mpiv index d5c7b8c21..638be4628 100644 --- a/metapost/context/base/mp-base.mpiv +++ b/metapost/context/base/mp-base.mpiv @@ -607,7 +607,16 @@ enddef ; % drawdot (10j,10); % endfor ; % -% so ... +% or: +% +%\startMPpage +% +% def drawdot expr z = +% addto currentpicture contour (makepath currentpen shifted z) _op_ +% enddef; +% +% drawdot origin shifted (0,-3cm) withpen pencircle scaled 2cm ; +% pickup pencircle scaled 2cm ; drawdot origin withcolor red ; def drawdot expr p = if pair p : |