summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/tex4ht/covington.4ht
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/tex4ht/covington.4ht')
-rwxr-xr-xMaster/texmf-dist/tex/generic/tex4ht/covington.4ht90
1 files changed, 90 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/tex4ht/covington.4ht b/Master/texmf-dist/tex/generic/tex4ht/covington.4ht
new file mode 100755
index 00000000000..1b58bfb2850
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/tex4ht/covington.4ht
@@ -0,0 +1,90 @@
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+% covington.4ht 2009-04-14-17:07 %
+% Copyright (C) 2009 Eitan M. Gurari %
+% %
+% This work may be distributed and/or modified under the %
+% conditions of the LaTeX Project Public License, either %
+% version 1.3c of this license or (at your option) any %
+% later version. The latest version of this license is %
+% in %
+% http://www.latex-project.org/lppl.txt %
+% and version 1.3c or later is part of all distributions %
+% of LaTeX version 2005/12/01 or later. %
+% %
+% This work has the LPPL maintenance status "maintained".%
+% %
+% This Current Maintainer of this work %
+% is Eitan M. Gurari. %
+% %
+% If you modify this program your changing its signature %
+% with a directive of the following form will be %
+% appreciated. %
+% \message{signature} %
+% %
+% gurari@cse.ohio-state.edu %
+% http://www.cse.ohio-state.edu/~gurari %
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+\immediate\write-1{version 2009-04-14-17:07}
+
+ \pend:defI\sentence{\a:sentence}
+\append:defI\sentence{\b:sentence}
+\NewConfigure{sentence}{2}
+\bgroup
+\catcode`\^^M=12 \endlinechar=-1 % 12 = other
+\gdef\twosent#1^^M#2^^M%
+ {\getwords(\lineone,\eachwordone)#1 ^^M%
+ \getwords(\linetwo,\eachwordtwo)#2 ^^M%
+ \loop\lastword{\eachwordone}{\lineone}{\wordone}%
+ \lastword{\eachwordtwo}{\linetwo}{\wordtwo}%
+ \global\setbox\gline=\hbox{\unhbox\gline
+ \hskip\glossglue
+ \vtop{\a:tsent\box\wordone
+ \c:tsent
+ \box\wordtwo
+ \b:tsent
+ }%
+ }%
+ \testdone
+ \ifnotdone
+ \repeat
+ \egroup % matches \bgroup in \gloss
+}
+
+\gdef\threesent#1^^M#2^^M#3^^M%
+ {\getwords(\lineone,\eachwordone)#1 ^^M%
+ \getwords(\linetwo,\eachwordtwo)#2 ^^M%
+ \getwords(\linethree,\eachwordthree)#3 ^^M%
+ \loop\lastword{\eachwordone}{\lineone}{\wordone}%
+ \lastword{\eachwordtwo}{\linetwo}{\wordtwo}%
+ \lastword{\eachwordthree}{\linethree}{\wordthree}%
+ \global\setbox\gline=\hbox{\unhbox\gline
+ \hskip\glossglue
+ \vtop{\a:tsent\box\wordone
+ \c:tsent
+ \box\wordtwo
+ \c:tsent
+ \box\wordthree
+ \b:tsent
+ }%
+ }%
+ \testdone
+ \ifnotdone
+ \repeat
+ \egroup % matches \bgroup in \gloss
+ }
+
+\egroup
+\NewConfigure{tsent}{3}
+\pend:def\gll{\a:gll}
+\pend:def\glll{\a:gll}
+\NewConfigure{gll}{3}
+\def\:tempc{\b:gll\end{flushleft}\c:gll}
+\HLet\glend\:tempc
+\def\glt{{\hskip -\glossglue}\unhbox\gline\smallskip\a:glt}
+\NewConfigure{glt}{1}
+\def\gln{{\hskip -\glossglue}\unhbox\gline\hfill\a:gln}
+\NewConfigure{gln}{1}
+
+\Hinput{covington}
+\endinput
+