~ubuntu-branches/debian/wheezy/texlive-extra/wheezy

« back to all changes in this revision

Viewing changes to texmf-dist/source/latex/bibleref/bibleref.dtx

  • Committer: Bazaar Package Importer
  • Author(s): Norbert Preining
  • Date: 2009-01-15 09:56:54 UTC
  • mfrom: (1.3.1 upstream) (11.1.1 sid)
  • Revision ID: james.westby@ubuntu.com-20090115095654-71ev5rcx4pi5loe1
Tags: 2007.dfsg.15-1
upgrade bibleref to version from upstream which changes the license
to LPPL (Closes: #511843) RC->medium

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
%\iffalse
2
 
% bibleref.dtx generated using makedtx version 0.91b (c) Nicola Talbot
 
2
% bibleref.dtx generated using makedtx version 0.94b (c) Nicola Talbot
3
3
% Command line args:
 
4
%   -macrocode "bibleref.perl"
 
5
%   -setambles ".*\.perl=>\nopreamble\nopostamble"
 
6
%   -comment "bibleref.perl"
 
7
%   -comment "sample.tex"
4
8
%   -src "(.+)\.(sty)=>\1.\2"
5
9
%   -src "(.+)\.(tex)=>\1.\2"
 
10
%   -src "bibleref.perl=>bibleref.perl"
6
11
%   -doc "manual.tex"
7
12
%   -author "Nicola Talbot"
8
13
%   -dir "source"
9
14
%   bibleref
10
 
% Created on 2006/7/30 14:17
 
15
% Created on 2007/8/20 13:29
11
16
%\fi
12
17
%\iffalse
13
18
%<*package>
30
35
%\fi
31
36
% \iffalse
32
37
% Doc-Source file to use with LaTeX2e
33
 
% Copyright (C) 2006 Nicola Talbot, all rights reserved.
 
38
% Copyright (C) 2007 Nicola Talbot, all rights reserved.
34
39
% \fi
35
40
% \iffalse
36
41
%<*driver>
37
 
\documentclass{ltxdoc}
38
 
 
39
 
\usepackage[colorlinks,bookmarks]{hyperref}
40
 
\usepackage{bibleref}
41
 
 
42
 
\newcommand{\sty}[1]{\textsf{#1}}
43
 
\CheckSum{2208}
44
 
\OnlyDescription
45
 
 
46
 
\def\docdate{30 July 2006}
47
 
 
48
 
\begin{document}
 
42
\documentclass{ltxdoc}
 
43
 
 
44
\usepackage{color}
 
45
\usepackage{bibleref}
 
46
\usepackage[colorlinks,bookmarks,pdfauthor={Nicola L.C. Talbot},
 
47
            hyperindex=false,
 
48
            pdftitle={bibleref.sty: a LaTeXe package for 
 
49
            typesetting bible references}]{hyperref}
 
50
 
 
51
\renewcommand{\usage}[1]{\textit{\hyperpage{#1}}}
 
52
\renewcommand{\main}[1]{\hyperpage{#1}}
 
53
\newcommand{\see}[2]{\emph{see} #1}
 
54
 
 
55
 
 
56
\RecordChanges
 
57
\PageIndex
 
58
\CodelineNumbered
 
59
\OnlyDescription
 
60
\newcommand{\sty}[1]{\textsf{#1}}
 
61
\newcommand*{\ics}[1]{\cs{#1}\SpecialMainIndex{#1}}
 
62
 
 
63
\definecolor{defbackground}{rgb}{1,1,0.75}
 
64
\newsavebox\defsbox
 
65
\newlength\defwidth
 
66
\newenvironment{definition}{%
 
67
\setlength{\fboxsep}{4pt}\setlength{\fboxrule}{1.25pt}%
 
68
\begin{lrbox}{\defsbox}%
 
69
\setlength\defwidth\linewidth
 
70
\addtolength\defwidth{-2\fboxrule}%
 
71
\addtolength\defwidth{-2\fboxsep}%
 
72
\begin{minipage}{\defwidth}\flushleft
 
73
}{%
 
74
\end{minipage}
 
75
\end{lrbox}%
 
76
\vskip10pt
 
77
\noindent
 
78
\fcolorbox{black}{defbackground}{\usebox\defsbox}%
 
79
\vskip10pt
 
80
}
 
81
 
 
82
 
 
83
 
 
84
\CheckSum{1656}
 
85
 
 
86
\begin{document}
49
87
\DocInput{bibleref.dtx}
50
88
\end{document}
51
89
%</driver>
52
90
%\fi
53
 
%\title{bibleref.sty v1.06: \LaTeXe\ Package for 
54
 
%typesetting bible references}
55
 
%\author{Nicola Talbot}
56
 
%\date{\docdate}
57
 
%\maketitle
58
 
%\tableofcontents
59
 
%
60
 
%\section{Introduction}
61
 
%
62
 
%The \sty{bibleref} package was designed to provide consistent formatting for referencing
63
 
%parts of the bible.
64
 
%
65
 
%The command \DescribeMacro{\bibleverse}:\par\vspace{10pt}\noindent
66
 
%\verb|\bibleverse{|\meta{book title}\verb|}(|\meta{chapter}\texttt{:}\meta{verse(s)}\verb|)|\ldots
67
 
%\verb|(|\meta{chapter}\texttt{:}\meta{verse(s)}\verb|)|\par
68
 
%\vspace{10pt}\noindent
69
 
%can be used to cite a bible book, chapter or verse or range
70
 
%of chapters or verses.
71
 
%
72
 
%The book title, \meta{book title}, may be given either as the full title (e.g.\ \texttt{Matthew}) or as an abbreviation
73
 
%(e.g.\ \texttt{Mt} or \texttt{Matt}), most standard abbreviations are recognised.
74
 
%Books with multiple parts should be preceeded by the
75
 
%book number in uppercase roman numerals. For example,
76
 
%the second book of Kings should be entered as 
77
 
%\verb|\bibleverse{IIKings}|
78
 
%
79
 
%You may have any number, or zero, sets of parenthesis 
80
 
%\verb|(|\meta{chapter}\texttt{:}\meta{verse(s)}\verb|)|, 
81
 
%indicating the chapter and verse or verses. Verses can be 
82
 
%specified as a comma separated list of individual verses or range
83
 
%of verses. A range of verses should be written with a 
84
 
%single hyphen, e.g.\ \verb|2-4|. In the
85
 
%typeset output the verses will be separated with 
86
 
%\DescribeMacro{\BRvsep}\verb|\BRvsep| (an en-dash by default.) 
87
 
%A chapter may
88
 
%be referenced without a verse, but the colon must remain, 
89
 
%e.g.\ \verb|(12:)| simply indicates chapter 12.
90
 
%
91
 
%A range of verses spanning more than one chapter can
92
 
%be entered as \texttt(\meta{ch}\texttt:\meta{v}\texttt{)-(}\meta{ch}\texttt:\meta{v}\texttt)
93
 
%
94
 
%Examples:
95
 
%\begin{center}
96
 
%\begin{tabular}{ll}
97
 
%\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
98
 
%\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
99
 
%\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
100
 
%\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
101
 
%\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
102
 
%\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
103
 
%\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
104
 
%\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
105
 
%\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
106
 
%\bibleverse{IChronicles}(1:3)-(2:7)
107
 
%\end{tabular}
108
 
%\end{center}
109
 
%
110
 
%The style of the reference can be specified either by 
111
 
%package option or as the argument to the command
112
 
%\DescribeMacro{\biblerefstyle}\verb|\biblerefstyle{|\meta{style}\verb|}|. Styles are listed in Table~\ref{tab:styles}.
113
 
%
114
 
%\begin{table}[tbh]
115
 
%\caption{Bible Citation Styles (can be used as package option or in the argument to 
116
 
%\texttt{\textbackslash biblerefstyle})}
117
 
%\label{tab:styles}
118
 
%\vspace{10pt}
119
 
%\begin{center}
120
 
%\begin{tabular}{lp{0.5\textwidth}}
121
 
%\bfseries Style & \bfseries Example\\
122
 
%default & \biblerefstyle{default}\bibleverse{IICor}(12:1-5)\\
123
 
%jerusalem & \biblerefstyle{jerusalem}\bibleverse{IICor}(12:1-5)\\
124
 
%anglosaxon & \biblerefstyle{anglosaxon}\bibleverse{IICor}(12:1-5)\\
125
 
%JEH & \biblerefstyle{JEH}\bibleverse{IICor}(12:1-5)\\
126
 
%NTG & \biblerefstyle{NTG}\bibleverse{IICor}(12:1-5)\\
127
 
%MLA & \biblerefstyle{MLA}\bibleverse{IICor}(12:1-5)\\
128
 
%chicago & \biblerefstyle{chicago}\bibleverse{IICor}(12:1-5)\\
129
 
%text & \biblerefstyle{text}\bibleverse{IICor}(12:1-5)
130
 
%\end{tabular}
131
 
%\end{center}
132
 
%\end{table}
133
 
%
134
 
%\DescribeMacro{\setbooktitle}
135
 
%You can change the name of a book using 
136
 
%\verb|\setbooktitle{|\meta{name}\verb|}{|\meta{new title}\verb|}|
137
 
%Note that \meta{name} must be the full name, not the
138
 
%abbreviated name of the book. For example, to change
139
 
%Revelation to Apoc, do 
140
 
%\verb|\setbookname{Revelation}{Apoc}|
141
 
%(\textbf{Note} that you shouldn't do 
142
 
%\verb|\setbookname{Rev}{Apoc}|)
143
 
%
144
 
%\section{Defining New Styles}
145
 
%
146
 
%You can define a new style using the command
147
 
%\DescribeMacro{\newbiblerefstyle}
148
 
%\verb|\newbiblerefstyle{|\meta{style-name}\verb|}{|\meta{commands}\verb|}| where \meta{commands} are
149
 
%the commands needed to modify the citation style.
150
 
%
151
 
%Example: 
152
 
%This new style is based on the `default' style, but
153
 
%has verses in lower case Roman numerals, and redefines
154
 
%``Revelation'' as ``Apocalypse''.
155
 
%\begin{verbatim}
156
 
%\newbiblerefstyle{sample}{%
157
 
%\biblerefstyle{default}%
158
 
%\renewcommand{\BRversestyle}[1]{\romannumeral##1}%
159
 
%\setbooktitle{Revelation}{Apocalyse}%
160
 
%}
161
 
%\end{verbatim}
162
 
%Note the use of \verb|##1| instead of \verb|#1|.
163
 
%
164
 
%\section{Indexing Bible References}
165
 
%
166
 
%\DescribeMacro{\ibibleverse}
167
 
%The command \verb|\ibibleverse| does the same as \verb|\bibleverse|
168
 
%but also adds an index entry (provided you have used 
169
 
%\verb|\makeindex| in the preamble.) The default page number 
170
 
%format is given by the command 
171
 
%\DescribeMacro{\bvidxpgformat}\verb|\bvidxpgformat|. This
172
 
%is \texttt{textrm} by default, but can be redefined. To 
173
 
%override the page number format for a particular entry you can
174
 
%use the optional argument to \verb|\ibibleverse|. For example:
175
 
%\begin{verbatim}
176
 
%\ibibleverse[textit]{Exodus}
177
 
%\end{verbatim}
178
 
%(Note there is no backslash.)
179
 
%
180
 
%\section{Acknowledgements}
181
 
%Many thanks to all the useful comments from comp.text.tex, 
182
 
%especially from Jesse~Billett, Brooks~Moses and Ulrich~M.~Schwarz.
183
 
%
184
 
%\section{Contact Details}
185
 
%\begin{tabular}{l}
186
 
%Dr Nicola Talbot\\
187
 
%School of Computing Sciences\\
188
 
%University of East Anglia\\
189
 
%Norwich. Norfolk. NR4 7TJ.\\
190
 
%United Kingdom\\
191
 
%\url{http://theoval.cmp.uea.ac.uk/~nlct/}
192
 
%\end{tabular}
193
 
%
194
 
%
195
 
%\StopEventually{}
 
91
%\title{bibleref.sty v1.07: a \LaTeXe\ package for 
 
92
%typesetting bible references}
 
93
%\author{Nicola Talbot\\[10pt]
 
94
%School of Computing Sciences\\
 
95
%University of East Anglia\\
 
96
%Norwich. Norfolk. NR4 7TJ.\\
 
97
%United Kingdom\\
 
98
%\url{http://theoval.cmp.uea.ac.uk/~nlct/}}
 
99
%\date{20 Aug 2007}
 
100
%\maketitle
 
101
%\tableofcontents
 
102
%
 
103
%\section{Introduction}
 
104
%
 
105
%The \sty{bibleref} package was designed to provide consistent formatting for referencing
 
106
%parts of the bible.
 
107
%
 
108
%\DescribeMacro{\bibleverse}
 
109
%\begin{definition}
 
110
%\cs{bibleverse}\marg{book title}\texttt(\marg{chapter}\texttt{:}\meta{verse(s)}\texttt)
 
111
%\end{definition}
 
112
%This command can be used to cite a bible book, chapter or verse 
 
113
%or range of chapters or verses.
 
114
%
 
115
%The book title, \meta{book title}, may be given either as the
 
116
%full title (e.g.\ \texttt{Matthew}) or as an abbreviation (e.g.\
 
117
%\texttt{Mt} or \texttt{Matt}), most standard abbreviations are
 
118
%recognised.  Books with multiple parts should be preceeded by the
 
119
%book number in uppercase roman numerals. For example, the second
 
120
%book of Kings should be entered as \verb|\bibleverse{IIKings}|
 
121
%
 
122
%You may have any number, or zero, sets of parenthesis
 
123
%\verb|(|\meta{chapter}\texttt{:}\meta{verse(s)}\verb|)|,
 
124
%indicating the chapter and verse or verses. Verses can be
 
125
%specified as a comma separated list of individual verses or range
 
126
%of verses. A range of verses should be written with a single
 
127
%hyphen, e.g.\ \verb|2-4|. In the typeset output the verses will
 
128
%be separated with \DescribeMacro{\BRvsep}\cs{BRvsep} (an en-dash
 
129
%by default.) A chapter may be referenced without a verse, but the
 
130
%colon must remain, e.g.\ \verb|(12:)| simply indicates chapter
 
131
%12.
 
132
%
 
133
%A range of verses spanning more than one chapter can
 
134
%be entered as \texttt(\meta{ch}\texttt:\meta{v}\texttt{)-(}\meta
 
135
%{ch}\texttt:\meta{v}\texttt)
 
136
%
 
137
%Examples:
 
138
%\begin{center}
 
139
%\begin{tabular}{ll}
 
140
%\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
141
%\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
142
%\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
143
%\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
144
%\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
145
%\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
146
%\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
147
%\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
148
%\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
149
%\bibleverse{IChronicles}(1:3)-(2:7)
 
150
%\end{tabular}
 
151
%\end{center}
 
152
%
 
153
%The style of the reference can be specified either by 
 
154
%package option or as the argument to the command
 
155
%\DescribeMacro{\biblerefstyle}
 
156
%\begin{definition}
 
157
%\cs{biblerefstyle}\marg{style}
 
158
%\end{definition}
 
159
%Styles are listed in Table~\ref{tab:styles}.
 
160
%
 
161
%\begin{table}[tbh]
 
162
%\caption{Bible Citation Styles (can be used as package option or in the argument to 
 
163
%\cs{biblerefstyle})}
 
164
%\label{tab:styles}
 
165
%\vspace{10pt}
 
166
%\begin{center}
 
167
%\begin{tabular}{lp{0.5\textwidth}}
 
168
%\bfseries Style & \bfseries Example\\
 
169
%default & \biblerefstyle{default}\bibleverse{IICor}(12:1-5)\\
 
170
%jerusalem & \biblerefstyle{jerusalem}\bibleverse{IICor}(12:1-5)\\
 
171
%anglosaxon & \biblerefstyle{anglosaxon}\bibleverse{IICor}(12:1-5)\\
 
172
%JEH & \biblerefstyle{JEH}\bibleverse{IICor}(12:1-5)\\
 
173
%NTG & \biblerefstyle{NTG}\bibleverse{IICor}(12:1-5)\\
 
174
%MLA & \biblerefstyle{MLA}\bibleverse{IICor}(12:1-5)\\
 
175
%chicago & \biblerefstyle{chicago}\bibleverse{IICor}(12:1-5)\\
 
176
%text & \biblerefstyle{text}\bibleverse{IICor}(12:1-5)
 
177
%\end{tabular}
 
178
%\end{center}
 
179
%\end{table}
 
180
%
 
181
%\DescribeMacro{\setbooktitle}
 
182
%You can change the name of a book using 
 
183
%\begin{definition}
 
184
%\cs{setbooktitle}\marg{name}\marg{new title}
 
185
%\end{definition}
 
186
%Note that \meta{name} must be the full name, not the
 
187
%abbreviated name of the book. For example, to change
 
188
%Revelation to Apoc, do 
 
189
%\verb|\setbookname{Revelation}{Apoc}|
 
190
%(\textbf{Note} that you shouldn't do 
 
191
%\verb|\setbookname{Rev}{Apoc}|)
 
192
%
 
193
%\section{Defining New Styles}
 
194
%
 
195
%You can define a new style using the command
 
196
%\DescribeMacro{\newbiblerefstyle}
 
197
%\begin{definition}
 
198
%\cs{newbiblerefstyle}\marg{style-name}\marg{commands}
 
199
%\end{definition}\noindent
 
200
%where \meta{commands} are
 
201
%the commands needed to modify the citation style.
 
202
%
 
203
%Example: 
 
204
%This new style is based on the `default' style, but
 
205
%has verses in lower case Roman numerals, and redefines
 
206
%``Revelation'' as ``Apocalypse''.
 
207
%\begin{verbatim}
 
208
%\newbiblerefstyle{sample}{%
 
209
%\biblerefstyle{default}%
 
210
%\renewcommand{\BRversestyle}[1]{\romannumeral##1}%
 
211
%\setbooktitle{Revelation}{Apocalypse}%
 
212
%}
 
213
%\end{verbatim}
 
214
%Note the use of \verb|##1| instead of \verb|#1|.
 
215
%
 
216
%\section{Indexing Bible References}
 
217
%
 
218
%\DescribeMacro{\ibibleverse}
 
219
%\begin{definition}
 
220
%\cs{ibibleverse}\marg{book title}\texttt(\marg{chapter}\texttt{:}\meta{verse(s)}\texttt)
 
221
%\end{definition}
 
222
%This does the same as \cs{bibleverse}
 
223
%but also adds an index entry (provided you have used 
 
224
%\cs{makeindex} in the preamble.) The default page number 
 
225
%format is given by the command 
 
226
%\DescribeMacro{\bvidxpgformat}\cs{bvidxpgformat}. This
 
227
%is \texttt{textrm} by default, but can be redefined. To 
 
228
%override the page number format for a particular entry you can
 
229
%use the optional argument to \cs{ibibleverse}. For example:
 
230
%\begin{verbatim}
 
231
%\ibibleverse[textit]{Exodus}
 
232
%\end{verbatim}
 
233
%(Note there is no backslash.)
 
234
%
 
235
%\section{Acknowledgements}
 
236
%Many thanks to all the useful comments from comp.text.tex, 
 
237
%especially from Jesse~Billett, Brooks~Moses and Ulrich~M.~Schwarz.
 
238
%
 
239
%\StopEventually{\phantomsection
 
240
%\addcontentsline{toc}{section}{Index}\PrintIndex
 
241
%}
 
242
%
 
243
%
 
244
%
196
245
%\section{The Code}
 
246
%\iffalse
197
247
%    \begin{macrocode}
198
248
%<*bibleref.sty>
199
249
%    \end{macrocode}
200
 
% Declare package
201
 
%    \begin{macrocode}
202
 
\NeedsTeXFormat{LaTeX2e}
203
 
\ProvidesPackage{bibleref}[2006/07/30 1.06 (NLCT)]
204
 
%    \end{macrocode}
205
 
% Need to do some conditional stuff
206
 
%    \begin{macrocode}
207
 
\RequirePackage{ifthen}
208
 
%    \end{macrocode}
209
 
% The fmtcount package is needed for the full text
210
 
% citations
211
 
%    \begin{macrocode}
212
 
\RequirePackage{fmtcount}
213
 
%    \end{macrocode}
214
 
% \DescribeMacro{\BRbooknumberstyle}
215
 
%\verb|\BRbooknumberstyle| is the style of the book
216
 
% number. By default, it simply displays its argument
217
 
%followed by a space.
218
 
%    \begin{macrocode}
219
 
\newcommand*{\BRbooknumberstyle}[1]{#1 }
220
 
%    \end{macrocode}
221
 
% As above, but for epistle.
222
 
%    \begin{macrocode}
223
 
\newcommand*{\BRepistlenumberstyle}[1]{#1 }
224
 
%    \end{macrocode}
225
 
%\DescribeMacro{\BRbookof}
226
 
%\verb|\BRbookof| is text to go before the book title.
227
 
%This by default is nothing,
228
 
% but can be changed to, e.g., ``The book of ''
229
 
%    \begin{macrocode}
230
 
\newcommand*{\BRbookof}{}
231
 
%    \end{macrocode}
232
 
%\DescribeMacro{\BRgospel}
233
 
%\verb|\BRgospel|: as above but for gospels
234
 
%    \begin{macrocode}
235
 
\newcommand*{\BRgospel}{}
236
 
%    \end{macrocode}
237
 
%\DescribeMacro{\BRepistleto}
238
 
%\verb|\BRepistleto|: as above but for epistles to
239
 
% someone.
240
 
%    \begin{macrocode}
241
 
\newcommand*{\BRepistleto}{}
242
 
%    \end{macrocode}
243
 
%\DescribeMacro{\BRepistletothe}
244
 
%\verb|\BRepistletothe|: as above but for epistles to 
245
 
% people.
246
 
%    \begin{macrocode}
247
 
\newcommand*{\BRepistletothe}{}
248
 
%    \end{macrocode}
249
 
%\DescribeMacro{\BRepistleof}
250
 
%\verb|\BRepistleof|: as above but for ``epistles of''
251
 
%    \begin{macrocode}
252
 
\newcommand*{\BRepistleof}{}
253
 
%    \end{macrocode}
254
 
% \DescribeMacro{\BRbooktitlestyle}
255
 
%\verb|\BRbooktitlestyle| is the style of the
256
 
% book title. By default, it simply displays its argument.
257
 
%    \begin{macrocode}
258
 
\newcommand*{\BRbooktitlestyle}[1]{#1}
259
 
%    \end{macrocode}
260
 
% \DescribeMacro{\BRchapterstyle}
261
 
%\verb|\BRchapterstyle| is the style of the chapter number.
262
 
% By default it simply displays its argument.
263
 
%    \begin{macrocode}
264
 
\newcommand*{\BRchapterstyle}[1]{#1}
265
 
%    \end{macrocode}
266
 
%\DescribeMacro{\BRversestyle}
267
 
%\verb|\BRversestyle| is the style of the verse number.
268
 
% By default is simply displays its argument.
269
 
%    \begin{macrocode}
270
 
\newcommand*{\BRversestyle}[1]{#1}
271
 
%    \end{macrocode}
272
 
%\DescribeMacro{\BRbkchsep}
273
 
%\verb|\BRbkchsep| is the separator between the book title
274
 
% and the chapter number
275
 
%    \begin{macrocode}
276
 
\newcommand*{\BRbkchsep}{ }
277
 
%    \end{macrocode}
278
 
%\DescribeMacro{\BRchvsep}
279
 
%\verb|\BRchvsep| is the separator between chapter
280
 
% and verse numbers. By default this is simply a colon.
281
 
%    \begin{macrocode}
282
 
\newcommand*{\BRchvsep}{:}
283
 
%    \end{macrocode}
284
 
%\DescribeMacro{\BRchsep}
285
 
%\verb|\BRchsep| is the separator between multiple chapters.
286
 
% By default this is simply a semi-colon.
287
 
%    \begin{macrocode}
288
 
\newcommand*{\BRchsep}{;}
289
 
%    \end{macrocode}
290
 
% \DescribeMacro{\BRvrsep}
291
 
%\verb|\BRvrsep| is the separator between the beginning
292
 
% and ending of a range of verses. By default this
293
 
% is simply an en-dash.
294
 
%    \begin{macrocode}
295
 
\newcommand*{\BRvrsep}{--}
296
 
%    \end{macrocode}
297
 
% \DescribeMacro{\BRvsep}
298
 
%\verb|\BRvsep| is the separator between a list of verses.
299
 
%    \begin{macrocode}
300
 
\newcommand*{\BRvsep}{,}
301
 
%    \end{macrocode}
302
 
% \verb|\BRperiod| can be redefined to put a full stop after 
303
 
% book names.
304
 
%    \begin{macrocode}
305
 
\newcommand*{\BRperiod}{}
306
 
%    \end{macrocode}
307
 
% The command \DescribeMacro{\brfullname}\verb|\brfullname|
308
 
% will switch to using the full book title.
309
 
%    \begin{macrocode}
310
 
\newcommand{\brfullname}{%
311
 
\def\br@Genesis{\BRbookof Genesis}%
312
 
\def\br@Exodus{\BRbookof Exodus}%
313
 
\def\br@Leviticus{\BRbookof Leviticus}%
314
 
\def\br@Numbers{\BRbookof Numbers}%
315
 
\def\br@Deuteronomy{\BRbookof Deuteronomy}%
316
 
\def\br@Joshua{\BRbookof Joshua}%
317
 
\def\br@Judges{\BRbookof Judges}%
318
 
\def\br@Ruth{\BRbookof Ruth}%
319
 
\def\br@ISamuel{\BRbooknumberstyle{1}\BRbookof Samuel}%
320
 
\def\br@IISamuel{\BRbooknumberstyle{2}\BRbookof Samuel}%
321
 
\def\br@IKings{\BRbooknumberstyle{1}\BRbookof Kings}%
322
 
\def\br@IIKings{\BRbooknumberstyle{2}\BRbookof Kings}%
323
 
\def\br@IChronicles{\BRbooknumberstyle{1}\BRbookof Chronicles}%
324
 
\def\br@IIChronicles{\BRbooknumberstyle{2}\BRbookof Chronicles}%
325
 
\def\br@Ezra{\BRbookof Ezra}%
326
 
\def\br@Nehemiah{\BRbookof Nehemiah}%
327
 
\def\br@Tobit{\BRbookof Tobit}%
328
 
\def\br@Judith{\BRbookof Judith}%
329
 
\def\br@Esther{\BRbookof Esther}%
330
 
\def\br@IMaccabees{\BRbooknumberstyle{1}\BRbookof Maccabees}%
331
 
\def\br@IIMaccabees{\BRbooknumberstyle{2}\BRbookof Maccabees}%
332
 
\def\br@Job{\BRbookof Job}%
333
 
\def\br@Psalms{\BRbookof Psalms}%
334
 
\def\br@Proverbs{\BRbookof Proverbs}%
335
 
\def\br@Ecclesiastes{\BRbookof Ecclesiastes}%
336
 
\def\br@SongofSongs{\BRbookof Song of Songs}%
337
 
\def\br@Wisdom{\BRbookof Wisdom}%
338
 
\def\br@Ecclesiasticus{\BRbookof Ecclesiasticus}%
339
 
\def\br@Isaiah{\BRbookof Isaiah}%
340
 
\def\br@Jeramiah{\BRbookof Jeremiah}%
341
 
\def\br@Lamentations{\BRbookof Lamentations}%
342
 
\def\br@Baruch{\BRbookof Baruch}%
343
 
\def\br@Ezekiel{\BRbookof Ezekiel}%
344
 
\def\br@Daniel{\BRbookof Daniel}%
345
 
\def\br@Hosea{\BRbookof Hosea}%
346
 
\def\br@Joel{\BRbookof Joel}%
347
 
\def\br@Amos{\BRbookof Amos}%
348
 
\def\br@Obadiah{\BRbookof Obadiah}%
349
 
\def\br@Jonah{\BRbookof Jonah}%
350
 
\def\br@Micah{\BRbookof Micah}%
351
 
\def\br@Nahum{\BRbookof Nahum}%
352
 
\def\br@Habakkuk{\BRbookof Habakkuk}%
353
 
\def\br@Zephaniah{\BRbookof Zephaniah}%
354
 
\def\br@Haggai{\BRbookof Haggai}%
355
 
\def\br@Zechariah{\BRbookof Zechariah}%
356
 
\def\br@Malachi{\BRbookof Malachi}%
357
 
\def\br@Matthew{\BRgospel Matthew}%
358
 
\def\br@Mark{\BRgospel Mark}%
359
 
\def\br@Luke{\BRgospel Luke}%
360
 
\def\br@John{\BRgospel John}%
361
 
\def\br@Acts{Acts}%
362
 
\def\br@Romans{\BRepistletothe Romans}%
363
 
\def\br@ICorinthians{\BRepistlenumberstyle{1}\BRepistletothe Corinthians}%
364
 
\def\br@IICorinthians{\BRepistlenumberstyle{2}\BRepistletothe Corinthians}%
365
 
\def\br@Galatians{\BRepistletothe Galatians}%
366
 
\def\br@Ephesians{\BRepistletothe Ephesians}%
367
 
\def\br@Philippians{\BRepistletothe Philippians}%
368
 
\def\br@Colossians{\BRepistletothe Colossians}%
369
 
\def\br@IThessalonians{\BRepistlenumberstyle{1}\BRepistletothe Thessalonians}%
370
 
\def\br@IIThessalonians{\BRepistlenumberstyle{2}\BRepistletothe Thessalonians}%
371
 
\def\br@ITimothy{\BRepistlenumberstyle{1}\BRepistleto Timothy}%
372
 
\def\br@IITimothy{\BRepistlenumberstyle{2}\BRepistleto Timothy}%
373
 
\def\br@Titus{\BRepistleto Titus}%
374
 
\def\br@Philemon{\BRepistleto Philemon}%
375
 
\def\br@Hebrews{\BRepistletothe Hebrews}%
376
 
\def\br@James{\BRepistleof James}%
377
 
\def\br@IPeter{\BRepistlenumberstyle{1}\BRepistleof Peter}%
378
 
\def\br@IIPeter{\BRepistlenumberstyle{2}\BRepistleof Peter}%
379
 
\def\br@IJohn{\BRepistlenumberstyle{1}\BRepistleof John}%
380
 
\def\br@IIJohn{\BRepistlenumberstyle{2}\BRepistleof John}%
381
 
\def\br@IIIJohn{\BRepistlenumberstyle{3}\BRepistleof John}%
382
 
\def\br@Jude{\BRepistleof Jude}%
383
 
\def\br@Revelation{\BRbookof Revelation}}
384
 
%    \end{macrocode}
385
 
% Set full names as the default
386
 
%    \begin{macrocode}
387
 
\brfullname
388
 
%    \end{macrocode}
389
 
% The command \DescribeMacro{\brabbrvname}\verb|\brabbrvname|
390
 
% will switch to an abbreviated form for the book titles.
391
 
%    \begin{macrocode}
392
 
\newcommand{\brabbrvname}{%
393
 
\def\br@Genesis{Gn\BRperiod}%
394
 
\def\br@Exodus{Ex\BRperiod}%
395
 
\def\br@Leviticus{Lv\BRperiod}%
396
 
\def\br@Numbers{Nb\BRperiod}%
397
 
\def\br@Deuteronomy{Dt\BRperiod}%
398
 
\def\br@Joshua{Jos\BRperiod}%
399
 
\def\br@Judges{Jg\BRperiod}%
400
 
\def\br@Ruth{Rt\BRperiod}%
401
 
\def\br@ISamuel{\BRbooknumberstyle{1}S\BRperiod}%
402
 
\def\br@IISamuel{\BRbooknumberstyle{2}S\BRperiod}%
403
 
\def\br@IKings{\BRbooknumberstyle{1}K\BRperiod}%
404
 
\def\br@IIKings{\BRbooknumberstyle{2}K\BRperiod}%
405
 
\def\br@IChronicles{\BRbooknumberstyle{1}Ch\BRperiod}%
406
 
\def\br@IIChronicles{\BRbooknumberstyle{2}Ch\BRperiod}%
407
 
\def\br@Ezra{Ezr\BRperiod}%
408
 
\def\br@Nehemiah{Ne\BRperiod}%
409
 
\def\br@Tobit{Tb\BRperiod}%
410
 
\def\br@Judith{Jdt\BRperiod}%
411
 
\def\br@Esther{Est\BRperiod}%
412
 
\def\br@IMaccabees{\BRbooknumberstyle{1}M\BRperiod}%
413
 
\def\br@IIMaccabees{\BRbooknumberstyle{2}M\BRperiod}%
414
 
\def\br@Job{Jb\BRperiod}%
415
 
\def\br@Psalms{Ps\BRperiod}%
416
 
\def\br@Proverbs{Pr\BRperiod}%
417
 
\def\br@Ecclesiastes{Qo\BRperiod}%
418
 
\def\br@SongofSongs{Sg\BRperiod}%
419
 
\def\br@Wisdom{Ws\BRperiod}%
420
 
\def\br@Ecclesiasticus{Si\BRperiod}%
421
 
\def\br@Isaiah{Is\BRperiod}%
422
 
\def\br@Jeremiah{Jr\BRperiod}%
423
 
\def\br@Lamentations{Lm\BRperiod}%
424
 
\def\br@Baruch{Ba\BRperiod}%
425
 
\def\br@Ezekiel{Ezk\BRperiod}%
426
 
\def\br@Daniel{Dn\BRperiod}%
427
 
\def\br@Hosea{Ho\BRperiod}%
428
 
\def\br@Joel{Jl\BRperiod}%
429
 
\def\br@Amos{Am\BRperiod}%
430
 
\def\br@Obadiah{Ob\BRperiod}%
431
 
\def\br@Jonah{Jon\BRperiod}%
432
 
\def\br@Micah{Mi\BRperiod}%
433
 
\def\br@Nahum{Na\BRperiod}%
434
 
\def\br@Habakkuk{Hab\BRperiod}%
435
 
\def\br@Zephaniah{Zp\BRperiod}%
436
 
\def\br@Haggai{Hg\BRperiod}%
437
 
\def\br@Zechariah{Zc\BRperiod}%
438
 
\def\br@Malachi{Ml\BRperiod}%
439
 
\def\br@Matthew{Mt\BRperiod}%
440
 
\def\br@Mark{Mk\BRperiod}%
441
 
\def\br@Luke{Lk\BRperiod}%
442
 
\def\br@John{Jn\BRperiod}%
443
 
\def\br@Acts{Ac\BRperiod}%
444
 
\def\br@Romans{Rm\BRperiod}%
445
 
\def\br@ICorinthians{\BRepistlenumberstyle{1}Co\BRperiod}%
446
 
\def\br@IICorinthians{\BRepistlenumberstyle{2}Co\BRperiod}%
447
 
\def\br@Galatians{Ga\BRperiod}%
448
 
\def\br@Ephesians{Ep\BRperiod}%
449
 
\def\br@Philippians{Ph\BRperiod}%
450
 
\def\br@Colossians{Col\BRperiod}%
451
 
\def\br@IThessalonians{\BRepistlenumberstyle{1}Th\BRperiod}%
452
 
\def\br@IIThessalonians{\BRepistlenumberstyle{2}Th\BRperiod}%
453
 
\def\br@ITimothy{\BRepistlenumberstyle{1}Tm\BRperiod}%
454
 
\def\br@IITimothy{\BRepistlenumberstyle{2}Tm\BRperiod}%
455
 
\def\br@Titus{Tt\BRperiod}%
456
 
\def\br@Philemon{Phm\BRperiod}%
457
 
\def\br@Hebrews{Heb\BRperiod}%
458
 
\def\br@James{Jm\BRperiod}%
459
 
\def\br@IPeter{\BRepistlenumberstyle{1}P\BRperiod}%
460
 
\def\br@IIPeter{\BRepistlenumberstyle{2}P\BRperiod}%
461
 
\def\br@IJohn{\BRepistlenumberstyle{1}Jn\BRperiod}%
462
 
\def\br@IIJohn{\BRepistlenumberstyle{2}Jn\BRperiod}%
463
 
\def\br@IIIJohn{\BRepistlenumberstyle{3}Jn\BRperiod}%
464
 
\def\br@Jude{Jude}%
465
 
\def\br@Revelation{Rv\BRperiod}}
466
 
%    \end{macrocode}
467
 
% The command \DescribeMacro{\braltabbrvname}\verb|\braltabbrvname|
468
 
% switches to an alternative set of abbreviations.
469
 
%    \begin{macrocode}
470
 
\newcommand{\braltabbrvname}{%
471
 
\def\br@Genesis{Gen\BRperiod}%
472
 
\def\br@Exodus{Exod\BRperiod}%
473
 
\def\br@Leviticus{Lev\BRperiod}%
474
 
\def\br@Numbers{Num\BRperiod}%
475
 
\def\br@Deuteronomy{Deut\BRperiod}%
476
 
\def\br@Joshua{Josh\BRperiod}%
477
 
\def\br@Judges{Judg\BRperiod}%
478
 
\def\br@Ruth{Ruth}%
479
 
\def\br@ISamuel{\BRbooknumberstyle{1}Sam\BRperiod}%
480
 
\def\br@IISamuel{\BRbooknumberstyle{2}Sam\BRperiod}%
481
 
\def\br@IKings{\BRbooknumberstyle{1}Kgs\BRperiod}%
482
 
\def\br@IIKings{\BRbooknumberstyle{2}Kgs\BRperiod}%
483
 
\def\br@IChronicles{\BRbooknumberstyle{1}Chr\BRperiod}%
484
 
\def\br@IIChronicles{\BRbooknumberstyle{2}Chr\BRperiod}%
485
 
\def\br@Ezra{Ezra}%
486
 
\def\br@Nehemiah{Neh\BRperiod}%
487
 
\def\br@Tobit{Tobit}%
488
 
\def\br@Judith{Judith}%
489
 
\def\br@Esther{Esther}%
490
 
\def\br@IMaccabees{\BRbooknumberstyle{1}M\BRperiod}%
491
 
\def\br@IIMaccabees{\BRbooknumberstyle{2}M\BRperiod}%
492
 
\def\br@Job{Job}%
493
 
\def\br@Psalms{Ps\BRperiod}%
494
 
\def\br@Proverbs{Prov\BRperiod}%
495
 
\def\br@Ecclesiastes{Eccles\BRperiod}%
496
 
\def\br@SongofSongs{S\BRperiod\ of S\BRperiod}%
497
 
\def\br@Wisdom{Wisd\BRperiod}%
498
 
\def\br@Ecclesiasticus{Ecclus\BRperiod}%
499
 
\def\br@Isaiah{Isa\BRperiod}%
500
 
\def\br@Jeremiah{Jer\BRperiod}%
501
 
\def\br@Lamentations{Lam\BRperiod}%
502
 
\def\br@Baruch{Baruch}%
503
 
\def\br@Ezekiel{Ezek\BRperiod}%
504
 
\def\br@Daniel{Dan\BRperiod}%
505
 
\def\br@Hosea{Hos\BRperiod}%
506
 
\def\br@Joel{Joel}%
507
 
\def\br@Amos{Amos}%
508
 
\def\br@Obadiah{Obad}%
509
 
\def\br@Jonah{Jonah}%
510
 
\def\br@Micah{Mic\BRperiod}%
511
 
\def\br@Nahum{Nah\BRperiod}%
512
 
\def\br@Habakkuk{Hab\BRperiod}%
513
 
\def\br@Zephaniah{Zeph\BRperiod}%
514
 
\def\br@Haggai{Hag\BRperiod}%
515
 
\def\br@Zechariah{Zech\BRperiod}%
516
 
\def\br@Malachi{Mal\BRperiod}%
517
 
\def\br@Matthew{Matt\BRperiod}%
518
 
\def\br@Mark{Mark}%
519
 
\def\br@Luke{Luke}%
520
 
\def\br@John{John}%
521
 
\def\br@Acts{Acts}%
522
 
\def\br@Romans{Rom\BRperiod}%
523
 
\def\br@ICorinthians{\BRepistlenumberstyle{1}Cor\BRperiod}%
524
 
\def\br@IICorinthians{\BRepistlenumberstyle{2}Cor\BRperiod}%
525
 
\def\br@Galatians{Gal\BRperiod}%
526
 
\def\br@Ephesians{Eph\BRperiod}%
527
 
\def\br@Philippians{Phil\BRperiod}%
528
 
\def\br@Colossians{Col\BRperiod}%
529
 
\def\br@IThessalonians{\BRepistlenumberstyle{1}Thess\BRperiod}%
530
 
\def\br@IIThessalonians{\BRepistlenumberstyle{2}Thess\BRperiod}%
531
 
\def\br@ITimothy{\BRepistlenumberstyle{1}Tim\BRperiod}%
532
 
\def\br@IITimothy{\BRepistlenumberstyle{2}Tim\BRperiod}%
533
 
\def\br@Titus{Tit\BRperiod}%
534
 
\def\br@Philemon{Philem\BRperiod}%
535
 
\def\br@Hebrews{Heb\BRperiod}%
536
 
\def\br@James{Jas\BRperiod}%
537
 
\def\br@IPeter{\BRepistlenumberstyle{1}Pet\BRperiod}%
538
 
\def\br@IIPeter{\BRepistlenumberstyle{2}Pet\BRperiod}%
539
 
\def\br@IJohn{\BRepistlenumberstyle{1}John}%
540
 
\def\br@IIJohn{\BRepistlenumberstyle{2}John}%
541
 
\def\br@IIIJohn{\BRepistlenumberstyle{3}John}%
542
 
\def\br@Jude{Jude}%
543
 
\def\br@Revelation{Rev\BRperiod}}
544
 
%    \end{macrocode}
545
 
% Provide synonymns.
546
 
%    \begin{macrocode}
547
 
\newcommand*\br@Gn{\br@Genesis}%
548
 
\newcommand*\br@Ex{\br@Exodus}%
549
 
\newcommand*\br@Lv{\br@Leviticus}%
550
 
\newcommand*\br@Nb{\br@Numbers}%
551
 
\newcommand*\br@Dt{\br@Deuteronomy}%
552
 
\newcommand*\br@Jos{\br@Joshua}%
553
 
\newcommand*\br@Jg{\br@Judges}%
554
 
\newcommand*\br@Rt{\br@Ruth}%
555
 
\newcommand*\br@IS{\br@ISamuel}%
556
 
\newcommand*\br@IIS{\br@IISamuel}%
557
 
\newcommand*\br@IK{\br@IKings}%
558
 
\newcommand*\br@IIK{\br@IIKings}%
559
 
\newcommand*\br@ICh{\br@IChronicles}%
560
 
\newcommand*\br@IICh{\br@IIChronicles}%
561
 
\newcommand*\br@Ezr{\br@Ezra}%
562
 
\newcommand*\br@Ne{\br@Nehemiah}%
563
 
\newcommand*\br@Tb{\br@Tobit}%
564
 
\newcommand*\br@Jdt{\br@Judith}%
565
 
\newcommand*\br@Est{\br@Esther}%
566
 
\newcommand*\br@IM{\br@IMaccabees}%
567
 
\newcommand*\br@IIM{\br@IIMaccabees}%
568
 
\newcommand*\br@Jb{\br@Job}%
569
 
\newcommand*\br@Ps{\br@Psalms}%
570
 
\newcommand*\br@Pr{\br@Proverbs}%
571
 
\newcommand*\br@Qo{\br@Ecclesiastes}%
572
 
\newcommand*\br@Sg{\br@SongofSongs}%
573
 
\newcommand*\br@Ws{\br@Wisdom}%
574
 
\newcommand*\br@Si{\br@Ecclesiasticus}%
575
 
\newcommand*\br@Is{\br@Isaiah}%
576
 
\newcommand*\br@Jr{\br@Jeremiah}%
577
 
\newcommand*\br@Lm{\br@Lamentations}%
578
 
\newcommand*\br@Ba{\br@Baruch}%
579
 
\newcommand*\br@Ezk{\br@Ezekiel}%
580
 
\newcommand*\br@Dn{\br@Daniel}%
581
 
\newcommand*\br@Ho{\br@Hosea}%
582
 
\newcommand*\br@Jl{\br@Joel}%
583
 
\newcommand*\br@Am{\br@Amos}%
584
 
\newcommand*\br@Ob{\br@Obadiah}%
585
 
\newcommand*\br@Jon{\br@Jonah}%
586
 
\newcommand*\br@Mi{\br@Micah}%
587
 
\newcommand*\br@Na{\br@Nahum}%
588
 
\newcommand*\br@Hab{\br@Habakkuk}%
589
 
\newcommand*\br@Zp{\br@Zephaniah}%
590
 
\newcommand*\br@Hg{\br@Haggai}%
591
 
\newcommand*\br@Zc{\br@Zechariah}%
592
 
\newcommand*\br@Ml{\br@Malachi}%
593
 
\newcommand*\br@Mt{\br@Matthew}%
594
 
\newcommand*\br@Mk{\br@Mark}%
595
 
\newcommand*\br@Lk{\br@Luke}%
596
 
\newcommand*\br@Jn{\br@John}%
597
 
\newcommand*\br@Ac{\br@Acts}%
598
 
\newcommand*\br@Rm{\br@Romans}%
599
 
\newcommand*\br@ICo{\br@ICorinthians}%
600
 
\newcommand*\br@IICo{\br@IICorinthians}%
601
 
\newcommand*\br@Ga{\br@Galatians}%
602
 
\newcommand*\br@Ep{\br@Ephesians}%
603
 
\newcommand*\br@Ph{\br@Philippians}%
604
 
\newcommand*\br@Col{\br@Colossians}%
605
 
\newcommand*\br@ITh{\br@IThessalonians}%
606
 
\newcommand*\br@IITh{\br@IIThessalonians}%
607
 
\newcommand*\br@ITm{\br@ITimothy}%
608
 
\newcommand*\br@IITm{\br@IITimothy}%
609
 
\newcommand*\br@Tt{\br@Titus}%
610
 
\newcommand*\br@Phm{\br@Philemon}%
611
 
\newcommand*\br@Heb{\br@Hebrews}%
612
 
\newcommand*\br@Jm{\br@James}%
613
 
\newcommand*\br@IP{\br@IPeter}%
614
 
\newcommand*\br@IIP{\br@IIPeter}%
615
 
\newcommand*\br@IJn{\br@IJohn}%
616
 
\newcommand*\br@IIJn{\br@IIJohn}%
617
 
\newcommand*\br@Rv{\br@Revelation}
618
 
%    \end{macrocode}
619
 
% More synonyms.
620
 
%    \begin{macrocode}
621
 
\newcommand*\br@Gen{\br@Genesis}%
622
 
\newcommand*\br@Exod{\br@Exodus}%
623
 
\newcommand*\br@Lev{\br@Leviticus}%
624
 
\newcommand*\br@Num{\br@Numbers}%
625
 
\newcommand*\br@Deut{\br@Deuteronomy}%
626
 
\newcommand*\br@Josh{\br@Joshua}%
627
 
\newcommand*\br@Judg{\br@Judges}%
628
 
\newcommand*\br@ISam{\br@ISamuel}%
629
 
\newcommand*\br@IISam{\br@IISamuel}%
630
 
\newcommand*\br@IKgs{\br@IKings}%
631
 
\newcommand*\br@IIKgs{\br@IIKings}%
632
 
\newcommand*\br@IChr{\br@IChronicles}%
633
 
\newcommand*\br@IIChr{\br@IIChronicles}%
634
 
\newcommand*\br@Neh{\br@Nehemiah}%
635
 
\newcommand*\br@Esth{\br@Esther}%
636
 
\newcommand*\br@IMacc{\br@IMaccabees}%
637
 
\newcommand*\br@IIMacc{\br@IIMaccabees}%
638
 
\newcommand*\br@Prov{\br@Proverbs}%
639
 
\newcommand*\br@Eccl{\br@Ecclesiastes}%
640
 
\newcommand*\br@SofS{\br@SongofSongs}%
641
 
\newcommand*\br@Wisd{\br@Wisdom}%
642
 
\newcommand*\br@Ecclus{\br@Ecclesiasticus}%
643
 
\newcommand*\br@Isa{\br@Isaiah}%
644
 
\newcommand*\br@Jer{\br@Jeremiah}%
645
 
\newcommand*\br@Lam{\br@Lamentations}%
646
 
\newcommand*\br@Ezek{\br@Ezekiel}%
647
 
\newcommand*\br@Dan{\br@Daniel}%
648
 
\newcommand*\br@Hos{\br@Hosea}%
649
 
\newcommand*\br@Obad{\br@Obadiah}%
650
 
\newcommand*\br@Mic{\br@Micah}%
651
 
\newcommand*\br@Nah{\br@Nahum}%
652
 
\newcommand*\br@Zeph{\br@Zephaniah}%
653
 
\newcommand*\br@Hag{\br@Haggai}%
654
 
\newcommand*\br@Zech{\br@Zechariah}%
655
 
\newcommand*\br@Mal{\br@Malachi}%
656
 
\newcommand*\br@Matt{\br@Matthew}%
657
 
\newcommand*\br@Rom{\br@Romans}%
658
 
\newcommand*\br@ICor{\br@ICorinthians}%
659
 
\newcommand*\br@IICor{\br@IICorinthians}%
660
 
\newcommand*\br@Gal{\br@Galatians}%
661
 
\newcommand*\br@Eph{\br@Ephesians}%
662
 
\newcommand*\br@Phil{\br@Philippians}%
663
 
\newcommand*\br@IThess{\br@IThessalonians}%
664
 
\newcommand*\br@IIThess{\br@IIThessalonians}%
665
 
\newcommand*\br@ITim{\br@ITimothy}%
666
 
\newcommand*\br@IITim{\br@IITimothy}%
667
 
\newcommand*\br@Tit{\br@Titus}%
668
 
\newcommand*\br@Philem{\br@Philemon}%
669
 
\newcommand*\br@Jas{\br@James}%
670
 
\newcommand*\br@IPet{\br@IPeter}%
671
 
\newcommand*\br@IIPet{\br@IIPeter}%
672
 
\newcommand*\br@Rev{\br@Revelation}
673
 
%    \end{macrocode}
674
 
% Set up assorted styles. All bible reference styles
675
 
% should start with \verb|brs@|. First the default
676
 
% style.
677
 
%    \begin{macrocode}
678
 
\newcommand*{\brs@default}{%
679
 
\brfullname
680
 
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
681
 
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
682
 
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
683
 
\renewcommand*{\BRchapterstyle}[1]{##1}%
684
 
\renewcommand*{\BRversestyle}[1]{##1}%
685
 
\renewcommand*{\BRbookof}{}%
686
 
\renewcommand*{\BRgospel}{}%
687
 
\renewcommand*{\BRepistletothe}{}%
688
 
\renewcommand*{\BRepistleto}{}%
689
 
\renewcommand*{\BRepistleof}{}%
690
 
\renewcommand*{\BRbkchsep}{ }
691
 
\renewcommand*{\BRchvsep}{:}%
692
 
\renewcommand*{\BRchsep}{;}%
693
 
\renewcommand*{\BRvrsep}{--}%
694
 
\renewcommand*{\BRvsep}{,}%
695
 
\renewcommand*{\BRperiod}{}}
696
 
%    \end{macrocode}
697
 
% The style used by the Jerusalem Bible.
698
 
%    \begin{macrocode}
699
 
\newcommand{\brs@jerusalem}{%
700
 
\brabbrvname
701
 
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
702
 
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
703
 
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
704
 
\renewcommand*{\BRchapterstyle}[1]{##1}%
705
 
\renewcommand*{\BRversestyle}[1]{##1}%
706
 
\renewcommand*{\BRbookof}{}%
707
 
\renewcommand*{\BRgospel}{}%
708
 
\renewcommand*{\BRepistletothe}{}%
709
 
\renewcommand*{\BRepistleto}{}%
710
 
\renewcommand*{\BRepistleof}{}%
711
 
\renewcommand*{\BRbkchsep}{ }
712
 
\renewcommand*{\BRchvsep}{:}%
713
 
\renewcommand*{\BRchsep}{; }%
714
 
\renewcommand*{\BRvrsep}{--}%
715
 
\renewcommand*{\BRvsep}{,}%
716
 
\renewcommand*{\BRperiod}{}%
717
 
}
718
 
%    \end{macrocode}
719
 
% Anglo-Saxon style.
720
 
%    \begin{macrocode}
721
 
\newcommand{\brs@anglosaxon}{%
722
 
\braltabbrvname
723
 
\renewcommand*{\BRbooknumberstyle}[1]{\MakeUppercase{\romannumeral##1} }%
724
 
\renewcommand*{\BRepistlenumberstyle}[1]{\MakeUppercase{\romannumeral##1} }%
725
 
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
726
 
\renewcommand*{\BRchapterstyle}[1]{\MakeUppercase{\romannumeral##1}}%
727
 
\renewcommand*{\BRversestyle}[1]{##1}%
728
 
\renewcommand*{\BRbookof}{}%
729
 
\renewcommand*{\BRgospel}{}%
730
 
\renewcommand*{\BRepistletothe}{}%
731
 
\renewcommand*{\BRepistleto}{}%
732
 
\renewcommand*{\BRepistleof}{}%
733
 
\renewcommand*{\BRbkchsep}{ }
734
 
\renewcommand*{\BRchvsep}{.}%
735
 
\renewcommand*{\BRchsep}{; }%
736
 
\renewcommand*{\BRvrsep}{--}%
737
 
\renewcommand*{\BRvsep}{,}%
738
 
\renewcommand*{\BRperiod}{.}%
739
 
}
740
 
%    \end{macrocode}
741
 
%Journal of Ecclesiastical History
742
 
%    \begin{macrocode}
743
 
\newcommand{\brs@JEH}{%
744
 
\braltabbrvname
745
 
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
746
 
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
747
 
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
748
 
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
749
 
\renewcommand*{\BRversestyle}[1]{##1}%
750
 
\renewcommand*{\BRbookof}{}%
751
 
\renewcommand*{\BRgospel}{}%
752
 
\renewcommand*{\BRepistletothe}{}%
753
 
\renewcommand*{\BRepistleto}{}%
754
 
\renewcommand*{\BRepistleof}{}%
755
 
\renewcommand*{\BRbkchsep}{ }
756
 
\renewcommand*{\BRchvsep}{. }%
757
 
\renewcommand*{\BRchsep}{; }%
758
 
\renewcommand*{\BRvrsep}{--}%
759
 
\renewcommand*{\BRvsep}{,}%
760
 
\renewcommand*{\BRperiod}{.}%
761
 
}
762
 
%    \end{macrocode}
763
 
%Modern Humanities Research Association (MHRA)
764
 
%    \begin{macrocode}
765
 
\newcommand{\brs@MHRA}{%
766
 
\brfullname
767
 
\renewcommand*{\BRbooknumberstyle}[1]{\textsc{\romannumeral##1} }%
768
 
\renewcommand*{\BRepistlenumberstyle}[1]{\textsc{\romannumeral##1} }%
769
 
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
770
 
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
771
 
\renewcommand*{\BRversestyle}[1]{##1}%
772
 
\renewcommand*{\BRbookof}{}%
773
 
\renewcommand*{\BRgospel}{}%
774
 
\renewcommand*{\BRepistletothe}{}%
775
 
\renewcommand*{\BRepistleto}{}%
776
 
\renewcommand*{\BRepistleof}{}%
777
 
\renewcommand*{\BRbkchsep}{ }
778
 
\renewcommand*{\BRchvsep}{. }%
779
 
\renewcommand*{\BRchsep}{; }%
780
 
\renewcommand*{\BRvrsep}{--}%
781
 
\renewcommand*{\BRvsep}{,}%
782
 
\renewcommand*{\BRperiod}{}%
783
 
}
784
 
%    \end{macrocode}
785
 
%Novum Testamentum Graece (Nestle-Aland)
786
 
%    \begin{macrocode}
787
 
\newcommand{\brs@NTG}{%
788
 
\braltabbrvname
789
 
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
790
 
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
791
 
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
792
 
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
793
 
\renewcommand*{\BRversestyle}[1]{##1}%
794
 
\renewcommand*{\BRbookof}{}%
795
 
\renewcommand*{\BRgospel}{}%
796
 
\renewcommand*{\BRepistletothe}{}%
797
 
\renewcommand*{\BRepistleto}{}%
798
 
\renewcommand*{\BRepistleof}{}%
799
 
\renewcommand*{\BRbkchsep}{ }
800
 
\renewcommand*{\BRchvsep}{,}%
801
 
\renewcommand*{\BRchsep}{; }%
802
 
\renewcommand*{\BRvrsep}{--}%
803
 
\renewcommand*{\BRvsep}{,}%
804
 
\renewcommand*{\BRperiod}{}%
805
 
}
806
 
%    \end{macrocode}
807
 
%MLA Style 
808
 
%    \begin{macrocode}
809
 
\newcommand{\brs@MLA}{%
810
 
\braltabbrvname
811
 
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
812
 
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
813
 
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
814
 
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
815
 
\renewcommand*{\BRversestyle}[1]{##1}%
816
 
\renewcommand*{\BRbookof}{}%
817
 
\renewcommand*{\BRgospel}{}%
818
 
\renewcommand*{\BRepistletothe}{}%
819
 
\renewcommand*{\BRepistleto}{}%
820
 
\renewcommand*{\BRepistleof}{}%
821
 
\renewcommand*{\BRbkchsep}{\ }
822
 
\renewcommand*{\BRchvsep}{.}%
823
 
\renewcommand*{\BRchsep}{; }%
824
 
\renewcommand*{\BRvrsep}{--}%
825
 
\renewcommand*{\BRvsep}{,}%
826
 
\renewcommand*{\BRperiod}{.}%
827
 
}
828
 
%    \end{macrocode}
829
 
%Chicago Style 
830
 
%    \begin{macrocode}
831
 
\newcommand{\brs@chicago}{%
832
 
\braltabbrvname
833
 
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
834
 
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
835
 
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
836
 
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
837
 
\renewcommand*{\BRversestyle}[1]{##1}%
838
 
\renewcommand*{\BRbookof}{}%
839
 
\renewcommand*{\BRgospel}{}%
840
 
\renewcommand*{\BRepistletothe}{}%
841
 
\renewcommand*{\BRepistleto}{}%
842
 
\renewcommand*{\BRepistleof}{}%
843
 
\renewcommand*{\BRbkchsep}{\ }
844
 
\renewcommand*{\BRchvsep}{\,:\,}%
845
 
\renewcommand*{\BRchsep}{; }%
846
 
\renewcommand*{\BRvrsep}{--}%
847
 
\renewcommand*{\BRvsep}{,}%
848
 
\renewcommand*{\BRperiod}{.}%
849
 
}
850
 
%    \end{macrocode}
851
 
% Full text citation
852
 
%    \begin{macrocode}
853
 
\newcommand*{\brs@text}{%
854
 
\biblerefstyle{default}%
855
 
\renewcommand{\BRbooknumberstyle}[1]{%
856
 
\Ordinalstringnum{##1}\ }%
857
 
\renewcommand{\BRepistlenumberstyle}[1]{%
858
 
\Ordinalstringnum{##1}\ }%
859
 
\renewcommand{\BRbookof}{Book of }%
860
 
\renewcommand{\BRgospel}{Gospel according to St }%
861
 
\renewcommand{\BRepistletothe}{Epistle to the }%
862
 
\renewcommand{\BRepistleto}{Epistle to }%
863
 
\renewcommand{\BRepistleof}{Epistle of }%
864
 
\renewcommand{\BRchapterstyle}[1]{%
865
 
chapter \numberstringnum{##1}}%
866
 
\renewcommand{\BRbkchsep}{, }%
867
 
\renewcommand{\BRchvsep}{ verse }%
868
 
\renewcommand{\BRchsep}{, }%
869
 
\renewcommand{\BRvrsep}{ to }%
870
 
\renewcommand{\BRvsep}{, }%
871
 
\renewcommand{\BRversestyle}[1]{\numberstringnum{##1}}%
872
 
}
873
 
%    \end{macrocode}
874
 
% Declare package options
875
 
%    \begin{macrocode}
876
 
\DeclareOption{default}{\brs@default}
877
 
\DeclareOption{jerusalem}{\brs@jerusalem}
878
 
\DeclareOption{anglosaxon}{\brs@anglosaxon}
879
 
\DeclareOption{JEH}{\brs@JEH}
880
 
\DeclareOption{MHRA}{\brs@MHRA}
881
 
\DeclareOption{NTG}{\brs@NTG}
882
 
\DeclareOption{MLA}{\brs@MLA}
883
 
\DeclareOption{chicago}{\brs@chicago}
884
 
\DeclareOption{text}{\brs@text}
885
 
%    \end{macrocode}
886
 
% Process package options
887
 
%    \begin{macrocode}
888
 
\ProcessOptions
889
 
%    \end{macrocode}
890
 
% Define \verb|\newbiblerefstyle|. The first argument
891
 
% is the name of the style, the second argument indicates
892
 
% what to do. (It basically defines a command called
893
 
% \verb|\brs@#1| to do \verb|#2|)
894
 
%    \begin{macrocode}
895
 
\newcommand{\newbiblerefstyle}[2]{%
896
 
\@ifundefined{brs@#1}{%
897
 
\expandafter\def\csname brs@#1\endcsname{#2}}{%
898
 
\PackageError{bibleref}{bible ref style '#1' already
899
 
defined}{}}}
900
 
%    \end{macrocode}
901
 
% \verb|\setbooktitle{|\meta{fullname}|}{|\meta{title}|}|
902
 
% redefines the title of book \meta{fullname}. 
903
 
%    \begin{macrocode}
904
 
\newcommand{\setbooktitle}[2]{%
905
 
\@ifundefined{br@#1}{\PackageError{biberef}{Unknown
906
 
book `#1'}{}}{%
907
 
\expandafter\def\csname br@#1\endcsname{#2}}}
908
 
%    \end{macrocode}
909
 
% Define \verb|\biblerefstyle|
910
 
%    \begin{macrocode}
911
 
\newcommand{\biblerefstyle}[1]{%
912
 
\@ifundefined{brs@#1}{\PackageError{bibleref}{%
913
 
Unknown biblerefstyle '#1'}{}}{\csname brs@#1\endcsname}}
914
 
%    \end{macrocode}
915
 
% Verses may be supplied as a range. Provide a command
916
 
% to detect whether single number or range supplied.
917
 
%    \begin{macrocode}
918
 
\newcommand{\@br@vrsty}[1]{\@@br@vrsty#1-\@nil\end}
919
 
 
920
 
\def\@@br@vrsty#1-#2\end{%
921
 
\@do@verses#1,\relax\end
922
 
\ifx\@nil#2\relax
923
 
\else
924
 
\@bv@do{\BRvrsep}%
925
 
\@@br@vrsty#2\end%
926
 
\fi}
927
 
 
928
 
\def\@do@verses#1,#2\end{%
929
 
\ifthenelse{\equal{#1}{}}{}{\@bv@do{\BRversestyle{#1}}}%
930
 
\ifx\relax#2\@empty
931
 
\else
932
 
\@bv@do{\BRvsep}%
933
 
\@do@verses#2\end
934
 
\fi
935
 
}
936
 
%    \end{macrocode}
937
 
% Define \verb|\bibleverse|. The first argument
938
 
% is the book name. It looks for a command called
939
 
% \verb|\br@|\meta{name} (defined earlier) where \meta{name} is 
940
 
% the book name as specified in the first argument of
941
 
% \verb|\bibleverse|. After the book title, it then checks
942
 
% to see if there is a bracket \verb|(| immediately following it.
943
 
%    \begin{macrocode}
944
 
\newcommand{\bibleverse}[1]{%
945
 
\@ifundefined{br@#1}{\PackageError{bibleref}{Unknown book '#1'}{%
946
 
}}{\@bv@idxsort{\csname br@#1\endcsname}%
947
 
\def\@bv@chidxsort{}%
948
 
\@bv@do{\BRbooktitlestyle{\csname br@#1\endcsname}}}%
949
 
\@ifnextchar({\BRbkchsep\@bv@addtoidx{!}\@bibleverse}{\@end@@bibleverse}%
950
 
}
951
 
%    \end{macrocode}
952
 
% Get the chapter number.
953
 
%    \begin{macrocode}
954
 
\def\@bibleverse(#1:{%
955
 
\ifthenelse{\equal{#1}{}}{}{%
956
 
\ifthenelse{\equal{\@bv@chidxsort}{}}{%
957
 
\def\@bvchidxsort{#1}\@bv@addtoidx{#1@}}{}%
958
 
\@bv@do{\BRchapterstyle{#1}}}%
959
 
\@@bibleverse}
960
 
%    \end{macrocode}
961
 
% Second part of a range spanning chapters.
962
 
%    \begin{macrocode}
963
 
\def\@bibleverser-(#1:{%
964
 
\ifthenelse{\equal{#1}{}}{}{%
965
 
\@bv@do{\BRchapterstyle{#1}}}%
966
 
\@@bibleverse}
967
 
%    \end{macrocode}
968
 
% Get the verse number (or number range), and check to see
969
 
% if it is followed by another bracket (indicating another
970
 
% chapter, verse pair).
971
 
%    \begin{macrocode}
972
 
\def\@@bibleverse#1){%
973
 
\ifthenelse{\equal{#1}{}}{}{\@bv@do{\BRchvsep}\@br@vrsty{#1}}%
974
 
\@ifnextchar({\@bv@do{\BRchsep}\@bibleverse}%
975
 
{\@ifnextchar-{\@bv@do{\BRvrsep}\@bibleverser}{\@end@@bibleverse}}}
976
 
%    \end{macrocode}
977
 
% This controls what to do at the end of the final
978
 
% verse.
979
 
%    \begin{macrocode}
980
 
\newcommand{\@end@@bibleverse}{%
981
 
\if@bv@idx
982
 
\index{\@@bv@idxsort\relax @\@bv@idxentry|\@bv@idxpgformat}%
983
 
\@bv@idxfalse
984
 
\fi
985
 
}
986
 
%    \end{macrocode}
987
 
% Do argument and add to idx
988
 
%    \begin{macrocode}
989
 
\newcommand{\@bv@do}[1]{#1\@bv@addtoidx{#1}}
990
 
%    \end{macrocode}
991
 
% Append text to \verb|\@bv@idxentry|
992
 
%    \begin{macrocode}
993
 
\toksdef\@bv@tmpa=0
994
 
\toksdef\@bv@tmpb=2
995
 
\newcommand{\@bv@addtoidx}[1]{%
996
 
\if@bv@idx
997
 
\@bv@tmpa={#1}%
998
 
\@bv@tmpb=\expandafter{\@bv@idxentry}%
999
 
\edef\@bv@idxentry{\the\@bv@tmpb\the\@bv@tmpa}%
1000
 
\fi}
1001
 
%    \end{macrocode}
1002
 
% Append text to \verb|\@@bv@idxsort|
1003
 
%    \begin{macrocode}
1004
 
\newcommand{\@bv@addtoidxsort}[1]{%
1005
 
\if@bv@idx
1006
 
\@bv@tmpa={#1}%
1007
 
\@bv@tmpb=\expandafter{\@@bv@idxsort}%
1008
 
\edef\@@bv@idxsort{\the\@bv@tmpb\the\@bv@tmpa}%
1009
 
\fi}
1010
 
%    \end{macrocode}
1011
 
% Define switch to indicate whether or not to index
1012
 
% bible reference.
1013
 
%    \begin{macrocode}
1014
 
\newif\if@bv@idx
1015
 
\@bv@idxfalse
1016
 
%    \end{macrocode}
1017
 
% Sort key for bible verse index. (Strip all the formatting
1018
 
% bits.)
1019
 
%    \begin{macrocode}
1020
 
\newcommand{\@bv@idxsort}[1]{%
1021
 
\if@bv@idx
1022
 
{\def\BRbooknumberstyle##1##2\relax{##2##1}%
1023
 
\def\BRepistlenumberstyle##1##2\relax{##2##1}%
1024
 
\def\BRgospel{}\def\BRbookof{}\def\BRepistleto{}%
1025
 
\def\BRepistletothe{}\def\BRepistleof{}%
1026
 
\xdef\@@bv@idxsort{#1\relax}%
1027
 
}%
1028
 
\fi}
1029
 
%    \end{macrocode}
1030
 
% Define \verb|\ibibleverse|. This is like \verb|\bibleverse|,
1031
 
% but also adds an index entry. The optional argument indicates
1032
 
% how to format the page number (without the preceeding backslash)
1033
 
% e.g. \verb|\ibibleref[textit]{Romans}|.
1034
 
%    \begin{macrocode}
1035
 
\newcommand{\ibibleverse}[1][\bvidxpgformat]{%
1036
 
\def\@bv@idxpgformat{#1}%
1037
 
\@bv@idxtrue\def\@bv@idxentry{}\bibleverse}
1038
 
%    \end{macrocode}
1039
 
% Default page number format for bible verse index entries
1040
 
%    \begin{macrocode}
1041
 
\newcommand{\bvidxpgformat}{textrm}
1042
 
%    \end{macrocode}
 
250
%\fi
 
251
% Declare package
 
252
%    \begin{macrocode}
 
253
\NeedsTeXFormat{LaTeX2e}
 
254
\ProvidesPackage{bibleref}[2007/08/20 1.07 (NLCT)]
 
255
%    \end{macrocode}
 
256
% Need to do some conditional stuff
 
257
%    \begin{macrocode}
 
258
\RequirePackage{ifthen}
 
259
%    \end{macrocode}
 
260
% The fmtcount package is needed for the full text
 
261
% citations
 
262
%    \begin{macrocode}
 
263
\RequirePackage{fmtcount}
 
264
%    \end{macrocode}
 
265
%\begin{macro}{\BRbooknumberstyle}
 
266
% The style of the book
 
267
% number. By default, it simply displays its argument
 
268
%followed by a space.
 
269
%    \begin{macrocode}
 
270
\newcommand*{\BRbooknumberstyle}[1]{#1 }
 
271
%    \end{macrocode}
 
272
%\end{macro}
 
273
%\begin{macro}{\BRepistlenumberstyle}
 
274
% As above, but for epistle.
 
275
%    \begin{macrocode}
 
276
\newcommand*{\BRepistlenumberstyle}[1]{#1 }
 
277
%    \end{macrocode}
 
278
%\end{macro}
 
279
%\begin{macro}{\BRbookof}
 
280
%The text to go before the book title.
 
281
%This by default is nothing,
 
282
% but can be changed to, e.g., ``The book of ''
 
283
%    \begin{macrocode}
 
284
\newcommand*{\BRbookof}{}
 
285
%    \end{macrocode}
 
286
%\end{macro}
 
287
%\begin{macro}{\BRgospel}
 
288
%As above but for gospels
 
289
%    \begin{macrocode}
 
290
\newcommand*{\BRgospel}{}
 
291
%    \end{macrocode}
 
292
%\end{macro}
 
293
%\begin{macro}{\BRepistleto}
 
294
% As above but for epistles to
 
295
% someone.
 
296
%    \begin{macrocode}
 
297
\newcommand*{\BRepistleto}{}
 
298
%    \end{macrocode}
 
299
%\end{macro}
 
300
%\begin{macro}{\BRepistletothe}
 
301
% As above but for epistles to 
 
302
% people.
 
303
%    \begin{macrocode}
 
304
\newcommand*{\BRepistletothe}{}
 
305
%    \end{macrocode}
 
306
%\end{macro}
 
307
%\begin{macro}{\BRepistleof}
 
308
% As above but for ``epistles of''
 
309
%    \begin{macrocode}
 
310
\newcommand*{\BRepistleof}{}
 
311
%    \end{macrocode}
 
312
%\end{macro}
 
313
%
 
314
%\begin{macro}{\BRbooktitlestyle}
 
315
% The style of the
 
316
% book title. By default, it simply displays its argument.
 
317
%    \begin{macrocode}
 
318
\newcommand*{\BRbooktitlestyle}[1]{#1}
 
319
%    \end{macrocode}
 
320
%\end{macro}
 
321
%\begin{macro}{\BRchapterstyle}
 
322
% The style of the chapter number.
 
323
% By default it simply displays its argument.
 
324
%    \begin{macrocode}
 
325
\newcommand*{\BRchapterstyle}[1]{#1}
 
326
%    \end{macrocode}
 
327
%\end{macro}
 
328
%\begin{macro}{\BRversestyle}
 
329
%The style of the verse number.
 
330
% By default is simply displays its argument.
 
331
%    \begin{macrocode}
 
332
\newcommand*{\BRversestyle}[1]{#1}
 
333
%    \end{macrocode}
 
334
%\end{macro}
 
335
%
 
336
%\begin{macro}{\BRbkchsep}
 
337
%The separator between the book title
 
338
% and the chapter number
 
339
%    \begin{macrocode}
 
340
\newcommand*{\BRbkchsep}{ }
 
341
%    \end{macrocode}
 
342
%\end{macro}
 
343
%\begin{macro}{\BRchvsep}
 
344
% The separator between chapter
 
345
% and verse numbers. By default this is simply a colon.
 
346
%    \begin{macrocode}
 
347
\newcommand*{\BRchvsep}{:}
 
348
%    \end{macrocode}
 
349
%\end{macro}
 
350
%\begin{macro}{\BRchsep}
 
351
% The separator between multiple chapters.
 
352
% By default this is simply a semi-colon.
 
353
%    \begin{macrocode}
 
354
\newcommand*{\BRchsep}{;}
 
355
%    \end{macrocode}
 
356
%\end{macro}
 
357
%\begin{macro}{\BRvrsep}
 
358
% The separator between the beginning
 
359
% and ending of a range of verses. By default this
 
360
% is simply an en-dash.
 
361
%    \begin{macrocode}
 
362
\newcommand*{\BRvrsep}{--}
 
363
%    \end{macrocode}
 
364
%\end{macro}
 
365
%\begin{macro}{\BRvsep}
 
366
%The separator between a list of verses.
 
367
%    \begin{macrocode}
 
368
\newcommand*{\BRvsep}{,}
 
369
%    \end{macrocode}
 
370
%\end{macro}
 
371
%\begin{macro}{\BRperiod}
 
372
% This can be redefined to put a full stop after 
 
373
% book names.
 
374
%    \begin{macrocode}
 
375
\newcommand*{\BRperiod}{}
 
376
%    \end{macrocode}
 
377
%\end{macro}
 
378
%
 
379
%\begin{macro}{\brfullname}
 
380
% This will switch to using the full book title.
 
381
%    \begin{macrocode}
 
382
\newcommand*{\brfullname}{%
 
383
\def\br@Genesis{\BRbookof Genesis}%
 
384
\def\br@Exodus{\BRbookof Exodus}%
 
385
\def\br@Leviticus{\BRbookof Leviticus}%
 
386
\def\br@Numbers{\BRbookof Numbers}%
 
387
\def\br@Deuteronomy{\BRbookof Deuteronomy}%
 
388
\def\br@Joshua{\BRbookof Joshua}%
 
389
\def\br@Judges{\BRbookof Judges}%
 
390
\def\br@Ruth{\BRbookof Ruth}%
 
391
\def\br@ISamuel{\BRbooknumberstyle{1}\BRbookof Samuel}%
 
392
\def\br@IISamuel{\BRbooknumberstyle{2}\BRbookof Samuel}%
 
393
\def\br@IKings{\BRbooknumberstyle{1}\BRbookof Kings}%
 
394
\def\br@IIKings{\BRbooknumberstyle{2}\BRbookof Kings}%
 
395
\def\br@IChronicles{\BRbooknumberstyle{1}\BRbookof Chronicles}%
 
396
\def\br@IIChronicles{\BRbooknumberstyle{2}\BRbookof Chronicles}%
 
397
\def\br@Ezra{\BRbookof Ezra}%
 
398
\def\br@Nehemiah{\BRbookof Nehemiah}%
 
399
\def\br@Tobit{\BRbookof Tobit}%
 
400
\def\br@Judith{\BRbookof Judith}%
 
401
\def\br@Esther{\BRbookof Esther}%
 
402
\def\br@IMaccabees{\BRbooknumberstyle{1}\BRbookof Maccabees}%
 
403
\def\br@IIMaccabees{\BRbooknumberstyle{2}\BRbookof Maccabees}%
 
404
\def\br@Job{\BRbookof Job}%
 
405
\def\br@Psalms{\BRbookof Psalms}%
 
406
\def\br@Proverbs{\BRbookof Proverbs}%
 
407
\def\br@Ecclesiastes{\BRbookof Ecclesiastes}%
 
408
\def\br@SongofSongs{\BRbookof Song of Songs}%
 
409
\def\br@Wisdom{\BRbookof Wisdom}%
 
410
\def\br@Ecclesiasticus{\BRbookof Ecclesiasticus}%
 
411
\def\br@Isaiah{\BRbookof Isaiah}%
 
412
\def\br@Jeramiah{\BRbookof Jeremiah}%
 
413
\def\br@Lamentations{\BRbookof Lamentations}%
 
414
\def\br@Baruch{\BRbookof Baruch}%
 
415
\def\br@Ezekiel{\BRbookof Ezekiel}%
 
416
\def\br@Daniel{\BRbookof Daniel}%
 
417
\def\br@Hosea{\BRbookof Hosea}%
 
418
\def\br@Joel{\BRbookof Joel}%
 
419
\def\br@Amos{\BRbookof Amos}%
 
420
\def\br@Obadiah{\BRbookof Obadiah}%
 
421
\def\br@Jonah{\BRbookof Jonah}%
 
422
\def\br@Micah{\BRbookof Micah}%
 
423
\def\br@Nahum{\BRbookof Nahum}%
 
424
\def\br@Habakkuk{\BRbookof Habakkuk}%
 
425
\def\br@Zephaniah{\BRbookof Zephaniah}%
 
426
\def\br@Haggai{\BRbookof Haggai}%
 
427
\def\br@Zechariah{\BRbookof Zechariah}%
 
428
\def\br@Malachi{\BRbookof Malachi}%
 
429
\def\br@Matthew{\BRgospel Matthew}%
 
430
\def\br@Mark{\BRgospel Mark}%
 
431
\def\br@Luke{\BRgospel Luke}%
 
432
\def\br@John{\BRgospel John}%
 
433
\def\br@Acts{Acts}%
 
434
\def\br@Romans{\BRepistletothe Romans}%
 
435
\def\br@ICorinthians{\BRepistlenumberstyle{1}\BRepistletothe Corinthians}%
 
436
\def\br@IICorinthians{\BRepistlenumberstyle{2}\BRepistletothe Corinthians}%
 
437
\def\br@Galatians{\BRepistletothe Galatians}%
 
438
\def\br@Ephesians{\BRepistletothe Ephesians}%
 
439
\def\br@Philippians{\BRepistletothe Philippians}%
 
440
\def\br@Colossians{\BRepistletothe Colossians}%
 
441
\def\br@IThessalonians{\BRepistlenumberstyle{1}\BRepistletothe Thessalonians}%
 
442
\def\br@IIThessalonians{\BRepistlenumberstyle{2}\BRepistletothe Thessalonians}%
 
443
\def\br@ITimothy{\BRepistlenumberstyle{1}\BRepistleto Timothy}%
 
444
\def\br@IITimothy{\BRepistlenumberstyle{2}\BRepistleto Timothy}%
 
445
\def\br@Titus{\BRepistleto Titus}%
 
446
\def\br@Philemon{\BRepistleto Philemon}%
 
447
\def\br@Hebrews{\BRepistletothe Hebrews}%
 
448
\def\br@James{\BRepistleof James}%
 
449
\def\br@IPeter{\BRepistlenumberstyle{1}\BRepistleof Peter}%
 
450
\def\br@IIPeter{\BRepistlenumberstyle{2}\BRepistleof Peter}%
 
451
\def\br@IJohn{\BRepistlenumberstyle{1}\BRepistleof John}%
 
452
\def\br@IIJohn{\BRepistlenumberstyle{2}\BRepistleof John}%
 
453
\def\br@IIIJohn{\BRepistlenumberstyle{3}\BRepistleof John}%
 
454
\def\br@Jude{\BRepistleof Jude}%
 
455
\def\br@Revelation{\BRbookof Revelation}}
 
456
%    \end{macrocode}
 
457
%\end{macro}
 
458
% Set full names as the default
 
459
%    \begin{macrocode}
 
460
\brfullname
 
461
%    \end{macrocode}
 
462
%
 
463
%\begin{macro}{\brabbrvname}
 
464
% This will switch to an abbreviated form for the book titles.
 
465
%    \begin{macrocode}
 
466
\newcommand*{\brabbrvname}{%
 
467
\def\br@Genesis{Gn\BRperiod}%
 
468
\def\br@Exodus{Ex\BRperiod}%
 
469
\def\br@Leviticus{Lv\BRperiod}%
 
470
\def\br@Numbers{Nb\BRperiod}%
 
471
\def\br@Deuteronomy{Dt\BRperiod}%
 
472
\def\br@Joshua{Jos\BRperiod}%
 
473
\def\br@Judges{Jg\BRperiod}%
 
474
\def\br@Ruth{Rt\BRperiod}%
 
475
\def\br@ISamuel{\BRbooknumberstyle{1}S\BRperiod}%
 
476
\def\br@IISamuel{\BRbooknumberstyle{2}S\BRperiod}%
 
477
\def\br@IKings{\BRbooknumberstyle{1}K\BRperiod}%
 
478
\def\br@IIKings{\BRbooknumberstyle{2}K\BRperiod}%
 
479
\def\br@IChronicles{\BRbooknumberstyle{1}Ch\BRperiod}%
 
480
\def\br@IIChronicles{\BRbooknumberstyle{2}Ch\BRperiod}%
 
481
\def\br@Ezra{Ezr\BRperiod}%
 
482
\def\br@Nehemiah{Ne\BRperiod}%
 
483
\def\br@Tobit{Tb\BRperiod}%
 
484
\def\br@Judith{Jdt\BRperiod}%
 
485
\def\br@Esther{Est\BRperiod}%
 
486
\def\br@IMaccabees{\BRbooknumberstyle{1}M\BRperiod}%
 
487
\def\br@IIMaccabees{\BRbooknumberstyle{2}M\BRperiod}%
 
488
\def\br@Job{Jb\BRperiod}%
 
489
\def\br@Psalms{Ps\BRperiod}%
 
490
\def\br@Proverbs{Pr\BRperiod}%
 
491
\def\br@Ecclesiastes{Qo\BRperiod}%
 
492
\def\br@SongofSongs{Sg\BRperiod}%
 
493
\def\br@Wisdom{Ws\BRperiod}%
 
494
\def\br@Ecclesiasticus{Si\BRperiod}%
 
495
\def\br@Isaiah{Is\BRperiod}%
 
496
\def\br@Jeremiah{Jr\BRperiod}%
 
497
\def\br@Lamentations{Lm\BRperiod}%
 
498
\def\br@Baruch{Ba\BRperiod}%
 
499
\def\br@Ezekiel{Ezk\BRperiod}%
 
500
\def\br@Daniel{Dn\BRperiod}%
 
501
\def\br@Hosea{Ho\BRperiod}%
 
502
\def\br@Joel{Jl\BRperiod}%
 
503
\def\br@Amos{Am\BRperiod}%
 
504
\def\br@Obadiah{Ob\BRperiod}%
 
505
\def\br@Jonah{Jon\BRperiod}%
 
506
\def\br@Micah{Mi\BRperiod}%
 
507
\def\br@Nahum{Na\BRperiod}%
 
508
\def\br@Habakkuk{Hab\BRperiod}%
 
509
\def\br@Zephaniah{Zp\BRperiod}%
 
510
\def\br@Haggai{Hg\BRperiod}%
 
511
\def\br@Zechariah{Zc\BRperiod}%
 
512
\def\br@Malachi{Ml\BRperiod}%
 
513
\def\br@Matthew{Mt\BRperiod}%
 
514
\def\br@Mark{Mk\BRperiod}%
 
515
\def\br@Luke{Lk\BRperiod}%
 
516
\def\br@John{Jn\BRperiod}%
 
517
\def\br@Acts{Ac\BRperiod}%
 
518
\def\br@Romans{Rm\BRperiod}%
 
519
\def\br@ICorinthians{\BRepistlenumberstyle{1}Co\BRperiod}%
 
520
\def\br@IICorinthians{\BRepistlenumberstyle{2}Co\BRperiod}%
 
521
\def\br@Galatians{Ga\BRperiod}%
 
522
\def\br@Ephesians{Ep\BRperiod}%
 
523
\def\br@Philippians{Ph\BRperiod}%
 
524
\def\br@Colossians{Col\BRperiod}%
 
525
\def\br@IThessalonians{\BRepistlenumberstyle{1}Th\BRperiod}%
 
526
\def\br@IIThessalonians{\BRepistlenumberstyle{2}Th\BRperiod}%
 
527
\def\br@ITimothy{\BRepistlenumberstyle{1}Tm\BRperiod}%
 
528
\def\br@IITimothy{\BRepistlenumberstyle{2}Tm\BRperiod}%
 
529
\def\br@Titus{Tt\BRperiod}%
 
530
\def\br@Philemon{Phm\BRperiod}%
 
531
\def\br@Hebrews{Heb\BRperiod}%
 
532
\def\br@James{Jm\BRperiod}%
 
533
\def\br@IPeter{\BRepistlenumberstyle{1}P\BRperiod}%
 
534
\def\br@IIPeter{\BRepistlenumberstyle{2}P\BRperiod}%
 
535
\def\br@IJohn{\BRepistlenumberstyle{1}Jn\BRperiod}%
 
536
\def\br@IIJohn{\BRepistlenumberstyle{2}Jn\BRperiod}%
 
537
\def\br@IIIJohn{\BRepistlenumberstyle{3}Jn\BRperiod}%
 
538
\def\br@Jude{Jude}%
 
539
\def\br@Revelation{Rv\BRperiod}}
 
540
%    \end{macrocode}
 
541
%\end{macro}
 
542
%
 
543
%\begin{macro}{\braltabbrvname}
 
544
% This switches to an alternative set of abbreviations.
 
545
%    \begin{macrocode}
 
546
\newcommand*{\braltabbrvname}{%
 
547
\def\br@Genesis{Gen\BRperiod}%
 
548
\def\br@Exodus{Exod\BRperiod}%
 
549
\def\br@Leviticus{Lev\BRperiod}%
 
550
\def\br@Numbers{Num\BRperiod}%
 
551
\def\br@Deuteronomy{Deut\BRperiod}%
 
552
\def\br@Joshua{Josh\BRperiod}%
 
553
\def\br@Judges{Judg\BRperiod}%
 
554
\def\br@Ruth{Ruth}%
 
555
\def\br@ISamuel{\BRbooknumberstyle{1}Sam\BRperiod}%
 
556
\def\br@IISamuel{\BRbooknumberstyle{2}Sam\BRperiod}%
 
557
\def\br@IKings{\BRbooknumberstyle{1}Kgs\BRperiod}%
 
558
\def\br@IIKings{\BRbooknumberstyle{2}Kgs\BRperiod}%
 
559
\def\br@IChronicles{\BRbooknumberstyle{1}Chr\BRperiod}%
 
560
\def\br@IIChronicles{\BRbooknumberstyle{2}Chr\BRperiod}%
 
561
\def\br@Ezra{Ezra}%
 
562
\def\br@Nehemiah{Neh\BRperiod}%
 
563
\def\br@Tobit{Tobit}%
 
564
\def\br@Judith{Judith}%
 
565
\def\br@Esther{Esther}%
 
566
\def\br@IMaccabees{\BRbooknumberstyle{1}M\BRperiod}%
 
567
\def\br@IIMaccabees{\BRbooknumberstyle{2}M\BRperiod}%
 
568
\def\br@Job{Job}%
 
569
\def\br@Psalms{Ps\BRperiod}%
 
570
\def\br@Proverbs{Prov\BRperiod}%
 
571
\def\br@Ecclesiastes{Eccles\BRperiod}%
 
572
\def\br@SongofSongs{S\BRperiod\ of S\BRperiod}%
 
573
\def\br@Wisdom{Wisd\BRperiod}%
 
574
\def\br@Ecclesiasticus{Ecclus\BRperiod}%
 
575
\def\br@Isaiah{Isa\BRperiod}%
 
576
\def\br@Jeremiah{Jer\BRperiod}%
 
577
\def\br@Lamentations{Lam\BRperiod}%
 
578
\def\br@Baruch{Baruch}%
 
579
\def\br@Ezekiel{Ezek\BRperiod}%
 
580
\def\br@Daniel{Dan\BRperiod}%
 
581
\def\br@Hosea{Hos\BRperiod}%
 
582
\def\br@Joel{Joel}%
 
583
\def\br@Amos{Amos}%
 
584
\def\br@Obadiah{Obad}%
 
585
\def\br@Jonah{Jonah}%
 
586
\def\br@Micah{Mic\BRperiod}%
 
587
\def\br@Nahum{Nah\BRperiod}%
 
588
\def\br@Habakkuk{Hab\BRperiod}%
 
589
\def\br@Zephaniah{Zeph\BRperiod}%
 
590
\def\br@Haggai{Hag\BRperiod}%
 
591
\def\br@Zechariah{Zech\BRperiod}%
 
592
\def\br@Malachi{Mal\BRperiod}%
 
593
\def\br@Matthew{Matt\BRperiod}%
 
594
\def\br@Mark{Mark}%
 
595
\def\br@Luke{Luke}%
 
596
\def\br@John{John}%
 
597
\def\br@Acts{Acts}%
 
598
\def\br@Romans{Rom\BRperiod}%
 
599
\def\br@ICorinthians{\BRepistlenumberstyle{1}Cor\BRperiod}%
 
600
\def\br@IICorinthians{\BRepistlenumberstyle{2}Cor\BRperiod}%
 
601
\def\br@Galatians{Gal\BRperiod}%
 
602
\def\br@Ephesians{Eph\BRperiod}%
 
603
\def\br@Philippians{Phil\BRperiod}%
 
604
\def\br@Colossians{Col\BRperiod}%
 
605
\def\br@IThessalonians{\BRepistlenumberstyle{1}Thess\BRperiod}%
 
606
\def\br@IIThessalonians{\BRepistlenumberstyle{2}Thess\BRperiod}%
 
607
\def\br@ITimothy{\BRepistlenumberstyle{1}Tim\BRperiod}%
 
608
\def\br@IITimothy{\BRepistlenumberstyle{2}Tim\BRperiod}%
 
609
\def\br@Titus{Tit\BRperiod}%
 
610
\def\br@Philemon{Philem\BRperiod}%
 
611
\def\br@Hebrews{Heb\BRperiod}%
 
612
\def\br@James{Jas\BRperiod}%
 
613
\def\br@IPeter{\BRepistlenumberstyle{1}Pet\BRperiod}%
 
614
\def\br@IIPeter{\BRepistlenumberstyle{2}Pet\BRperiod}%
 
615
\def\br@IJohn{\BRepistlenumberstyle{1}John}%
 
616
\def\br@IIJohn{\BRepistlenumberstyle{2}John}%
 
617
\def\br@IIIJohn{\BRepistlenumberstyle{3}John}%
 
618
\def\br@Jude{Jude}%
 
619
\def\br@Revelation{Rev\BRperiod}}
 
620
%    \end{macrocode}
 
621
%\end{macro}
 
622
% Provide synonymns.
 
623
%    \begin{macrocode}
 
624
\newcommand*\br@Gn{\br@Genesis}%
 
625
\newcommand*\br@Ex{\br@Exodus}%
 
626
\newcommand*\br@Lv{\br@Leviticus}%
 
627
\newcommand*\br@Nb{\br@Numbers}%
 
628
\newcommand*\br@Dt{\br@Deuteronomy}%
 
629
\newcommand*\br@Jos{\br@Joshua}%
 
630
\newcommand*\br@Jg{\br@Judges}%
 
631
\newcommand*\br@Rt{\br@Ruth}%
 
632
\newcommand*\br@IS{\br@ISamuel}%
 
633
\newcommand*\br@IIS{\br@IISamuel}%
 
634
\newcommand*\br@IK{\br@IKings}%
 
635
\newcommand*\br@IIK{\br@IIKings}%
 
636
\newcommand*\br@ICh{\br@IChronicles}%
 
637
\newcommand*\br@IICh{\br@IIChronicles}%
 
638
\newcommand*\br@Ezr{\br@Ezra}%
 
639
\newcommand*\br@Ne{\br@Nehemiah}%
 
640
\newcommand*\br@Tb{\br@Tobit}%
 
641
\newcommand*\br@Jdt{\br@Judith}%
 
642
\newcommand*\br@Est{\br@Esther}%
 
643
\newcommand*\br@IM{\br@IMaccabees}%
 
644
\newcommand*\br@IIM{\br@IIMaccabees}%
 
645
\newcommand*\br@Jb{\br@Job}%
 
646
\newcommand*\br@Ps{\br@Psalms}%
 
647
\newcommand*\br@Pr{\br@Proverbs}%
 
648
\newcommand*\br@Qo{\br@Ecclesiastes}%
 
649
\newcommand*\br@Sg{\br@SongofSongs}%
 
650
\newcommand*\br@Ws{\br@Wisdom}%
 
651
\newcommand*\br@Si{\br@Ecclesiasticus}%
 
652
\newcommand*\br@Is{\br@Isaiah}%
 
653
\newcommand*\br@Jr{\br@Jeremiah}%
 
654
\newcommand*\br@Lm{\br@Lamentations}%
 
655
\newcommand*\br@Ba{\br@Baruch}%
 
656
\newcommand*\br@Ezk{\br@Ezekiel}%
 
657
\newcommand*\br@Dn{\br@Daniel}%
 
658
\newcommand*\br@Ho{\br@Hosea}%
 
659
\newcommand*\br@Jl{\br@Joel}%
 
660
\newcommand*\br@Am{\br@Amos}%
 
661
\newcommand*\br@Ob{\br@Obadiah}%
 
662
\newcommand*\br@Jon{\br@Jonah}%
 
663
\newcommand*\br@Mi{\br@Micah}%
 
664
\newcommand*\br@Na{\br@Nahum}%
 
665
\newcommand*\br@Hab{\br@Habakkuk}%
 
666
\newcommand*\br@Zp{\br@Zephaniah}%
 
667
\newcommand*\br@Hg{\br@Haggai}%
 
668
\newcommand*\br@Zc{\br@Zechariah}%
 
669
\newcommand*\br@Ml{\br@Malachi}%
 
670
\newcommand*\br@Mt{\br@Matthew}%
 
671
\newcommand*\br@Mk{\br@Mark}%
 
672
\newcommand*\br@Lk{\br@Luke}%
 
673
\newcommand*\br@Jn{\br@John}%
 
674
\newcommand*\br@Ac{\br@Acts}%
 
675
\newcommand*\br@Rm{\br@Romans}%
 
676
\newcommand*\br@ICo{\br@ICorinthians}%
 
677
\newcommand*\br@IICo{\br@IICorinthians}%
 
678
\newcommand*\br@Ga{\br@Galatians}%
 
679
\newcommand*\br@Ep{\br@Ephesians}%
 
680
\newcommand*\br@Ph{\br@Philippians}%
 
681
\newcommand*\br@Col{\br@Colossians}%
 
682
\newcommand*\br@ITh{\br@IThessalonians}%
 
683
\newcommand*\br@IITh{\br@IIThessalonians}%
 
684
\newcommand*\br@ITm{\br@ITimothy}%
 
685
\newcommand*\br@IITm{\br@IITimothy}%
 
686
\newcommand*\br@Tt{\br@Titus}%
 
687
\newcommand*\br@Phm{\br@Philemon}%
 
688
\newcommand*\br@Heb{\br@Hebrews}%
 
689
\newcommand*\br@Jm{\br@James}%
 
690
\newcommand*\br@IP{\br@IPeter}%
 
691
\newcommand*\br@IIP{\br@IIPeter}%
 
692
\newcommand*\br@IJn{\br@IJohn}%
 
693
\newcommand*\br@IIJn{\br@IIJohn}%
 
694
\newcommand*\br@Rv{\br@Revelation}
 
695
%    \end{macrocode}
 
696
% More synonyms.
 
697
%    \begin{macrocode}
 
698
\newcommand*\br@Gen{\br@Genesis}%
 
699
\newcommand*\br@Exod{\br@Exodus}%
 
700
\newcommand*\br@Lev{\br@Leviticus}%
 
701
\newcommand*\br@Num{\br@Numbers}%
 
702
\newcommand*\br@Deut{\br@Deuteronomy}%
 
703
\newcommand*\br@Josh{\br@Joshua}%
 
704
\newcommand*\br@Judg{\br@Judges}%
 
705
\newcommand*\br@ISam{\br@ISamuel}%
 
706
\newcommand*\br@IISam{\br@IISamuel}%
 
707
\newcommand*\br@IKgs{\br@IKings}%
 
708
\newcommand*\br@IIKgs{\br@IIKings}%
 
709
\newcommand*\br@IChr{\br@IChronicles}%
 
710
\newcommand*\br@IIChr{\br@IIChronicles}%
 
711
\newcommand*\br@Neh{\br@Nehemiah}%
 
712
\newcommand*\br@Esth{\br@Esther}%
 
713
\newcommand*\br@IMacc{\br@IMaccabees}%
 
714
\newcommand*\br@IIMacc{\br@IIMaccabees}%
 
715
\newcommand*\br@Prov{\br@Proverbs}%
 
716
\newcommand*\br@Eccl{\br@Ecclesiastes}%
 
717
\newcommand*\br@SofS{\br@SongofSongs}%
 
718
\newcommand*\br@Wisd{\br@Wisdom}%
 
719
\newcommand*\br@Ecclus{\br@Ecclesiasticus}%
 
720
\newcommand*\br@Isa{\br@Isaiah}%
 
721
\newcommand*\br@Jer{\br@Jeremiah}%
 
722
\newcommand*\br@Lam{\br@Lamentations}%
 
723
\newcommand*\br@Ezek{\br@Ezekiel}%
 
724
\newcommand*\br@Dan{\br@Daniel}%
 
725
\newcommand*\br@Hos{\br@Hosea}%
 
726
\newcommand*\br@Obad{\br@Obadiah}%
 
727
\newcommand*\br@Mic{\br@Micah}%
 
728
\newcommand*\br@Nah{\br@Nahum}%
 
729
\newcommand*\br@Zeph{\br@Zephaniah}%
 
730
\newcommand*\br@Hag{\br@Haggai}%
 
731
\newcommand*\br@Zech{\br@Zechariah}%
 
732
\newcommand*\br@Mal{\br@Malachi}%
 
733
\newcommand*\br@Matt{\br@Matthew}%
 
734
\newcommand*\br@Rom{\br@Romans}%
 
735
\newcommand*\br@ICor{\br@ICorinthians}%
 
736
\newcommand*\br@IICor{\br@IICorinthians}%
 
737
\newcommand*\br@Gal{\br@Galatians}%
 
738
\newcommand*\br@Eph{\br@Ephesians}%
 
739
\newcommand*\br@Phil{\br@Philippians}%
 
740
\newcommand*\br@IThess{\br@IThessalonians}%
 
741
\newcommand*\br@IIThess{\br@IIThessalonians}%
 
742
\newcommand*\br@ITim{\br@ITimothy}%
 
743
\newcommand*\br@IITim{\br@IITimothy}%
 
744
\newcommand*\br@Tit{\br@Titus}%
 
745
\newcommand*\br@Philem{\br@Philemon}%
 
746
\newcommand*\br@Jas{\br@James}%
 
747
\newcommand*\br@IPet{\br@IPeter}%
 
748
\newcommand*\br@IIPet{\br@IIPeter}%
 
749
\newcommand*\br@Rev{\br@Revelation}
 
750
%    \end{macrocode}
 
751
%\begin{macro}{\brs@default}
 
752
% Set up assorted styles. All bible reference styles
 
753
% should start with \verb|brs@|. First the default
 
754
% style.
 
755
%    \begin{macrocode}
 
756
\newcommand*{\brs@default}{%
 
757
\brfullname
 
758
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
 
759
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
 
760
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
 
761
\renewcommand*{\BRchapterstyle}[1]{##1}%
 
762
\renewcommand*{\BRversestyle}[1]{##1}%
 
763
\renewcommand*{\BRbookof}{}%
 
764
\renewcommand*{\BRgospel}{}%
 
765
\renewcommand*{\BRepistletothe}{}%
 
766
\renewcommand*{\BRepistleto}{}%
 
767
\renewcommand*{\BRepistleof}{}%
 
768
\renewcommand*{\BRbkchsep}{ }
 
769
\renewcommand*{\BRchvsep}{:}%
 
770
\renewcommand*{\BRchsep}{;}%
 
771
\renewcommand*{\BRvrsep}{--}%
 
772
\renewcommand*{\BRvsep}{,}%
 
773
\renewcommand*{\BRperiod}{}}
 
774
%    \end{macrocode}
 
775
%\end{macro}
 
776
%\begin{macro}{\brs@jerusalem}
 
777
% The style used by the Jerusalem Bible.
 
778
%    \begin{macrocode}
 
779
\newcommand*{\brs@jerusalem}{%
 
780
\brabbrvname
 
781
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
 
782
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
 
783
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
 
784
\renewcommand*{\BRchapterstyle}[1]{##1}%
 
785
\renewcommand*{\BRversestyle}[1]{##1}%
 
786
\renewcommand*{\BRbookof}{}%
 
787
\renewcommand*{\BRgospel}{}%
 
788
\renewcommand*{\BRepistletothe}{}%
 
789
\renewcommand*{\BRepistleto}{}%
 
790
\renewcommand*{\BRepistleof}{}%
 
791
\renewcommand*{\BRbkchsep}{ }
 
792
\renewcommand*{\BRchvsep}{:}%
 
793
\renewcommand*{\BRchsep}{; }%
 
794
\renewcommand*{\BRvrsep}{--}%
 
795
\renewcommand*{\BRvsep}{,}%
 
796
\renewcommand*{\BRperiod}{}%
 
797
}
 
798
%    \end{macrocode}
 
799
%\end{macro}
 
800
%\begin{macro}{\brs@anglosaxon}
 
801
% Anglo-Saxon style.
 
802
%    \begin{macrocode}
 
803
\newcommand*{\brs@anglosaxon}{%
 
804
\braltabbrvname
 
805
\renewcommand*{\BRbooknumberstyle}[1]{\MakeUppercase{\romannumeral##1} }%
 
806
\renewcommand*{\BRepistlenumberstyle}[1]{\MakeUppercase{\romannumeral##1} }%
 
807
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
 
808
\renewcommand*{\BRchapterstyle}[1]{\MakeUppercase{\romannumeral##1}}%
 
809
\renewcommand*{\BRversestyle}[1]{##1}%
 
810
\renewcommand*{\BRbookof}{}%
 
811
\renewcommand*{\BRgospel}{}%
 
812
\renewcommand*{\BRepistletothe}{}%
 
813
\renewcommand*{\BRepistleto}{}%
 
814
\renewcommand*{\BRepistleof}{}%
 
815
\renewcommand*{\BRbkchsep}{ }
 
816
\renewcommand*{\BRchvsep}{.}%
 
817
\renewcommand*{\BRchsep}{; }%
 
818
\renewcommand*{\BRvrsep}{--}%
 
819
\renewcommand*{\BRvsep}{,}%
 
820
\renewcommand*{\BRperiod}{.}%
 
821
}
 
822
%    \end{macrocode}
 
823
%\end{macro}
 
824
%\begin{macro}{\brs@JEH}
 
825
%Journal of Ecclesiastical History
 
826
%    \begin{macrocode}
 
827
\newcommand*{\brs@JEH}{%
 
828
\braltabbrvname
 
829
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
 
830
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
 
831
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
 
832
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
 
833
\renewcommand*{\BRversestyle}[1]{##1}%
 
834
\renewcommand*{\BRbookof}{}%
 
835
\renewcommand*{\BRgospel}{}%
 
836
\renewcommand*{\BRepistletothe}{}%
 
837
\renewcommand*{\BRepistleto}{}%
 
838
\renewcommand*{\BRepistleof}{}%
 
839
\renewcommand*{\BRbkchsep}{ }
 
840
\renewcommand*{\BRchvsep}{. }%
 
841
\renewcommand*{\BRchsep}{; }%
 
842
\renewcommand*{\BRvrsep}{--}%
 
843
\renewcommand*{\BRvsep}{,}%
 
844
\renewcommand*{\BRperiod}{.}%
 
845
}
 
846
%    \end{macrocode}
 
847
%\end{macro}
 
848
%\begin{macro}{\brs@MHRA}
 
849
%Modern Humanities Research Association (MHRA)
 
850
%    \begin{macrocode}
 
851
\newcommand*{\brs@MHRA}{%
 
852
\brfullname
 
853
\renewcommand*{\BRbooknumberstyle}[1]{\textsc{\romannumeral##1} }%
 
854
\renewcommand*{\BRepistlenumberstyle}[1]{\textsc{\romannumeral##1} }%
 
855
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
 
856
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
 
857
\renewcommand*{\BRversestyle}[1]{##1}%
 
858
\renewcommand*{\BRbookof}{}%
 
859
\renewcommand*{\BRgospel}{}%
 
860
\renewcommand*{\BRepistletothe}{}%
 
861
\renewcommand*{\BRepistleto}{}%
 
862
\renewcommand*{\BRepistleof}{}%
 
863
\renewcommand*{\BRbkchsep}{ }
 
864
\renewcommand*{\BRchvsep}{. }%
 
865
\renewcommand*{\BRchsep}{; }%
 
866
\renewcommand*{\BRvrsep}{--}%
 
867
\renewcommand*{\BRvsep}{,}%
 
868
\renewcommand*{\BRperiod}{}%
 
869
}
 
870
%    \end{macrocode}
 
871
%\end{macro}
 
872
%\begin{macro}{\brs@NTG}
 
873
%Novum Testamentum Graece (Nestle-Aland)
 
874
%    \begin{macrocode}
 
875
\newcommand*{\brs@NTG}{%
 
876
\braltabbrvname
 
877
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
 
878
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
 
879
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
 
880
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
 
881
\renewcommand*{\BRversestyle}[1]{##1}%
 
882
\renewcommand*{\BRbookof}{}%
 
883
\renewcommand*{\BRgospel}{}%
 
884
\renewcommand*{\BRepistletothe}{}%
 
885
\renewcommand*{\BRepistleto}{}%
 
886
\renewcommand*{\BRepistleof}{}%
 
887
\renewcommand*{\BRbkchsep}{ }
 
888
\renewcommand*{\BRchvsep}{,}%
 
889
\renewcommand*{\BRchsep}{; }%
 
890
\renewcommand*{\BRvrsep}{--}%
 
891
\renewcommand*{\BRvsep}{,}%
 
892
\renewcommand*{\BRperiod}{}%
 
893
}
 
894
%    \end{macrocode}
 
895
%\end{macro}
 
896
%\begin{macro}{\brs@MLA}
 
897
%MLA Style 
 
898
%    \begin{macrocode}
 
899
\newcommand*{\brs@MLA}{%
 
900
\braltabbrvname
 
901
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
 
902
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
 
903
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
 
904
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
 
905
\renewcommand*{\BRversestyle}[1]{##1}%
 
906
\renewcommand*{\BRbookof}{}%
 
907
\renewcommand*{\BRgospel}{}%
 
908
\renewcommand*{\BRepistletothe}{}%
 
909
\renewcommand*{\BRepistleto}{}%
 
910
\renewcommand*{\BRepistleof}{}%
 
911
\renewcommand*{\BRbkchsep}{\ }
 
912
\renewcommand*{\BRchvsep}{.}%
 
913
\renewcommand*{\BRchsep}{; }%
 
914
\renewcommand*{\BRvrsep}{--}%
 
915
\renewcommand*{\BRvsep}{,}%
 
916
\renewcommand*{\BRperiod}{.}%
 
917
}
 
918
%    \end{macrocode}
 
919
%\end{macro}
 
920
%\begin{macro}{\brs@chicago}
 
921
%Chicago Style 
 
922
%    \begin{macrocode}
 
923
\newcommand*{\brs@chicago}{%
 
924
\braltabbrvname
 
925
\renewcommand*{\BRbooknumberstyle}[1]{##1 }%
 
926
\renewcommand*{\BRepistlenumberstyle}[1]{##1 }%
 
927
\renewcommand*{\BRbooktitlestyle}[1]{##1}%
 
928
\renewcommand*{\BRchapterstyle}[1]{\romannumeral##1}%
 
929
\renewcommand*{\BRversestyle}[1]{##1}%
 
930
\renewcommand*{\BRbookof}{}%
 
931
\renewcommand*{\BRgospel}{}%
 
932
\renewcommand*{\BRepistletothe}{}%
 
933
\renewcommand*{\BRepistleto}{}%
 
934
\renewcommand*{\BRepistleof}{}%
 
935
\renewcommand*{\BRbkchsep}{\ }
 
936
\renewcommand*{\BRchvsep}{\,:\,}%
 
937
\renewcommand*{\BRchsep}{; }%
 
938
\renewcommand*{\BRvrsep}{--}%
 
939
\renewcommand*{\BRvsep}{,}%
 
940
\renewcommand*{\BRperiod}{.}%
 
941
}
 
942
%    \end{macrocode}
 
943
%\end{macro}
 
944
%\begin{macro}{\brs@text}
 
945
% Full text citation
 
946
%    \begin{macrocode}
 
947
\newcommand*{\brs@text}{%
 
948
\biblerefstyle{default}%
 
949
\renewcommand{\BRbooknumberstyle}[1]{%
 
950
\Ordinalstringnum{##1}\ }%
 
951
\renewcommand{\BRepistlenumberstyle}[1]{%
 
952
\Ordinalstringnum{##1}\ }%
 
953
\renewcommand{\BRbookof}{Book of }%
 
954
\renewcommand{\BRgospel}{Gospel according to St }%
 
955
\renewcommand{\BRepistletothe}{Epistle to the }%
 
956
\renewcommand{\BRepistleto}{Epistle to }%
 
957
\renewcommand{\BRepistleof}{Epistle of }%
 
958
\renewcommand{\BRchapterstyle}[1]{%
 
959
chapter \numberstringnum{##1}}%
 
960
\renewcommand{\BRbkchsep}{, }%
 
961
\renewcommand{\BRchvsep}{ verse }%
 
962
\renewcommand{\BRchsep}{, }%
 
963
\renewcommand{\BRvrsep}{ to }%
 
964
\renewcommand{\BRvsep}{, }%
 
965
\renewcommand{\BRversestyle}[1]{\numberstringnum{##1}}%
 
966
}
 
967
%    \end{macrocode}
 
968
%\end{macro}
 
969
% Declare package options
 
970
%    \begin{macrocode}
 
971
\DeclareOption{default}{\brs@default}
 
972
\DeclareOption{jerusalem}{\brs@jerusalem}
 
973
\DeclareOption{anglosaxon}{\brs@anglosaxon}
 
974
\DeclareOption{JEH}{\brs@JEH}
 
975
\DeclareOption{MHRA}{\brs@MHRA}
 
976
\DeclareOption{NTG}{\brs@NTG}
 
977
\DeclareOption{MLA}{\brs@MLA}
 
978
\DeclareOption{chicago}{\brs@chicago}
 
979
\DeclareOption{text}{\brs@text}
 
980
%    \end{macrocode}
 
981
% Process package options
 
982
%    \begin{macrocode}
 
983
\ProcessOptions
 
984
%    \end{macrocode}
 
985
%
 
986
%\begin{macro}{\newbiblerefstyle}
 
987
%\begin{definition}
 
988
%\cs{newbiblerefstyle}\marg{style name}\marg{style cmds}
 
989
%\end{definition}
 
990
% Creates a new bible style called \meta{style name}, where
 
991
% the style is given by \meta{style cmds}.
 
992
% (It basically defines a command called
 
993
% \cs{brs@}\meta{style name} to do \meta{style cmds})
 
994
%    \begin{macrocode}
 
995
\newcommand{\newbiblerefstyle}[2]{%
 
996
\@ifundefined{brs@#1}{%
 
997
\expandafter\def\csname brs@#1\endcsname{#2}}{%
 
998
\PackageError{bibleref}{bible ref style '#1' already
 
999
defined}{}}}
 
1000
%    \end{macrocode}
 
1001
%\end{macro}
 
1002
%
 
1003
%\begin{macro}{\setbooktitle}
 
1004
%\begin{definition}
 
1005
%\cs{setbooktitle}\marg{fullname}\marg{title}
 
1006
%\end{definition}
 
1007
% Redefines the title of book \meta{fullname}. 
 
1008
%    \begin{macrocode}
 
1009
\newcommand*{\setbooktitle}[2]{%
 
1010
\@ifundefined{br@#1}{\PackageError{biberef}{Unknown
 
1011
book `#1'}{}}{%
 
1012
\expandafter\def\csname br@#1\endcsname{#2}}}
 
1013
%    \end{macrocode}
 
1014
%\end{macro}
 
1015
%
 
1016
%\begin{macro}{\biblerefstyle}
 
1017
%\begin{definition}
 
1018
%\cs{biblerefstyle}\marg{style}
 
1019
%\end{definition}
 
1020
% Sets the current style.
 
1021
%    \begin{macrocode}
 
1022
\newcommand*{\biblerefstyle}[1]{%
 
1023
\@ifundefined{brs@#1}{\PackageError{bibleref}{%
 
1024
Unknown biblerefstyle '#1'}{}}{\csname brs@#1\endcsname}}
 
1025
%    \end{macrocode}
 
1026
%\end{macro}
 
1027
%
 
1028
%\begin{macro}{\@br@vrsty}
 
1029
% Verses may be supplied as a range. Provide a command
 
1030
% to detect whether single number or range supplied.
 
1031
%    \begin{macrocode}
 
1032
\newcommand*{\@br@vrsty}[1]{\@@br@vrsty#1-\@nil\end}
 
1033
%    \end{macrocode}
 
1034
%\end{macro}
 
1035
%\begin{macro}{\@@br@vrsty}
 
1036
% Pick up a range
 
1037
%    \begin{macrocode}
 
1038
\def\@@br@vrsty#1-#2\end{%
 
1039
\@do@verses#1,\relax\end
 
1040
\ifx\@nil#2\relax
 
1041
\else
 
1042
\@bv@do{\BRvrsep}%
 
1043
\@@br@vrsty#2\end%
 
1044
\fi}
 
1045
%    \end{macrocode}
 
1046
%\end{macro}
 
1047
%\begin{macro}{\@@br@vrsty}
 
1048
% Pick up a list
 
1049
%    \begin{macrocode}
 
1050
\def\@do@verses#1,#2\end{%
 
1051
\ifthenelse{\equal{#1}{}}{}{\@bv@do{\BRversestyle{#1}}}%
 
1052
\ifx\relax#2\@empty
 
1053
\else
 
1054
\@bv@do{\BRvsep}%
 
1055
\@do@verses#2\end
 
1056
\fi
 
1057
}
 
1058
%    \end{macrocode}
 
1059
%\end{macro}
 
1060
%
 
1061
%\begin{macro}{\bibleverse}
 
1062
%\begin{definition}
 
1063
%\cs{bibleverse}\marg{name}
 
1064
%\end{definition}
 
1065
% This looks for a command called
 
1066
% \cs{br@}\meta{name} (defined earlier). 
 
1067
% After the book title, it then checks
 
1068
% to see if there is a bracket \verb|(| immediately following it.
 
1069
%    \begin{macrocode}
 
1070
\newcommand*{\bibleverse}[1]{%
 
1071
\@ifundefined{br@#1}{\PackageError{bibleref}{Unknown book '#1'}{%
 
1072
}}{\@bv@idxsort{\csname br@#1\endcsname}%
 
1073
\def\@bv@chidxsort{}%
 
1074
\@bv@do{\BRbooktitlestyle{\csname br@#1\endcsname}}}%
 
1075
\@ifnextchar({\BRbkchsep\@bv@addtoidx{!}\@bibleverse}{\@end@@bibleverse}%
 
1076
}
 
1077
%    \end{macrocode}
 
1078
%\end{macro}
 
1079
%
 
1080
%\begin{macro}{\@bibleverse}
 
1081
% This gets the chapter number.
 
1082
%    \begin{macrocode}
 
1083
\def\@bibleverse(#1:{%
 
1084
\ifthenelse{\equal{#1}{}}{}{%
 
1085
\ifthenelse{\equal{\@bv@chidxsort}{}}{%
 
1086
\def\@bvchidxsort{#1}\@bv@addtoidx{#1@}}{}%
 
1087
\@bv@do{\BRchapterstyle{#1}}}%
 
1088
\@@bibleverse}
 
1089
%    \end{macrocode}
 
1090
%\end{macro}
 
1091
%\begin{macro}{\@bibleverser}
 
1092
% This gets the second part of a range spanning chapters.
 
1093
%    \begin{macrocode}
 
1094
\def\@bibleverser-(#1:{%
 
1095
\ifthenelse{\equal{#1}{}}{}{%
 
1096
\@bv@do{\BRchapterstyle{#1}}}%
 
1097
\@@bibleverse}
 
1098
%    \end{macrocode}
 
1099
%\end{macro}
 
1100
%
 
1101
%\begin{macro}{\@@bibleverse}
 
1102
% This gets the verse number (or number range), and check to see
 
1103
% if it is followed by another bracket (indicating another
 
1104
% chapter, verse pair).
 
1105
%    \begin{macrocode}
 
1106
\def\@@bibleverse#1){%
 
1107
\ifthenelse{\equal{#1}{}}{}{\@bv@do{\BRchvsep}\@br@vrsty{#1}}%
 
1108
\@ifnextchar({\@bv@do{\BRchsep}\@bibleverse}%
 
1109
{\@ifnextchar-{\@bv@do{\BRvrsep}\@bibleverser}{\@end@@bibleverse}}}
 
1110
%    \end{macrocode}
 
1111
%\end{macro}
 
1112
%
 
1113
%\begin{macro}{\@end@@bibleverse}
 
1114
% This controls what to do at the end of the final
 
1115
% verse.
 
1116
%    \begin{macrocode}
 
1117
\newcommand*{\@end@@bibleverse}{%
 
1118
\if@bv@idx
 
1119
\index{\@@bv@idxsort\relax @\@bv@idxentry|\@bv@idxpgformat}%
 
1120
\@bv@idxfalse
 
1121
\fi
 
1122
}
 
1123
%    \end{macrocode}
 
1124
%\end{macro}
 
1125
%
 
1126
%\begin{macro}{\@bv@do}
 
1127
% Do argument and add to idx
 
1128
%    \begin{macrocode}
 
1129
\newcommand{\@bv@do}[1]{#1\@bv@addtoidx{#1}}
 
1130
%    \end{macrocode}
 
1131
%\end{macro}
 
1132
%
 
1133
%\begin{macro}{\@bv@addtoidx}
 
1134
% Append text to \verb|\@bv@idxentry|
 
1135
%    \begin{macrocode}
 
1136
\newtoks\@bv@tmpa
 
1137
\newtoks\@bv@tmpb
 
1138
\newcommand{\@bv@addtoidx}[1]{%
 
1139
\if@bv@idx
 
1140
\@bv@tmpa={#1}%
 
1141
\@bv@tmpb=\expandafter{\@bv@idxentry}%
 
1142
\edef\@bv@idxentry{\the\@bv@tmpb\the\@bv@tmpa}%
 
1143
\fi}
 
1144
%    \end{macrocode}
 
1145
%\end{macro}
 
1146
%
 
1147
%\begin{macro}{\@bv@addtoidxsort}
 
1148
% Append text to \verb|\@@bv@idxsort|
 
1149
%    \begin{macrocode}
 
1150
\newcommand{\@bv@addtoidxsort}[1]{%
 
1151
\if@bv@idx
 
1152
\@bv@tmpa={#1}%
 
1153
\@bv@tmpb=\expandafter{\@@bv@idxsort}%
 
1154
\edef\@@bv@idxsort{\the\@bv@tmpb\the\@bv@tmpa}%
 
1155
\fi}
 
1156
%    \end{macrocode}
 
1157
%\end{macro}
 
1158
%\begin{macro}{\if@bv@idx}
 
1159
% Define switch to indicate whether or not to index
 
1160
% bible reference.
 
1161
%    \begin{macrocode}
 
1162
\newif\if@bv@idx
 
1163
\@bv@idxfalse
 
1164
%    \end{macrocode}
 
1165
%\end{macro}
 
1166
%\begin{macro}{\@bv@idxsort}
 
1167
% Sort key for bible verse index. (Strip all the formatting
 
1168
% bits.)
 
1169
%    \begin{macrocode}
 
1170
\newcommand{\@bv@idxsort}[1]{%
 
1171
\if@bv@idx
 
1172
{\def\BRbooknumberstyle##1##2\relax{##2##1}%
 
1173
\def\BRepistlenumberstyle##1##2\relax{##2##1}%
 
1174
\def\BRgospel{}\def\BRbookof{}\def\BRepistleto{}%
 
1175
\def\BRepistletothe{}\def\BRepistleof{}%
 
1176
\xdef\@@bv@idxsort{#1\relax}%
 
1177
}%
 
1178
\fi}
 
1179
%    \end{macrocode}
 
1180
%\end{macro}
 
1181
%
 
1182
%\begin{macro}{\ibibleverse}
 
1183
% This is like \cs{bibleverse},
 
1184
% but also adds an index entry. The optional argument indicates
 
1185
% how to format the page number (without the preceeding backslash)
 
1186
% e.g. \verb|\ibibleref[textit]{Romans}|.
 
1187
%    \begin{macrocode}
 
1188
\newcommand*{\ibibleverse}[1][\bvidxpgformat]{%
 
1189
\def\@bv@idxpgformat{#1}%
 
1190
\@bv@idxtrue\def\@bv@idxentry{}\bibleverse}
 
1191
%    \end{macrocode}
 
1192
%\end{macro}
 
1193
%\begin{macro}{\bvidxpgformat}
 
1194
% Default page number format for bible verse index entries
 
1195
%    \begin{macrocode}
 
1196
\newcommand*{\bvidxpgformat}{textrm}
 
1197
%    \end{macrocode}
 
1198
%\end{macro}
 
1199
%\iffalse
1043
1200
%    \begin{macrocode}
1044
1201
%</bibleref.sty>
1045
1202
%    \end{macrocode}
 
1203
%\fi
 
1204
%\iffalse
1046
1205
%    \begin{macrocode}
1047
1206
%<*sample.tex>
1048
1207
%    \end{macrocode}
1049
 
%\subsection{Sample Document}
1050
 
%    \begin{macrocode}
1051
 
\documentclass{article}
1052
 
 
1053
 
\usepackage{bibleref}
1054
 
\usepackage{makeidx}
1055
 
\makeindex
1056
 
 
1057
 
% make the page numbers in the index italic for bible
1058
 
% references
1059
 
\renewcommand{\bvidxpgformat}{textit}
1060
 
 
1061
 
\begin{document}
1062
 
\title{Sample Document}
1063
 
\author{Nicola Talbot}
1064
 
\maketitle
1065
 
 
1066
 
Long citation in text: 
1067
 
\biblerefstyle{text}
1068
 
\bibleverse{IICor}(12:15,18,21-33).
1069
 
Short citation in footnote\footnote{%
1070
 
\biblerefstyle{chicago}\bibleverse{IICor}(12:15,18,21-33)}.
1071
 
 
1072
 
\section{Default Style}
1073
 
 
1074
 
\biblerefstyle{default}
1075
 
\noindent
1076
 
\begin{tabular}{ll}
1077
 
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
1078
 
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
1079
 
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
1080
 
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
1081
 
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
1082
 
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
1083
 
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
1084
 
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
1085
 
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
1086
 
\bibleverse{IChronicles}(1:3)-(2:7)
1087
 
\end{tabular}
1088
 
 
1089
 
\section{Jerusalem Style}
1090
 
This is the style used in the Jerusalem bible.
1091
 
\biblerefstyle{jerusalem}
1092
 
 
1093
 
\noindent
1094
 
\begin{tabular}{ll}
1095
 
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
1096
 
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
1097
 
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
1098
 
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
1099
 
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
1100
 
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
1101
 
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
1102
 
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
1103
 
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
1104
 
\bibleverse{IChronicles}(1:3)-(2:7)
1105
 
\end{tabular}
1106
 
 
1107
 
\section{Anglo-Saxon Style}
1108
 
 
1109
 
\biblerefstyle{anglosaxon}
1110
 
\noindent
1111
 
\begin{tabular}{ll}
1112
 
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
1113
 
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
1114
 
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
1115
 
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
1116
 
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
1117
 
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
1118
 
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
1119
 
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
1120
 
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
1121
 
\bibleverse{IChronicles}(1:3)-(2:7)
1122
 
\end{tabular}
1123
 
 
1124
 
\section{Journal of Ecclesiastical History}
1125
 
 
1126
 
\biblerefstyle{JEH}
1127
 
\noindent
1128
 
\begin{tabular}{ll}
1129
 
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
1130
 
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
1131
 
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
1132
 
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
1133
 
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
1134
 
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
1135
 
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
1136
 
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
1137
 
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
1138
 
\bibleverse{IChronicles}(1:3)-(2:7)
1139
 
\end{tabular}
1140
 
 
1141
 
\section{Modern Humanities Research Association}
1142
 
 
1143
 
\biblerefstyle{MHRA}
1144
 
\noindent
1145
 
\begin{tabular}{ll}
1146
 
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
1147
 
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
1148
 
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
1149
 
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
1150
 
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
1151
 
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
1152
 
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
1153
 
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
1154
 
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
1155
 
\bibleverse{IChronicles}(1:3)-(2:7)
1156
 
\end{tabular}
1157
 
 
1158
 
\section{Novum Testamentum Graece (Nestle-Aland)}
1159
 
 
1160
 
\biblerefstyle{NTG}
1161
 
\noindent
1162
 
\begin{tabular}{ll}
1163
 
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
1164
 
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
1165
 
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
1166
 
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
1167
 
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
1168
 
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
1169
 
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
1170
 
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
1171
 
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
1172
 
\bibleverse{IChronicles}(1:3)-(2:7)
1173
 
\end{tabular}
1174
 
 
1175
 
\section{MLA Style}
1176
 
 
1177
 
\biblerefstyle{MLA}
1178
 
\noindent
1179
 
\begin{tabular}{ll}
1180
 
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
1181
 
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
1182
 
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
1183
 
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
1184
 
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
1185
 
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
1186
 
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
1187
 
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
1188
 
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
1189
 
\bibleverse{IChronicles}(1:3)-(2:7)
1190
 
\end{tabular}
1191
 
 
1192
 
\section{Chicago Style}
1193
 
 
1194
 
\biblerefstyle{chicago}
1195
 
\noindent
1196
 
\begin{tabular}{ll}
1197
 
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
1198
 
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
1199
 
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
1200
 
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
1201
 
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
1202
 
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
1203
 
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
1204
 
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
1205
 
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
1206
 
\bibleverse{IChronicles}(1:3)-(2:7)
1207
 
\end{tabular}
1208
 
 
1209
 
\section{Text Style}
1210
 
This style prints the citation out in full. It's based
1211
 
on `default', and uses the fmtcount package to convert
1212
 
the numbers into words.
1213
 
 
1214
 
\biblerefstyle{text}
1215
 
\raggedright
1216
 
 
1217
 
\begin{itemize}
1218
 
\item \verb|\bibleverse{Ex}| \bibleverse{Ex}
1219
 
\item \verb|\bibleverse{Exodus}(20:)| \bibleverse{Exodus}(20:)
1220
 
\item \verb|\bibleverse{Exod}(20:17)| \bibleverse{Exod}(20:17)
1221
 
\item \verb|\bibleverse{IICo}(12:21)| \bibleverse{IICo}(12:21)
1222
 
\item \verb|\bibleverse{IICor}(12:21-32)| \bibleverse{IICor}(12:21-32)
1223
 
\item \verb|\bibleverse{Ex}(20:17)(21:3)| \bibleverse{Ex}(20:17)(21:3)
1224
 
\item \verb|\bibleverse{Ex}(15:)(17:)(20:)| \bibleverse{Ex}(15:)(17:)(20:)
1225
 
\item \verb|\bibleverse{Rev}(1:2,5,7-9,11)| \bibleverse{Rev}(1:2,5,7-9,11)
1226
 
\item \verb|\bibleverse{IChronicles}(1:3)-(2:7)|
1227
 
\bibleverse{IChronicles}(1:3)-(2:7)
1228
 
\end{itemize}
1229
 
 
1230
 
\section{New Style}
1231
 
 
1232
 
This new style is based on the `default' style, but
1233
 
has verses in lower case Roman numerals, and redefines
1234
 
``Revelation'' as ``Apocalypse''.
1235
 
 
1236
 
\begin{verbatim}
1237
 
\newbiblerefstyle{sample}{%
1238
 
\biblerefstyle{default}%
1239
 
\renewcommand{\BRversestyle}[1]{\romannumeral##1}%
1240
 
\setbooktitle{Revelation}{Apocalyse}%
1241
 
}
1242
 
\end{verbatim}
1243
 
\newbiblerefstyle{sample}{%
1244
 
\biblerefstyle{default}%
1245
 
\renewcommand{\BRversestyle}[1]{\romannumeral##1}%
1246
 
\setbooktitle{Revelation}{Apocalyse}%
1247
 
}
1248
 
 
1249
 
\biblerefstyle{sample}
1250
 
\noindent
1251
 
\begin{tabular}{ll}
1252
 
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
1253
 
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
1254
 
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
1255
 
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
1256
 
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
1257
 
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
1258
 
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
1259
 
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
1260
 
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
1261
 
\bibleverse{IChronicles}(1:3)-(2:7)
1262
 
\end{tabular}
1263
 
 
1264
 
\section{MHRA Style---Indexed}
1265
 
 
1266
 
\biblerefstyle{MHRA}
1267
 
\noindent
1268
 
\begin{tabular}{ll}
1269
 
\verb|\ibibleverse{Ex}| & \ibibleverse{Ex}\\
1270
 
\verb|\ibibleverse{Exodus}(9:)| & \ibibleverse{Exodus}(9:)\\
1271
 
\verb|\ibibleverse{Exod}(20:17)| & \ibibleverse{Exod}(20:17)\\
1272
 
\verb|\ibibleverse{IICo}(12:21)| & \ibibleverse{IICo}(12:21)\\
1273
 
\verb|\ibibleverse{IICor}(12:21-32)| & \ibibleverse{IICor}(12:21-32)\\
1274
 
\verb|\ibibleverse{Ex}(20:17)(21:3)| & \ibibleverse{Ex}(20:17)(21:3)\\
1275
 
\verb|\ibibleverse{Ex}(15:)(17:)(20:)| & \ibibleverse{Ex}(15:)(17:)(20:)\\
1276
 
\verb|\ibibleverse{Rev}(1:2,5,7-9,11)| & \ibibleverse{Rev}(1:2,5,7-9,11)\\
1277
 
\verb|\ibibleverse{IChronicles}(1:3)-(2:7)| &
1278
 
\ibibleverse{IChronicles}(1:3)-(2:7)
1279
 
\end{tabular}
1280
 
 
1281
 
\printindex
1282
 
 
1283
 
\end{document}
1284
 
%    \end{macrocode}
 
1208
%\fi
 
1209
%\iffalse
 
1210
%\subsection{Sample Document}
 
1211
%    \begin{macrocode}
 
1212
\documentclass{article}
 
1213
 
 
1214
\usepackage{bibleref}
 
1215
\usepackage{makeidx}
 
1216
\makeindex
 
1217
 
 
1218
% make the page numbers in the index italic for bible
 
1219
% references
 
1220
\renewcommand{\bvidxpgformat}{textit}
 
1221
 
 
1222
\begin{document}
 
1223
\title{Sample Document}
 
1224
\author{Nicola Talbot}
 
1225
\maketitle
 
1226
 
 
1227
Long citation in text: 
 
1228
\biblerefstyle{text}
 
1229
\bibleverse{IICor}(12:15,18,21-33).
 
1230
Short citation in footnote\footnote{%
 
1231
\biblerefstyle{chicago}\bibleverse{IICor}(12:15,18,21-33)}.
 
1232
 
 
1233
\section{Default Style}
 
1234
 
 
1235
\biblerefstyle{default}
 
1236
\noindent
 
1237
\begin{tabular}{ll}
 
1238
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
1239
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
1240
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
1241
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
1242
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
1243
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
1244
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
1245
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
1246
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
1247
\bibleverse{IChronicles}(1:3)-(2:7)
 
1248
\end{tabular}
 
1249
 
 
1250
\section{Jerusalem Style}
 
1251
This is the style used in the Jerusalem bible.
 
1252
\biblerefstyle{jerusalem}
 
1253
 
 
1254
\noindent
 
1255
\begin{tabular}{ll}
 
1256
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
1257
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
1258
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
1259
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
1260
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
1261
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
1262
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
1263
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
1264
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
1265
\bibleverse{IChronicles}(1:3)-(2:7)
 
1266
\end{tabular}
 
1267
 
 
1268
\section{Anglo-Saxon Style}
 
1269
 
 
1270
\biblerefstyle{anglosaxon}
 
1271
\noindent
 
1272
\begin{tabular}{ll}
 
1273
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
1274
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
1275
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
1276
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
1277
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
1278
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
1279
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
1280
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
1281
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
1282
\bibleverse{IChronicles}(1:3)-(2:7)
 
1283
\end{tabular}
 
1284
 
 
1285
\section{Journal of Ecclesiastical History}
 
1286
 
 
1287
\biblerefstyle{JEH}
 
1288
\noindent
 
1289
\begin{tabular}{ll}
 
1290
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
1291
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
1292
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
1293
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
1294
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
1295
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
1296
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
1297
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
1298
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
1299
\bibleverse{IChronicles}(1:3)-(2:7)
 
1300
\end{tabular}
 
1301
 
 
1302
\section{Modern Humanities Research Association}
 
1303
 
 
1304
\biblerefstyle{MHRA}
 
1305
\noindent
 
1306
\begin{tabular}{ll}
 
1307
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
1308
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
1309
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
1310
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
1311
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
1312
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
1313
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
1314
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
1315
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
1316
\bibleverse{IChronicles}(1:3)-(2:7)
 
1317
\end{tabular}
 
1318
 
 
1319
\section{Novum Testamentum Graece (Nestle-Aland)}
 
1320
 
 
1321
\biblerefstyle{NTG}
 
1322
\noindent
 
1323
\begin{tabular}{ll}
 
1324
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
1325
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
1326
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
1327
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
1328
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
1329
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
1330
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
1331
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
1332
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
1333
\bibleverse{IChronicles}(1:3)-(2:7)
 
1334
\end{tabular}
 
1335
 
 
1336
\section{MLA Style}
 
1337
 
 
1338
\biblerefstyle{MLA}
 
1339
\noindent
 
1340
\begin{tabular}{ll}
 
1341
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
1342
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
1343
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
1344
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
1345
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
1346
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
1347
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
1348
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
1349
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
1350
\bibleverse{IChronicles}(1:3)-(2:7)
 
1351
\end{tabular}
 
1352
 
 
1353
\section{Chicago Style}
 
1354
 
 
1355
\biblerefstyle{chicago}
 
1356
\noindent
 
1357
\begin{tabular}{ll}
 
1358
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
1359
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
1360
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
1361
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
1362
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
1363
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
1364
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
1365
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
1366
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
1367
\bibleverse{IChronicles}(1:3)-(2:7)
 
1368
\end{tabular}
 
1369
 
 
1370
\section{Text Style}
 
1371
This style prints the citation out in full. It's based
 
1372
on `default', and uses the fmtcount package to convert
 
1373
the numbers into words.
 
1374
 
 
1375
\biblerefstyle{text}
 
1376
\raggedright
 
1377
 
 
1378
\begin{itemize}
 
1379
\item \verb|\bibleverse{Ex}| \bibleverse{Ex}
 
1380
\item \verb|\bibleverse{Exodus}(20:)| \bibleverse{Exodus}(20:)
 
1381
\item \verb|\bibleverse{Exod}(20:17)| \bibleverse{Exod}(20:17)
 
1382
\item \verb|\bibleverse{IICo}(12:21)| \bibleverse{IICo}(12:21)
 
1383
\item \verb|\bibleverse{IICor}(12:21-32)| \bibleverse{IICor}(12:21-32)
 
1384
\item \verb|\bibleverse{Ex}(20:17)(21:3)| \bibleverse{Ex}(20:17)(21:3)
 
1385
\item \verb|\bibleverse{Ex}(15:)(17:)(20:)| \bibleverse{Ex}(15:)(17:)(20:)
 
1386
\item \verb|\bibleverse{Rev}(1:2,5,7-9,11)| \bibleverse{Rev}(1:2,5,7-9,11)
 
1387
\item \verb|\bibleverse{IChronicles}(1:3)-(2:7)|
 
1388
\bibleverse{IChronicles}(1:3)-(2:7)
 
1389
\end{itemize}
 
1390
 
 
1391
\section{New Style}
 
1392
 
 
1393
This new style is based on the `default' style, but
 
1394
has verses in lower case Roman numerals, and redefines
 
1395
``Revelation'' as ``Apocalypse''.
 
1396
 
 
1397
\begin{verbatim}
 
1398
\newbiblerefstyle{sample}{%
 
1399
\biblerefstyle{default}%
 
1400
\renewcommand{\BRversestyle}[1]{\romannumeral##1}%
 
1401
\setbooktitle{Revelation}{Apocalyse}%
 
1402
}
 
1403
\end{verbatim}
 
1404
\newbiblerefstyle{sample}{%
 
1405
\biblerefstyle{default}%
 
1406
\renewcommand{\BRversestyle}[1]{\romannumeral##1}%
 
1407
\setbooktitle{Revelation}{Apocalyse}%
 
1408
}
 
1409
 
 
1410
\biblerefstyle{sample}
 
1411
\noindent
 
1412
\begin{tabular}{ll}
 
1413
\verb|\bibleverse{Ex}| & \bibleverse{Ex}\\
 
1414
\verb|\bibleverse{Exodus}(20:)| & \bibleverse{Exodus}(20:)\\
 
1415
\verb|\bibleverse{Exod}(20:17)| & \bibleverse{Exod}(20:17)\\
 
1416
\verb|\bibleverse{IICo}(12:21)| & \bibleverse{IICo}(12:21)\\
 
1417
\verb|\bibleverse{IICor}(12:21-32)| & \bibleverse{IICor}(12:21-32)\\
 
1418
\verb|\bibleverse{Ex}(20:17)(21:3)| & \bibleverse{Ex}(20:17)(21:3)\\
 
1419
\verb|\bibleverse{Ex}(15:)(17:)(20:)| & \bibleverse{Ex}(15:)(17:)(20:)\\
 
1420
\verb|\bibleverse{Rev}(1:2,5,7-9,11)| & \bibleverse{Rev}(1:2,5,7-9,11)\\
 
1421
\verb|\bibleverse{IChronicles}(1:3)-(2:7)| &
 
1422
\bibleverse{IChronicles}(1:3)-(2:7)
 
1423
\end{tabular}
 
1424
 
 
1425
\section{MHRA Style---Indexed}
 
1426
 
 
1427
\biblerefstyle{MHRA}
 
1428
\noindent
 
1429
\begin{tabular}{ll}
 
1430
\verb|\ibibleverse{Ex}| & \ibibleverse{Ex}\\
 
1431
\verb|\ibibleverse{Exodus}(9:)| & \ibibleverse{Exodus}(9:)\\
 
1432
\verb|\ibibleverse{Exod}(20:17)| & \ibibleverse{Exod}(20:17)\\
 
1433
\verb|\ibibleverse{IICo}(12:21)| & \ibibleverse{IICo}(12:21)\\
 
1434
\verb|\ibibleverse{IICor}(12:21-32)| & \ibibleverse{IICor}(12:21-32)\\
 
1435
\verb|\ibibleverse{Ex}(20:17)(21:3)| & \ibibleverse{Ex}(20:17)(21:3)\\
 
1436
\verb|\ibibleverse{Ex}(15:)(17:)(20:)| & \ibibleverse{Ex}(15:)(17:)(20:)\\
 
1437
\verb|\ibibleverse{Rev}(1:2,5,7-9,11)| & \ibibleverse{Rev}(1:2,5,7-9,11)\\
 
1438
\verb|\ibibleverse{IChronicles}(1:3)-(2:7)| &
 
1439
\ibibleverse{IChronicles}(1:3)-(2:7)
 
1440
\end{tabular}
 
1441
 
 
1442
\printindex
 
1443
 
 
1444
\end{document}
 
1445
%    \end{macrocode}
 
1446
%\fi
 
1447
%\iffalse
1285
1448
%    \begin{macrocode}
1286
1449
%</sample.tex>
1287
1450
%    \end{macrocode}
 
1451
%\fi
 
1452
%\iffalse
 
1453
%    \begin{macrocode}
 
1454
%<*bibleref.perl>
 
1455
%    \end{macrocode}
 
1456
%\fi
 
1457
%\iffalse
 
1458
%    \begin{macrocode}
 
1459
#!/usr/bin/perl
 
1460
# File   : bibleref.perl
 
1461
# Author : Nicola L.C. Talbot
 
1462
#          http://theoval.cmp.uea.ac.uk/~nlct/
 
1463
# This is a LaTeX2HTML style implementing the bibleref package, and
 
1464
# is distributed as part of that package.
 
1465
# Copyright 2007 Nicola L.C. Talbot
 
1466
# This work may be distributed and/or modified under the
 
1467
# conditions of the LaTeX Project Public License, either version 1.3
 
1468
# of this license of (at your option) any later version.
 
1469
# The latest version of this license is in
 
1470
#   http://www.latex-project.org/lppl.txt
 
1471
# and version 1.3 or later is part of all distributions of LaTeX
 
1472
# version 2005/12/01 or later.
 
1473
#
 
1474
# This work has the LPPL maintenance status `maintained'.
 
1475
#
 
1476
# The Current Maintainer of this work is Nicola Talbot.
 
1477
#
 
1478
# This work consists of the files bibleref.dtx and bibleref.ins 
 
1479
# and the derived files bibleref.sty, sample.tex, bibleref.perl.
 
1480
 
 
1481
 %bookfullname=();
 
1482
 
 
1483
$synonym{'Gn'}='Gensis';
 
1484
$synonym{'Ex'}='Exodus';
 
1485
$synonym{'Lv'}='Leviticus';
 
1486
$synonym{'Nb'}='Numbers';
 
1487
$synonym{'Dt'}='Deuteronomy';
 
1488
$synonym{'Jos'}='Joshua';
 
1489
$synonym{'Jg'}='Judges';
 
1490
$synonym{'Rt'}='Ruth';
 
1491
$synonym{'IS'}='ISamuel';
 
1492
$synonym{'IIS'}='IISamuel';
 
1493
$synonym{'IK'}='IKings';
 
1494
$synonym{'IIK'}='IIKings';
 
1495
$synonym{'ICh'}='IChronicles';
 
1496
$synonym{'IICh'}='IIChronicles';
 
1497
$synonym{'Ezr'}='Ezra';
 
1498
$synonym{'Ne'}='Nehemiah';
 
1499
$synonym{'Tb'}='Tobit';
 
1500
$synonym{'Jdt'}='Judith';
 
1501
$synonym{'Est'}='Esther';
 
1502
$synonym{'IM'}='IMaccabees';
 
1503
$synonym{'IIM'}='IIMaccabees';
 
1504
$synonym{'Jb'}='Job';
 
1505
$synonym{'Ps'}='Psalms';
 
1506
$synonym{'Pr'}='Proverbs';
 
1507
$synonym{'Qo'}='Ecclesiastes';
 
1508
$synonym{'Sg'}='SongofSongs';
 
1509
$synonym{'Ws'}='Wisdom';
 
1510
$synonym{'Si'}='Ecclesiasticus';
 
1511
$synonym{'Is'}='Isaiah';
 
1512
$synonym{'Jr'}='Jeremiah';
 
1513
$synonym{'Lm'}='Lamentations';
 
1514
$synonym{'Ba'}='Baruch';
 
1515
$synonym{'Ezk'}='Ezekiel';
 
1516
$synonym{'Dn'}='Daniel';
 
1517
$synonym{'Ho'}='Hosea';
 
1518
$synonym{'Jl'}='Joel';
 
1519
$synonym{'Am'}='Amos';
 
1520
$synonym{'Ob'}='Obadiah';
 
1521
$synonym{'Jon'}='Jonah';
 
1522
$synonym{'Mi'}='Micah';
 
1523
$synonym{'Na'}='Nahum';
 
1524
$synonym{'Hab'}='Habakkuk';
 
1525
$synonym{'Zp'}='Zephaniah';
 
1526
$synonym{'Hg'}='Haggai';
 
1527
$synonym{'Zc'}='Zechariah';
 
1528
$synonym{'Ml'}='Malachi';
 
1529
$synonym{'Mt'}='Matthew';
 
1530
$synonym{'Mk'}='Mark';
 
1531
$synonym{'Lk'}='Luke';
 
1532
$synonym{'Jn'}='John';
 
1533
$synonym{'Ac'}='Acts';
 
1534
$synonym{'Rm'}='Romans';
 
1535
$synonym{'ICo'}='ICorinthians';
 
1536
$synonym{'IICo'}='IICorinthians';
 
1537
$synonym{'Ga'}='Galatians';
 
1538
$synonym{'Ep'}='Ephesians';
 
1539
$synonym{'Ph'}='Philippians';
 
1540
$synonym{'Col'}='Colossians';
 
1541
$synonym{'ITh'}='IThessalonians';
 
1542
$synonym{'IITh'}='IIThessalonians';
 
1543
$synonym{'ITm'}='ITimothy';
 
1544
$synonym{'IITm'}='IITimothy';
 
1545
$synonym{'Tt'}='Titus';
 
1546
$synonym{'Phm'}='Philemon';
 
1547
$synonym{'Heb'}='Hebrews';
 
1548
$synonym{'Jm'}='James';
 
1549
$synonym{'IP'}='IPeter';
 
1550
$synonym{'IIP'}='IIPeter';
 
1551
$synonym{'IJn'}='IJohn';
 
1552
$synonym{'IIJn'}='IIJohn';
 
1553
$synonym{'IIIJn'}='IIIJohn';
 
1554
$synonym{'Rv'}='Revelation';
 
1555
$synonym{'Gen'}='Gensis';
 
1556
$synonym{'Exod'}='Exodus';
 
1557
$synonym{'Lev'}='Leviticus';
 
1558
$synonym{'Num'}='Numbers';
 
1559
$synonym{'Deut'}='Deuteronomy';
 
1560
$synonym{'Josh'}='Joshua';
 
1561
$synonym{'Judg'}='Judges';
 
1562
$synonym{'ISam'}='ISamuel';
 
1563
$synonym{'IISam'}='IISamuel';
 
1564
$synonym{'IKgs'}='IKings';
 
1565
$synonym{'IIKgs'}='IIKings';
 
1566
$synonym{'IChr'}='IChronicles';
 
1567
$synonym{'IIChr'}='IIChronicles';
 
1568
$synonym{'Neh'}='Nehemiah';
 
1569
$synonym{'IM'}='IMaccabees';
 
1570
$synonym{'IIM'}='IIMaccabees';
 
1571
$synonym{'Ps'}='Psalms';
 
1572
$synonym{'Prov'}='Proverbs';
 
1573
$synonym{'Eccles'}='Ecclesiastes';
 
1574
$synonym{'SofS'}='SongofSongs';
 
1575
$synonym{'Wisd'}='Wisdom';
 
1576
$synonym{'Ecclus'}='Ecclesiasticus';
 
1577
$synonym{'Isa'}='Isaiah';
 
1578
$synonym{'Jer'}='Jeremiah';
 
1579
$synonym{'Lam'}='Lamentations';
 
1580
$synonym{'Ezek'}='Ezekiel';
 
1581
$synonym{'Dan'}='Daniel';
 
1582
$synonym{'Hos'}='Hosea';
 
1583
$synonym{'Obad'}='Obadiah';
 
1584
$synonym{'Mic'}='Micah';
 
1585
$synonym{'Nah'}='Nahum';
 
1586
$synonym{'Hab'}='Habakkuk';
 
1587
$synonym{'Zeph'}='Zephaniah';
 
1588
$synonym{'Hag'}='Haggai';
 
1589
$synonym{'Zech'}='Zechariah';
 
1590
$synonym{'Mal'}='Malachi';
 
1591
$synonym{'Matt'}='Matthew';
 
1592
$synonym{'Rom'}='Romans';
 
1593
$synonym{'ICor'}='ICorinthians';
 
1594
$synonym{'IICor'}='IICorinthians';
 
1595
$synonym{'Gal'}='Galatians';
 
1596
$synonym{'Eph'}='Ephesians';
 
1597
$synonym{'Phil'}='Philippians';
 
1598
$synonym{'Col'}='Colossians';
 
1599
$synonym{'IThess'}='IThessalonians';
 
1600
$synonym{'IIThess'}='IIThessalonians';
 
1601
$synonym{'ITim'}='ITimothy';
 
1602
$synonym{'IITim'}='IITimothy';
 
1603
$synonym{'Tit'}='Titus';
 
1604
$synonym{'Philem'}='Philemon';
 
1605
$synonym{'Heb'}='Hebrews';
 
1606
$synonym{'Jas'}='James';
 
1607
$synonym{'IPet'}='IPeter';
 
1608
$synonym{'IIPet'}='IIPeter';
 
1609
$synonym{'IJohn'}='IJohn';
 
1610
$synonym{'IIJohn'}='IIJohn';
 
1611
$synonym{'IIIJohn'}='IIIJohn';
 
1612
$synonym{'Rev'}='Revelation';
 
1613
 
 
1614
&do_cmd_brfullname;
 
1615
 
 
1616
sub do_cmd_BRbooknumberstyle{
 
1617
   local($_) = @_;
 
1618
   local($num);
 
1619
 
 
1620
   $num = &missing_braces unless
 
1621
               s/$next_pair_pr_rx/$num=$2;''/eo;
 
1622
 
 
1623
   "$num " . $_;
 
1624
}
 
1625
 
 
1626
sub do_cmd_BRepistlenumberstyle{
 
1627
   local($_) = @_;
 
1628
   local($num);
 
1629
 
 
1630
   $num = &missing_braces unless
 
1631
               s/$next_pair_pr_rx/$num=$2;''/eo;
 
1632
 
 
1633
   "$num " . $_;
 
1634
}
 
1635
 
 
1636
sub do_cmd_BRbooknumberstyleI{
 
1637
   local($_)=@_;
 
1638
   local($id)=++$global{'max_id'};
 
1639
 
 
1640
   join('', 
 
1641
   &translate_commands("\\BRbooknumberstyle$OP$id${CP}1$OP$id$CP"),$_);
 
1642
}
 
1643
 
 
1644
sub do_cmd_BRbooknumberstyleII{
 
1645
   local($_)=@_;
 
1646
   local($id)=++$global{'max_id'};
 
1647
 
 
1648
   join('', 
 
1649
   &translate_commands("\\BRbooknumberstyle$OP$id${CP}2$OP$id$CP"),$_);
 
1650
}
 
1651
 
 
1652
sub do_cmd_BRepistlenumberstyleI{
 
1653
   local($_)=@_;
 
1654
   local($id)=++$global{'max_id'};
 
1655
 
 
1656
   join('', 
 
1657
   &translate_commands("\\BRepistlenumberstyle$OP$id${CP}1$OP$id$CP"),$_);
 
1658
}
 
1659
 
 
1660
sub do_cmd_BRepistlenumberstyleII{
 
1661
   local($_)=@_;
 
1662
   local($id)=++$global{'max_id'};
 
1663
 
 
1664
   join('', 
 
1665
   &translate_commands("\\BRepistlenumberstyle$OP$id${CP}2$OP$id$CP"),$_);
 
1666
}
 
1667
 
 
1668
sub do_cmd_BRepistlenumberstyleIII{
 
1669
   local($_)=@_;
 
1670
   local($id)=++$global{'max_id'};
 
1671
 
 
1672
   join('', 
 
1673
   &translate_commands("\\BRepistlenumberstyle$OP$id${CP}3$OP$id$CP"),$_);
 
1674
}
 
1675
 
 
1676
sub do_cmd_BRbookof{
 
1677
   local($_)=@_;
 
1678
 
 
1679
   $_;
 
1680
}
 
1681
 
 
1682
sub do_cmd_BRgospel{
 
1683
   local($_)=@_;
 
1684
 
 
1685
   $_;
 
1686
}
 
1687
 
 
1688
sub do_cmd_BRepistleto{
 
1689
   local($_)=@_;
 
1690
 
 
1691
   $_;
 
1692
}
 
1693
 
 
1694
sub do_cmd_BRepistletothe{
 
1695
   local($_)=@_;
 
1696
 
 
1697
   $_;
 
1698
}
 
1699
 
 
1700
sub do_cmd_BRepistleof{
 
1701
   local($_)=@_;
 
1702
 
 
1703
   $_;
 
1704
}
 
1705
 
 
1706
sub do_cmd_BRbooktitlestyle{
 
1707
   local($_)=@_;
 
1708
   local($title);
 
1709
 
 
1710
   $title = &missing_braces unless
 
1711
              s/$next_pair_pr_rx/$title=$2;''/eo;
 
1712
 
 
1713
   $title . $_;
 
1714
}
 
1715
 
 
1716
sub do_cmd_BRchapterstyle{
 
1717
   local($_)=@_;
 
1718
   local($num);
 
1719
 
 
1720
   $num = &missing_braces unless
 
1721
              s/$next_pair_pr_rx/$num=$2;''/eo;
 
1722
 
 
1723
   $num . $_;
 
1724
}
 
1725
 
 
1726
sub do_cmd_BRversestyle{
 
1727
   local($_)=@_;
 
1728
   local($num);
 
1729
 
 
1730
   $num = &missing_braces unless
 
1731
              s/$next_pair_pr_rx/$num=$2;''/eo;
 
1732
 
 
1733
   $num . $_;
 
1734
}
 
1735
 
 
1736
sub do_cmd_BRbkchsep{
 
1737
   local($_)=@_;
 
1738
 
 
1739
   " " . $_;
 
1740
}
 
1741
 
 
1742
sub do_cmd_BRchvsep{
 
1743
   local($_)=@_;
 
1744
 
 
1745
   ":" . $_;
 
1746
}
 
1747
 
 
1748
sub do_cmd_BRchsep{
 
1749
   local($_)=@_;
 
1750
 
 
1751
   ';' . $_;
 
1752
}
 
1753
 
 
1754
sub do_cmd_BRvrsep{
 
1755
   local($_)=@_;
 
1756
 
 
1757
   &translate_commands("--") . $_;
 
1758
}
 
1759
 
 
1760
sub do_cmd_BRvsep{
 
1761
   local($_)=@_;
 
1762
 
 
1763
   "," . $_;
 
1764
}
 
1765
 
 
1766
sub do_cmd_BRperiod{
 
1767
   local($_)=@_;
 
1768
   $_;
 
1769
}
 
1770
 
 
1771
sub do_cmd_brfullname{
 
1772
local($_) = @_;
 
1773
$bookname{'Genesis'}='\BRbookof Genesis';
 
1774
$bookname{'Exodus'}='\BRbookof Exodus';
 
1775
$bookname{'Leviticus'}='\BRbookof Leviticus';
 
1776
$bookname{'Numbers'}='\BRbookof Numbers';
 
1777
$bookname{'Deuteronomy'}='\BRbookof Deuteronomy';
 
1778
$bookname{'Joshua'}='\BRbookof Joshua';
 
1779
$bookname{'Judges'}='\BRbookof Judges';
 
1780
$bookname{'Ruth'}='\BRbookof Ruth';
 
1781
$bookname{'ISamuel'}='\BRbooknumberstyleI \BRbookof Samuel';
 
1782
$bookname{'IISamuel'}='\BRbooknumberstyleII \BRbookof Samuel';
 
1783
$bookname{'IKings'}='\BRbooknumberstyleI \BRbookof Kings';
 
1784
$bookname{'IIKings'}='\BRbooknumberstyleII \BRbookof Kings';
 
1785
$bookname{'IChronicles'}='\BRbooknumberstyleI \BRbookof Chronicles';
 
1786
$bookname{'IIChronicles'}='\BRbooknumberstyleII \BRbookof Chronicles';
 
1787
$bookname{'Ezra'}='\BRbookof Ezra';
 
1788
$bookname{'Nehemiah'}='\BRbookof Nehemiah';
 
1789
$bookname{'Tobit'}='\BRbookof Tobit';
 
1790
$bookname{'Judith'}='\BRbookof Judith';
 
1791
$bookname{'Esther'}='\BRbookof Esther';
 
1792
$bookname{'IMaccabees'}='\BRbooknumberstyleI \BRbookof Maccabees';
 
1793
$bookname{'IIMaccabees'}='\BRbooknumberstyleII \BRbookof Maccabees';
 
1794
$bookname{'Job'}='\BRbookof Job';
 
1795
$bookname{'Psalms'}='\BRbookof Psalms';
 
1796
$bookname{'Proverbs'}='\BRbookof Proverbs';
 
1797
$bookname{'Ecclesiastes'}='\BRbookof Ecclesiastes';
 
1798
$bookname{'SongofSongs'}='\BRbookof Song of Songs';
 
1799
$bookname{'Wisdom'}='\BRbookof Wisdom';
 
1800
$bookname{'Ecclesiasticus'}='\BRbookof Ecclesiasticus';
 
1801
$bookname{'Isaiah'}='\BRbookof Isaiah';
 
1802
$bookname{'Jeramiah'}='\BRbookof Jeremiah';
 
1803
$bookname{'Lamentations'}='\BRbookof Lamentations';
 
1804
$bookname{'Baruch'}='\BRbookof Baruch';
 
1805
$bookname{'Ezekiel'}='\BRbookof Ezekiel';
 
1806
$bookname{'Daniel'}='\BRbookof Daniel';
 
1807
$bookname{'Hosea'}='\BRbookof Hosea';
 
1808
$bookname{'Joel'}='\BRbookof Joel';
 
1809
$bookname{'Amos'}='\BRbookof Amos';
 
1810
$bookname{'Obadiah'}='\BRbookof Obadiah';
 
1811
$bookname{'Jonah'}='\BRbookof Jonah';
 
1812
$bookname{'Micah'}='\BRbookof Micah';
 
1813
$bookname{'Nahum'}='\BRbookof Nahum';
 
1814
$bookname{'Habakkuk'}='\BRbookof Habakkuk';
 
1815
$bookname{'Zephaniah'}='\BRbookof Zephaniah';
 
1816
$bookname{'Haggai'}='\BRbookof Haggai';
 
1817
$bookname{'Zechariah'}='\BRbookof Zechariah';
 
1818
$bookname{'Malachi'}='\BRbookof Malachi';
 
1819
$bookname{'Matthew'}='\BRgospel Matthew';
 
1820
$bookname{'Mark'}='\BRgospel Mark';
 
1821
$bookname{'Luke'}='\BRgospel Luke';
 
1822
$bookname{'John'}='\BRgospel John';
 
1823
$bookname{'Acts'}='Acts';
 
1824
$bookname{'Romans'}='\BRepistletothe Romans';
 
1825
$bookname{'ICorinthians'}='\BRepistlenumberstyleI \BRepistletothe Corinthians';
 
1826
$bookname{'IICorinthians'}='\BRepistlenumberstyleII \BRepistletothe Corinthians';
 
1827
$bookname{'Galatians'}='\BRepistletothe Galatians';
 
1828
$bookname{'Ephesians'}='\BRepistletothe Ephesians';
 
1829
$bookname{'Philippians'}='\BRepistletothe Philippians';
 
1830
$bookname{'Colossians'}='\BRepistletothe Colossians';
 
1831
$bookname{'IThessalonians'}='\BRepistlenumberstyleI \BRepistletothe Thessalonians';
 
1832
$bookname{'IIThessalonians'}='\BRepistlenumberstyleII \BRepistletothe Thessalonians';
 
1833
$bookname{'ITimothy'}='\BRepistlenumberstyleI \BRepistleto Timothy';
 
1834
$bookname{'IITimothy'}='\BRepistlenumberstyleII \BRepistletoTimothy';
 
1835
$bookname{'Titus'}='\BRepistleto Titus';
 
1836
$bookname{'Philemon'}='\BRepistleto Philemon';
 
1837
$bookname{'Hebrews'}='\BRepistletothe Hebrews';
 
1838
$bookname{'James'}='\BRepistleof James';
 
1839
$bookname{'IPeter'}='\BRepistlenumberstyleI \BRepistleof Peter';
 
1840
$bookname{'IIPeter'}='\BRepistlenumberstyleII \BRepistleof Peter';
 
1841
$bookname{'IJohn'}='\BRepistlenumberstyleI \BRepistleof John';
 
1842
$bookname{'IIJohn'}='\BRepistlenumberstyleII \BRepistleof John';
 
1843
$bookname{'IIIJohn'}='\BRepistlenumberstyleIII \BRepistleof John';
 
1844
$bookname{'Jude'}='\BRepistleof Jude';
 
1845
$bookname{'Revelation'}='\BRbookof Revelation';
 
1846
$_;
 
1847
}
 
1848
 
 
1849
sub do_cmd_brabbrvname{
 
1850
local($_)=@_;
 
1851
$bookname{'Gensis'}='Gn\BRperiod ';
 
1852
$bookname{'Exodus'}='Ex\BRperiod ';
 
1853
$bookname{'Leviticus'}='Lv\BRperiod ';
 
1854
$bookname{'Numbers'}='Nb\BRperiod ';
 
1855
$bookname{'Deuteronomy'}='Dt\BRperiod ';
 
1856
$bookname{'Joshua'}='Jos\BRperiod ';
 
1857
$bookname{'Judges'}='Jg\BRperiod ';
 
1858
$bookname{'Ruth'}='Rt\BRperiod ';
 
1859
$bookname{'ISamuel'}='\BRbooknumberstyleI S\BRperiod ';
 
1860
$bookname{'IISamuel'}='\BRbooknumberstyleII S\BRperiod ';
 
1861
$bookname{'IKings'}='\BRbooknumberstyleI K\BRperiod ';
 
1862
$bookname{'IIKings'}='\BRbooknumberstyleII K\BRperiod ';
 
1863
$bookname{'IChronicles'}='\BRbooknumberstyleI Ch\BRperiod ';
 
1864
$bookname{'IIChronicles'}='\BRbooknumberstyleII Ch\BRperiod ';
 
1865
$bookname{'Ezra'}='Ezr\BRperiod ';
 
1866
$bookname{'Nehemiah'}='Ne\BRperiod ';
 
1867
$bookname{'Tobit'}='Tb\BRperiod ';
 
1868
$bookname{'Judith'}='Jdt\BRperiod ';
 
1869
$bookname{'Esther'}='Est\BRperiod ';
 
1870
$bookname{'IMaccabees'}='\BRbooknumberstyleI M\BRperiod ';
 
1871
$bookname{'IIMaccabees'}='\BRbooknumberstyleII M\BRperiod ';
 
1872
$bookname{'Job'}='Jb\BRperiod ';
 
1873
$bookname{'Psalms'}='Ps\BRperiod ';
 
1874
$bookname{'Proverbs'}='Pr\BRperiod ';
 
1875
$bookname{'Ecclesiastes'}='Qo\BRperiod ';
 
1876
$bookname{'SongofSongs'}='Sg\BRperiod ';
 
1877
$bookname{'Wisdom'}='Ws\BRperiod ';
 
1878
$bookname{'Ecclesiasticus'}='Si\BRperiod ';
 
1879
$bookname{'Isaiah'}='Is\BRperiod ';
 
1880
$bookname{'Jeremiah'}='Jr\BRperiod ';
 
1881
$bookname{'Lamentations'}='Lm\BRperiod ';
 
1882
$bookname{'Baruch'}='Ba\BRperiod ';
 
1883
$bookname{'Ezekiel'}='Ezk\BRperiod ';
 
1884
$bookname{'Daniel'}='Dn\BRperiod ';
 
1885
$bookname{'Hosea'}='Ho\BRperiod ';
 
1886
$bookname{'Joel'}='Jl\BRperiod ';
 
1887
$bookname{'Amos'}='Am\BRperiod ';
 
1888
$bookname{'Obadiah'}='Ob\BRperiod ';
 
1889
$bookname{'Jonah'}='Jon\BRperiod ';
 
1890
$bookname{'Micah'}='Mi\BRperiod ';
 
1891
$bookname{'Nahum'}='Na\BRperiod ';
 
1892
$bookname{'Habakkuk'}='Hab\BRperiod ';
 
1893
$bookname{'Zephaniah'}='Zp\BRperiod ';
 
1894
$bookname{'Haggai'}='Hg\BRperiod ';
 
1895
$bookname{'Zechariah'}='Zc\BRperiod ';
 
1896
$bookname{'Malachi'}='Ml\BRperiod ';
 
1897
$bookname{'Matthew'}='Mt\BRperiod ';
 
1898
$bookname{'Mark'}='Mk\BRperiod ';
 
1899
$bookname{'Luke'}='Lk\BRperiod ';
 
1900
$bookname{'John'}='Jn\BRperiod ';
 
1901
$bookname{'Acts'}='Ac\BRperiod ';
 
1902
$bookname{'Romans'}='Rm\BRperiod ';
 
1903
$bookname{'ICorinthians'}='\BRepistlenumberstyleI Co\BRperiod ';
 
1904
$bookname{'IICorinthians'}='\BRepistlenumberstyleII Co\BRperiod ';
 
1905
$bookname{'Galatians'}='Ga\BRperiod ';
 
1906
$bookname{'Ephesians'}='Ep\BRperiod ';
 
1907
$bookname{'Philippians'}='Ph\BRperiod ';
 
1908
$bookname{'Colossians'}='Col\BRperiod ';
 
1909
$bookname{'IThessalonians'}='\BRepistlenumberstyleI Th\BRperiod ';
 
1910
$bookname{'IIThessalonians'}='\BRepistlenumberstyleII Th\BRperiod ';
 
1911
$bookname{'ITimothy'}='\BRepistlenumberstyleI Tm\BRperiod ';
 
1912
$bookname{'IITimothy'}='\BRepistlenumberstyleII Tm\BRperiod ';
 
1913
$bookname{'Titus'}='Tt\BRperiod ';
 
1914
$bookname{'Philemon'}='Phm\BRperiod ';
 
1915
$bookname{'Hebrews'}='Heb\BRperiod ';
 
1916
$bookname{'James'}='Jm\BRperiod ';
 
1917
$bookname{'IPeter'}='\BRepistlenumberstyleI P\BRperiod ';
 
1918
$bookname{'IIPeter'}='\BRepistlenumberstyleII P\BRperiod ';
 
1919
$bookname{'IJohn'}='\BRepistlenumberstyleI Jn\BRperiod ';
 
1920
$bookname{'IIJohn'}='\BRepistlenumberstyleII Jn\BRperiod ';
 
1921
$bookname{'IIIJohn'}='\BRepistlenumberstyleIII Jn\BRperiod ';
 
1922
$bookname{'Jude'}='Jude';
 
1923
$bookname{'Revelation'}='Rv\BRperiod ';
 
1924
$_;
 
1925
}
 
1926
 
 
1927
sub do_cmd_braltabbrvname{
 
1928
local($_)=@_;
 
1929
$bookname{'Gensis'}='Gen\BRperiod ';
 
1930
$bookname{'Exodus'}='Exod\BRperiod ';
 
1931
$bookname{'Leviticus'}='Lev\BRperiod ';
 
1932
$bookname{'Numbers'}='Num\BRperiod ';
 
1933
$bookname{'Deuteronomy'}='Deut\BRperiod ';
 
1934
$bookname{'Joshua'}='Josh\BRperiod ';
 
1935
$bookname{'Judges'}='Judg\BRperiod ';
 
1936
$bookname{'Ruth'}='Ruth';
 
1937
$bookname{'ISamuel'}='\BRbooknumberstyleI Sam\BRperiod ';
 
1938
$bookname{'IISamuel'}='\BRbooknumberstyleII Sam\BRperiod ';
 
1939
$bookname{'IKings'}='\BRbooknumberstyleI Kgs\BRperiod ';
 
1940
$bookname{'IIKings'}='\BRbooknumberstyleII Kgs\BRperiod ';
 
1941
$bookname{'IChronicles'}='\BRbooknumberstyleI Chr\BRperiod ';
 
1942
$bookname{'IIChronicles'}='\BRbooknumberstyleII Chr\BRperiod ';
 
1943
$bookname{'Ezra'}='Ezra';
 
1944
$bookname{'Nehemiah'}='Neh\BRperiod ';
 
1945
$bookname{'Tobit'}='Tobit';
 
1946
$bookname{'Judith'}='Judith';
 
1947
$bookname{'Esther'}='Esther';
 
1948
$bookname{'IMaccabees'}='\BRbooknumberstyleI M\BRperiod ';
 
1949
$bookname{'IIMaccabees'}='\BRbooknumberstyleII M\BRperiod ';
 
1950
$bookname{'Job'}='Job';
 
1951
$bookname{'Psalms'}='Ps\BRperiod ';
 
1952
$bookname{'Proverbs'}='Prov\BRperiod ';
 
1953
$bookname{'Ecclesiastes'}='Eccles\BRperiod ';
 
1954
$bookname{'SongofSongs'}='S\BRperiod \ of S\BRperiod ';
 
1955
$bookname{'Wisdom'}='Wisd\BRperiod ';
 
1956
$bookname{'Ecclesiasticus'}='Ecclus\BRperiod ';
 
1957
$bookname{'Isaiah'}='Isa\BRperiod ';
 
1958
$bookname{'Jeremiah'}='Jer\BRperiod ';
 
1959
$bookname{'Lamentations'}='Lam\BRperiod ';
 
1960
$bookname{'Baruch'}='Baruch';
 
1961
$bookname{'Ezekiel'}='Ezek\BRperiod ';
 
1962
$bookname{'Daniel'}='Dan\BRperiod ';
 
1963
$bookname{'Hosea'}='Hos\BRperiod ';
 
1964
$bookname{'Joel'}='Joel';
 
1965
$bookname{'Amos'}='Amos';
 
1966
$bookname{'Obadiah'}='Obad';
 
1967
$bookname{'Jonah'}='Jonah';
 
1968
$bookname{'Micah'}='Mic\BRperiod ';
 
1969
$bookname{'Nahum'}='Nah\BRperiod ';
 
1970
$bookname{'Habakkuk'}='Hab\BRperiod ';
 
1971
$bookname{'Zephaniah'}='Zeph\BRperiod ';
 
1972
$bookname{'Haggai'}='Hag\BRperiod ';
 
1973
$bookname{'Zechariah'}='Zech\BRperiod ';
 
1974
$bookname{'Malachi'}='Mal\BRperiod ';
 
1975
$bookname{'Matthew'}='Matt\BRperiod ';
 
1976
$bookname{'Mark'}='Mark';
 
1977
$bookname{'Luke'}='Luke';
 
1978
$bookname{'John'}='John';
 
1979
$bookname{'Acts'}='Acts';
 
1980
$bookname{'Romans'}='Rom\BRperiod ';
 
1981
$bookname{'ICorinthians'}='\BRepistlenumberstyleI Cor\BRperiod ';
 
1982
$bookname{'IICorinthians'}='\BRepistlenumberstyleII Cor\BRperiod ';
 
1983
$bookname{'Galatians'}='Gal\BRperiod ';
 
1984
$bookname{'Ephesians'}='Eph\BRperiod ';
 
1985
$bookname{'Philippians'}='Phil\BRperiod ';
 
1986
$bookname{'Colossians'}='Col\BRperiod ';
 
1987
$bookname{'IThessalonians'}='\BRepistlenumberstyleI Thess\BRperiod ';
 
1988
$bookname{'IIThessalonians'}='\BRepistlenumberstyleII Thess\BRperiod ';
 
1989
$bookname{'ITimothy'}='\BRepistlenumberstyleI Tim\BRperiod ';
 
1990
$bookname{'IITimothy'}='\BRepistlenumberstyleII Tim\BRperiod ';
 
1991
$bookname{'Titus'}='Tit\BRperiod ';
 
1992
$bookname{'Philemon'}='Philem\BRperiod ';
 
1993
$bookname{'Hebrews'}='Heb\BRperiod ';
 
1994
$bookname{'James'}='Jas\BRperiod ';
 
1995
$bookname{'IPeter'}='\BRepistlenumberstyleI Pet\BRperiod ';
 
1996
$bookname{'IIPeter'}='\BRepistlenumberstyleII Pet\BRperiod ';
 
1997
$bookname{'IJohn'}='\BRepistlenumberstyleI John';
 
1998
$bookname{'IIJohn'}='\BRepistlenumberstyleII John';
 
1999
$bookname{'IIIJohn'}='\BRepistlenumberstyleIII John';
 
2000
$bookname{'Jude'}='Jude';
 
2001
$bookname{'Revelation'}='Rev\BRperiod ';
 
2002
$_;
 
2003
}
 
2004
 
 
2005
sub brs_default{
 
2006
   local($tmp)='';
 
2007
   &do_cmd_brfullname;
 
2008
 
 
2009
   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
 
2010
   $tmp .= '   local($_) = @_;';
 
2011
   $tmp .= '   local($num);';
 
2012
   $tmp .= '   $num = &missing_braces unless';
 
2013
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2014
   $tmp .= '   "$num " . $_;';
 
2015
   $tmp .= '}';
 
2016
   eval($tmp);
 
2017
   $tmp='';
 
2018
   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
 
2019
   $tmp .= '   local($_) = @_;';
 
2020
   $tmp .= '   local($num);';
 
2021
   $tmp .= '   $num = &missing_braces unless';
 
2022
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2023
   $tmp .= '   "$num " . $_;';
 
2024
   $tmp .= '}';
 
2025
   eval($tmp);
 
2026
   $tmp='';
 
2027
   $tmp .= 'sub do_cmd_BRbookof{';
 
2028
   $tmp .= '   local($_)=@_;';
 
2029
   $tmp .= '   $_;';
 
2030
   $tmp .= '}';
 
2031
   eval($tmp);
 
2032
   $tmp='';
 
2033
   $tmp .= 'sub do_cmd_BRgospel{';
 
2034
   $tmp .= '   local($_)=@_;';
 
2035
   $tmp .= '   $_;';
 
2036
   $tmp .= '}';
 
2037
   eval($tmp);
 
2038
   $tmp='';
 
2039
   $tmp .= 'sub do_cmd_BRepistleto{';
 
2040
   $tmp .= '   local($_)=@_;';
 
2041
   $tmp .= '   $_;';
 
2042
   $tmp .= '}';
 
2043
   eval($tmp);
 
2044
   $tmp='';
 
2045
   $tmp .= 'sub do_cmd_BRepistletothe{';
 
2046
   $tmp .= '   local($_)=@_;';
 
2047
   $tmp .= '   $_;';
 
2048
   $tmp .= '}';
 
2049
   eval($tmp);
 
2050
   $tmp='';
 
2051
   $tmp .= 'sub do_cmd_BRepistleof{';
 
2052
   $tmp .= '   local($_)=@_;';
 
2053
   $tmp .= '   $_;';
 
2054
   $tmp .= '}';
 
2055
   eval($tmp);
 
2056
   $tmp='';
 
2057
   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
 
2058
   $tmp .= '   local($_)=@_;';
 
2059
   $tmp .= '   local($title);';
 
2060
   $tmp .= '   $title = &missing_braces unless';
 
2061
   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
 
2062
   $tmp .= '   $title . $_;';
 
2063
   $tmp .= '}';
 
2064
   eval($tmp);
 
2065
   $tmp='';
 
2066
   $tmp .= 'sub do_cmd_BRchapterstyle{';
 
2067
   $tmp .= '   local($_)=@_;';
 
2068
   $tmp .= '   local($num);';
 
2069
   $tmp .= '   $num = &missing_braces unless';
 
2070
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2071
   $tmp .= '   $num . $_;';
 
2072
   $tmp .= '}';
 
2073
   eval($tmp);
 
2074
   $tmp='';
 
2075
   $tmp .= 'sub do_cmd_BRversestyle{';
 
2076
   $tmp .= '   local($_)=@_;';
 
2077
   $tmp .= '   local($num);';
 
2078
   $tmp .= '   $num = &missing_braces unless';
 
2079
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2080
   $tmp .= '   $num . $_;';
 
2081
   $tmp .= '}';
 
2082
   eval($tmp);
 
2083
   $tmp='';
 
2084
   $tmp .= 'sub do_cmd_BRbkchsep{';
 
2085
   $tmp .= '   local($_)=@_;';
 
2086
   $tmp .= '   " " . $_;';
 
2087
   $tmp .= '}';
 
2088
   eval($tmp);
 
2089
   $tmp='';
 
2090
   $tmp .= 'sub do_cmd_BRchvsep{';
 
2091
   $tmp .= '   local($_)=@_;';
 
2092
   $tmp .= '   ":" . $_;';
 
2093
   $tmp .= '}';
 
2094
   eval($tmp);
 
2095
   $tmp='';
 
2096
   $tmp .= 'sub do_cmd_BRchsep{';
 
2097
   $tmp .= '   local($_)=@_;';
 
2098
   $tmp .= '   \';\' . $_;';
 
2099
   $tmp .= '}';
 
2100
   eval($tmp);
 
2101
   $tmp='';
 
2102
   $tmp .= 'sub do_cmd_BRvrsep{';
 
2103
   $tmp .= '   local($_)=@_;';
 
2104
   $tmp .= '   &translate_commands("--") . $_;';
 
2105
   $tmp .= '}';
 
2106
   eval($tmp);
 
2107
   $tmp='';
 
2108
   $tmp .= 'sub do_cmd_BRvsep{';
 
2109
   $tmp .= '   local($_)=@_;';
 
2110
   $tmp .= '   "," . $_;';
 
2111
   $tmp .= '}';
 
2112
   eval($tmp);
 
2113
   $tmp='';
 
2114
   $tmp .= 'sub do_cmd_BRperiod{';
 
2115
   $tmp .= '   local($_)=@_;';
 
2116
   $tmp .= '   $_;';
 
2117
   $tmp .= '}';
 
2118
}
 
2119
 
 
2120
sub brs_jerusalem{
 
2121
   local($tmp)='';
 
2122
   &do_cmd_brabbrvname;
 
2123
 
 
2124
   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
 
2125
   $tmp .= '   local($_) = @_;';
 
2126
   $tmp .= '   local($num);';
 
2127
   $tmp .= '   $num = &missing_braces unless';
 
2128
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2129
   $tmp .= '   "$num " . $_;';
 
2130
   $tmp .= '}';
 
2131
   eval($tmp);
 
2132
   $tmp='';
 
2133
   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
 
2134
   $tmp .= '   local($_) = @_;';
 
2135
   $tmp .= '   local($num);';
 
2136
   $tmp .= '   $num = &missing_braces unless';
 
2137
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2138
   $tmp .= '   "$num " . $_;';
 
2139
   $tmp .= '}';
 
2140
   eval($tmp);
 
2141
   $tmp='';
 
2142
   $tmp .= 'sub do_cmd_BRbookof{';
 
2143
   $tmp .= '   local($_)=@_;';
 
2144
   $tmp .= '   $_;';
 
2145
   $tmp .= '}';
 
2146
   eval($tmp);
 
2147
   $tmp='';
 
2148
   $tmp .= 'sub do_cmd_BRgospel{';
 
2149
   $tmp .= '   local($_)=@_;';
 
2150
   $tmp .= '   $_;';
 
2151
   $tmp .= '}';
 
2152
   eval($tmp);
 
2153
   $tmp='';
 
2154
   $tmp .= 'sub do_cmd_BRepistleto{';
 
2155
   $tmp .= '   local($_)=@_;';
 
2156
   $tmp .= '   $_;';
 
2157
   $tmp .= '}';
 
2158
   eval($tmp);
 
2159
   $tmp='';
 
2160
   $tmp .= 'sub do_cmd_BRepistletothe{';
 
2161
   $tmp .= '   local($_)=@_;';
 
2162
   $tmp .= '   $_;';
 
2163
   $tmp .= '}';
 
2164
   eval($tmp);
 
2165
   $tmp='';
 
2166
   $tmp .= 'sub do_cmd_BRepistleof{';
 
2167
   $tmp .= '   local($_)=@_;';
 
2168
   $tmp .= '   $_;';
 
2169
   $tmp .= '}';
 
2170
   eval($tmp);
 
2171
   $tmp='';
 
2172
   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
 
2173
   $tmp .= '   local($_)=@_;';
 
2174
   $tmp .= '   local($title);';
 
2175
   $tmp .= '   $title = &missing_braces unless';
 
2176
   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
 
2177
   $tmp .= '   $title . $_;';
 
2178
   $tmp .= '}';
 
2179
   eval($tmp);
 
2180
   $tmp='';
 
2181
   $tmp .= 'sub do_cmd_BRchapterstyle{';
 
2182
   $tmp .= '   local($_)=@_;';
 
2183
   $tmp .= '   local($num);';
 
2184
   $tmp .= '   $num = &missing_braces unless';
 
2185
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2186
   $tmp .= '   $num . $_;';
 
2187
   $tmp .= '}';
 
2188
   eval($tmp);
 
2189
   $tmp='';
 
2190
   $tmp .= 'sub do_cmd_BRversestyle{';
 
2191
   $tmp .= '   local($_)=@_;';
 
2192
   $tmp .= '   local($num);';
 
2193
   $tmp .= '   $num = &missing_braces unless';
 
2194
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2195
   $tmp .= '   $num . $_;';
 
2196
   $tmp .= '}';
 
2197
   eval($tmp);
 
2198
   $tmp='';
 
2199
   $tmp .= 'sub do_cmd_BRbkchsep{';
 
2200
   $tmp .= '   local($_)=@_;';
 
2201
   $tmp .= '   " " . $_;';
 
2202
   $tmp .= '}';
 
2203
   eval($tmp);
 
2204
   $tmp='';
 
2205
   $tmp .= 'sub do_cmd_BRchvsep{';
 
2206
   $tmp .= '   local($_)=@_;';
 
2207
   $tmp .= '   ":" . $_;';
 
2208
   $tmp .= '}';
 
2209
   eval($tmp);
 
2210
   $tmp='';
 
2211
   $tmp .= 'sub do_cmd_BRchsep{';
 
2212
   $tmp .= '   local($_)=@_;';
 
2213
   $tmp .= '   \'; \' . $_;';
 
2214
   $tmp .= '}';
 
2215
   eval($tmp);
 
2216
   $tmp='';
 
2217
   $tmp .= 'sub do_cmd_BRvrsep{';
 
2218
   $tmp .= '   local($_)=@_;';
 
2219
   $tmp .= '   &translate_commands("--") . $_;';
 
2220
   $tmp .= '}';
 
2221
   eval($tmp);
 
2222
   $tmp='';
 
2223
   $tmp .= 'sub do_cmd_BRvsep{';
 
2224
   $tmp .= '   local($_)=@_;';
 
2225
   $tmp .= '   "," . $_;';
 
2226
   $tmp .= '}';
 
2227
   eval($tmp);
 
2228
   $tmp='';
 
2229
   $tmp .= 'sub do_cmd_BRperiod{';
 
2230
   $tmp .= '   local($_)=@_;';
 
2231
   $tmp .= '   $_;';
 
2232
   $tmp .= '}';
 
2233
}
 
2234
 
 
2235
sub brs_anglosaxon{
 
2236
   local($tmp)='';
 
2237
   &do_cmd_braltabbrvname;
 
2238
 
 
2239
   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
 
2240
   $tmp .= '   local($_) = @_;';
 
2241
   $tmp .= '   local($num);';
 
2242
   $tmp .= '   $num = &missing_braces unless';
 
2243
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2244
   $tmp .= '   join(" ", &fRoman($num), $_);';
 
2245
   $tmp .= '}';
 
2246
   eval($tmp);
 
2247
   $tmp='';
 
2248
   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
 
2249
   $tmp .= '   local($_) = @_;';
 
2250
   $tmp .= '   local($num);';
 
2251
   $tmp .= '   $num = &missing_braces unless';
 
2252
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2253
   $tmp .= '   join(" ", &fRoman($num), $_);';
 
2254
   $tmp .= '}';
 
2255
   eval($tmp);
 
2256
   $tmp='';
 
2257
   $tmp .= 'sub do_cmd_BRbookof{';
 
2258
   $tmp .= '   local($_)=@_;';
 
2259
   $tmp .= '   $_;';
 
2260
   $tmp .= '}';
 
2261
   eval($tmp);
 
2262
   $tmp='';
 
2263
   $tmp .= 'sub do_cmd_BRgospel{';
 
2264
   $tmp .= '   local($_)=@_;';
 
2265
   $tmp .= '   $_;';
 
2266
   $tmp .= '}';
 
2267
   eval($tmp);
 
2268
   $tmp='';
 
2269
   $tmp .= 'sub do_cmd_BRepistleto{';
 
2270
   $tmp .= '   local($_)=@_;';
 
2271
   $tmp .= '   $_;';
 
2272
   $tmp .= '}';
 
2273
   eval($tmp);
 
2274
   $tmp='';
 
2275
   $tmp .= 'sub do_cmd_BRepistletothe{';
 
2276
   $tmp .= '   local($_)=@_;';
 
2277
   $tmp .= '   $_;';
 
2278
   $tmp .= '}';
 
2279
   eval($tmp);
 
2280
   $tmp='';
 
2281
   $tmp .= 'sub do_cmd_BRepistleof{';
 
2282
   $tmp .= '   local($_)=@_;';
 
2283
   $tmp .= '   $_;';
 
2284
   $tmp .= '}';
 
2285
   eval($tmp);
 
2286
   $tmp='';
 
2287
   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
 
2288
   $tmp .= '   local($_)=@_;';
 
2289
   $tmp .= '   local($title);';
 
2290
   $tmp .= '   $title = &missing_braces unless';
 
2291
   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
 
2292
   $tmp .= '   $title . $_;';
 
2293
   $tmp .= '}';
 
2294
   eval($tmp);
 
2295
   $tmp='';
 
2296
   $tmp .= 'sub do_cmd_BRchapterstyle{';
 
2297
   $tmp .= '   local($_)=@_;';
 
2298
   $tmp .= '   local($num);';
 
2299
   $tmp .= '   $num = &missing_braces unless';
 
2300
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2301
   $tmp .= '   $num . $_;';
 
2302
   $tmp .= '}';
 
2303
   eval($tmp);
 
2304
   $tmp='';
 
2305
   $tmp .= 'sub do_cmd_BRversestyle{';
 
2306
   $tmp .= '   local($_)=@_;';
 
2307
   $tmp .= '   local($num);';
 
2308
   $tmp .= '   $num = &missing_braces unless';
 
2309
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2310
   $tmp .= '   $num . $_;';
 
2311
   $tmp .= '}';
 
2312
   eval($tmp);
 
2313
   $tmp='';
 
2314
   $tmp .= 'sub do_cmd_BRbkchsep{';
 
2315
   $tmp .= '   local($_)=@_;';
 
2316
   $tmp .= '   " " . $_;';
 
2317
   $tmp .= '}';
 
2318
   eval($tmp);
 
2319
   $tmp='';
 
2320
   $tmp .= 'sub do_cmd_BRchvsep{';
 
2321
   $tmp .= '   local($_)=@_;';
 
2322
   $tmp .= '   "." . $_;';
 
2323
   $tmp .= '}';
 
2324
   eval($tmp);
 
2325
   $tmp='';
 
2326
   $tmp .= 'sub do_cmd_BRchsep{';
 
2327
   $tmp .= '   local($_)=@_;';
 
2328
   $tmp .= '   \'; \' . $_;';
 
2329
   $tmp .= '}';
 
2330
   eval($tmp);
 
2331
   $tmp='';
 
2332
   $tmp .= 'sub do_cmd_BRvrsep{';
 
2333
   $tmp .= '   local($_)=@_;';
 
2334
   $tmp .= '   &translate_commands("--") . $_;';
 
2335
   $tmp .= '}';
 
2336
   eval($tmp);
 
2337
   $tmp='';
 
2338
   $tmp .= 'sub do_cmd_BRvsep{';
 
2339
   $tmp .= '   local($_)=@_;';
 
2340
   $tmp .= '   "," . $_;';
 
2341
   $tmp .= '}';
 
2342
   eval($tmp);
 
2343
   $tmp='';
 
2344
   $tmp .= 'sub do_cmd_BRperiod{';
 
2345
   $tmp .= '   local($_)=@_;';
 
2346
   $tmp .= '   ".$_";';
 
2347
   $tmp .= '}';
 
2348
}
 
2349
 
 
2350
sub brs_JEH{
 
2351
   local($tmp)='';
 
2352
   &do_cmd_braltabbrvname;
 
2353
 
 
2354
   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
 
2355
   $tmp .= '   local($_) = @_;';
 
2356
   $tmp .= '   local($num);';
 
2357
   $tmp .= '   $num = &missing_braces unless';
 
2358
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2359
   $tmp .= '   join(" ", $num, $_);';
 
2360
   $tmp .= '}';
 
2361
   eval($tmp);
 
2362
   $tmp='';
 
2363
   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
 
2364
   $tmp .= '   local($_) = @_;';
 
2365
   $tmp .= '   local($num);';
 
2366
   $tmp .= '   $num = &missing_braces unless';
 
2367
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2368
   $tmp .= '   join(" ", $num, $_);';
 
2369
   $tmp .= '}';
 
2370
   eval($tmp);
 
2371
   $tmp='';
 
2372
   $tmp .= 'sub do_cmd_BRbookof{';
 
2373
   $tmp .= '   local($_)=@_;';
 
2374
   $tmp .= '   $_;';
 
2375
   $tmp .= '}';
 
2376
   eval($tmp);
 
2377
   $tmp='';
 
2378
   $tmp .= 'sub do_cmd_BRgospel{';
 
2379
   $tmp .= '   local($_)=@_;';
 
2380
   $tmp .= '   $_;';
 
2381
   $tmp .= '}';
 
2382
   eval($tmp);
 
2383
   $tmp='';
 
2384
   $tmp .= 'sub do_cmd_BRepistleto{';
 
2385
   $tmp .= '   local($_)=@_;';
 
2386
   $tmp .= '   $_;';
 
2387
   $tmp .= '}';
 
2388
   eval($tmp);
 
2389
   $tmp='';
 
2390
   $tmp .= 'sub do_cmd_BRepistletothe{';
 
2391
   $tmp .= '   local($_)=@_;';
 
2392
   $tmp .= '   $_;';
 
2393
   $tmp .= '}';
 
2394
   eval($tmp);
 
2395
   $tmp='';
 
2396
   $tmp .= 'sub do_cmd_BRepistleof{';
 
2397
   $tmp .= '   local($_)=@_;';
 
2398
   $tmp .= '   $_;';
 
2399
   $tmp .= '}';
 
2400
   eval($tmp);
 
2401
   $tmp='';
 
2402
   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
 
2403
   $tmp .= '   local($_)=@_;';
 
2404
   $tmp .= '   local($title);';
 
2405
   $tmp .= '   $title = &missing_braces unless';
 
2406
   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
 
2407
   $tmp .= '   $title . $_;';
 
2408
   $tmp .= '}';
 
2409
   eval($tmp);
 
2410
   $tmp='';
 
2411
   $tmp .= 'sub do_cmd_BRchapterstyle{';
 
2412
   $tmp .= '   local($_)=@_;';
 
2413
   $tmp .= '   local($num);';
 
2414
   $tmp .= '   $num = &missing_braces unless';
 
2415
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2416
   $tmp .= '   &froman($num) . $_;';
 
2417
   $tmp .= '}';
 
2418
   eval($tmp);
 
2419
   $tmp='';
 
2420
   $tmp .= 'sub do_cmd_BRversestyle{';
 
2421
   $tmp .= '   local($_)=@_;';
 
2422
   $tmp .= '   local($num);';
 
2423
   $tmp .= '   $num = &missing_braces unless';
 
2424
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2425
   $tmp .= '   $num . $_;';
 
2426
   $tmp .= '}';
 
2427
   eval($tmp);
 
2428
   $tmp='';
 
2429
   $tmp .= 'sub do_cmd_BRbkchsep{';
 
2430
   $tmp .= '   local($_)=@_;';
 
2431
   $tmp .= '   " " . $_;';
 
2432
   $tmp .= '}';
 
2433
   eval($tmp);
 
2434
   $tmp='';
 
2435
   $tmp .= 'sub do_cmd_BRchvsep{';
 
2436
   $tmp .= '   local($_)=@_;';
 
2437
   $tmp .= '   join(" ", ".", $_);';
 
2438
   $tmp .= '}';
 
2439
   eval($tmp);
 
2440
   $tmp='';
 
2441
   $tmp .= 'sub do_cmd_BRchsep{';
 
2442
   $tmp .= '   local($_)=@_;';
 
2443
   $tmp .= '   \'; \' . $_;';
 
2444
   $tmp .= '}';
 
2445
   eval($tmp);
 
2446
   $tmp='';
 
2447
   $tmp .= 'sub do_cmd_BRvrsep{';
 
2448
   $tmp .= '   local($_)=@_;';
 
2449
   $tmp .= '   &translate_commands("--") . $_;';
 
2450
   $tmp .= '}';
 
2451
   eval($tmp);
 
2452
   $tmp='';
 
2453
   $tmp .= 'sub do_cmd_BRvsep{';
 
2454
   $tmp .= '   local($_)=@_;';
 
2455
   $tmp .= '   "," . $_;';
 
2456
   $tmp .= '}';
 
2457
   eval($tmp);
 
2458
   $tmp='';
 
2459
   $tmp .= 'sub do_cmd_BRperiod{';
 
2460
   $tmp .= '   local($_)=@_;';
 
2461
   $tmp .= '   ".$_";';
 
2462
   $tmp .= '}';
 
2463
}
 
2464
 
 
2465
sub brs_MHRA{
 
2466
   local($tmp)='';
 
2467
   &do_cmd_brfullname;
 
2468
 
 
2469
   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
 
2470
   $tmp .= '   local($_) = @_;';
 
2471
   $tmp .= '   local($num,$id);';
 
2472
   $tmp .= '   $num = &missing_braces unless';
 
2473
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
 
2474
   $tmp .= '   $num = &froman($num);';
 
2475
   $tmp .= '   $num = &translate_commands("\\\\textsc${OP}$id${CP}$num${OP}$id${CP}");';
 
2476
   $tmp .= '   join(" ", $num, $_);';
 
2477
   $tmp .= '}';
 
2478
   eval($tmp);
 
2479
   $tmp='';
 
2480
   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
 
2481
   $tmp .= '   local($_) = @_;';
 
2482
   $tmp .= '   local($num,$id);';
 
2483
   $tmp .= '   $num = &missing_braces unless';
 
2484
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
 
2485
   $tmp .= '   $num = &froman($num);';
 
2486
   $tmp .= '   $num = &translate_commands("\\\\textsc${OP}$id${CP}$num${OP}$id${CP}");';
 
2487
   $tmp .= '   join(" ", $num, $_);';
 
2488
   $tmp .= '}';
 
2489
   eval($tmp);
 
2490
   $tmp='';
 
2491
   $tmp .= 'sub do_cmd_BRbookof{';
 
2492
   $tmp .= '   local($_)=@_;';
 
2493
   $tmp .= '   $_;';
 
2494
   $tmp .= '}';
 
2495
   eval($tmp);
 
2496
   $tmp='';
 
2497
   $tmp .= 'sub do_cmd_BRgospel{';
 
2498
   $tmp .= '   local($_)=@_;';
 
2499
   $tmp .= '   $_;';
 
2500
   $tmp .= '}';
 
2501
   eval($tmp);
 
2502
   $tmp='';
 
2503
   $tmp .= 'sub do_cmd_BRepistleto{';
 
2504
   $tmp .= '   local($_)=@_;';
 
2505
   $tmp .= '   $_;';
 
2506
   $tmp .= '}';
 
2507
   eval($tmp);
 
2508
   $tmp='';
 
2509
   $tmp .= 'sub do_cmd_BRepistletothe{';
 
2510
   $tmp .= '   local($_)=@_;';
 
2511
   $tmp .= '   $_;';
 
2512
   $tmp .= '}';
 
2513
   eval($tmp);
 
2514
   $tmp='';
 
2515
   $tmp .= 'sub do_cmd_BRepistleof{';
 
2516
   $tmp .= '   local($_)=@_;';
 
2517
   $tmp .= '   $_;';
 
2518
   $tmp .= '}';
 
2519
   eval($tmp);
 
2520
   $tmp='';
 
2521
   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
 
2522
   $tmp .= '   local($_)=@_;';
 
2523
   $tmp .= '   local($title);';
 
2524
   $tmp .= '   $title = &missing_braces unless';
 
2525
   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
 
2526
   $tmp .= '   $title . $_;';
 
2527
   $tmp .= '}';
 
2528
   eval($tmp);
 
2529
   $tmp='';
 
2530
   $tmp .= 'sub do_cmd_BRchapterstyle{';
 
2531
   $tmp .= '   local($_)=@_;';
 
2532
   $tmp .= '   local($num);';
 
2533
   $tmp .= '   $num = &missing_braces unless';
 
2534
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2535
   $tmp .= '   &froman($num) . $_;';
 
2536
   $tmp .= '}';
 
2537
   eval($tmp);
 
2538
   $tmp='';
 
2539
   $tmp .= 'sub do_cmd_BRversestyle{';
 
2540
   $tmp .= '   local($_)=@_;';
 
2541
   $tmp .= '   local($num);';
 
2542
   $tmp .= '   $num = &missing_braces unless';
 
2543
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2544
   $tmp .= '   $num . $_;';
 
2545
   $tmp .= '}';
 
2546
   eval($tmp);
 
2547
   $tmp='';
 
2548
   $tmp .= 'sub do_cmd_BRbkchsep{';
 
2549
   $tmp .= '   local($_)=@_;';
 
2550
   $tmp .= '   " " . $_;';
 
2551
   $tmp .= '}';
 
2552
   eval($tmp);
 
2553
   $tmp='';
 
2554
   $tmp .= 'sub do_cmd_BRchvsep{';
 
2555
   $tmp .= '   local($_)=@_;';
 
2556
   $tmp .= '   join(" ", ".", $_);';
 
2557
   $tmp .= '}';
 
2558
   eval($tmp);
 
2559
   $tmp='';
 
2560
   $tmp .= 'sub do_cmd_BRchsep{';
 
2561
   $tmp .= '   local($_)=@_;';
 
2562
   $tmp .= '   "; " . $_;';
 
2563
   $tmp .= '}';
 
2564
   eval($tmp);
 
2565
   $tmp='';
 
2566
   $tmp .= 'sub do_cmd_BRvrsep{';
 
2567
   $tmp .= '   local($_)=@_;';
 
2568
   $tmp .= '   &translate_commands("--") . $_;';
 
2569
   $tmp .= '}';
 
2570
   eval($tmp);
 
2571
   $tmp='';
 
2572
   $tmp .= 'sub do_cmd_BRvsep{';
 
2573
   $tmp .= '   local($_)=@_;';
 
2574
   $tmp .= '   "," . $_;';
 
2575
   $tmp .= '}';
 
2576
   eval($tmp);
 
2577
   $tmp='';
 
2578
   $tmp .= 'sub do_cmd_BRperiod{';
 
2579
   $tmp .= '   local($_)=@_;';
 
2580
   $tmp .= '   $_;';
 
2581
   $tmp .= '}';
 
2582
}
 
2583
 
 
2584
sub brs_NTG{
 
2585
   local($tmp)='';
 
2586
   &do_cmd_braltabbrvname;
 
2587
 
 
2588
   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
 
2589
   $tmp .= '   local($_) = @_;';
 
2590
   $tmp .= '   local($num);';
 
2591
   $tmp .= '   $num = &missing_braces unless';
 
2592
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2593
   $tmp .= '   join(" ", $num, $_);';
 
2594
   $tmp .= '}';
 
2595
   eval($tmp);
 
2596
   $tmp='';
 
2597
   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
 
2598
   $tmp .= '   local($_) = @_;';
 
2599
   $tmp .= '   local($num);';
 
2600
   $tmp .= '   $num = &missing_braces unless';
 
2601
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2602
   $tmp .= '   join(" ", $num, $_);';
 
2603
   $tmp .= '}';
 
2604
   eval($tmp);
 
2605
   $tmp='';
 
2606
   $tmp .= 'sub do_cmd_BRbookof{';
 
2607
   $tmp .= '   local($_)=@_;';
 
2608
   $tmp .= '   $_;';
 
2609
   $tmp .= '}';
 
2610
   eval($tmp);
 
2611
   $tmp='';
 
2612
   $tmp .= 'sub do_cmd_BRgospel{';
 
2613
   $tmp .= '   local($_)=@_;';
 
2614
   $tmp .= '   $_;';
 
2615
   $tmp .= '}';
 
2616
   eval($tmp);
 
2617
   $tmp='';
 
2618
   $tmp .= 'sub do_cmd_BRepistleto{';
 
2619
   $tmp .= '   local($_)=@_;';
 
2620
   $tmp .= '   $_;';
 
2621
   $tmp .= '}';
 
2622
   eval($tmp);
 
2623
   $tmp='';
 
2624
   $tmp .= 'sub do_cmd_BRepistletothe{';
 
2625
   $tmp .= '   local($_)=@_;';
 
2626
   $tmp .= '   $_;';
 
2627
   $tmp .= '}';
 
2628
   eval($tmp);
 
2629
   $tmp='';
 
2630
   $tmp .= 'sub do_cmd_BRepistleof{';
 
2631
   $tmp .= '   local($_)=@_;';
 
2632
   $tmp .= '   $_;';
 
2633
   $tmp .= '}';
 
2634
   eval($tmp);
 
2635
   $tmp='';
 
2636
   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
 
2637
   $tmp .= '   local($_)=@_;';
 
2638
   $tmp .= '   local($title);';
 
2639
   $tmp .= '   $title = &missing_braces unless';
 
2640
   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
 
2641
   $tmp .= '   $title . $_;';
 
2642
   $tmp .= '}';
 
2643
   eval($tmp);
 
2644
   $tmp='';
 
2645
   $tmp .= 'sub do_cmd_BRchapterstyle{';
 
2646
   $tmp .= '   local($_)=@_;';
 
2647
   $tmp .= '   local($num);';
 
2648
   $tmp .= '   $num = &missing_braces unless';
 
2649
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2650
   $tmp .= '   &froman($num) . $_;';
 
2651
   $tmp .= '}';
 
2652
   eval($tmp);
 
2653
   $tmp='';
 
2654
   $tmp .= 'sub do_cmd_BRversestyle{';
 
2655
   $tmp .= '   local($_)=@_;';
 
2656
   $tmp .= '   local($num);';
 
2657
   $tmp .= '   $num = &missing_braces unless';
 
2658
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2659
   $tmp .= '   $num . $_;';
 
2660
   $tmp .= '}';
 
2661
   eval($tmp);
 
2662
   $tmp='';
 
2663
   $tmp .= 'sub do_cmd_BRbkchsep{';
 
2664
   $tmp .= '   local($_)=@_;';
 
2665
   $tmp .= '   " " . $_;';
 
2666
   $tmp .= '}';
 
2667
   eval($tmp);
 
2668
   $tmp='';
 
2669
   $tmp .= 'sub do_cmd_BRchvsep{';
 
2670
   $tmp .= '   local($_)=@_;';
 
2671
   $tmp .= '   join("", ",", $_);';
 
2672
   $tmp .= '}';
 
2673
   eval($tmp);
 
2674
   $tmp='';
 
2675
   $tmp .= 'sub do_cmd_BRchsep{';
 
2676
   $tmp .= '   local($_)=@_;';
 
2677
   $tmp .= '   "; " . $_;';
 
2678
   $tmp .= '}';
 
2679
   eval($tmp);
 
2680
   $tmp='';
 
2681
   $tmp .= 'sub do_cmd_BRvrsep{';
 
2682
   $tmp .= '   local($_)=@_;';
 
2683
   $tmp .= '   &translate_commands("--") . $_;';
 
2684
   $tmp .= '}';
 
2685
   eval($tmp);
 
2686
   $tmp='';
 
2687
   $tmp .= 'sub do_cmd_BRvsep{';
 
2688
   $tmp .= '   local($_)=@_;';
 
2689
   $tmp .= '   "," . $_;';
 
2690
   $tmp .= '}';
 
2691
   eval($tmp);
 
2692
   $tmp='';
 
2693
   $tmp .= 'sub do_cmd_BRperiod{';
 
2694
   $tmp .= '   local($_)=@_;';
 
2695
   $tmp .= '   $_;';
 
2696
   $tmp .= '}';
 
2697
}
 
2698
 
 
2699
sub brs_MLA{
 
2700
   local($tmp)='';
 
2701
   &do_cmd_braltabbrvname;
 
2702
 
 
2703
   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
 
2704
   $tmp .= '   local($_) = @_;';
 
2705
   $tmp .= '   local($num);';
 
2706
   $tmp .= '   $num = &missing_braces unless';
 
2707
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2708
   $tmp .= '   join(" ", $num, $_);';
 
2709
   $tmp .= '}';
 
2710
   eval($tmp);
 
2711
   $tmp='';
 
2712
   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
 
2713
   $tmp .= '   local($_) = @_;';
 
2714
   $tmp .= '   local($num);';
 
2715
   $tmp .= '   $num = &missing_braces unless';
 
2716
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2717
   $tmp .= '   join(" ", $num, $_);';
 
2718
   $tmp .= '}';
 
2719
   eval($tmp);
 
2720
   $tmp='';
 
2721
   $tmp .= 'sub do_cmd_BRbookof{';
 
2722
   $tmp .= '   local($_)=@_;';
 
2723
   $tmp .= '   $_;';
 
2724
   $tmp .= '}';
 
2725
   eval($tmp);
 
2726
   $tmp='';
 
2727
   $tmp .= 'sub do_cmd_BRgospel{';
 
2728
   $tmp .= '   local($_)=@_;';
 
2729
   $tmp .= '   $_;';
 
2730
   $tmp .= '}';
 
2731
   eval($tmp);
 
2732
   $tmp='';
 
2733
   $tmp .= 'sub do_cmd_BRepistleto{';
 
2734
   $tmp .= '   local($_)=@_;';
 
2735
   $tmp .= '   $_;';
 
2736
   $tmp .= '}';
 
2737
   eval($tmp);
 
2738
   $tmp='';
 
2739
   $tmp .= 'sub do_cmd_BRepistletothe{';
 
2740
   $tmp .= '   local($_)=@_;';
 
2741
   $tmp .= '   $_;';
 
2742
   $tmp .= '}';
 
2743
   eval($tmp);
 
2744
   $tmp='';
 
2745
   $tmp .= 'sub do_cmd_BRepistleof{';
 
2746
   $tmp .= '   local($_)=@_;';
 
2747
   $tmp .= '   $_;';
 
2748
   $tmp .= '}';
 
2749
   eval($tmp);
 
2750
   $tmp='';
 
2751
   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
 
2752
   $tmp .= '   local($_)=@_;';
 
2753
   $tmp .= '   local($title);';
 
2754
   $tmp .= '   $title = &missing_braces unless';
 
2755
   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
 
2756
   $tmp .= '   $title . $_;';
 
2757
   $tmp .= '}';
 
2758
   eval($tmp);
 
2759
   $tmp='';
 
2760
   $tmp .= 'sub do_cmd_BRchapterstyle{';
 
2761
   $tmp .= '   local($_)=@_;';
 
2762
   $tmp .= '   local($num);';
 
2763
   $tmp .= '   $num = &missing_braces unless';
 
2764
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2765
   $tmp .= '   &froman($num) . $_;';
 
2766
   $tmp .= '}';
 
2767
   eval($tmp);
 
2768
   $tmp='';
 
2769
   $tmp .= 'sub do_cmd_BRversestyle{';
 
2770
   $tmp .= '   local($_)=@_;';
 
2771
   $tmp .= '   local($num);';
 
2772
   $tmp .= '   $num = &missing_braces unless';
 
2773
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2774
   $tmp .= '   $num . $_;';
 
2775
   $tmp .= '}';
 
2776
   eval($tmp);
 
2777
   $tmp='';
 
2778
   $tmp .= 'sub do_cmd_BRbkchsep{';
 
2779
   $tmp .= '   local($_)=@_;';
 
2780
   $tmp .= '   " " . $_;';
 
2781
   $tmp .= '}';
 
2782
   eval($tmp);
 
2783
   $tmp='';
 
2784
   $tmp .= 'sub do_cmd_BRchvsep{';
 
2785
   $tmp .= '   local($_)=@_;';
 
2786
   $tmp .= '   join("", ".", $_);';
 
2787
   $tmp .= '}';
 
2788
   eval($tmp);
 
2789
   $tmp='';
 
2790
   $tmp .= 'sub do_cmd_BRchsep{';
 
2791
   $tmp .= '   local($_)=@_;';
 
2792
   $tmp .= '   "; " . $_;';
 
2793
   $tmp .= '}';
 
2794
   eval($tmp);
 
2795
   $tmp='';
 
2796
   $tmp .= 'sub do_cmd_BRvrsep{';
 
2797
   $tmp .= '   local($_)=@_;';
 
2798
   $tmp .= '   &translate_commands("--") . $_;';
 
2799
   $tmp .= '}';
 
2800
   eval($tmp);
 
2801
   $tmp='';
 
2802
   $tmp .= 'sub do_cmd_BRvsep{';
 
2803
   $tmp .= '   local($_)=@_;';
 
2804
   $tmp .= '   "," . $_;';
 
2805
   $tmp .= '}';
 
2806
   eval($tmp);
 
2807
   $tmp='';
 
2808
   $tmp .= 'sub do_cmd_BRperiod{';
 
2809
   $tmp .= '   local($_)=@_;';
 
2810
   $tmp .= '   ".$_";';
 
2811
   $tmp .= '}';
 
2812
}
 
2813
 
 
2814
sub brs_chicago{
 
2815
   local($tmp)='';
 
2816
   &do_cmd_braltabbrvname;
 
2817
 
 
2818
   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
 
2819
   $tmp .= '   local($_) = @_;';
 
2820
   $tmp .= '   local($num);';
 
2821
   $tmp .= '   $num = &missing_braces unless';
 
2822
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2823
   $tmp .= '   join(" ", $num, $_);';
 
2824
   $tmp .= '}';
 
2825
   eval($tmp);
 
2826
   $tmp='';
 
2827
   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
 
2828
   $tmp .= '   local($_) = @_;';
 
2829
   $tmp .= '   local($num);';
 
2830
   $tmp .= '   $num = &missing_braces unless';
 
2831
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2832
   $tmp .= '   join(" ", $num, $_);';
 
2833
   $tmp .= '}';
 
2834
   eval($tmp);
 
2835
   $tmp='';
 
2836
   $tmp .= 'sub do_cmd_BRbookof{';
 
2837
   $tmp .= '   local($_)=@_;';
 
2838
   $tmp .= '   $_;';
 
2839
   $tmp .= '}';
 
2840
   eval($tmp);
 
2841
   $tmp='';
 
2842
   $tmp .= 'sub do_cmd_BRgospel{';
 
2843
   $tmp .= '   local($_)=@_;';
 
2844
   $tmp .= '   $_;';
 
2845
   $tmp .= '}';
 
2846
   eval($tmp);
 
2847
   $tmp='';
 
2848
   $tmp .= 'sub do_cmd_BRepistleto{';
 
2849
   $tmp .= '   local($_)=@_;';
 
2850
   $tmp .= '   $_;';
 
2851
   $tmp .= '}';
 
2852
   eval($tmp);
 
2853
   $tmp='';
 
2854
   $tmp .= 'sub do_cmd_BRepistletothe{';
 
2855
   $tmp .= '   local($_)=@_;';
 
2856
   $tmp .= '   $_;';
 
2857
   $tmp .= '}';
 
2858
   eval($tmp);
 
2859
   $tmp='';
 
2860
   $tmp .= 'sub do_cmd_BRepistleof{';
 
2861
   $tmp .= '   local($_)=@_;';
 
2862
   $tmp .= '   $_;';
 
2863
   $tmp .= '}';
 
2864
   eval($tmp);
 
2865
   $tmp='';
 
2866
   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
 
2867
   $tmp .= '   local($_)=@_;';
 
2868
   $tmp .= '   local($title);';
 
2869
   $tmp .= '   $title = &missing_braces unless';
 
2870
   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
 
2871
   $tmp .= '   $title . $_;';
 
2872
   $tmp .= '}';
 
2873
   eval($tmp);
 
2874
   $tmp='';
 
2875
   $tmp .= 'sub do_cmd_BRchapterstyle{';
 
2876
   $tmp .= '   local($_)=@_;';
 
2877
   $tmp .= '   local($num);';
 
2878
   $tmp .= '   $num = &missing_braces unless';
 
2879
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2880
   $tmp .= '   &froman($num) . $_;';
 
2881
   $tmp .= '}';
 
2882
   eval($tmp);
 
2883
   $tmp='';
 
2884
   $tmp .= 'sub do_cmd_BRversestyle{';
 
2885
   $tmp .= '   local($_)=@_;';
 
2886
   $tmp .= '   local($num);';
 
2887
   $tmp .= '   $num = &missing_braces unless';
 
2888
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;\'\'/eo;';
 
2889
   $tmp .= '   $num . $_;';
 
2890
   $tmp .= '}';
 
2891
   eval($tmp);
 
2892
   $tmp='';
 
2893
   $tmp .= 'sub do_cmd_BRbkchsep{';
 
2894
   $tmp .= '   local($_)=@_;';
 
2895
   $tmp .= '   " " . $_;';
 
2896
   $tmp .= '}';
 
2897
   eval($tmp);
 
2898
   $tmp='';
 
2899
   $tmp .= 'sub do_cmd_BRchvsep{';
 
2900
   $tmp .= '   local($_)=@_;';
 
2901
   $tmp .= '   join("", ":", $_);';
 
2902
   $tmp .= '}';
 
2903
   eval($tmp);
 
2904
   $tmp='';
 
2905
   $tmp .= 'sub do_cmd_BRchsep{';
 
2906
   $tmp .= '   local($_)=@_;';
 
2907
   $tmp .= '   "; " . $_;';
 
2908
   $tmp .= '}';
 
2909
   eval($tmp);
 
2910
   $tmp='';
 
2911
   $tmp .= 'sub do_cmd_BRvrsep{';
 
2912
   $tmp .= '   local($_)=@_;';
 
2913
   $tmp .= '   &translate_commands("--") . $_;';
 
2914
   $tmp .= '}';
 
2915
   eval($tmp);
 
2916
   $tmp='';
 
2917
   $tmp .= 'sub do_cmd_BRvsep{';
 
2918
   $tmp .= '   local($_)=@_;';
 
2919
   $tmp .= '   "," . $_;';
 
2920
   $tmp .= '}';
 
2921
   eval($tmp);
 
2922
   $tmp='';
 
2923
   $tmp .= 'sub do_cmd_BRperiod{';
 
2924
   $tmp .= '   local($_)=@_;';
 
2925
   $tmp .= '   ".$_";';
 
2926
   $tmp .= '}';
 
2927
}
 
2928
 
 
2929
sub brs_long{
 
2930
   local($tmp)='';
 
2931
   &do_cmd_brfullname;
 
2932
 
 
2933
   $tmp .= 'sub do_cmd_BRbooknumberstyle{';
 
2934
   $tmp .= '   local($_) = @_;';
 
2935
   $tmp .= '   local($num,$id);';
 
2936
   $tmp .= '   $num = &missing_braces unless';
 
2937
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
 
2938
   $tmp .= '   "\\Ordinalstringnum$OP$id$CP$num$OP$id$CP " . $_;';
 
2939
   $tmp .= '}';
 
2940
   eval($tmp);
 
2941
   $tmp='';
 
2942
   $tmp .= 'sub do_cmd_BRepistlenumberstyle{';
 
2943
   $tmp .= '   local($_) = @_;';
 
2944
   $tmp .= '   local($num,$id);';
 
2945
   $tmp .= '   $num = &missing_braces unless';
 
2946
   $tmp .= '               s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
 
2947
   $tmp .= '   "\\Ordinalstringnum$OP$id$CP$num$OP$id$CP " . $_;';
 
2948
   $tmp .= '}';
 
2949
   eval($tmp);
 
2950
   $tmp='';
 
2951
   $tmp .= 'sub do_cmd_BRbookof{';
 
2952
   $tmp .= '   local($_)=@_;';
 
2953
   $tmp .= '   join(" ", "Book of",$_);';
 
2954
   $tmp .= '}';
 
2955
   eval($tmp);
 
2956
   $tmp='';
 
2957
   $tmp .= 'sub do_cmd_BRgospel{';
 
2958
   $tmp .= '   local($_)=@_;';
 
2959
   $tmp .= '   join(" ", "Gospel according to St",$_);';
 
2960
   $tmp .= '}';
 
2961
   eval($tmp);
 
2962
   $tmp='';
 
2963
   $tmp .= 'sub do_cmd_BRepistleto{';
 
2964
   $tmp .= '   local($_)=@_;';
 
2965
   $tmp .= '   join(" ", "Epistle to",$_);';
 
2966
   $tmp .= '}';
 
2967
   eval($tmp);
 
2968
   $tmp='';
 
2969
   $tmp .= 'sub do_cmd_BRepistletothe{';
 
2970
   $tmp .= '   local($_)=@_;';
 
2971
   $tmp .= '   join(" ", "Epistle to the", $_);';
 
2972
   $tmp .= '}';
 
2973
   eval($tmp);
 
2974
   $tmp='';
 
2975
   $tmp .= 'sub do_cmd_BRepistleof{';
 
2976
   $tmp .= '   local($_)=@_;';
 
2977
   $tmp .= '   join(" ", "Epistle of",$_);';
 
2978
   $tmp .= '}';
 
2979
   eval($tmp);
 
2980
   $tmp='';
 
2981
   $tmp .= 'sub do_cmd_BRbooktitlestyle{';
 
2982
   $tmp .= '   local($_)=@_;';
 
2983
   $tmp .= '   local($title);';
 
2984
   $tmp .= '   $title = &missing_braces unless';
 
2985
   $tmp .= '              s/$next_pair_pr_rx/$title=$2;\'\'/eo;';
 
2986
   $tmp .= '   $title . $_;';
 
2987
   $tmp .= '}';
 
2988
   eval($tmp);
 
2989
   $tmp='';
 
2990
   $tmp .= 'sub do_cmd_BRchapterstyle{';
 
2991
   $tmp .= '   local($_)=@_;';
 
2992
   $tmp .= '   local($num,$id);';
 
2993
   $tmp .= '   $num = &missing_braces unless';
 
2994
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
 
2995
   $tmp .= '   join(" ", "chapter \\numberstring$OP$id$CP$num$OP$id$CP", $_);';
 
2996
   $tmp .= '}';
 
2997
   eval($tmp);
 
2998
   $tmp='';
 
2999
   $tmp .= 'sub do_cmd_BRversestyle{';
 
3000
   $tmp .= '   local($_)=@_;';
 
3001
   $tmp .= '   local($num,$id);';
 
3002
   $tmp .= '   $num = &missing_braces unless';
 
3003
   $tmp .= '              s/$next_pair_pr_rx/$num=$2;$id=$1;\'\'/eo;';
 
3004
   $tmp .= '   join(" ", "chapter \\numberstring$OP$id$CP$num$OP$id$CP", $_);';
 
3005
   $tmp .= '}';
 
3006
   eval($tmp);
 
3007
   $tmp='';
 
3008
   $tmp .= 'sub do_cmd_BRbkchsep{';
 
3009
   $tmp .= '   local($_)=@_;';
 
3010
   $tmp .= '   ", " . $_;';
 
3011
   $tmp .= '}';
 
3012
   eval($tmp);
 
3013
   $tmp='';
 
3014
   $tmp .= 'sub do_cmd_BRchvsep{';
 
3015
   $tmp .= '   local($_)=@_;';
 
3016
   $tmp .= '   " verse " . $_;';
 
3017
   $tmp .= '}';
 
3018
   eval($tmp);
 
3019
   $tmp='';
 
3020
   $tmp .= 'sub do_cmd_BRchsep{';
 
3021
   $tmp .= '   local($_)=@_;';
 
3022
   $tmp .= '   \', \' . $_;';
 
3023
   $tmp .= '}';
 
3024
   eval($tmp);
 
3025
   $tmp='';
 
3026
   $tmp .= 'sub do_cmd_BRvrsep{';
 
3027
   $tmp .= '   local($_)=@_;';
 
3028
   $tmp .= '   " to " . $_;';
 
3029
   $tmp .= '}';
 
3030
   eval($tmp);
 
3031
   $tmp='';
 
3032
   $tmp .= 'sub do_cmd_BRvsep{';
 
3033
   $tmp .= '   local($_)=@_;';
 
3034
   $tmp .= '   ", " . $_;';
 
3035
   $tmp .= '}';
 
3036
   eval($tmp);
 
3037
   $tmp='';
 
3038
   $tmp .= 'sub do_cmd_BRperiod{';
 
3039
   $tmp .= '   local($_)=@_;';
 
3040
   $tmp .= '   $_;';
 
3041
   $tmp .= '}';
 
3042
}
 
3043
 
 
3044
sub do_bibleref_default{
 
3045
   &brs_default;
 
3046
}
 
3047
 
 
3048
sub do_bibleref_jerusalem{
 
3049
   &brs_jerusalem;
 
3050
}
 
3051
 
 
3052
sub do_bibleref_anglosaxon{
 
3053
   &brs_anglosaxon;
 
3054
}
 
3055
 
 
3056
sub do_bibleref_JEH{
 
3057
   &brs_JEH;
 
3058
}
 
3059
 
 
3060
sub do_bibleref_MHRA{
 
3061
   &brs_MHRA;
 
3062
}
 
3063
 
 
3064
sub do_bibleref_NTG{
 
3065
   &brs_NTG;
 
3066
}
 
3067
 
 
3068
sub do_bibleref_MLA{
 
3069
   &brs_MLA;
 
3070
}
 
3071
 
 
3072
sub do_bibleref_chicago{
 
3073
   &brs_chicago;
 
3074
}
 
3075
 
 
3076
sub do_bibleref_text{
 
3077
   &brs_chicago;
 
3078
}
 
3079
 
 
3080
sub do_cmd_newbiblerefstyle{
 
3081
   local($_)=@_;
 
3082
   local($style,$cmds);
 
3083
   $style = &missing_braces unless
 
3084
              s/$next_pair_pr_rx/$style=$2;''/eo;
 
3085
 
 
3086
   &write_warnings("\n\\newbiblerefstyle not implemented");
 
3087
 
 
3088
   $_;
 
3089
}
 
3090
 
 
3091
sub do_cmd_setbooktitle{
 
3092
   local($_)=@_;
 
3093
   local($name,$title);
 
3094
 
 
3095
   $name = &missing_braces unless 
 
3096
              s/$next_pair_pr_rx/$name=$2;''/eo;
 
3097
   $title = &missing_braces unless 
 
3098
              s/$next_pair_pr_rx/$title=$2;''/eo;
 
3099
 
 
3100
   if (defined $bookname{$name})
 
3101
   {
 
3102
      $bookname{$name}=$title;
 
3103
   }
 
3104
   else
 
3105
   {
 
3106
      &write_warnings("\nUnknown book '$name'");
 
3107
   }
 
3108
 
 
3109
   $_;
 
3110
}
 
3111
 
 
3112
sub do_cmd_biblerefstyle{
 
3113
   local($_)=@_;
 
3114
   local($style);
 
3115
   $style = &missing_braces unless
 
3116
               s/$next_pair_pr_rx/$style=$2;''/eo;
 
3117
 
 
3118
   if (defined "&brs_$style")
 
3119
   {
 
3120
      eval("&brs_$style");
 
3121
   }
 
3122
   else
 
3123
   {
 
3124
      &write_warnings("\nUnknown biblerefstyle '$style'");
 
3125
   }
 
3126
   $_;
 
3127
}
 
3128
 
 
3129
sub do_cmd_bibleverse{
 
3130
   local($_)=@_;
 
3131
   local($book,$id);
 
3132
   local($bibleverse)='';
 
3133
   $book = &missing_braces unless 
 
3134
              s/$next_pair_pr_rx/$book=$2;$id=$1;''/eo;
 
3135
 
 
3136
   if (defined $bookname{$book} or defined $synonym{$book})
 
3137
   {
 
3138
      $book = $synonym{$book} unless defined $bookname{$book};
 
3139
 
 
3140
      $book = $bookname{$book};
 
3141
      $book = "\\BRbooktitlestyle$OP$id$CP$book$OP$id$CP";
 
3142
      $bibleverse .= $book;
 
3143
      $first=1;
 
3144
 
 
3145
      while (s/^(-?)\(([^:]*):([^\)]*)\)//)
 
3146
      {
 
3147
         if ($1 eq '-')
 
3148
         {
 
3149
            $bibleverse .= "\\BRvrsep ";
 
3150
         }
 
3151
         else
 
3152
         {
 
3153
            $bibleverse .= ($first ? "\\BRbkchsep " : "\\BRchsep ");
 
3154
         }
 
3155
         $first=0;
 
3156
         $id = ++$global{'max_id'};
 
3157
         $bibleverse .= "\\BRchapterstyle$OP$id$CP$2$OP$id$CP" if ($2);
 
3158
         $verses = $3;
 
3159
         if ($verses)
 
3160
         {
 
3161
            $bibleverse .= "\\BRchvsep ";
 
3162
            @verses = split /,/, $verses;
 
3163
 
 
3164
            for (my $i = 0; $i <=$#verses; $i++)
 
3165
            {
 
3166
               $verse = $verses[$i];
 
3167
 
 
3168
               $bibleverse .= "\\BRvsep " if ($i > 0);
 
3169
 
 
3170
               if ($verse=~m/(\d+)-(\d+)/)
 
3171
               {
 
3172
                  $id = ++$global{'max_id'};
 
3173
                  $bibleverse .= "\\BRversestyle$OP$id$CP$1$OP$id$CP";
 
3174
                  $bibleverse .= "\\BRvrsep ";
 
3175
                  $id = ++$global{'max_id'};
 
3176
                  $bibleverse .= "\\BRversestyle$OP$id$CP$2$OP$id$CP";
 
3177
               }
 
3178
               else
 
3179
               {
 
3180
                  $id = ++$global{'max_id'};
 
3181
                  $bibleverse .= "\\BRversestyle$OP$id$CP$verse$OP$id$CP";
 
3182
               }
 
3183
            }
 
3184
         }
 
3185
      }
 
3186
 
 
3187
      $bibleverse = &translate_commands($bibleverse);
 
3188
   }
 
3189
   else
 
3190
   {
 
3191
      &write_warnings("\nUnknown book '$book'");
 
3192
   }
 
3193
   join('', $bibleverse, $_);
 
3194
}
 
3195
 
 
3196
1;
 
3197
%    \end{macrocode}
 
3198
%\fi
 
3199
%\iffalse
 
3200
%    \begin{macrocode}
 
3201
%</bibleref.perl>
 
3202
%    \end{macrocode}
 
3203
%\fi
1288
3204
%\Finale
1289
3205
\endinput