diff options
| author | Hans Hagen <pragma@wxs.nl> | 2014-01-24 14:17:00 +0100 |
|---|---|---|
| committer | Hans Hagen <pragma@wxs.nl> | 2014-01-24 14:17:00 +0100 |
| commit | 725c6683f9b5a9a3c86ac8e2f51d283d65a12430 (patch) | |
| tree | 531175bc33d2b582e38b3ba112bece72d0094b38 /metapost | |
| parent | 2e53c8de743d380bdc1a4707adf274338df96508 (diff) | |
| download | context-725c6683f9b5a9a3c86ac8e2f51d283d65a12430.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 : |