%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -*- Mode: Latex -*- %%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% t-poly4.tex --- Test file for PSTricks polygons (`pst-poly')
%%                 Test of various node definitions
%%
%% Author          : Denis GIROU (CNRS/IDRIS - France) <Denis.Girou@idris.fr>
%% Created the     : 1996
%% Last mod. by    : Denis GIROU (CNRS/IDRIS - France) <Denis.Girou@idris.fr>
%% Last mod. the   : Wed Feb 25 21:56:46 1998
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\documentclass{article}

\usepackage[dvips]{pstcol}
\usepackage{pst-poly}
\usepackage[baw,pstricks]{fvrb-ex} % Example environments with `fancyvrb'

% Example environments with numbers, frame and 4.5cm reserved for the graphic
\fvset{numbers=left,frame=single,xrightmargin=4.5cm}

\textwidth=14cm

\pagestyle{empty}

\begin{document}

\begin{SideBySideExample}
  \providecommand{\PstPolygonNode}{%
    §HLeµ\psdots[dotsize=0.2,linecolor=cyan](1;\INode)¶}
  \PstPentagon[unit=2]
\end{SideBySideExample}

\begin{SideBySideExample}
  \providecommand{\PstPolygonNode}{%
    §HLeµ\rput{*0}(1.2;\INode){\small\the\multidocount}¶}
  \PstPolygon[unit=2,PolyNbSides=7,PolyOffset=2]
\end{SideBySideExample}

\begin{SideBySideExample}
  \providecommand{\PstPolygonNode}{%
    §HLeµ\rput*{*0}(1;\INode){\small\the\multidocount}¶}
  \PstHeptagon[unit=2,PolyOffset=2]
\end{SideBySideExample}

\begin{SideBySideExample}
  \newcounter{Letter}
  \providecommand{\PstPolygonNode}{%
    §HLeµ\setcounter{Letter}{\the\multidocount}¶%
    §HLeµ\rput*{*0}(1;\INode){\small\Alph{Letter}}¶}
  \PstHeptagon[unit=2,PolyOffset=3]
\end{SideBySideExample}

\begin{SideBySideExample}
  \providecommand{\PstPolygonNode}{%
    §HLeµ\SpecialCoor¶
    §HLeµ\degrees[3]¶
    §HLeµ\rput{0.5}(0.5;\INode){¶%
      §HLeµ\pspolygon*(0.5;0.5)(0.5;1.5)(0.5;2.5)}¶}
  \PstTriangle
\end{SideBySideExample}

\begin{SideBySideExample}
  \providecommand{\PstPolygonNode}{%
    §HLeµ\psdots[dotstyle=o,dotsize=0.2](1;\INode)¶
    §HLeµ\psline[linecolor=red]{->}(0.9;\INode)¶}
  \PstPolygon[unit=2,PolyNbSides=8]
\end{SideBySideExample}

\begin{SideBySideExample}
  \providecommand{\PstPolygonNode}{%
    \psline[linewidth=0.1mm,doubleline=true,
            linecolor=green]{<->}(0;0)(1;\INode)}
  \PstHexagon[unit=2]
\end{SideBySideExample}

\begin{SideBySideExample}
  \newbox{\Star}
  \savebox{\Star}{%
    \PstStarFive*[unit=0.15,linecolor=red]}
  \providecommand{\PstPolygonNode}{%
    §HLeµ\rput{*0}(1;\INode){\usebox{\Star}}¶}
  \shortstack{%
    \PstNonagon\\[5mm]
    \PstDodecagon[linestyle=none]}
\end{SideBySideExample}

\end{document}
