summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/semantic-markup/semantic-markup.sty
blob: f4e7f3ffbf9c6e78d199743b7b8ef6420bee6c63 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{semantic-markup}[2016/09/01
  Macros for TEI-like semantic markup]
% Copyright 2016 Andrew A. Cashner, cashner@usc.edu

% This work may be distributed and/or modified under the 
% conditions of the LaTeX Project Public License, either
% version 1.3 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.3 or later is part of all distributions
% of LaTeX version 2005/12/01 or later.
%
% This work has the LPPL maintenance status `maintained'.
% The Current Maintainer of this work is Andrew A. Cashner.
% This work consists of the package file semantic-markup.sty 
% and the documentation file semantic-markup.tex.

\newif\ifdefaultquotes
% Use custom configuration instead of csquotes default
\defaultquotesfalse 
\DeclareOption{defaultquotes}{\defaultquotestrue}
\ProcessOptions\relax

\RequirePackage{xparse}

\RequirePackage{csquotes}
\ifdefaultquotes\else
  % Put end punctuation inside quotation marks 
  % for the specified marks
  \renewcommand{\mktextquote}[6]{#1#2#4#5#3#6}
  \DeclareAutoPunct{.,!?}
\fi

\NewDocumentCommand{\quoted}{}	
{\textquote}
\NewDocumentCommand{\soCalled}{}
{\textquote}
\NewDocumentCommand{\strong}{}	
{\textbf}
\NewDocumentCommand{\code}{}	
{\texttt}
\NewDocumentCommand{\term}{}	
{\emph}
\NewDocumentCommand{\mentioned}{}	
{\emph}
\NewDocumentCommand{\foreign}{}
{\emph}
\NewDocumentCommand{\worktitle}{}
{\emph}
\NewDocumentCommand{\parttitle}{}
{\textquote}

% editorial addition
\NewDocumentCommand{\add}{ m }
{[#1]}
% editorial ellipsis
\NewDocumentCommand{\Dots}{}{\add{\dots}}
% explanatory gloss of technical or foreign term
\NewDocumentCommand{\gloss}{ m m }{%
  \mentioned{#1} (#2)%
}
% explanatory gloss of word in quotation marks
\NewDocumentCommand{\quotedgloss}{ m m }{%
  \quoted{#1} (#2)%
}

%*******************
% Identify problem spot in draft
\NewDocumentCommand{\XXX}{ O{\add{FIX}} }{%
  \textbf{#1}%
}
% Indicate citation to be filled in later
% Optional argument for indicating the source
\NewDocumentCommand{\citXXX}{ o }{%
  \footnote{\textbf{[Citation needed]\IfValueTF{#1}{#1}{}}}%
}

%*******************
% Footnote as environment
\RequirePackage{environ}
\NewEnviron{Footnote}{\footnote{\BODY}}[]

%****************************************
% MUSIC SYMBOLS

% Accidentals using LaTeX symbols
\NewDocumentCommand{\fl}{}{$\flat$}
\NewDocumentCommand{\na}{}{$\natural$}
\NewDocumentCommand{\sh}{}{$\sharp$}

% Octave subscripts 
\NewDocumentCommand{\octave}{ }{\textsubscript}

% Music figures
\RequirePackage{amsmath}
\NewDocumentCommand{\musfig}{ m m }{%
  $\genfrac{}{}{0pt}{1}{\text{#1}}{\text{#2}}$%
} 

% Meter signatures
\RequirePackage[rm]{harmony}
\NewDocumentCommand{\meter}{ m m }{\Takt{#1}{#2}}

\endinput