identkey (29oct18)

git-svn-id: svn://tug.org/texlive/trunk@49018 c570f23f-e606-0410-a88d-b1316a301751

2 files changed, 54 insertions, 0 deletions

diff --git a/Master/texmf-dist/doc/latex/identkey/README.md b/Master/texmf-dist/doc/latex/identkey/README.md
new file mode 100644
index 00000000000..1f2efc9c02d
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/identkey/README.md
@@ -0,0 +1,13 @@
+# Identkey
+
+## Usage
+
+    \begin{key}
+      \lead Flowers zygomorphic \ident{Senna}
+      \lead Flowers actinomorphic \goto{2}
+
+      \lead Corolla inconspicuous, flowers arranged in dense head or spikes
+        \ident{Acacia}
+      \lead Corolla conspicuous, flowers not arranged in dense heads or spikes
+        \ident{Gleditsia}
+    \end{key}
diff --git a/Master/texmf-dist/tex/latex/identkey/identkey.sty b/Master/texmf-dist/tex/latex/identkey/identkey.sty
new file mode 100644
index 00000000000..1a11059ffd4
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/identkey/identkey.sty
@@ -0,0 +1,41 @@
+% Copyright (c) 2018 Robert White
+
+% This program is free software: you can redistribute it and/or modify
+% it under the terms of the GNU General Public License as published by
+% the Free Software Foundation, either version 3 of the License, or
+% (at your option) any later version.
+
+% This program is distributed in the hope that it will be useful,
+% but WITHOUT ANY WARRANTY; without even the implied warranty of
+% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+% GNU General Public License for more details.
+
+% You should have received a copy of the GNU General Public License
+% along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+\ProvidesPackage{identkey}[2018/10/29 v0.1.0 Package for typesetting bracketed dichotomous identification keys]
+
+\RequirePackage{enumitem}
+\RequirePackage{etoolbox}
+
+\setlist[1]{labelindent=\parindent}
+\newlist{key}{enumerate}{1}
+\setlist[key]{leftmargin=*, label=\arabic*, labelsep=10pt, format=\bfseries}
+
+\newcounter{coupletcounter}
+\setcounter{coupletcounter}{0}
+
+\newcommand\lead{%
+  \refstepcounter{coupletcounter}%
+  \ifnumodd{\value{coupletcounter}}{\firstlead}{\secondlead}%
+}
+
+\newcommand\firstlead{\item}
+\newcommand\secondlead{%
+  \item[\@itemlabel\rlap{:}]%
+}
+
+\newcommand{\ident}[1]{ \dotfill\textit{\textbf{#1}}}
+\newcommand{\goto}[1]{ \dotfill\textbf{#1}}
+
+\endinput