6.3

polygon をつけてその頂点利用.
\xypolynode polygon ごとにリセットされる. 以下のようにすると頂点 うつことが.

  \newcounter{mynode}
  \newcommand{\mypolynode}{%
   \stepcounter{mynode}
   \themynode
  }

  \setcounter{mynode}{0}
  
  \[
   \xy /r2pc/:
   {\xypolygon5"A"{~={90}~*{\mypolynode}}},
   {\xypolygon5"B"{~={90}~:{(2,0):}~*{\mypolynode}~>{}}},
   {\xypolygon5"C"{~={-90}~:{(3,0):}~*{\mypolynode}~>{}}},
   {\xypolygon5"D"{~={-90}~:{(4,0):}~*{\mypolynode}}},
   {"B1"\PATH~={**@{-}}’"C4"’"B2"’"C5"’"B3"’"C1"’"B4"’
   "C2"’"B5"’"C3"’"B1"},
   "A1";"B1"**@{-},"A2";"B2"**@{-},"A3";"B3"**@{-},
   "A4";"B4"**@{-},,"A5";"B5"**@{-}, "C1";"D1"**@{-},
   "C2";"D2"**@{-},"C3";"D3"**@{-},"C4";"D4"**@{-},"C5";"D5"**@{-}
   \endxy
  \]

⇓

       19-------------------18
          14              13
                  6
                   |
                  1
         7                10
              2        5

     15        3 ----4         12
20                                 17
             8          9

                  11
                   |
                  16