Regular Polygon

\psset{unit=3cm}
\begin{pspicture}(0, 0)(2, 2)
  \psset{linewidth=1pt}
  \psline(2.0000,1.0000)(1.9325,1.3612)
  \psline(1.9325,1.3612)(1.7390,1.6737)
  \psline(1.7390,1.6737)(1.4457,1.8952)
  \psline(1.4457,1.8952)(1.0923,1.9957)
  \psline(1.0923,1.9957)(0.7263,1.9618)
  \psline(0.7263,1.9618)(0.3974,1.7980)
  \psline(0.3974,1.7980)(0.1498,1.5264)
  \psline(0.1498,1.5264)(0.0170,1.1837)
  \psline(0.0170,1.1837)(0.0170,0.8163)
  \psline(0.0170,0.8163)(0.1498,0.4736)
  \psline(0.1498,0.4736)(0.3974,0.2020)
  \psline(0.3974,0.2020)(0.7263,0.0382)
  \psline(0.7263,0.0382)(1.0923,0.0043)
  \psline(1.0923,0.0043)(1.4457,0.1048)
  \psline(1.4457,0.1048)(1.7390,0.3263)
  \psline(1.7390,0.3263)(1.9325,0.6388)
  \psline(1.9325,0.6388)(2.0000,1.0000)  
  \psset{linewidth=.1pt}  
  \psline(2.0000,1.0000)(1, 1)
  \psline(1.9325,1.3612)(1, 1)
  \psline(1.7390,1.6737)(1, 1)
  \psline(1.4457,1.8952)(1, 1)
  \psline(1.0923,1.9957)(1, 1)
  \psline(0.7263,1.9618)(1, 1)
  \psline(0.3974,1.7980)(1, 1)
  \psline(0.1498,1.5264)(1, 1)
  \psline(0.0170,1.1837)(1, 1)
  \psline(0.0170,0.8163)(1, 1)
  \psline(0.1498,0.4736)(1, 1)
  \psline(0.3974,0.2020)(1, 1)
  \psline(0.7263,0.0382)(1, 1)
  \psline(1.0923,0.0043)(1, 1)
  \psline(1.4457,0.1048)(1, 1)
  \psline(1.7390,0.3263)(1, 1)
  \psline(1.9325,0.6388)(1, 1)
\end{pspicture}