35.2 verse

<..verse.4ht..>
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 % verse.4ht                             2014-07-12-22:36 %
 % Copyright (C) 2003--2009       Eitan M. Gurari         %
 <.TeX4ht copyright.>
 <.verse cfg.>
 \Hinput{verse}
 \endinput
 -_-_-

<..verse cfg..>
 \def\@vsptitle[#1]#2{%
   <.memoir verse title.>%
   \a:poemtitle
   \addcontentsline{toc}{\poemtoc}{#1}
   \poemtitlemark{#1}%
   \b:poemtitle
   \@vstypeptitle{#2}%
   \c:poemtitle
   \@afterheading}
 \def\@vssptitle#1{%
   \a:likepoemtitle
   \@vstypeptitle{#1}%
   \b:likepoemtitle
   \@afterheading}
 \NewConfigure{poemtitle}{3}
 \NewConfigure{likepoemtitle}{2}
 -_-_-

<..verse cfg..>+
 \pend:def\@vscentercr{%
    \let\incr:vsline\incr@vsline
    \def\incr@vsline{\let\incr@vsline\incr:vsline}%
 }
 \pend:def\start@vsline{\a:verseline  \incr@vsline}
 \renewcommand{\@vsifbang}[1]{\@ifnextchar !{%
    \b:verseline\incr@vsline \@firstoftwo{#1}}}
 \expand:after{\let\sv:verse}\csname \string\verse\endcsname
 \expandafter\def\csname \string\verse\endcsname[#1]{%
    \let\:temp\refstepcounter
    \def\refstepcounter##1\let{\let\refstepcounter\:temp\let}%
    \sv:verse[#1]%
    \a:verseline  <.memoir verse counter.>%
    \setcounter{poemline}{0}%
    \setcounter{vslineno}{1}%
    \incr@vsline
 }
 \NewConfigure{verseline}{2}
 -_-_-

<..memoir verse counter..>
 \expandafter\ifx \csname c@verse\endcsname\relax \else
    \refstepcounter{verse}%
 \fi
 -_-_-

<..memoir verse title..>
 \csname phantomsection\endcsname
 -_-_-

<..verse cfg..>+
 \pend:defI\flagverse{\a:flagverse}
 \append:defI\flagverse{\b:flagverse}
 \NewConfigure{flagverse}{2}
 -_-_-

<..memoir pre 2008..>
 \pend:defI\getthelinenumber{%
    \let\sv:thepoemline\thepoemline
    \pend:def\thepoemline{\a:poemline}%
    \append:def\thepoemline{\b:poemline}}
 \append:defI\getthelinenumber{\let\thepoemline\sv:thepoemline}
 -_-_-

<..memoir 2008..>
 \pend:defII\getthelinenumber{%
    \let\sv:thepoemline\thepoemline
    \pend:def\thepoemline{\a:poemline}%
    \append:def\thepoemline{\b:poemline}}
 \append:defII\getthelinenumber{\let\thepoemline\sv:thepoemline}
 -_-_-

<..memoir cfg..>+
 \NewConfigure{poemline}{2}
 -_-_-