%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -*- 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}
