% !TEX TS-program = LuaLaTeX+se
% !TEX encoding = UTF-8
\documentclass[11pt]{article} % use larger type; default would be 10pt
\usepackage[autocompile]{gregoriotex}
\usepackage{fullpage}
\usepackage{libertine}
\usepackage[latin]{babel}
%%% This function is used at the end of a function which inserts text. It checks to see if a space should be included at the end of the command, suppressing it if the command is immediately followed by a punctuation character but including it otherwise.
\makeatletter
\newcommand{\punctuationcheck}{%
\@ifnextchar){\relax}{%
\@ifnextchar]{\relax}{%
\@ifnextchar.{\relax}{%
\@ifnextchar,{\relax}{%
\@ifnextchar’{\relax}{\ }}}}}%
}
\makeatother
%%% Code for ordinal numbers. Note that this code redefines \th to make it produce the superscripted "th" for ordinal numbers and so defines a new command, \thorn, to allow access to the phonetic letter which is usually accessed by that command.
\newcommand{\st}{\textsuperscript{st}\punctuationcheck}
\newcommand{\nd}{\textsuperscript{nd}\punctuationcheck}
\newcommand{\rd}{\textsuperscript{rd}\punctuationcheck}
\let\thorn\th
\renewcommand{\th}{\textsuperscript{th}\punctuationcheck}
\def\move{\rule[-0.2em]{0.4pt}{1em}\,}
\gresethyphen{force}
\grechangedim{afterinitialshift}{2.2mm}{scalable}
\grechangedim{beforeinitialshift}{2.2mm}{scalable}
\grechangestyle{initial}{%
\fontsize{40}{40}\selectfont}%
\grechangestyle{annotation}{\scshape\bfseries\small}
\grechangestaffsize{15}
\begin{document}
\section*{In principio Horarum}
\section*{Tonus ferialis.}
\gregorioscore{Scores/or--deus_in_adiutorium_(tonus_ferialis)--solesmes}
\vspace{0.5cm}\gresetinitiallines{0}
\section*{Feria Secunda}
\section*{Capitulum. 2 Cor 1:3-4}
\section*{Benedíctus Deus, et Pater Dómini nostri Iesu Christi, \grecross Pater misericordiárum, et Deus totíus consolatiónis, \gresixstar qui consolátur nos in omni tribulatióne nostra.}
\gregorioscore{Scores/hy--immense_caeli--solesmes_1961}
\gresetinitiallines{1}\vspace{0.5cm}
\end{document}
--
Gregorio homepage: http://gregorio-project.github.io
Archives for the old mailing list: http://www.mail-archive.com/gregori...@gna.org/
To report a bug, please post to: https://github.com/gregorio-project/gregorio/issues
---
You received this message because you are subscribed to the Google Groups "Gregorio Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email to gregorio-user...@googlegroups.com.
To view this discussion on the web visit https://groups.google.com/d/msgid/gregorio-users/8aa2f1bc-f666-4be8-a81a-9cc0936f2225n%40googlegroups.com.