home · contact · privacy
Add new pictures, improve marginalia formatting, minor text changes.
[fabulae-addendae] / book.tex
1 \documentclass[a5paper,twoside,openany]{book}
2 \usepackage{geometry}
3 \usepackage{titlesec}
4 \usepackage{graphicx}
5 \usepackage{marginnote}
6 \usepackage{setspace}
7 \usepackage{fancyhdr}
8 \usepackage{tikzpagenodes}
9 \usepackage{everypage}
10 \usepackage[switch*,pagewise,modulo]{lineno}
11 \usepackage{amssymb}
12 \usepackage[classiclatin]{babel}
13 \usepackage{titletoc}
14 \usepackage{ragged2e}
15
16
17 % basic page geoemtry
18 \geometry{
19   a5paper,
20   portrait,
21   inner=25pt,
22   outer=130pt,
23   marginparwidth=85pt,
24   marginparsep=20pt,
25   headsep=10pt,
26   top=50pt,
27   bottom=80pt
28 }
29
30
31 % set default font and line spacing
32 \renewcommand{\rmdefault}{ptm}
33 \linespread{1.5}
34
35
36 % default "empty" style to use for front pages
37 \fancypagestyle{empty}{
38    \fancyhf{} % clear all header and footer fields
39    \renewcommand{\headrulewidth}{0pt}
40    \renewcommand{\footrulewidth}{0pt}
41 }
42
43
44 % redefine \cleardoublepage so the pages created are completely empty
45 \makeatletter
46 \renewcommand{\cleardoublepage}{
47   \clearpage
48   \ifodd\value{page}
49   \else
50     \hbox{}
51     \thispagestyle{empty}
52     \newpage
53   \fi
54 }
55 \makeatother
56
57
58 % title page template
59 \makeatletter
60 \renewcommand{\maketitle}{
61   \begin{titlepage}
62     \begin{center}
63       \MakeUppercase{\LARGE\@author}
64       \\ {\Huge \@title \par}
65       \vspace*{\fill}
66       {\LARGE\@date}
67     \end{center}
68   \end{titlepage}
69 }
70 \makeatother
71
72
73 % formatting of table-of-contents entries
74 \titlecontents{chapter}
75   [0pt] % left margin from left page margin
76   { \thispagestyle{empty}} % above-code / global formatting
77   {} % numbered-entry-format
78   {} % numberless-entry-format
79   { % what happens after title
80     \titlerule*[0.5pc]{.} % a dotted line of 1pc between-dot distances
81     \contentspage % the page number
82   }
83
84
85 % chapter title format
86 \titleformat{\chapter}
87   [hang] % title shape
88   {\large\centering} % title formatting
89   {} % section label (e.g. "Chapter")
90   {0pt} % distance between label and title body
91   {\chappic\MakeUppercase} % code preceding title body
92   [] % code succeeding title body
93 \titlespacing{\chapter}
94   {0pt} % left margin
95   {0pt} % top margin
96   {\baselineskip} % bottom margin
97 \newcommand{\newcontentsname}[1]{  % if we want to customize the ToC title
98   \AtBeginDocument{\renewcommand{\contentsname}{#1}}
99 }
100
101
102 % build first book pages and set up formatting for chapters following
103 \newcommand{\bookstart}{
104   \newgeometry{}
105   \maketitle
106   \cleardoublepage
107   \tableofcontents
108   \cleardoublepage
109   \restoregeometry
110   \linenumbers
111   \AddEverypageHook{\drawmarginsep}
112   \pagestyle{fancy}
113 }
114
115
116 % highly customized \chapter wrapper
117 \newcommand{\mychapter}[3]{ % picture, chapter title, ad capitulum
118   % if picture path given, build \chappic command and \chappicheight, else empty them
119   \ifx&#1& % \ifx checks if succeeding items are the same, i.e. &==& _if_ %1/picture argument is empty
120     \renewcommand{\chappic}{\relax}
121     \settoheight{\chappicheight}{0}
122   \else
123     \renewcommand{\chappic}{\vspace{-2\baselineskip}\\\includegraphics[width=\textwidth]{pics/#1}\\} % beware, carefully calibrated whitespace
124     \settoheight{\chappicheight}{\chappic}
125   \fi
126   % header content
127   \newpage % ensures markboth arguments are correct ones
128   \markboth{#2}{#3}
129   % call chapter with only chapter title, add subtitle below
130   \chapter{#2}
131   \vspace{-\baselineskip}
132   \begin{center}
133   \itshape{#3}
134   \end{center}
135   \vspace*{-\baselineskip}
136   % ensure first paragraph stars non-indented
137   \noindent
138   \\ % necessary for unknown reason to make \noindent work
139 }
140 \newcommand{\chappic}{} % used in \titleformat to insert chapter picture before title body _if_ re_set by chapter command as non-empty
141 \newlength{\chappicheight} % used by marginnote positioning next to chapter picture
142
143
144 % marginalia formatting
145 \renewcommand\linenumberfont{\normalfont\small}
146 \let\oldmarginnote\marginnote
147 \renewcommand\marginnote[1]{
148   \oldmarginnote{\setstretch{1} #1}
149  }
150 \let\oldmarginpar\marginpar
151 \renewcommand\marginpar[1]{
152   \oldmarginpar{\setstretch{1}\RaggedRight #1}
153 }
154 % use \marginnote for marginalia on/next to the chapter pic itself
155 \newlength{\chapterpicnoteoffset}
156 \newcommand{\chapterpicnote}[2]{
157   \setlength{\chapterpicnoteoffset}{\dimexpr-\chappicheight-4\baselineskip}
158   \ifx&#1&
159   \else
160     \setlength{\chapterpicnoteoffset}{\dimexpr+\chapterpicnoteoffset+#1\baselineskip}
161   \fi
162   \ifodd\value{page}
163     \marginnote{\\#2}[\chapterpicnoteoffset]
164   \else
165     \marginnote{\raggedright \\#2}[\chapterpicnoteoffset]
166   \fi
167 }
168
169
170 % default chapter style
171 \fancypagestyle{fancy}{
172   \renewcommand{\headrulewidth}{1pt}
173   \fancyheadoffset[LE]{\dimexpr\marginparsep+\marginparwidth\relax}
174   \fancyheadoffset[RO]{\dimexpr\marginparsep+\marginparwidth\relax}
175   \fancyfootoffset[LE]{\dimexpr\marginparsep+\marginparwidth\relax}
176   \fancyfootoffset[RO]{\dimexpr\marginparsep+\marginparwidth\relax}
177   \fancyhf{} % clear all header and footer fields
178   \fancyhead[LE]{\leftmark}
179   \fancyhead[RO]{\rightmark}
180   \fancyfoot[LE,RO]{\thepage} % page number
181 }
182 \renewcommand{\chaptermark}[1]{\relax} % empty automatically inserted chapter label
183 \assignpagestyle{\chapter}{fancy}
184
185
186 % draw vertical margin separator lines
187 \newlength{\halfmarginparsep}
188 \setlength{\halfmarginparsep}{\dimexpr\marginparsep / 2 \relax}
189 \newcommand{\drawmarginsep}{
190   \begin{tikzpicture}[remember picture, overlay]
191     \ifodd\value{page}
192       \draw [line width=1pt] ([xshift=\halfmarginparsep]current page header area.south east) -- ([xshift=\halfmarginparsep]current page text area.south east);
193     \else
194       \draw [line width=1pt] ([xshift=-\halfmarginparsep]current page header area.south west) -- ([xshift=-\halfmarginparsep]current page text area.south west);
195     \fi
196   \end{tikzpicture}
197 }
198
199
200 % some shortcuts to make the code less obtrusive inside the texts
201 \newcommand{\vs}[1]{\vspace{#1\baselineskip}\\}
202 \newcommand{\vsnonl}[1]{\vspace{#1\baselineskip}}
203 \newcommand{\marpicnonl}[2]{\includegraphics[width=#1\marginparwidth]{pics/#2}}
204 \newcommand{\marpic}[2]{\marpicnonl{#1}{#2}\\}
205
206
207 \title{FABVLAE ADDENDAE}
208 \author{plomlompom}
209 \date{MMXXIII}
210 \newcontentsname{INDEX FABVLARVM}
211 \begin{document}
212 \bookstart
213 \mychapter{provrom.png}{PROVINCIAE ROMANAE}{AD CAPITVLVM I}
214 \chapterpicnote{}{
215 littera Rōmāna: V
216 \vs{}
217 litterae \emph{nōn} Rōmānae: u, U, v
218 \vs{}
219 V/v \emph{et} U/u $\leftarrow$ V
220 \vs{}
221 v = V in\\PROVINCIA (prōvincia)
222 \vs{}
223 u = V in\\CAPITVLVM (capitulum)
224 \vs{3}
225 \emph{ad} capitulum prīmum:
226 \vs{0.5}
227 \marpic{}{frpag1.png}
228 }
229 DIODŌRUS: Ubi est imperium Rōmānum?
230 \\ SEXTUS: In Italiā est.
231 \\ DIODŌRUS: Est. Et ubi est?
232 \\ QUĪNTUS: In Āfricā est. In Galliā quoque est!
233 \\ DIODŌRUS: Est. Suntne prōvinciae Rōmānae, Āfrica et Gallia?
234 \\ SEXTUS, QUĪNTUS: Sunt!
235 \\ DIODŌRUS: Num Germānia quoque prōvincia Rōmāna est?
236 \\ MĀRCUS: Est!
237 \\ DIODŌRUS: Nōn est. Germānia in Eurōpā, sed in imperiō Rōmānō nōn est. Sed magnum imperium Rōmānum est, et multae sunt prō\-vinciae Rōmānae.
238 \\ QUĪNTUS: Numerus magnus est! Nōnne \marginpar{nōnne = nōn-ne} Hispānia quoque prō\-vincia Rōmāna est?
239 \\ DIODŌRUS: Est.
240 \\ SEXTUS: Hispānia magna est. Multa et magna oppida in Hispāniā sunt, et fluvīi multī et magnī!
241 \marginpar{parva $\leftrightarrow$ magna\\pauca $\leftrightarrow$ multa}
242 \\ MĀRCUS: Quid? Pauca oppida in Hispāniā sunt, et fluviī parvī.
243 \\ DIODŌRUS: Pauca oppida in Hispāniā sunt, sed non parva. Parvī sunt fluviī, sed nōn paucī. Magnae silvae quoque in Hispāniā sunt.
244 \\ QUĪNTUS: Nōnne Graecia est prōvincia Rōmāna?
245 \\ DIODŌRUS: Est. Multae sunt īnsulae Graecae in imperiō Rōmānō.
246 \\ MĀRCUS: Sed parvae sunt!
247 \marginpar{\marpic{}{forest.png}silva, silvae}
248 \\ DIODŌRUS: Sunt in Graeciā īnsulae parvae, et sunt quoque īnsulae magnae.
249 \\ QUĪNTUS: Suntne īnsulae Graecae in ōceanō Ātlanticō?
250 \\ MĀRCUS: Sunt!
251 \marginpar{\emph{īnsula} Britannia:\vs{0.5}\marpicnonl{0.5}{britannia-insula.png}\vs{1.5}\emph{nōn} prōvincia \\Britannia:\vs{}\marpic{0.65}{britannia-provincia.png}\emph{prōvincia} Britannia\\(in īnsulā Britanniā)}
252 \\ SEXTUS: Nōn sunt.
253 \\ DIODŌRUS: Num in ōceanō Ātlanticō sunt īnsulae Graecae? Nōn sunt.
254 \\ QUĪNTUS: Suntne īnsulae Rōmānae in ōceanō Ātlanticō?
255 \\ MĀRCUS: Sunt! Nōnne Britannia est?
256 \\ DIODŌRUS: Est īnsula Britannia, et est prōvincia quoque Britannia, in īnsulā Britanniā. Sed īnsula nōn parva est. Sunt multae silvae et multī fluvii in īnsulā, sed nōn in prōvinciā. Silvae et fluviī nōn in prōvinciā nōn sunt Rōmānī. Nōnne prōvincia Britannia Rōmāna est? Est. Num īnsula Rōmāna est?
257 \\ SEXTUS, QUĪNTUS: Nōn est!
258 \\ MĀRCUS: Est!
259 \\ DIODŌRUS: Nōn est.
260
261 \mychapter{domina.png}{DOMINA EVROPAE}{AD CAPITVLVM II}
262 \chapterpicnote{3}{Ecce domina Rōma!}
263 \marginpar{
264 \begin{tikzpicture}[x=0.25\marginparwidth,y=3\baselineskip]
265     \node[align=center] (mater) at (0,2) {māter\\ancilla};
266     \node[align=center] (pater) at (2,2) {pater\\nōn\\servus};
267     \node[align=center] (liberi) at (1,0) {filiae ancillae,\\filiī servī};
268     \draw (mater.south) -- (0,1) -- (1,1) -- (liberi.north);
269     \draw (pater.south) -- (2,1) -- (1,1);
270 \end{tikzpicture}
271 \vs{3}
272 \begin{tikzpicture}[x=0.25\marginparwidth,y=3\baselineskip]
273     \node[align=center] (mater) at (0,2) {māter\\nōn\\ancilla};
274     \node[align=center] (pater) at (2,2) {pater\\servus};
275     \node[align=center] (liberi) at (1,0) {nōn ancillae,\\nōn servī};
276     \draw (mater.south) -- (0,1) -- (1,1) -- (liberi.north);
277     \draw (pater.south) -- (2,1) -- (1,1);
278 \end{tikzpicture}
279 }
280 Ubi sunt fīliī et fīliae Eurōpae, Āfricae, Asiaeque?
281
282 Sunt in imperiō Rōmānō: Sunt servī et ancillae familiārum Rōmānārum. Magnus numerus est servōrum ancillārumque. Virī Rōmānī dominī servōrum sunt Graecōrum Hispānicōrum Britannicōrum cēterā\-rumque prōvinciārum. Rōma domina est multārum mag\-nārum prōvinciārum. Multae fēminae et multī virī prōvinci\-ārum Rōmae ancillae et servī sunt.
283
284 Līberī Iūliī Aemiliaeque nōn sunt servī, nōn sunt ancillae. Sed multī puerī sunt servī, multae puellae sunt ancillae in imperiō Rō\-mānō. Cuius fīlius servus est? Ancillae fīlius servus est. Estne quoque servī fīlius servus?
285
286 Germānia nōn est prōvincia Rōmāna. Suntne virī Germāniae dominī? Suntne servī? Suntne fēminae Germāniae dominae? Suntne ancillae?
287
288 \mychapter{}{LIBRI LIBERORVM}{AD CAPITVLVM II}
289 \marginpar{librī $\neq$ līberī}
290 Ecce liber antīquus. Est liber Iūliae. Quis est titulus librī puellae? ``Fēminae antīquae'' est. Quot vocābula in titulō sunt librī antīquī? Duo.
291
292 Ecce liber novus. Est liber Quīntī. Quis est titulus librī puerī? ``Virī imperiī Rōmānī'' est. Quot vocābula in titulō librī novī sunt? Tria sunt. Quot syllabae in vocābulō sunt prīmō? Duae sunt.
293 \marginpar{\marpic{0.5}{single-book.png}ūnus liber\vs{}\marpic{0.5}{two-books.png}duo librī}
294
295 Iūlia et Quīntus fīlia fīliusque sunt. Fīliae et fīliī līberī sunt. Librī Iūliae Quīntīque sunt librī līberōrum.
296
297 Quot sunt librī līberōrum? Num trēs sunt? Nōn trēs, sed duo sunt. Quot sunt librī novī? Ūnus est.
298
299 Quot sunt pāginae librōrum līberōrum? Centum sunt. Quot sunt capitula in librō Iūliae? Sex sunt. Quot sunt vocābula in librō puerī? Mīlle sunt.
300
301 Quīntus: ``Ecce liber meus magnus est!''
302 \marginpar{\marpic{0.5}{child.png}ūnus …?\vs{}\marpic{0.5}{children.png}duo līberī}
303
304 Iūlia: ``Liber tuus nōn magnus, sed parvus est. Liber meus magnus est.''
305
306 Quīntus: ``Pāginae librī meī sunt multae. Pāginae librī tuī paucae sunt.''
307
308 Iūlia: ``Sed pāginae librī meī sunt magnae, et sunt parvae pāginae librī tuī.''
309
310 Quī sunt titulī librōrum līberōrum? Suntne Iūlia Quīntusque līberī librōrum?
311
312 \mychapter{}{NVM DOMINVS PLORAT?}{AD CAPITVLVM III}
313 Batiātus, quī dominus est, dormit.
314 \marginpar{\marpic{0.9}{pulsat.png}Batiātus \emph{pulsat}.}
315
316 Naevia, quae ancilla est, cantat. Iam nōn dormit Batiātus, quia eam audit. Īrātus venit et pulsat quam audit. Plōrat Naevia.
317
318 Crīxus, quī servus est, rīdet. Batiātus, quī eum audit, vocat: ``Servus probus nōn rīdet!'' Pulsat Crīxum. Plōrat Crīxus. Vocat Batiātus: ``Vir nōn plōrat!'' Crīxum verberat. Iam nōn plōrat Crīxus.
319
320 Venit Spartacus, quī quoque servus est. Videt Naeviam Crīxum\-que, quem interrogat: ``Cūr plōrat Naevia? Pulsatne eam Batiātus?'' Respondet Crīxus: ``Eam pulsat. Mē verberat.'' Spartacus eum interrogat: ``Quid? Tē verberat? Cūr Crīxus nōn Batiātum verberat? Vir probus verberat virum quī fē\-minam pulsat!'' Crīxus respondet: ``Quia servus dominum nōn verberat.'' Spartacus īrātus est.
321
322 Dormit Batiātus. Venit Spartacus. Verberat Batiātum.
323
324 \marginpar{Est Naevia \emph{quam} Batiātus pulsat.\vs{}Est Batiātus \emph{quem} Spartacus verberat.\vs{}Est \emph{quod} Naevia videt:\vs{0.5}\marpicnonl{}{beating.png}}
325
326 Venit Crīxus, videt Spartacum, et videt Batiātum, quī plōrat et quem verberat Spartacus. Rīdet Crīxus et vocat: ``Vir nōn plōrat!'' Batiātum verberat quoque.
327
328 Venit Naevia. Ecce servus verberat dominum, et plōrat dominus! Naevia, quae rīdet, pulsat Batiātum. Vocat: ``Dominus quī plōrat et quem verberat servus nōn dominus est, sed servus!'' Cantat: ``Iam Spartacus Crīxusque dominī sunt, et Naevia domina est, et Batiātus servus meus est! Hahahae!''
329
330 \mychapter{}{DOMINI NOVI}{AD CAPITVLVM IV}
331 Crīxus: ``Batiāte, ubi est pecūnia?''
332
333 Batiātus tacet. Spartacus sūmit baculum Batiātī, Batiātumque rūrsus verberat. Is vocat: ``Batiāte!'' Batiātus nullum vocābulum respondet, sed plōrat.
334
335 Naevia: ``Ecce sacculum eius! Vidē, hīc!'' Batiātus habet sacculum, Naevia eum sūmit.
336
337 Spartacus imperat: ``In mēnsā eum pōne!'' Naevia: ``Nōn sacculus tuus, sed meus est.'' Spartacus rūrsus imperat: ``Eum pōne!'' Naevia tacet, et pāret.
338
339 Sunt nummī in sacculō. Crīxus: ``Quot nummī sunt?'' Naevia numerat: ``Sunt decem nummī!'' Sunt laetī Spartacus, Crīxus, Naeviaque, quia numerus nummōrum magnus est.
340
341 Sed sunt trēs hominēs Naevia Spartacus Crīxusque. Quem numerum nummōrum habet unus homō?
342 \marginpar{\marpic{0.75}{vitruvian.png}homō, hominēs}
343
344 Sūmit Spartacus prīmum nummum. ``Sūme nummum secundum, Crīxe.'' Is sūmit. ``Sūme nummum tertium, Naevia.'' Sūmit.
345
346 Sunt septem nummī in sacculō. Rūrsus ūnum sūmit Spartacus, rūrsus sūmit ūnum Crīxus, rūrsus sūmit ūnum Naevia.
347
348 Sunt quattuor nummī in sacculō. Rūrsus ūnum sūmit Spartacus, rūrsus sūmit ūnum Crīxus, rūrsus sūmit ūnum Naevia.
349
350 Est ūnus nummus cēterus in sacculō. Cuius nummus est? Tacet Spartacus, tacet Crīxus, tacet Naevia.
351
352 Rīdet Crīxus, et sūmit nummum. Īrātus est Spartacus, īrāta est Naevia. Sūmit baculum Spartacus.
353
354 Sed ecce, pōnit Crīxus nummum in Batiātō. Iam rīdet Spartacus, iam rīdet Naevia. Crīxus: ``Probus servus est Batiātus. Batiāte, probe serve – sūme nummum tuum!'' Tacet Batiātus, et pāret.
355 \end{document}