Adjust gitignore
This commit is contained in:
parent
0508cb4d83
commit
8d00e466f0
3 changed files with 1110 additions and 1 deletions
7
.gitignore
vendored
7
.gitignore
vendored
|
|
@ -1,4 +1,9 @@
|
|||
auto/*
|
||||
daisho.epub
|
||||
daisho.html
|
||||
daisho.pdf
|
||||
daisho.pdf
|
||||
script/auto/*
|
||||
script/script.aux
|
||||
script/script.log
|
||||
script/script.pdf
|
||||
|
||||
|
|
|
|||
411
script/script.tex
Normal file
411
script/script.tex
Normal file
|
|
@ -0,0 +1,411 @@
|
|||
\documentclass[twoside]{article}
|
||||
\usepackage{geometry}
|
||||
\geometry{a5paper}
|
||||
\usepackage{mathspec}
|
||||
\setmainfont{TeX Gyre Pagella}
|
||||
\setmathfont(Digits){TeX Gyre Pagella Math}
|
||||
\setmathfont(Latin,Greek){TeX Gyre Pagella}
|
||||
\usepackage{microtype}
|
||||
\usepackage[characterstyle=arden]{thalie}
|
||||
\usepackage[modulo,right]{lineno}
|
||||
\usepackage{fancyhdr}
|
||||
\pagestyle{fancy}
|
||||
\fancyhf{}
|
||||
\fancyhead[RO]{%
|
||||
\textit{\MakeUppercase{%
|
||||
Act \thesection{}, %
|
||||
Scene \thesubsection%
|
||||
}}%
|
||||
}
|
||||
\fancyhead[LE]{\leftmark}
|
||||
\fancyfoot[LE,RO]{\thepage}
|
||||
\usepackage{polyglossia}
|
||||
\setdefaultlanguage{english}
|
||||
|
||||
|
||||
|
||||
\begin{document}
|
||||
|
||||
\nolinenumbers
|
||||
|
||||
\play{Final Fantasy X}
|
||||
|
||||
\section*{Cast}
|
||||
|
||||
\begin{dramatis}
|
||||
\character[cmd={tidus},desc={star of the Zanarkand Abes}]{Tidus}
|
||||
\characterspace
|
||||
\character[cmd={yuna},desc={a summoner}]{Yuna}
|
||||
\begin{charactergroup}{her guardians}
|
||||
\character[cmd={lulu},desc={a black mage}]{Lulu}
|
||||
\character[cmd={wakka},desc={captain of the Besaid Aurochs}]{Wakka}
|
||||
\character[cmd={kimahri},drama={Kimahri Ronso}]{Kimahri}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\character[cmd={braska},desc={Yuna's father}]{Braska}
|
||||
\begin{charactergroup}{his guardians}
|
||||
\character[cmd={auron}]{Auron}
|
||||
\character[cmd={jecht},desc={Tidus' father}]{Jecht}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\character[cmd={rikku},desc={an Al Bhed}]{Rikku}
|
||||
\character[cmd={cid},desc={her father}]{Cid}
|
||||
\character[cmd={brother},desc={Rikku's brother}]{Brother}
|
||||
\characterspace
|
||||
\begin{charactergroup}{maesters of Yevon}
|
||||
\character[cmd={mika},drama={Yo Mika},desc={Grand Maester}]{Mika}
|
||||
\character[cmd={seymour},drama={Seymour Guado}]{Seymour}
|
||||
\character[cmd={kelk},drama={Kelk Ronso}]{Kelk}
|
||||
\character[cmd={kinoc},drama={Wen Kinoc},desc={Auron's friend}]{Kinoc}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\begin{charactergroup}{Crusaders}
|
||||
\character[cmd={luzzu}]{Luzzu}
|
||||
\character[cmd={gatta}]{Gatta}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\begin{charactergroup}{chocobo knights}
|
||||
\character[cmd={lucil},desc={captain}]{Lucil}
|
||||
\character[cmd={elma}]{Elma}
|
||||
\character[cmd={clasko}]{Clasko}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\character[cmd={dona},desc={a summoner}]{Dona}
|
||||
\character[cmd={barthello},desc={her guardian}]{Barthello}
|
||||
\characterspace
|
||||
\character[cmd={isaaru},desc={a summoner}]{Isaaru}
|
||||
\begin{charactergroup}{his brothers and guardians}
|
||||
\character[cmd={maroda}]{Maroda}
|
||||
\character[cmd={pacce}]{Pacce}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\character[cmd={belgemine},desc={a summoner}]{Belgemine}
|
||||
\characterspace
|
||||
\begin{charactergroup}{the Besaid Aurochs}
|
||||
\character[cmd={botta}]{Botta}
|
||||
\character[cmd={datto}]{Datto}
|
||||
\character[cmd={jassu}]{Jassu}
|
||||
\character[cmd={keepa}]{Keepa}
|
||||
\character[cmd={letty}]{Letty}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\begin{charactergroup}{the Luca Goers}
|
||||
\character[cmd={bickson}]{Bickson}
|
||||
\character[cmd={graav}]{Graav}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\begin{charactergroup}{blitzball commentators}
|
||||
\character[cmd={bobba}]{Bobba}
|
||||
\character[cmd={jimma}]{Jimma}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\begin{charactergroup}{Kimahri's rivals}
|
||||
\character[cmd={biran},drama={Biran Ronso}]{Biran}
|
||||
\character[cmd={yenke},drama={Yenke Ronso}]{Yenke}
|
||||
\end{charactergroup}
|
||||
\characterspace
|
||||
\character[cmd={oaka},drama={O’aka XXIII},desc={a salesman}]{O’aka}
|
||||
\character[cmd={wantz},desc={his brother}]{Wantz}
|
||||
\characterspace
|
||||
\character[cmd={anima}]{Seymour’s mother}
|
||||
\character[cmd={jyscal},drama={Jyscal Guado},desc={Seymour's
|
||||
father}]{Jyscal}
|
||||
\character[cmd={tromell},drama={Tromell Guado},desc={their
|
||||
retainer}]{Tromell}
|
||||
\characterspace
|
||||
\character[cmd={borra},desc={a musician}]{Borra}
|
||||
\characterspace
|
||||
\character[cmd={calli},desc={a young girl}]{Calli}
|
||||
\characterspace
|
||||
\character[cmd={maechen},desc={a historian}]{Maechen}
|
||||
\characterspace
|
||||
\character[cmd={rin},desc={an Al Bhed merchant}]{Rin}
|
||||
\characterspace
|
||||
\character[cmd={shelinda},desc={an acolyte}]{Shelinda}
|
||||
\characterspace
|
||||
\character[cmd={mom}]{Tidus’ mother}
|
||||
\characterspace
|
||||
\character[cmd={yunalesca},desc={an unsent}]{Yunalesca}
|
||||
\characterspace
|
||||
\character[cmd={zuke},desc={a priest}]{Zuke}
|
||||
\characterspace
|
||||
\begin{charactergroup}{the fayth}
|
||||
\character[cmd={bahamut},drama={Bahamut}]{Bahamut’s fayth}
|
||||
\character[cmd={ifrit},drama={Ifrit}]{Ifrit’s fayth}
|
||||
\character[cmd={ixion},drama={Ixion}]{Ixion’s fayth}
|
||||
\character[cmd={shiva},drama={Shiva}]{Shiva’s fayth}
|
||||
\character[cmd={magus},drama={The Magus Sisters}]{Fayth}
|
||||
\character[cmd={valefor},drama={Valefor}]{Valefor’s fayth}
|
||||
\character[cmd={yojimbo},drama={Yojimbo}]{Yojimbo’s fayth}
|
||||
\end{charactergroup}
|
||||
\end{dramatis}
|
||||
|
||||
\makeatletter % https://tex.stackexchange.com/a/144329
|
||||
\patchcmd{\@startsection}{\@ifstar}{\nolinenumbers\@ifstar}{}{}
|
||||
\patchcmd{\@xsect}{\ignorespaces}{\linenumbers\ignorespaces}{}{}
|
||||
\makeatother
|
||||
|
||||
\linenumbers
|
||||
|
||||
\section{Jecht sphere}
|
||||
|
||||
\subsection{Bevelle, ten years ago}
|
||||
|
||||
\auron
|
||||
What are you taking?
|
||||
|
||||
\jecht
|
||||
Well, you said it was gonna be a long trip.\\
|
||||
We'll be seeing a lot of neat things, right?\\
|
||||
So I thought I'd record it all in this.\\
|
||||
To show to my wife and kid, you know.
|
||||
|
||||
\auron
|
||||
This is no pleasure cruise!
|
||||
|
||||
\jecht
|
||||
Hey, Braska.\\
|
||||
Ain't this supposed to be a grand occasion?\\
|
||||
Where're the cheering fans? The crying women?
|
||||
|
||||
\braska
|
||||
This is it.\\
|
||||
Too many goodbyes~-- people think twice about leaving.
|
||||
|
||||
\jecht
|
||||
Hmm~… If you say so.\\
|
||||
Well, it better be a lot more colorful when we come back.\\
|
||||
A parade for Braska, vanquisher of Sin!
|
||||
|
||||
\braska
|
||||
We should go. Day will break soon.
|
||||
|
||||
\subsection{Macalania, ten years ago}
|
||||
|
||||
\braska
|
||||
Auron, could you stand closer to him?\\
|
||||
Good. That should do it.
|
||||
|
||||
\jecht
|
||||
What's the matter? Afraid I might bite?
|
||||
|
||||
\auron
|
||||
Jecht~…
|
||||
|
||||
\jecht
|
||||
Braska! You should take one, too. It'd make a great gift for little
|
||||
Yuna!
|
||||
|
||||
\braska
|
||||
I suppose.
|
||||
|
||||
\auron
|
||||
Lord Braska~…
|
||||
We shouldn't be wasting our time like this!
|
||||
|
||||
\jecht
|
||||
What's the hurry, man?
|
||||
|
||||
\auron
|
||||
Let me tell you what the hurry is!
|
||||
|
||||
\braska
|
||||
Auron!
|
||||
|
||||
\subsection{Macalania, present day}
|
||||
|
||||
\tidus
|
||||
What's the point? He wasn't on some pleasure cruise.
|
||||
|
||||
\rikku
|
||||
I think there's more.
|
||||
|
||||
\subsection{Macalania, ten years ago}
|
||||
|
||||
\jecht
|
||||
Hey.\\
|
||||
If you're sitting there, watching this~…\\
|
||||
it means you're stuck in Spira, like me.\\
|
||||
You might not know when you'll get back home, but you better not be
|
||||
crying!\\
|
||||
Although, I guess I'd understand. But you know what?\\
|
||||
There's a time when you have to stop crying and move on.\\
|
||||
You'll be fine. Remember, you're my son.\\
|
||||
And~… Well, uh~…\\
|
||||
Never mind. I'm no good at these things.
|
||||
|
||||
\subsection{Macalania, ten years ago}
|
||||
|
||||
\jecht
|
||||
Anyways~…\\
|
||||
I believe in you. Be good.\\
|
||||
Goodbye.
|
||||
|
||||
\subsection{Macalania, present day}
|
||||
|
||||
\tidus
|
||||
He sounded almost serious, but it was too late.
|
||||
|
||||
\auron
|
||||
He was serious.\\
|
||||
Jecht had already accepted his fate.
|
||||
|
||||
\tidus
|
||||
His fate?
|
||||
|
||||
\auron
|
||||
Jecht~… He~…\\
|
||||
He was always talking about going home, to Zanarkand.\\
|
||||
That's why he took all those pictures~– to show them to you when he
|
||||
returned.\\
|
||||
But as he journeyed with us and came to understand Spira, and Braska's
|
||||
resolve~…\\
|
||||
It happened gradually, but Jecht changed.\\
|
||||
He decided he would join Braska in his fight against Sin.
|
||||
|
||||
\tidus
|
||||
So then, he gave up going home?
|
||||
|
||||
\auron
|
||||
That was his decision.
|
||||
|
||||
\begin{dida}
|
||||
I guess I understood.\\
|
||||
My old man~…\\
|
||||
He knew there was no way back home, back to Zanarkand.\\
|
||||
He wanted to go home, but he knew he couldn't.\\
|
||||
He couldn't go on until he accepted it.\\
|
||||
Besides~…\\
|
||||
even if he had found a way back~…\\
|
||||
I don't think he would've left his friends behind before their
|
||||
journey was complete.
|
||||
\end{dida}
|
||||
|
||||
\tidus
|
||||
All right! Let's go, guys!
|
||||
|
||||
\begin{dida}
|
||||
Maybe I had to start accepting my own fate.
|
||||
\end{dida}
|
||||
|
||||
\section{Jecht sphere}
|
||||
|
||||
\subsection{Besaid, ten years ago}
|
||||
|
||||
\jecht
|
||||
Smallest heap of huts I ever seen!
|
||||
|
||||
\braska
|
||||
Now, that looks like a fine place to live.\\
|
||||
Hmm~…\\
|
||||
Auron.
|
||||
|
||||
\auron
|
||||
My lord?
|
||||
|
||||
\braska
|
||||
When this is over, could you bring Yuna here?\\
|
||||
I want her to lead a life far away from this conflict.
|
||||
|
||||
\auron
|
||||
You have my word. I will bring her here.
|
||||
|
||||
\braska
|
||||
Thank you, Auron. You are a good friend.
|
||||
|
||||
\jecht
|
||||
What are you guys doin'? Let's go!\\
|
||||
I'm so hungry I could eat a shoopuf whole!
|
||||
|
||||
\braska
|
||||
Sorry. Well, let's go then.
|
||||
|
||||
\section{Jecht sphere}
|
||||
|
||||
\subsection{On board ship, ten years ago}
|
||||
|
||||
\jecht
|
||||
After you get that aeon from Besaid~…\\
|
||||
Where're we going?
|
||||
|
||||
\auron
|
||||
Back the way we came.\\
|
||||
Then we go north from Bevelle and climb Mt.\ Gagazet.
|
||||
|
||||
\braska
|
||||
Beyond it lies~… Zanarkand.
|
||||
|
||||
\jecht
|
||||
Zanarkand, huh?\\
|
||||
It's been in ruins for a thousand years, right?
|
||||
|
||||
\auron
|
||||
So the legends say. No one knows for sure.\\
|
||||
It still could be your Zanarkand.
|
||||
|
||||
\jecht
|
||||
Thanks for trying, Auron.
|
||||
|
||||
\subsection{Upstairs}
|
||||
|
||||
\jecht
|
||||
I thought if I went with you guys I might find a way to go back.\\
|
||||
But it's not that easy.
|
||||
|
||||
\braska
|
||||
I'm sorry.
|
||||
|
||||
\jecht
|
||||
No need to apologize, Braska. It's not your fault.\\
|
||||
I should be thinking about fighting Sin now, anyway.\\
|
||||
Zanarkand can wait.\\
|
||||
But I will find my way back!
|
||||
|
||||
\braska
|
||||
Be careful, Jecht.
|
||||
|
||||
\jecht
|
||||
Hey, I'll be all right.\\
|
||||
You're the one that should be careful. Wouldn't want your little girl
|
||||
to cry.
|
||||
|
||||
\braska
|
||||
She'll be all right. She's strong, like her mother was.
|
||||
|
||||
\section{Jecht sphere}
|
||||
|
||||
\subsection{Luca, ten years ago}
|
||||
|
||||
\jecht
|
||||
Hey, Auron!\\
|
||||
Did you get that last match?
|
||||
|
||||
\auron
|
||||
Yeah.\\
|
||||
But I don't understand why you wanted me to.\\
|
||||
Didn't you say you have blitzball in your Zanarkand?
|
||||
|
||||
\jecht
|
||||
Not a sportsman, are ya?
|
||||
|
||||
\braska
|
||||
Working on your form?
|
||||
|
||||
\jecht
|
||||
My form don't need no work. I'm the great Jecht. It's for my kid.
|
||||
|
||||
\braska
|
||||
Your son plays blitzball?
|
||||
|
||||
\jecht
|
||||
Yeah, and he wants to beat his old man bad.\\
|
||||
Once, I told him to give it up. He didn't speak to me for a week.\\
|
||||
Wonder what he's doing now.\\
|
||||
I hope he got bigger and put on some muscle.\\
|
||||
Hey, what's the big idea! Stop shooting!
|
||||
|
||||
\end{document}
|
||||
%%% Local Variables:
|
||||
%%% mode: latex
|
||||
%%% TeX-master: t
|
||||
%%% End:
|
||||
693
script/thalie.sty
Normal file
693
script/thalie.sty
Normal file
|
|
@ -0,0 +1,693 @@
|
|||
% Copyright 2010-2022 Louis Paternault
|
||||
%
|
||||
% This work may be distributed and/or modified under the
|
||||
% conditions of the LaTeX Project Public License, either version 1.3
|
||||
% of this license or (at your option) any later version.
|
||||
% The latest version of this license is in
|
||||
% http://www.latex-project.org/lppl.txt
|
||||
% and version 1.3 or later is part of all distributions of LaTeX
|
||||
% version 2005/12/01 or later.
|
||||
%
|
||||
% This work has the LPPL maintenance status `maintained'.
|
||||
%
|
||||
% The Current Maintainer of this work is Louis Paternault
|
||||
%
|
||||
% This work consists of the files thalie.tex and thalie.sty.
|
||||
|
||||
\NeedsTeXFormat{LaTeX2e}
|
||||
\ProvidesPackage{thalie}
|
||||
[2022/12/11 v0.13a A package to typeset drama plays]
|
||||
|
||||
|
||||
\RequirePackage{pgfkeys}
|
||||
\RequirePackage{etoolbox}
|
||||
\RequirePackage{suffix}
|
||||
\RequirePackage{tabularx}
|
||||
\RequirePackage{xspace}
|
||||
\RequirePackage{translations}
|
||||
\LoadDictionary{thalie}
|
||||
\LoadDictionaryFor{fallback}{thalie}
|
||||
\newcommand{\playname}{\GetTranslation{Play}}
|
||||
\newcommand{\actname}{\GetTranslation{Act}}
|
||||
\newcommand{\scenename}{\GetTranslation{Scene}}
|
||||
\newcommand{\interludename}{\GetTranslation{Interlude}}
|
||||
\newcommand{\curtainname}{\GetTranslation{Curtain}}
|
||||
\newcommand{\pausename}{\GetTranslation{Pause}}
|
||||
\newcommand{\playmark}[1]{%
|
||||
\markboth{\MakeUppercase{#1}}{}%
|
||||
}
|
||||
\newcommand{\actmark}[1]{%
|
||||
\markright{\MakeUppercase{%
|
||||
\GetTranslation{Act}\ \theact%
|
||||
\ifdefempty{#1}{}{: #1}%
|
||||
}}%
|
||||
}
|
||||
\newcommand{\scenemark}[1]{%
|
||||
}
|
||||
\newcounter{play}
|
||||
\renewcommand{\theplay}{\arabic{play}}
|
||||
\newcounter{act}[play]
|
||||
\renewcommand{\theact}{\Roman{act}}
|
||||
\newcounter{scene}[act]
|
||||
\renewcommand{\thescene}{\arabic{scene}}
|
||||
\newcommand{\@displaytitle}[3]{
|
||||
% Arguments:
|
||||
% - Style
|
||||
% - Label (none = not in toc)
|
||||
% - Title
|
||||
\ifdefstring{#1}{center}{
|
||||
\begin{center}
|
||||
\textsc{#2}
|
||||
|
||||
#3
|
||||
\end{center}
|
||||
}{\ifdefstring{#1}{bigcenter}{
|
||||
\begin{center}
|
||||
\Large
|
||||
\textsc{#2}
|
||||
|
||||
#3
|
||||
\end{center}
|
||||
}{\ifdefstring{#1}{box}{
|
||||
\begin{center}
|
||||
\framebox{\begin{minipage}{0.7\textwidth}
|
||||
\begin{center}
|
||||
\Large \bfseries
|
||||
\vspace{0.5em}
|
||||
|
||||
#2
|
||||
\ifboolexpr{test{\ifstrempty{#3}} or test{\ifstrempty{#2}}}{}{---}
|
||||
#3
|
||||
|
||||
\vspace{0.5em}
|
||||
\end{center}
|
||||
\end{minipage}}
|
||||
\end{center}
|
||||
\vspace{1em}
|
||||
}{}}}%
|
||||
}
|
||||
\newcommand\@clearpage[1]{%
|
||||
% Clear page if necessary
|
||||
\ifboolexpr{test{\ifdefstring{#1}{part}} or test{\ifdefstring{#1}{chapter}}}{
|
||||
\cleardoublepage
|
||||
\thispagestyle{empty}
|
||||
}{}%
|
||||
}
|
||||
|
||||
\newcommand{\play}[2][]{%
|
||||
\refstepcounter{play}
|
||||
\ifstrempty{#1}{
|
||||
\def\@short{#2}
|
||||
}{
|
||||
\def\@short{#1}
|
||||
}
|
||||
\@clearpage{\@playlevel}
|
||||
\playmark{\@short}
|
||||
\addcontentsline{toc}{\@playlevel}{\@short}
|
||||
\ifdefstring{\@playstyle}{custom}{
|
||||
\customplay{\theplay}{#2}
|
||||
}{
|
||||
\@displaytitle{\@playstyle}{}{#2}
|
||||
}
|
||||
}
|
||||
\WithSuffix\newcommand\play*[1]{%
|
||||
\@clearpage{\@playlevel}
|
||||
\ifdefstring{\@playstyle}{custom}{
|
||||
\customplay*{#1}
|
||||
}{
|
||||
\@displaytitle{\@playstyle}{}{#1}
|
||||
}
|
||||
}
|
||||
\newcommand{\act}[2][]{%
|
||||
\refstepcounter{act}
|
||||
\ifstrempty{#1}{
|
||||
\def\@short{#2}
|
||||
}{
|
||||
\def\@short{#1}
|
||||
}
|
||||
\ifdefempty{\@short}{
|
||||
\def\@label{\GetTranslation{Act} \theact{}}
|
||||
}{
|
||||
\def\@label{\GetTranslation{Act} \theact{}\xspace: }
|
||||
}
|
||||
\@clearpage{\@actlevel}
|
||||
\actmark{\@short}
|
||||
\addcontentsline{toc}{\@actlevel}{\@label\@short}
|
||||
\ifdefstring{\@actstyle}{custom}{
|
||||
\customact{\theact}{#2}
|
||||
}{
|
||||
\@displaytitle{\@actstyle}{\GetTranslation{Act} \theact}{#2}
|
||||
}
|
||||
}
|
||||
\WithSuffix\newcommand\act*[1]{%
|
||||
\@clearpage{\@actlevel}
|
||||
\ifdefstring{\@actstyle}{custom}{
|
||||
\customact*{#1}
|
||||
}{
|
||||
\@displaytitle{\@actstyle}{}{#1}
|
||||
}
|
||||
}
|
||||
\newcommand{\scene}[2][]{%
|
||||
\refstepcounter{scene}
|
||||
\ifstrempty{#1}{
|
||||
\def\@short{#2}
|
||||
}{
|
||||
\def\@short{#1}
|
||||
}
|
||||
\ifdefempty{\@short}{
|
||||
\def\@label{\GetTranslation{Scene} \thescene{}}
|
||||
}{
|
||||
\def\@label{\GetTranslation{Scene} \thescene{}\xspace: }
|
||||
}
|
||||
\@clearpage{\@scenelevel}
|
||||
\scenemark{\@short}
|
||||
\addcontentsline{toc}{\@scenelevel}{\@label\@short}
|
||||
\ifdefstring{\@scenestyle}{custom}{
|
||||
\customscene{\thescene}{#2}
|
||||
}{
|
||||
\@displaytitle{\@scenestyle}{\GetTranslation{Scene} \thescene}{#2}
|
||||
}
|
||||
}
|
||||
\WithSuffix\newcommand\scene*[1]{%
|
||||
\@clearpage{\@scenelevel}
|
||||
\ifdefstring{\@scenestyle}{custom}{
|
||||
\customscene*{#1}
|
||||
}{
|
||||
\@displaytitle{\@scenestyle}{}{#1}
|
||||
}
|
||||
}
|
||||
\newcommand{\interlude}[2][]{%
|
||||
\ifstrempty{#1}{
|
||||
\def\@short{#2}
|
||||
}{
|
||||
\def\@short{#1}
|
||||
}
|
||||
\ifdefempty{\@short}{
|
||||
\def\@label{\GetTranslation{Interlude}}
|
||||
}{
|
||||
\def\@label{\GetTranslation{Interlude}\xspace: }
|
||||
}
|
||||
\ifdefstring{\@interludelevel}{play}{
|
||||
\@clearpage{\@playlevel}
|
||||
\playmark{\@short}
|
||||
\addcontentsline{toc}{\@playlevel}{\@label\@short}
|
||||
\@displaytitle{\@playstyle}{\GetTranslation{Interlude}}{#2}
|
||||
}{\ifdefstring{\@interludelevel}{act}{
|
||||
\@clearpage{\@actlevel}
|
||||
\actmark{\@short}
|
||||
\addcontentsline{toc}{\@actlevel}{\@label\@short}
|
||||
\@displaytitle{\@actstyle}{\GetTranslation{Interlude}}{#2}
|
||||
}{% \@interludelevel is scene
|
||||
\@clearpage{\@scenelevel}
|
||||
\scenemark{\@short}
|
||||
\addcontentsline{toc}{\@scenelevel}{\@label\@short}
|
||||
\@displaytitle{\@scenestyle}{\GetTranslation{Interlude}}{#2}
|
||||
}}
|
||||
}
|
||||
\WithSuffix\newcommand\interlude*[1]{%
|
||||
\ifdefstring{\@interludelevel}{play}{
|
||||
\@clearpage{\@playlevel}
|
||||
\@displaytitle{\@playstyle}{\GetTranslation{Interlude}}{#1}
|
||||
}{\ifdefstring{\@interludelevel}{act}{
|
||||
\@clearpage{\@actlevel}
|
||||
\@displaytitle{\@actstyle}{\GetTranslation{Interlude}}{#1}
|
||||
}{% \@interludelevel is scene
|
||||
\@clearpage{\@scenelevel}
|
||||
\@displaytitle{\@scenestyle}{\GetTranslation{Interlude}}{#1}
|
||||
}}
|
||||
}
|
||||
\newcommand\curtain{
|
||||
\begin{center}
|
||||
\Large\textsc{\GetTranslation{Curtain}}
|
||||
\end{center}
|
||||
}
|
||||
\newcommand{\@maybexspace}{%
|
||||
\if@xspace%
|
||||
\xspace%
|
||||
\fi%
|
||||
}
|
||||
\newcommand{\@speaks}[2][]{%
|
||||
\ifstrempty{#1}{%
|
||||
\speakswithoutdirection{#2}%
|
||||
}{%
|
||||
\speakswithdirection{#2}{#1}%
|
||||
}\@maybexspace%
|
||||
}
|
||||
\newenvironment{@smallcenter}
|
||||
{\par\smallskip\centering}
|
||||
{\par\nopagebreak\ignorespacesafterend}
|
||||
\providecommand{\speakswithdirection}{}
|
||||
\providecommand{\speakswithoutdirection}{}
|
||||
\newcommand{\@setcharacterstyle}[1]{
|
||||
\ifstrequal{#1}{bold}{%
|
||||
% Bold style
|
||||
\renewcommand\speakswithdirection[2]{%
|
||||
\noindent%
|
||||
{\bfseries\sffamily ##1} \emph{(##2)}\xspace:%
|
||||
}
|
||||
\renewcommand\speakswithoutdirection[1]{%
|
||||
\noindent%
|
||||
{\bfseries\sffamily ##1\xspace:}%
|
||||
}%
|
||||
}{}%
|
||||
\ifstrequal{#1}{center}{%
|
||||
% Center style
|
||||
\renewcommand\speakswithdirection[2]{%
|
||||
\begin{center}%
|
||||
\textsc{##1},\\\emph{##2}%
|
||||
\end{center}%
|
||||
\par\ignorespacesafterend%
|
||||
}%
|
||||
\renewcommand\speakswithoutdirection[1]{%
|
||||
\begin{center}%
|
||||
\textsc{##1}%
|
||||
\end{center}%
|
||||
\par\ignorespacesafterend%
|
||||
}%
|
||||
}{}%
|
||||
\ifstrequal{#1}{imprimerie-verse}{%
|
||||
% Style for verse plays defined by the French Imprimerie nationale
|
||||
\renewcommand\speakswithdirection[2]{%
|
||||
\begin{@smallcenter}%
|
||||
\textsc{##1}, \emph{##2}%
|
||||
\end{@smallcenter}%
|
||||
}%
|
||||
\renewcommand\speakswithoutdirection[1]{%
|
||||
\begin{@smallcenter}%
|
||||
\textsc{##1}%
|
||||
\end{@smallcenter}%
|
||||
}%
|
||||
}{}%
|
||||
\ifstrequal{#1}{imprimerie-prose}{%
|
||||
% Style for prose plays defined by the French Imprimerie nationale
|
||||
\renewcommand\speakswithdirection[2]{%
|
||||
\noindent\hspace*{-\parindent}\textsc{##1}, \emph{##2}\xspace:%
|
||||
}%
|
||||
\renewcommand\speakswithoutdirection[1]{%
|
||||
\noindent\hspace*{-\parindent}\textsc{##1}\xspace:%
|
||||
}%
|
||||
}{}%
|
||||
\ifstrequal{#1}{arden}{%
|
||||
\renewcommand\speakswithdirection[2]{%
|
||||
\noindent\hspace*{-\parindent}\textsc{\MakeLowercase{##1}} [\emph{##2}]\quad%
|
||||
}%
|
||||
\renewcommand\speakswithoutdirection[1]{%
|
||||
\noindent\hspace*{-\parindent}\textsc{\MakeLowercase{##1}}\quad%
|
||||
}%
|
||||
}{}%
|
||||
\ifstrequal{#1}{simple}{%
|
||||
% Simple style
|
||||
\renewcommand\speakswithdirection[2]{%
|
||||
\indent\textsc{##1}, \emph{##2}\xspace:%
|
||||
}%
|
||||
\renewcommand\speakswithoutdirection[1]{%
|
||||
\indent\textsc{##1}\xspace:%
|
||||
}%
|
||||
}{}%
|
||||
\ifstrequal{#1}{margin}{%
|
||||
% Margin style
|
||||
\setlength{\leftskip}{3cm}
|
||||
\renewcommand\speakswithdirection[2]{%
|
||||
\hspace{-3cm} ##1 ##2
|
||||
}
|
||||
\renewcommand\speakswithoutdirection[1]{%
|
||||
\hspace{-3cm} ##1
|
||||
}%
|
||||
}{}%
|
||||
}
|
||||
\providebool{@dramatis@hidden}
|
||||
\pgfkeys{
|
||||
% Character definition
|
||||
/THALIE/DRAMATIS/.is family,
|
||||
/THALIE/DRAMATIS,
|
||||
hidden/.default=true,
|
||||
hidden/.is choice,
|
||||
hidden/true/.code=\booltrue{@dramatis@hidden},
|
||||
hidden/false/.code=\boolfalse{@dramatis@hidden},
|
||||
defaultcast/.default={},
|
||||
defaultcast/.value required,
|
||||
defaultcast/.store in=\@defaultcast,
|
||||
}
|
||||
\newcommand{\@dramatis@clear}{}
|
||||
\newcommand{\@empty@}{}
|
||||
\newenvironment{dramatis}[1][]{
|
||||
\@dramatis@clear{}
|
||||
\undef{\@dramatis@clear}
|
||||
\pgfkeys{/THALIE/DRAMATIS/.cd, #1}
|
||||
\ifbool{@dramatis@hidden}{%
|
||||
% Nothing
|
||||
}{%
|
||||
\dramatisenv%
|
||||
}%
|
||||
}{%
|
||||
\notbool{@dramatis@hidden}{%
|
||||
\enddramatisenv
|
||||
}{}%
|
||||
}
|
||||
\newenvironment{dramatisenv}{%
|
||||
\list{}{\rightmargin1cm\leftmargin2cm}\item[]
|
||||
}{%
|
||||
\endlist%
|
||||
}
|
||||
|
||||
\newcommand{\dramatischaractername}[1]{\textbf{#1}}
|
||||
|
||||
\newcommand{\dramatischaracterdescription}[1]{#1}
|
||||
|
||||
\newcommand{\dramatischaractercast}[1]{#1}
|
||||
|
||||
\newcommand{\characterspace}{ %
|
||||
\notbool{@dramatis@hidden}{%
|
||||
\smallskip\newline %
|
||||
}{}%
|
||||
}
|
||||
|
||||
\newcommand{\dramatischaracter}[3]{ %
|
||||
\hspace*{-1cm} %
|
||||
\ifboolexpr{(not test {\ifdefempty{#1}}) and test {\ifdefempty{#2}}}{%
|
||||
\dramatischaractername{#1} %
|
||||
}{}%
|
||||
\ifboolexpr{ test{\ifdefempty{#1}} and not test{\ifdefempty{#2}}}{%
|
||||
\dramatischaracterdescription{#2} %
|
||||
}{}%
|
||||
\ifboolexpr{ (not test{\ifdefempty{#1}}) and (not test{\ifdefempty{#2}})}{%
|
||||
\dramatischaractername{#1}, \dramatischaracterdescription{#2} %
|
||||
}{}%
|
||||
\ifdefempty{#3}{}{\dotfill\dramatischaractercast{#3}}%
|
||||
\newline %
|
||||
}
|
||||
|
||||
\newlength{\@spaceaftergroup}
|
||||
\newenvironment{dramatischaractergroup}[2]{
|
||||
\gdef\@groupname{#2} %
|
||||
\gdef\@grouplength{#1} %
|
||||
\hspace*{-1.3pt}\math\left. %
|
||||
\minipage[c]{#1} %
|
||||
\vspace*{2pt} %
|
||||
}{%
|
||||
\vspace*{-8pt} %
|
||||
\endminipage %
|
||||
\right\} \endmath %
|
||||
%
|
||||
\setlength{\@spaceaftergroup}{\linewidth}
|
||||
\addtolength\@spaceaftergroup{-\@grouplength}
|
||||
\addtolength\@spaceaftergroup{-20pt}
|
||||
\begin{minipage}[c]{\@spaceaftergroup}
|
||||
\@groupname %
|
||||
\end{minipage}
|
||||
\newline %
|
||||
}
|
||||
\newenvironment{charactergroup}[2][5cm]{%
|
||||
\notbool{@dramatis@hidden}{%
|
||||
\dramatischaractergroup{#1}{#2}
|
||||
}{}%
|
||||
}{%
|
||||
\notbool{@dramatis@hidden}{%
|
||||
\enddramatischaractergroup
|
||||
}{}%
|
||||
}
|
||||
|
||||
\newenvironment{dramatischaractercastgroup}[3]{%
|
||||
\ifdefempty{#3}{
|
||||
\hspace*{-1cm} %
|
||||
\ifboolexpr{(not test {\ifdefempty{#1}}) and test {\ifdefempty{#2}}}{%
|
||||
\dramatischaractername{#1} %
|
||||
}{}%
|
||||
\ifboolexpr{ test{\ifdefempty{#1}} and not test{\ifdefempty{#2}}}{%
|
||||
\dramatischaracterdescription{#2} %
|
||||
}{}%
|
||||
\ifboolexpr{ (not test{\ifdefempty{#1}}) and (not test{\ifdefempty{#2}})}{%
|
||||
\dramatischaractername{#1}, \dramatischaracterdescription{#2} %
|
||||
}{}%
|
||||
\hfill%
|
||||
}{
|
||||
\ClassError{thalie}{%
|
||||
Environment "castgroup" cannot have a non-empty "cast" argument.%
|
||||
}{}%
|
||||
}%
|
||||
}{}
|
||||
|
||||
\newenvironment{castgroup}[2][]{%
|
||||
\@thalie@parsecharacter{#1}{#2}{dramatischaractercastgroup}%
|
||||
\notbool{@dramatis@hidden}{%
|
||||
\math\left\{%
|
||||
\array{r}%
|
||||
}{}%
|
||||
}{%
|
||||
\notbool{@dramatis@hidden}{%
|
||||
\endarray%
|
||||
\right.\endmath%
|
||||
\newline%
|
||||
}{}%
|
||||
\enddramatischaractercastgroup
|
||||
}
|
||||
\newcommand{\dramatiscast}[1]{%
|
||||
% Command used to display cast inside a castgroup.
|
||||
% Can be redefined by user.
|
||||
\notbool{@dramatis@hidden}{%
|
||||
\hbox{\dramatischaractercast{#1}\hspace*{-6pt}}\tabularnewline%
|
||||
}{}%
|
||||
}
|
||||
\newcommand{\cast}[1]{%
|
||||
% "Public" command, used by author in the dramatis personae.
|
||||
% Does nothing fancy right now, but how knows?
|
||||
\dramatiscast{#1}%
|
||||
}
|
||||
|
||||
\newcommand{\setcharactername}[2]{%
|
||||
\expandafter\gdef\csname#1name\endcsname{%
|
||||
#2\@maybexspace%
|
||||
}%
|
||||
\expandafter\gdef\csname#1\endcsname{%
|
||||
\@ifnextchar[{%
|
||||
\defcharcommand@with{#2}%
|
||||
}{%
|
||||
\defcharcommand@without{#2}%
|
||||
}%
|
||||
}%
|
||||
\xappto{\@dramatis@clear}{%
|
||||
\global\noexpand\csundef{#1}%
|
||||
\global\noexpand\csundef{#1name}%
|
||||
}%
|
||||
}
|
||||
\newcommand{\@definecharactercommand}[2]{%
|
||||
\ifcsdef{#1}{%
|
||||
\ClassError{thalie}{%
|
||||
A command named \@backslashchar#1 already exists. We cannot define a new
|
||||
one.%
|
||||
}{%
|
||||
Choose another command name to introduce character #2's lines.%
|
||||
}%
|
||||
}{%
|
||||
}%
|
||||
\ifcsdef{#1name}{%
|
||||
\ClassError{thalie}{%
|
||||
A command named \@backslashchar#1name already exists. We cannot define a
|
||||
new one.%
|
||||
}{%
|
||||
Choose another command name to introduce character #2's lines, such that
|
||||
when a new command is defined by adding "name" to it, it does not
|
||||
conflict with an existing one.
|
||||
}%
|
||||
}{%
|
||||
}%
|
||||
\setcharactername{#1}{#2}%
|
||||
}
|
||||
\def\defcharcommand@with#1[#2]{\@speaks[#2]{#1}}
|
||||
\def\defcharcommand@without#1{\@speaks{#1}}
|
||||
\pgfkeys{
|
||||
% Character definition
|
||||
/THALIE/CHARACTER/.is family,
|
||||
/THALIE/CHARACTER,
|
||||
cmd/.value required,
|
||||
cmd/.store in=\@cmd,
|
||||
cast/.value required,
|
||||
cast/.store in=\@cast,
|
||||
drama/.value required,
|
||||
drama/.store in=\@drama,
|
||||
desc/.value required,
|
||||
desc/.store in=\@desc,
|
||||
}
|
||||
\newcommand{\@thalie@parsecharacter}[3]{%
|
||||
% Parse a character definition. Arguments are:
|
||||
% #1: Optional arguments of \character: [drama={foo}, cast={bar}]
|
||||
% #2: Mandatory argument of \character (character name)
|
||||
% #3: Name of the command to call to display this character definition.
|
||||
\undef{\@drama}
|
||||
\undef{\@cmd}
|
||||
\undef{\@cast}
|
||||
\undef{\@desc}
|
||||
\pgfkeys{/THALIE/CHARACTER, #1}%
|
||||
\ifcsundef{@cast}{%
|
||||
\ifcsdef{@defaultcast}{%
|
||||
\gdef\@cast{\@defaultcast}%
|
||||
}{%
|
||||
\gdef\@cast{}%
|
||||
}%
|
||||
}{}%
|
||||
% Forbidden combinations
|
||||
\ifboolexpr{
|
||||
( ( test{\ifdef{\@cmd}} and not test{\ifdefempty{\@cmd}} ) and test{\ifstrempty{#2}} ) or
|
||||
( ( test{\ifundef{\@cmd}} or test{\ifdefempty{\@cmd}} ) and not test{\ifstrempty{#2}} ) or
|
||||
( test{\ifdefempty{\@drama}} and ( test{\ifdef{\@desc}} and not test{\ifdefempty{\@desc}} ) ) or
|
||||
( test{\ifundef{\@cmd}} and test{\ifundef{\@desc}} and test{\ifundef{\@drama}} and test{\ifstrempty{#2}} ) or
|
||||
%( ( test{\ifundef{\@cmd}} or test{\ifdefempty{\@cmd}} ) and test{\ifstrempty{#2}} and ( test{\ifdefempty{\@drama}} or test{\ifundef{\@drama}} ))
|
||||
( ( test{\ifundef{\@desc}} or test{\ifdefempty{\@desc}} ) and test{\ifstrempty{#2}} and ( test{\ifdefempty{\@drama}} or test{\ifundef{\@drama}} ))
|
||||
}{
|
||||
\ClassError{thalie}{Invalid character definition.}{All combination of omitted arguments are not allowed. See the documentation for more information}
|
||||
}{}%
|
||||
% Defining character command
|
||||
\ifboolexpr{ test{\ifdef{\@cmd}} and (not test{\ifstrempty{#2}}) }{%
|
||||
\@definecharactercommand{\@cmd}{#2}
|
||||
}{}%
|
||||
\ifboolexpr{ bool{@dramatis@hidden} or test{\ifdefempty{\@drama}} }{%
|
||||
% Hidden character. Nothing added to dramatis personae
|
||||
}{%
|
||||
\ifcsundef{@desc}{\gdef\@desc{}}{}%
|
||||
\ifcsundef{@drama}{\gdef\@drama{#2}}{}%
|
||||
\csuse{#3}{\@drama}{\@desc}{\@cast}%
|
||||
}%
|
||||
}
|
||||
\newcommand{\character}[2][]{%
|
||||
\@thalie@parsecharacter{#1}{#2}{dramatischaracter}%
|
||||
}
|
||||
|
||||
\newcommand{\disposablecharacter}[2][]{%
|
||||
\@speaks[#1]{#2}%
|
||||
}
|
||||
\newcommand{\onstage}[1]{{\centering \emph{#1}\par\medskip}}
|
||||
\newcommand{\did}[1]{\emph{(#1)}\@maybexspace}
|
||||
\newenvironment{dida}{%
|
||||
\begin{quote}
|
||||
\begin{em}
|
||||
}{%
|
||||
\end{em}
|
||||
\end{quote}
|
||||
}
|
||||
\newcommand\pause{\did{\GetTranslation{Pause}}}
|
||||
|
||||
|
||||
\newlength{\@verseadjust}
|
||||
\setlength{\@verseadjust}{0pt}
|
||||
|
||||
\newcommand{\adjustverse}[1]{\setlength{\@verseadjust}{#1}}
|
||||
|
||||
\newcommand{\pauseverse}{{\abovedisplayshortskip\z@\abovedisplayskip\z@
|
||||
\belowdisplayshortskip\z@\belowdisplayskip\z@
|
||||
$$\global\dimen\@ne\predisplaysize
|
||||
\xdef\tmp{%
|
||||
\predisplaysize\the\predisplaysize
|
||||
\prevgraf\the\prevgraf\relax}%
|
||||
$$\vskip\dimexpr-\parskip-\baselineskip\relax}\tmp
|
||||
}
|
||||
|
||||
\newcommand{\resumeverse}{%
|
||||
\hspace{\@verseadjust}\hspace{\the\dimen\@ne}
|
||||
}
|
||||
\RequirePackage{pgfopts}
|
||||
|
||||
\pgfkeys{
|
||||
% Character style
|
||||
/THALIE/.cd,
|
||||
characterstyle/.value required,
|
||||
characterstyle/.default=simple,
|
||||
characterstyle/.is choice,
|
||||
characterstyle/bold/.code=\@setcharacterstyle{bold},
|
||||
characterstyle/center/.code=\@setcharacterstyle{center},
|
||||
characterstyle/margin/.code=\@setcharacterstyle{margin},
|
||||
characterstyle/simple/.code=\@setcharacterstyle{simple},
|
||||
characterstyle/arden/.code=\@setcharacterstyle{arden},
|
||||
characterstyle/imprimerie-verse/.code=\@setcharacterstyle{imprimerie-verse},
|
||||
characterstyle/imprimerie-prose/.code=\@setcharacterstyle{imprimerie-prose},
|
||||
characterstyle,
|
||||
}
|
||||
|
||||
\pgfkeys{
|
||||
% play style
|
||||
/THALIE/.cd,
|
||||
playstyle/.value required,
|
||||
playstyle/.default=box,
|
||||
playstyle/.is choice,
|
||||
playstyle/center/.code=\def\@playstyle{center},
|
||||
playstyle/bigcenter/.code=\def\@playstyle{bigcenter},
|
||||
playstyle/box/.code=\def\@playstyle{box},
|
||||
playstyle/custom/.code=\def\@playstyle{custom},
|
||||
playstyle,
|
||||
}
|
||||
\pgfkeys{
|
||||
% act style
|
||||
/THALIE/.cd,
|
||||
actstyle/.value required,
|
||||
actstyle/.default=bigcenter,
|
||||
actstyle/.is choice,
|
||||
actstyle/center/.code=\def\@actstyle{center},
|
||||
actstyle/bigcenter/.code=\def\@actstyle{bigcenter},
|
||||
actstyle/box/.code=\def\@actstyle{box},
|
||||
actstyle/custom/.code=\def\@actstyle{custom},
|
||||
actstyle,
|
||||
}
|
||||
\pgfkeys{
|
||||
% scene style
|
||||
/THALIE/.cd,
|
||||
scenestyle/.value required,
|
||||
scenestyle/.default=center,
|
||||
scenestyle/.is choice,
|
||||
scenestyle/center/.code=\def\@scenestyle{center},
|
||||
scenestyle/bigcenter/.code=\def\@scenestyle{bigcenter},
|
||||
scenestyle/box/.code=\def\@scenestyle{box},
|
||||
scenestyle/custom/.code=\def\@scenestyle{custom},
|
||||
scenestyle,
|
||||
}
|
||||
|
||||
\pgfkeys{
|
||||
% play level
|
||||
/THALIE/.cd,
|
||||
playlevel/.value required,
|
||||
playlevel/.default=chapter,
|
||||
playlevel/.store in=\@playlevel,
|
||||
playlevel,
|
||||
}
|
||||
\pgfkeys{
|
||||
% act level
|
||||
/THALIE/.cd,
|
||||
actlevel/.value required,
|
||||
actlevel/.default=section,
|
||||
actlevel/.store in=\@actlevel,
|
||||
actlevel,
|
||||
}
|
||||
\pgfkeys{
|
||||
% scene level
|
||||
/THALIE/.cd,
|
||||
scenelevel/.value required,
|
||||
scenelevel/.default=subsection,
|
||||
scenelevel/.store in=\@scenelevel,
|
||||
scenelevel,
|
||||
}
|
||||
\pgfkeys{
|
||||
% interlude level
|
||||
/THALIE/.cd,
|
||||
interludelevel/.value required,
|
||||
interludelevel/.default=act,
|
||||
interludelevel/.is choice,
|
||||
interludelevel/play/.code=\def\@interludelevel{play},
|
||||
interludelevel/act/.code=\def\@interludelevel{act},
|
||||
interludelevel/scene/.code=\def\@interludelevel{scene},
|
||||
interludelevel,
|
||||
}
|
||||
\newif\if@xspace
|
||||
\pgfkeys{
|
||||
% xspace option
|
||||
/THALIE/.cd,
|
||||
xspace/.value required,
|
||||
xspace/.is if=@xspace,
|
||||
xspace/.default=true,
|
||||
xspace,
|
||||
}
|
||||
|
||||
\ProcessPgfPackageOptions{/THALIE}
|
||||
\newcommand{\setthalieoptions}[1]{%
|
||||
\pgfkeys{/THALIE/.cd, #1}%
|
||||
}
|
||||
\endinput
|
||||
%%
|
||||
%% End of file `thalie.sty'.
|
||||
Loading…
Add table
Add a link
Reference in a new issue