<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">\documentclass[12pt]{article}
\usepackage[italian]{babel}
%\usepackage{amsmath,amssymb,graphicx,wrapfig,fancyhdr,subfigure,color,pictex}
\usepackage{amsmath,amssymb,graphicx,color,amscd}
\usepackage{pst-all}
%\def\blue{\color{blue}}
\definecolor{prova}{rgb}{1,.4,.5}
\def\prova{\color{prova}}
\begin{document}

\section{Figure varie}

\vspace{4cm}

\begin{center}
\SpecialCoor \degrees[360]
\def\cerchio{\pscircle[linewidth=2pt,fillcolor=yellow,fillstyle=solid](0,0){.5}}
\psgrid[subgriddiv=1,griddots=10,gridlabels=7pt](-4,0)(4,4)
%
\multips(2;90)(1;-20){4}{\cerchio}
%
\rput[b]{-45}(1,3){$\cal V$} \rput[b]{45}(3,1){$\cal B$}
\psline[linecolor=red,linestyle=dotted]{-&gt;}(0,0)(-4,4)(3,3)
\end{center}

\vspace{1cm}

\begin{center}
\psframebox[fillcolor=lightgray,fillstyle=solid,framearc=.3,linewidth=2pt]
{\Huge \textbf Capitolo 1}
\end{center}

%\vspace{5cm}

\psframebox{
\begin{minipage}[b][6cm]{10cm}
\begin{center}
\psgrid[subgriddiv=1,griddots=10,gridlabels=7pt](-5,0)(5,5)
\psbezier[linewidth=2pt,showpoints=true]{-&gt;}(0,0)(1,4)(2,1)(4,3.5)
\psline[linewidth=2pt,linearc=.25]{-&gt;}(0,2)(-3,4)(-5,2)
\end{center}
\end{minipage}
}

\medskip

\begin{center}
\begin{pspicture}(-5,-5)(5,0)
\psgrid[subgriddiv=1,griddots=10,gridlabels=7pt](-5,-5)(5,0)
\psccurve[showpoints=true,fillcolor=yellow,fillstyle=solid](-1,-4.5)(-3,-3)(0,-1)(2,-3)(4,-4)
\end{pspicture}
\end{center}

\begin{center}
\begin{pspicture}(-5,-5)(5,5)
\psgrid[subgriddiv=1,griddots=10,gridlabels=7pt](-5,-5)(5,5)
\fileplot{parabola.txt}
\fileplot[plotstyle=dots]{seno.txt}
\pscustom{%
\translate(0,-3)
\psplot[plotpoints=200]{-3}{3}{x 360 mul sin}
}
\end{pspicture}
\end{center}

\newpage

\section{Uso dei parametri in {\em pscustom}}

\begin{verbatim}
\psgrid[subgriddiv=1,griddots=10,gridlabels=7pt](0,0)(5,5)
\psline(0,3)(4,0)
\pscustom[linecolor=white,linewidth=1.5pt]{%
\psline(0,0)(4,3)
\stroke[linewidth=5\pslinewidth]
\stroke[linewidth=3\pslinewidth,linecolor=black]
}
\end{verbatim}
\pnode(1,2){C}
\vspace*{2cm}

\psgrid[subgriddiv=1,griddots=10,gridlabels=7pt](0,0)(5,5)
\pnode(3,2){A}
\psline(0,3)(4,0)
\pscustom[linecolor=white,linewidth=1.5pt]{%
\psline(0,0)(4,3)
\stroke[linewidth=5\pslinewidth]
\stroke[linewidth=3\pslinewidth,linecolor=black]
}
\hspace{6cm}
\begin{minipage}[b]{7cm}
All'interno di "pscustom{...}" l'istruzione \rnode{D}{"stroke"} permette di aggiungere pi\`u volte
la linea "psline(0,0)(4,3)" nella modalit\`a definita dai parametri, ma la linea stessa
viene poi aggiunta alla fine nella modalit\`a fissata dai parametri di "pscustom".
L'effetto finale \`e quello di avere \rnode{B}{due linee} con un bordo.
\ncline[linecolor=green]{&lt;-}{A}{B} \ncangles[angleA=-90, armA=1cm, armB=1cm, angleB=90,
linearc=.15,linecolor=red]{&lt;-}{C}{D}
\end{minipage}

\end{document}
\ncangles[angleA=-90, armA=3cm, armD=1cm, angleB=-90,
linearc=.15]{**-&gt;}{A}{B}
</pre></body></html>