いつもお世話になっております。
\tenretuを使って図形を書こうとしたのですが、
\tenretuコマンドの後でエラーが発生します。
ソースは下記の通りです

\documentclass[12pt]{jsarticle}
\usepackage{emathP}
\usepackage[debug]{emathPs}

\begin{document}
\begin{picture}(,100,10)
\begin{pszahyou*}[ul=5mm]
        (-0.5,12)(-0.5,12)
\setlinewidth{1}
\Ifor\x{0}{13}\Do{
        \Drawline{(\x,0)(\x,12)}
\Ifor\y{0}{13}\Do{
        \Drawline{(0,\y)(12,\y)}
}}
\setlinewidth{3}
\tenretu{
        A(4,11)n;
        B(2,7)nw;
        C(2,2)sw;
        D(7,2)s;
        E(11,4)e;
        F(6,6)ne;
}
%\Drawline{\A\B\C\D\E\F\A}
%ここでエラーが発生する
\end{pszahyou*}
\end{picture}



ログは下記の通りです。
This is pTeX, Version 3.141592-p3.1.3 (sjis) (Web2C 7.5.2)
 \write18 enabled.
(./kousi.tex
pLaTeX2e <2001/09/04>+0 (based on LaTeX2e <2001/06/01> patch level 0)
(c:/usr/local/share/texmf/ptex/platex/js/jsarticle.cls
Document Class: jsarticle 2003/11/24 okumura
) (c:/usr/local/share/texmf/ptex/platex/misc/emath/emathP.sty
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathPp.sty
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathPh.sty
(c:/usr/local/share/texmf/jtex/latex209/tools/epic.sty
Enhancements to Picture Environment. Version 1.2 - Released June 1, 1986
) (c:/usr/local/share/texmf/jtex/latex209/tools/eepic.sty
Extension to Epic and LaTeX. Version 1.1b - Released Febrary 7, 1988
) (c:/usr/local/share/texmf/jtex/latex209/tools/eclarith.sty
eclarith.sty 1.1 --- July 1, 1992
) (c:/usr/local/share/texmf/ptex/platex/misc/emath/emath.sty
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emath2e.sty
(c:/usr/local/share/texmf/tex/latex/amslatex/amsmath.sty
For additional information on amsmath, use the `?' option.
(c:/usr/local/share/texmf/tex/latex/amslatex/amstext.sty
(c:/usr/local/share/texmf/tex/latex/amslatex/amsgen.sty))
(c:/usr/local/share/texmf/tex/latex/amslatex/amsbsy.sty)
(c:/usr/local/share/texmf/tex/latex/amslatex/amsopn.sty))
(c:/usr/local/share/texmf/tex/latex/amsfonts/amssymb.sty
(c:/usr/local/share/texmf/tex/latex/amsfonts/amsfonts.sty))
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathC.sty
(c:/usr/local/share/texmf/tex/latex/tools/calc.sty))
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathE.sty
(c:/usr/local/share/texmf/tex/latex/tools/enumerate.sty)
(c:/usr/local/share/texmf/tex/latex/graphics/keyval.sty)
(c:/usr/local/share/texmf/tex/latex/base/ifthen.sty)
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathMw.sty
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathLb.sty))
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathK.sty))))
(c:/usr/local/share/texmf/tex/latex/graphics/graphicx.sty
(c:/usr/local/share/texmf/tex/latex/graphics/graphics.sty
(c:/usr/local/share/texmf/tex/latex/graphics/trig.sty)
(c:/usr/local/share/texmf/tex/latex/config/graphics.cfg)
(c:/usr/local/share/texmf/tex/latex/graphics/dvips.def)))
(c:/usr/local/share/texmf/tex/latex/graphics/color.sty
(c:/usr/local/share/texmf/tex/latex/config/color.cfg)
(c:/usr/local/share/texmf/tex/latex/graphics/dvipsnam.def))))
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathPxy.sty)
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathPk.sty)
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathT.sty
(c:/usr/local/share/texmf/tex/latex/tools/array.sty)
(c:/usr/local/share/texmf/tex/latex/tools/hhline.sty)))
(c:/usr/local/share/texmf/ptex/platex/misc/emath/emathPs.sty
(c:/usr/local/share/texmf/tex/latex/tools/verbatim.sty)
(c:/usr/local/share/texmf/tex/latex/misc/lastpage.sty)) (./kousi.aux)
Runaway argument?
\@nil \edef \@OresenV@old {\@OresenV }\relax \relax \ifthenelse {\not \ETC.
! Paragraph ended before \@@tenretu@sub was complete.
<to be read again> 
                   \par 
l.25 
     
? 
! Emergency stop.
<to be read again> 
                   \par 
l.25 
     
No pages of output.
Transcript written on kousi.log.

▼関連発言
│
└◆4128:\tenretuについて [H.K] 12/12 13:08
　├◆4130:Re:\tenretuについて [tDB] 12/12 13:22
　└◆4132:Re:\tenretuについて [Hiro] 12/12 13:34
　　└◆4134:Re[2]:\tenretuについて（解決） [H.K] 12/12 14:03<-last