diff --git a/custom/fic.el b/custom/fic.el
index 628ae0c..523c964 100644
--- a/custom/fic.el
+++ b/custom/fic.el
@@ -68,7 +68,7 @@
(goto-char (point-min))
(while (re-search-forward "\\[fn:\\([0-9]*\\):\\([^•]*\\)•\\]" nil t)
(replace-match "@@html:@@@@latex:\\\\footnote{@@\\2@@html:@@@@latex:}@@"))
- (let ((user-full-name "Tré")
+ (let ((user-full-name "“Tré”")
(org-html-head "\n\n\n\n\n\n\n\n\n\n")
(org-export-with-author t)
(org-latex-default-class "memoir"))
@@ -210,38 +210,46 @@
(goto-char (point-min))
(while (re-search-forward "\\\\begin{document}" nil t)
(replace-match "\\\\begin{document}\n\\\\chapter\*{\\\\thetitle}"))))))
- (if multichapter
- (if title
- (if chaptertitles
+ (if asal
+ (progn
+ (goto-char (point-min))
+ (while (re-search-forward "\\\\begin{document}" nil t)
+ (replace-match "\\begin{document}\n\\pagestyle{empty}" nil t))
+ (goto-char (point-min))
+ (while (re-search-forward "\\\\end{titlingpage}" nil t)
+ (replace-match "\\end{titlingpage}\n\\pagestyle{multititlechapters}\n\\tableofcontents\*" nil t)))
+ (if multichapter
+ (if title
+ (if chaptertitles
+ (progn
+ (goto-char (point-min))
+ (while (re-search-forward "\\\\begin{document}" nil t)
+ (replace-match "\\begin{document}\n\\pagestyle{multititlechapters}" nil t))
+ (goto-char (point-min))
+ (while (re-search-forward "\\\\end{titlingpage}" nil t)
+ (replace-match "\\end{titlingpage}\n\\tableofcontents\*" nil t)))
(progn
(goto-char (point-min))
(while (re-search-forward "\\\\begin{document}" nil t)
- (replace-match "\\begin{document}\n\\pagestyle{multititlechapters}" nil t))
+ (replace-match "\\begin{document}\n\\pagestyle{multititlenochapters}" nil t))))
+ (if chaptertitles
+ (progn
(goto-char (point-min))
- (while (re-search-forward "\\\\end{titlingpage}" nil t)
- (replace-match "\\end{titlingpage}\n\\tableofcontents\*" nil t)))
- (progn
- (goto-char (point-min))
- (while (re-search-forward "\\\\begin{document}" nil t)
- (replace-match "\\begin{document}\n\\pagestyle{multititlenochapters}" nil t))))
- (if chaptertitles
- (progn
+ (while (re-search-forward "\\\\begin{document}" nil t)
+ (replace-match "\\begin{document}\n\\pagestyle{multinotitlechapters}\n\\tableofcontents\*" nil t)))
+ (progn
(goto-char (point-min))
(while (re-search-forward "\\\\begin{document}" nil t)
- (replace-match "\\begin{document}\n\\pagestyle{multinotitlechapters}\n\\tableofcontents\*" nil t)))
+ (replace-match "\\begin{document}\n\\pagestyle{multinotitlenochapters}" nil t)))))
+ (if title
(progn
- (goto-char (point-min))
- (while (re-search-forward "\\\\begin{document}" nil t)
- (replace-match "\\begin{document}\n\\pagestyle{multinotitlenochapters}" nil t)))))
- (if title
+ (goto-char (point-min))
+ (while (re-search-forward "\\\\begin{document}" nil t)
+ (replace-match "\\begin{document}\n\\pagestyle{singletitle}" nil t)))
(progn
(goto-char (point-min))
(while (re-search-forward "\\\\begin{document}" nil t)
- (replace-match "\\begin{document}\n\\pagestyle{singletitle}" nil t)))
- (progn
- (goto-char (point-min))
- (while (re-search-forward "\\\\begin{document}" nil t)
- (replace-match "\\begin{document}\n\\pagestyle{plain}" nil t)))))
+ (replace-match "\\begin{document}\n\\pagestyle{plain}" nil t))))))
(goto-char (point-max))
(save-buffer)
;; (unless draftmode
diff --git a/fic-export-files/header.tex b/fic-export-files/header.tex
index cd37431..ca2c527 100644
--- a/fic-export-files/header.tex
+++ b/fic-export-files/header.tex
@@ -105,14 +105,19 @@
\vspace*{0.1\textheight}
\endgroup}
-\newcommand*{\titleasal}{\begingroup
+\newcommand*{\titleasal}{
+ \begin{center}
+ {\scshape A Shot At Life}
+ \end{center}
+ \cleardoublepage
+ \begingroup
\begin{minipage}{0.05\textwidth}
\color{red}
\rule{6pt}{\textheight}
\end{minipage}
\hspace{0.05\textwidth}
\begin{minipage}{0.6\textwidth}
- {\Large TRÉ} \\
+ {\Large ``TRÉ''} \\
\rule{0.9\textwidth}{1pt} \par
\vspace{3\baselineskip}
{\noindent\Huge\bfseries A SHOT} \par
@@ -123,7 +128,7 @@
\vspace{0.4\baselineskip}
\rule{0.9\textwidth}{1pt} \par
\vspace{\baselineskip}
- {\Large \the\year}
+ {\Large 2025}
\end{minipage}
\hfill
\begin{minipage}{0.15\textwidth}
@@ -136,4 +141,25 @@
{\yevon E}
}\par
\end{minipage}
- \endgroup}
\ No newline at end of file
+ \endgroup
+ \begin{center}
+ {\yevon A}
+ \end{center}
+ \vspace*{\fill}
+ \noindent
+ Written in 2021--2025, at approximately 54.6,-5.9.
+
+ \noindent
+ Typeset by the author in Linux Libertine, Noto Sans, and FFXYevon, using Emacs and
+ \LaTeX.
+
+ \noindent
+ This work of fanfiction is licensed under \textbf{Creative Commons
+ Attribution-NonCommercial 4.0 International}.
+
+ \noindent
+ For chapter summaries, warnings, metadata, and additional
+ information, see \url{https://tre.praze.net/ffx/asal}.
+
+ \noindent
+{\scriptsize{\yevon Now is the time to shape your stories Your fate is in your hands!}}}
\ No newline at end of file