summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/dvips/pstricks-add
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2009-03-17 16:33:30 +0000
committerKarl Berry <karl@freefriends.org>2009-03-17 16:33:30 +0000
commit31be7e2d49b9eb33e82ba1a3b9b05bcafce81282 (patch)
treeb19b511fc70ae4a64a62de73c4612a36ff97c5bf /Master/texmf-dist/dvips/pstricks-add
parent8e0ffb65e364a93d9ba7bc24dd19137e0e54bf7d (diff)
pstricks-add (16mar09)
git-svn-id: svn://tug.org/texlive/trunk@12409 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/dvips/pstricks-add')
-rw-r--r--Master/texmf-dist/dvips/pstricks-add/pstricks-add.pro21
1 files changed, 20 insertions, 1 deletions
diff --git a/Master/texmf-dist/dvips/pstricks-add/pstricks-add.pro b/Master/texmf-dist/dvips/pstricks-add/pstricks-add.pro
index 4bdeba0acad..6905648fe46 100644
--- a/Master/texmf-dist/dvips/pstricks-add/pstricks-add.pro
+++ b/Master/texmf-dist/dvips/pstricks-add/pstricks-add.pro
@@ -1,4 +1,4 @@
-%% $Id: pstricks-add.pro 49 2008-10-13 10:59:27Z herbert $
+%% $Id: pstricks-add.pro 107 2009-03-12 17:25:46Z herbert $
% PostScript prologue for pstricks-add.tex.
% Version 0.21, 2008/10/15
% For distribution, see pstricks.tex.
@@ -7,6 +7,8 @@
%
/tx@addDict 410 dict def tx@addDict begin
%%
+123 srand % set random generator
+%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
/GTriangle {
gsave
@@ -197,6 +199,23 @@
end
} def
%
+%/amplHand {.8} def
+%/dtHand 2 def
+/varHand { rand sin amplHand mul add } def
+/MovetoByHand { moveto } def
+%/MovetoByHand { /y0 ED /x0 ED x0 y0 moveto } def
+/LinetoByHand { 4 dict begin
+ /y1 ED /x1 ED
+ currentpoint /y0 ED /x0 ED
+ x0 x1 sub dup mul y0 y1 sub dup mul add sqrt /dEnd ED
+ 0 dtHand dEnd { dup
+ x1 x0 sub mul dEnd div x0 add varHand exch
+ y1 y0 sub mul dEnd div y0 add varHand lineto
+ } for
+% /x0 x1 def /y0 y1 def
+ end
+} def
+%
end
%
% END pstricks-add.pro