[pstricks] PSTricks Digest, Vol 121, Issue 1

Mon Feb 4 09:56:41 CET 2013

Le 03/02/2013 12:00, pstricks-request at tug.org a écrit :
> Send PSTricks mailing list submissions to
> 	pstricks at tug.org
>
> To subscribe or unsubscribe via the World Wide Web, visit
> 	http://tug.org/mailman/listinfo/pstricks
> or, via email, send a message with subject or body 'help' to
> 	pstricks-request at tug.org
>
> You can reach the person managing the list at
> 	pstricks-owner at tug.org
>
> When replying, please edit your Subject line so it is more specific
> than "Re: Contents of PSTricks digest..."
>
>
> Today's Topics:
>
>     1. a problem of deformation (Cyrille Piatecki)
>     2. Re: a problem of deformation (Herbert Voss)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Sat, 2 Feb 2013 18:17:40 +0100
> From: Cyrille Piatecki <cyrille.piatecki at univ-orleans.fr>
> To: <pstricks at tug.org>
> Subject: [pstricks] a problem of deformation
> Message-ID: <510D4A34.2060303 at univ-orleans.fr>
> Content-Type: text/plain; charset="ISO-8859-1"; format=flowed
>
> Dear all, and certainly Herbert,
>
> I wonder why the open mouth is not correct in the following graphics. In
> pmy computer the two mouth are not drawn alike.
>
> In the same spirit when I use \psscalebox whith such a custom graphics I
> have often some deformation
>
>
>    Thanks to have a look
>
> Cyrille Piatecki
>
>
> \documentclass{article}
> \usepackage{graphicx}
> \usepackage[dvips, x11names]{xcolor}
> \usepackage{pstricks, pstricks-add, pst-blur,pst-slpe,pst-coil}
> \begin{document}
>
> \begin{figure}
> \begin{center}
> \begin{pspicture}(3,.5)(9,6)
> %\psgrid
> \def\prisu{
> \psline(6,.6)(7,.8)
> \psset{linecolor=red,linestyle=none}
> %\rput(3,2.5){\includegraphics[scale=1.2]{pdwc.eps}}
> \psline[linewidth=5cm,linecolor=red](6,0)(6.2,.75)(6.4,.5)(6.8,.7)
> %\rput(7,2.5){\includegraphics[scale=1.2]{pdwc.eps}}
> \pscircle[fillstyle=slope,slopebegin=PeachPuff2,slopeend=PeachPuff1!20,slopeangle=60,linestyle
> = none](7.36,2.95){.58cm}
> \pscircle[fillstyle=slope,slopebegin=PeachPuff2,slopeend=PeachPuff1!20,slopeangle=60,linestyle
> = none](7.35,3.9){.57cm}
> \pscircle[fillstyle=slope,slopebegin=PeachPuff2,slopeend=PeachPuff1!20,slopeangle=60,linestyle
> = none](6.65,1.95){.2cm}
> \pscircle[fillstyle=slope,slopebegin=PeachPuff2,slopeend=PeachPuff1!20,slopeangle=60,linestyle
> = none](8.18,1.9){.2cm}
> \pscustom[fillstyle=slope,slopebegin=white,
> slopeend=black!01,fillstyle=slope,slopebegin=white,slopeend = black!20]{
> \pscurve[showpoints=true,linewidth=2.8pt](6.8,1.75)(7.3,1.75)(7.98,1.8)
> \pscurve[showpoints=true,linewidth=2.8pt](7.98,1.9)(7.96,2.2)(7.9,3.225)%
> \lineto(7.925,3.275)
> \pscurve[showpoints=true,linewidth=2.8pt](7.9,3.29)(7.8,3.35)(7.7,3.38)%
> \pscurve[showpoints=true,linewidth=2.8pt](7.7,3.38)(7.3,3.25)(7.,3.38)%
> \pscurve[showpoints=true,linewidth=2.8pt](7,3.38)(6.8,3.31)(6.7,3.24)%
> \pscurve[showpoints=true,linewidth=2.8pt](6.7,3.24)(6.75,2.5)(6.8,1.75)%
> }
> \pscustom[fillstyle=slope,slopebegin=black!30,slopeend=black!70,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](7,3.38)(6.8,3.31)(6.7,3.24)%
> \pscurve(6.7,3.22)(6.75,3.15)(6.8,3.1)(7.,3.15)(7.4,3.1)(7.6,3.15)(7.8,3.15)(7.9,3.175)(7.925,3.18)(7.9,3.2)
> \psline(7.92,3.225)(7.95,3.3)
> \pscurve(7.95,3.3)(7.825,3.35)(7.7,3.39)(7.4,3.25)(7,3.39)
> }
> \pscustom[fillstyle=slope,slopebegin=white,slopeend=black!30,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](6.7,3.24)(6.68,3.24)(6.4,2.24)(6.45,1.95)%
> \psline[showpoints=true,linewidth=2.8pt](6.425,1.95)(6.8,1.95)%
> \pscurve[showpoints=true,linewidth=2.8pt](6.7,3.24)(6.68,3.24)(6.4,2.24)(6.45,1.95)
> }
> \pscustom[fillstyle=slope,slopebegin=white,slopeend=black!30,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](7.95,3.325)(8.3,2.7)(8.35,1.95)%
> \psline[showpoints=true,linewidth=2.8pt](8.35,1.95)(7.95,1.95)%
> \pscurve[showpoints=true,linewidth=2.8pt](7.95,1.95)(7.975,2.1)(7.85,2.7)(7.9,3.2)
> }
> \pscustom[fillstyle=slope,slopebegin=white,slopeend=black!30,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](7.42,1.75)(7.5,1.24)(7.5,.6)%
> \psline[showpoints=true,linewidth=2.8pt](7.5,.6)(8.1,.73)%
> \pscurve[showpoints=true,linewidth=2.8pt](8.1,.725)(8.15,.8)(8.15,.94)(7.975,1.8)
> }
> \pscustom[fillstyle=slope,slopebegin=white,slopeend=black!30,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](6.8,1.75)(6.75,1.24)(6.55,.7)%
> \psline[showpoints=true,linewidth=2.8pt](6.55,.6)(7.19,.55)%
> \pscurve[showpoints=true,linewidth=2.8pt](7.2,.73)(7.25,.84)(7.25,.94)(7.4,1.75)
> }
> %\pspolygon[fillstyle=slope,slopebegin=white,slopeend=black!30,linecolor=blue]()()
> \pspolygon[fillstyle=slope,slopebegin=black!10,slopeend=black!70,linecolor=blue,linearc=0.01](6.85,2.9)(7,2.95)(7.4,2.875)(7.7,2.95)(7.875,2.95)(7.85,2.8)(7.4,2.7)(7,2.8)(6.855,2.75)
> %\pspolygon[fillstyle=slope,slopebegin=black,slopeend=black!50,linecolor=blue](7.73,.45)(8.265,.45)(8.2685,.6)(7.73,.6)
> \pswedge[fillstyle=slope,slopebegin=black,slopeend=black!50,linecolor=blue](8,.45){.3cm}{0}{180}
> \pswedge[fillstyle=slope,slopebegin=black,slopeend=black!50,linecolor=blue](6.85,.45){.3cm}{0}{180}
> \rput(6,.75){\psBall{black}{.4cm}}
> \psline(6,.6)(9,.8)}
>
> \def\prisd{
> \psline(6,.6)(7,.8)
> \psset{linecolor=red,linestyle=none}
> %\rput(3,2.5){\includegraphics[scale=1.2]{pdwc.eps}}
> \psline[linewidth=5cm,linecolor=red](6,0)(6.2,.75)(6.4,.5)(6.8,.7)
> %\rput(7,2.5){\includegraphics[scale=1.2]{pdwc.eps}}
> \pscircle[fillstyle=slope,slopebegin=Seashell4,slopeend=Seashell4!20,slopeangle=60,linestyle
> = none](7.36,2.95){.58cm}
> \pscircle[fillstyle=slope,slopebegin=Seashell3,slopeend=Seashell4!20,slopeangle=60,linestyle
> = none](7.35,3.9){.57cm}
> \pscircle[fillstyle=slope,slopebegin=Seashell3,slopeend=Seashell4!20,slopeangle=60,linestyle
> = none](6.65,1.95){.2cm}
> \pscircle[fillstyle=slope,slopebegin=Seashell3,slopeend=Seashell4!20,slopeangle=60,linestyle
> = none](8.18,1.9){.2cm}
> \pscustom[fillstyle=slope,slopebegin=white,
> slopeend=Coral1!01,fillstyle=slope,slopebegin=white,slopeend = Coral1!20]{
> \pscurve[showpoints=true,linewidth=2.8pt](6.8,1.75)(7.3,1.75)(7.98,1.8)
> \pscurve[showpoints=true,linewidth=2.8pt](7.98,1.9)(7.96,2.2)(7.9,3.225)%
> \lineto(7.925,3.275)
> \pscurve[showpoints=true,linewidth=2.8pt](7.9,3.29)(7.8,3.35)(7.7,3.38)%
> \pscurve[showpoints=true,linewidth=2.8pt](7.7,3.38)(7.3,3.25)(7.,3.38)%
> \pscurve[showpoints=true,linewidth=2.8pt](7,3.38)(6.8,3.31)(6.7,3.24)%
> \pscurve[showpoints=true,linewidth=2.8pt](6.7,3.24)(6.75,2.5)(6.8,1.75)%
> }
> \pscustom[fillstyle=slope,slopebegin=Coral1!30,slopeend=Coral1!70,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](7,3.38)(6.8,3.31)(6.7,3.24)%
> \pscurve(6.7,3.22)(6.75,3.15)(6.8,3.1)(7.,3.15)(7.4,3.1)(7.6,3.15)(7.8,3.15)(7.9,3.175)(7.925,3.18)(7.9,3.2)
> \psline(7.92,3.225)(7.95,3.3)
> \pscurve(7.95,3.3)(7.825,3.35)(7.7,3.39)(7.4,3.25)(7,3.39)
> }
> \pscustom[fillstyle=slope,slopebegin=white,slopeend=Coral1!30,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](6.7,3.24)(6.68,3.24)(6.4,2.24)(6.45,1.95)%
> \psline[showpoints=true,linewidth=2.8pt](6.425,1.95)(6.8,1.95)%
> \pscurve[showpoints=true,linewidth=2.8pt](6.7,3.24)(6.68,3.24)(6.4,2.24)(6.45,1.95)
> }
> \pscustom[fillstyle=slope,slopebegin=white,slopeend=Coral1!30,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](7.95,3.325)(8.3,2.7)(8.35,1.95)%
> \psline[showpoints=true,linewidth=2.8pt](8.35,1.95)(7.95,1.95)%
> \pscurve[showpoints=true,linewidth=2.8pt](7.95,1.95)(7.975,2.1)(7.85,2.7)(7.9,3.2)
> }
> \pscustom[fillstyle=slope,slopebegin=white,slopeend=Coral1!30,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](7.42,1.75)(7.5,1.24)(7.5,.6)%
> \psline[showpoints=true,linewidth=2.8pt](7.5,.6)(8.1,.73)%
> \pscurve[showpoints=true,linewidth=2.8pt](8.1,.725)(8.15,.8)(8.15,.94)(7.975,1.8)
> }
> \pscustom[fillstyle=slope,slopebegin=white,slopeend=Coral1!30,linecolor=blue]{
> \pscurve[showpoints=true,linewidth=2.8pt](6.8,1.75)(6.75,1.24)(6.55,.7)%
> \psline[showpoints=true,linewidth=2.8pt](6.55,.6)(7.19,.55)%
> \pscurve[showpoints=true,linewidth=2.8pt](7.2,.73)(7.25,.84)(7.25,.94)(7.4,1.75)
> }
> %\pspolygon[fillstyle=slope,slopebegin=white,slopeend=black!30,linecolor=blue]()()
> \pspolygon[fillstyle=slope,slopebegin=Coral1!10,slopeend=Coral1!70,linecolor=blue,linearc=0.01](6.85,2.9)(7,2.95)(7.4,2.875)(7.7,2.95)(7.875,2.95)(7.85,2.8)(7.4,2.7)(7,2.8)(6.855,2.75)
> %\pspolygon[fillstyle=slope,slopebegin=Coral1,slopeend=black!50,linecolor=blue](7.73,.45)(8.265,.45)(8.2685,.6)(7.73,.6)
> \pswedge[fillstyle=slope,slopebegin=Coral1,slopeend=Coral1!50,linecolor=blue](8,.45){.3cm}{0}{180}
> \pswedge[fillstyle=slope,slopebegin=Coral1,slopeend=Coral1!50,linecolor=blue](6.85,.45){.3cm}{0}{180}
> \rput(6,.75){\psBall{Coral1}{.4cm}}
> \psline(6,.6)(9,.8)}
> \rput(2.4,2.2){\psscalebox{.15 .15}{\prisu}}
> \rput(5.9,5.2){\psscalebox{.15 .15}{\prisd}}
>
> \pspolygon[fillstyle=slope,slopebegin=white,slopeend=PaleTurquoise1,linecolor=SteelBlue2,shadow=true,blur=true](5.5,1)(8.5,1)(8.5,4.)(5.5,4.)
> \psline[linecolor=SteelBlue2](5.5,2.5)(8.5,2.5)
> \psline[linecolor=SteelBlue2](7,1)(7,4)
> \rput(6.4,3.2){(3,3)}
> \rput(7.8,3.2){(5,0)}
> \rput(6.4,1.8){(0,5)}
> \rput(7.8,1.8){(1,1)}
>
> \pscircle[fillstyle=slope,slopebegin=Seashell3,slopeend=Seashell4!20,slopeangle=60,linestyle
> = none](7.75,4.5){.45cm}
> \pscircle[fillstyle=slope,slopebegin=Seashell3,slopeend=Seashell4!20,slopeangle=60,linestyle
> = none](6.25,4.5){.45cm}
> \pscircle[fillstyle=slope,slopebegin=PeachPuff2,slopeend=PeachPuff1!20,slopeangle=60,linestyle
> = none](4.5,1.8){.45cm}
> \pscircle[fillstyle=slope,slopebegin=PeachPuff2,slopeend=PeachPuff1!20,slopeangle=60,linestyle
> = none](4.5,3.2){.45cm}
> \def\bouche{
> \pscustom[linecolor=Firebrick2,fillstyle=solid,fillcolor=pink]{
> \psline(6.1,4.3)(6.4,4.3)
> \pscurve(6.4,4.3)(6.2,4.2)(6.1,4.3)
> }}
> \rput(0,0){\bouche}
> \rput(-1.8,-1.3){\bouche}
> \def\sil{
> \psline[linewidth=2pt,linecolor=Firebrick1]{cc-cc}(7.6,4.4)(7.9,4.2)
> \psline[linewidth=2pt,linecolor=Firebrick1]{cc-cc}(7.6,4.2)(7.9,4.4)}
> \rput(0,0){\sil}
> \rput(-3.2,-2.7){\sil}
> %\psgrid
> \end{pspicture}
> \caption{\textsc{}}\label{}
> \end{center}
> \end{figure}
>
>
>
>
>
> \end{document}
>
>
>
> ------------------------------
>
> Message: 2
> Date: Sun, 3 Feb 2013 10:48:24 +0100
> From: Herbert Voss <Herbert.Voss at FU-Berlin.DE>
> To: <pstricks at tug.org>
> Subject: Re: [pstricks] a problem of deformation
> Message-ID: <510E3268.1000608 at FU-Berlin.DE>
> Content-Type: text/plain; charset="ISO-8859-1"; format=flowed
>
> On 02.02.2013 18:17, Cyrille Piatecki wrote:
>
>> I wonder why the open mouth is not correct in the following graphics. In
>> pmy computer the two mouth are not drawn alike.
>>
>> In the same spirit when I use \psscalebox whith such a custom graphics I
>> have often some deformation
> I do not understand what you mean by "not correct"
>
> Herbert
>
>
> ------------------------------
>
> Subject: Digest Footer
>
> _______________________________________________
> PSTricks mailing list
> PSTricks at tug.org
> http://tug.org/mailman/listinfo/pstricks
>
>
> ------------------------------
>
> End of PSTricks Digest, Vol 121, Issue 1
> ****************************************
>
On my computer, the two mouth which are drawn with the same macro are 
not alike