Initial commit

1 files changed, 73 insertions, 0 deletions

diff --git a/info/examples/PSTricks_en/18-03-3.ltx b/info/examples/PSTricks_en/18-03-3.ltx
new file mode 100644
index 0000000000..8d2bc63417
--- /dev/null
+++ b/info/examples/PSTricks_en/18-03-3.ltx
@@ -0,0 +1,73 @@
+%% 
+%%  A DANTE-Edition example
+%% 
+%%  Example 18-03-3 on page 294.
+%% 
+%%  Copyright (C) 2011 Herbert Voss
+%% 
+%%  It may be distributed and/or modified under the conditions
+%%  of the LaTeX Project Public License, either version 1.3
+%%  of this license or (at your option) any later version.
+%% 
+%%  See http://www.latex-project.org/lppl.txt for details.
+%% 
+%% 
+%% ==== 
+% Show page(s) 1
+%% 
+\documentclass[]{article}
+\pagestyle{empty}
+\setlength\textwidth{375.57637pt}
+\setlength\parindent{0pt}
+
+\usepackage{pst-text,pst-plot}
+\newcommand*\PI{%
+3{,}%
+1415926535897932384626433832795028841971693993751058209749445923078164062862089986280348253421170679%
+8214808651328230664709384460955058223172535940812848111745028410270193852110555964462294895493038196%
+4428810975665933446128475648233786783165271201909145648566923460348610454326648213393607260249141273%
+7245870066063155881748815209209628292540917153643678925903600113305305488204665213841469519415116094%
+3305727036575959195309218611738193261179310511854807446237996274956735188575272489122793818301194912%
+9833673362440656643086021394946395224737190702179860943702770539217176293176752384674818467669405132%
+0005681271452635608277857713427577896091736371787214684409012249534301465495853710507922796892589235%
+4201995611212902196086403441815981362977477130996051870721134999999837297804995105973173281609631859%
+5024459455346908302642522308253344685035261931188171010003137838752886587533208381420617177669147303%
+5982534904287554687311595628638823537875937519577818577805321712268066130019278766111959092164201989%
+3809525720106548586327886593615338182796823030195203530185296899577362259941389124972177528347913151%
+5574857242454150695950829533116861727855889075098381754637464939319255060400927701671139009848824012%
+8583616035637076601047101819429555961989467678374494482553797747268471040475346462080466842590694912%
+9331367702898915210475216205696602405803815019351125338243003558764024749647326391419927260426992279%
+6782354781636009341721641219924586315030286182974555706749838505494588586926995690927210797509302955%
+3211653449872027559602364806654991198818347977535663698074265425278625518184175746728909777727938000%
+8164706001614524919217321721477235014144197356854816136115735255213347574184946843852332390739414333%
+4547762416862518983569485562099219222184272550254256887671790494601653466804988627232791786085784383%
+8279679766814541009538837863609506800642251252051173929848960841284886269456042419652850222106611863%
+0674427862203919494504712371378696095636437191728746776465757396241389086583264599581339047802759009%
+9465764078951269468398352595709825822620522489407726719478268482601476990902640136394437455305068203%
+4962524517493996514314298091906592509372216964615157098583874105978859597729754989301617539284681382%
+6868386894277415599185592524595395943104997252468084598727364469584865383673622262609912460805124388%
+4390451244136549762780797715691435997700129616089441694868555848406353422072225828488648158456028506%
+0168427394522674676788952521385225499546667278239864565961163548862305774564980355936345681743241125%
+1507606947945109659609402522887971089314566913686722874894056010150330861792868092087476091782493858%
+9009714909675985261365549781893129784821682998948722658804857564014270477555132379641451523746234364%
+5428584447952658678210511413547357395231134271661021359695362314429524849371871101457654035902799344%
+0374200731057853906219838744780847848968332144571386875194350643021845319104848100537061468067491927%
+8191197939952061419663428754440643745123718192179998391015919561814675142691239748940907186494231961%
+}
+\DeclareFixedFont{\ps}{U}{psy}{m}{n}{12cm}
+\SpecialCoor
+
+\begin{document}
+\begin{pspicture}(-5,-5)(5,5)
+  \pstextpath{\pscustom[linestyle=none]{%
+  \parametricplot[plotpoints=500]
+                {0}{3510}
+                {t cos t 600 div mul
+                 t sin t 600 div mul}
+  \psline(!3510 cos 3510 600 div mul 30 add
+                 3510 sin 3510 600 div mul)}}
+             {\PI}
+  \rput(0,-3.2){\pscharpath[linecolor=black!20,strokeopacity=0.8,
+    fillstyle=solid,fillcolor=blue!40,opacity=0.75]{\rput[b](0,0){\ps p}}}
+\end{pspicture}
+\end{document}