maerasem.sty

%
% (c) Zachari Khayati Darian
%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{maerasem}
\RequirePackage{setspace,needspace,lettrine,changepage,ifthen,maerasem-common}

\@ifpackageloaded{ekdosis}{
  \newenvironment{cleanalignment}{
    \setlength\linenumbersep{\maxdimen}\SetLineation{lineation=page,modulo,modulonum=100}
    \newenvironment{leftside}{\begin{edition*}}{\end{edition*}}
    \newenvironment{rightside}{\begin{translation}}{\end{translation}}
    \providecommand\resumeleftsidetext{--- Resume on the left page ---}
    \providecommand\resumeleftside{
      \begin{leftside}
      \end{leftside}
      \begin{rightside}
        \vbox to -\parskip {
          \decree{
            \resumeleftsidetext
          }
        }
      \end{rightside}
    }
    \begin{alignment}
    }{
      \resumeleftside
    \end{alignment}
  }
}{}

\@ifpackageloaded{maerasem-avaz}{
  \providecommand\mart[1]{\vbox to 0.7\baselineskip{\vfil\hbox to 1.0em{
    \unskip\let\NeumeFontScaleFactor\NeumeFontScaleFactorInline\NeumeAutoResize
    \unskip\centering
    \unskip\ruh\neume\hspace{0.1em} #1 %TODO: Get rid of magic number
  \unskip}\vfil}}\ignorespaces
}{}

\providecommand\heirmos[1]{\footnotesize(Heirmos: \emph{#1})}
\providecommand\automelon[1]{\footnotesize(Automelon: \emph{#1})}
\providecommand\DropAFontHook{}
\providecommand\DropBFontHook{}
\providecommand\DropCFontHook{}
\providecommand\DropDFontHook{}
\providecommand\SmallDropFontHook{}
\providecommand\smalldropbommand[2]{\noindent{\bfseries\ruh\DropAFontHook #1}{\scshape #2}{ }}
\providecommand\dropacommand[3][2]{
  \unskip\Needspace{2.8\baselineskip}
  \unskip\let\LettrineFontHook\DropBFontHook\lettrine[lines=#1]{\ruh #2}{#3}{ }}
\providecommand\dropbcommand[3][3]{
  \unskip\Needspace{3.8\baselineskip}
  \unskip\let\LettrineFontHook\DropCFontHook\lettrine[lines=#1]{\ruh #2}{#3}{ }}
\providecommand\dropccommand[3][4]{
  \unskip\Needspace{4.8\baselineskip}
  \unskip\let\LettrineFontHook\DropDFontHook\lettrine[lines=#1]{\ruh #2}{#3}{ }}
\providecommand\dropdcommand[3][5]{
  \unskip\Needspace{5.8\baselineskip}
  \unskip\let\LettrineFontHook\DropEFontHook\lettrine[lines=#1]{\ruh #2}{#3}{ }}
\providecommand\smalldrop{\let\takefirstlettercommand\smalldropbommand\takefirstletter}
\providecommand\dropa[1][2]{
	\renewcommand\takefirstlettercommand[2]{\dropacommand[#1]{##1}{##2}}\takefirstletter
}
\providecommand\dropb[1][3]{
	\renewcommand\takefirstlettercommand[2]{\dropbcommand[#1]{##1}{##2}}\takefirstletter
}
\providecommand\dropc[1][4]{
	\renewcommand\takefirstlettercommand[2]{\dropccommand[#1]{##1}{##2}}\takefirstletter
}
\providecommand\dropd[1][5]{
	\renewcommand\takefirstlettercommand[2]{\dropdcommand[#1]{##1}{##2}}\takefirstletter
}
\let\drop\dropa
\newenvironment{haemsaefhe}{
  \noindent\begin{minipage}{\textwidth}
  }{
  \end{minipage}
}
\providecommand\gotoevenpage{
  \checkoddpage
  \ifthenelse{\boolean{oddpage}}{\hfill\newpage}{}
}
\@ifpackageloaded{dialogue}{
  \let\olddialogue\dialogue \let\endolddialogue\enddialogue
  \renewenvironment{dialogue}{
    \let\OldDialogueLabel\DialogueLabel
    \renewcommand*\DialogueLabel[1]{\helper{##1:}\hfil}
    \olddialogue
    \setlength\parskip{0.5em}
  }{
    \endolddialogue
  }
}{
  \newenvironment{dialogue}{ % TODO Hanging indent
    \setlength\parskip{0em}
    \setlength\parindent{0em}
    \let\outerspeak\speak
    \renewcommand\speak[1]{\par\outerspeak{##1}{}}
  }{}
}
\newcounter{versenumber}
\newenvironment{chantverses}{
  \setcounter{versenumber}{0}
  \noindent\begin{minipage}{\textwidth}
    \def\chantverse##1{##1}
    \renewcommand\chantverse[1]{
      \refstepcounter{versenumber}
      \speak{\nth{\theversenumber} Verse}\emph{##1}
    }
    \begin{dialogue}
      \setlength\parskip{0em}
    }{
    \end{dialogue}
  \end{minipage}
}
\providecommand\speak[2]{
  \noindent\hspace{0em}\helper{#1:}\hspace{0.5em}{\em #2}
}
\providecommand\nearbelow{\vspace{-\parskip}}
\providecommand\nb{\nearbelow}
\providecommand\ndrop{\nearbelow\drop}

\setlength\parskip{1em}