summaryrefslogtreecommitdiffstats
path: root/sal.otx
blob: 3f0aa4dca67924f0229055c04002bffeacef9fd8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
\sdef{_pgs:fold}{(5.5,8.5)in}

% --- predefined layouts
\def\halfletterlayout{
  \margins/2 fold (0.65,0.5,0.6,0.7)in
  \footlinedist=12pt
}

\def\novellalayout{
  \sdef{_pgs:novella}{(5.25,8.25)in}
  \margins/2 fold (0.65,0.5,0.6,0.7)in
  \footlinedist=12pt
}

% --- management of page styles
\def\cookedfolio{
    \_folio}

\def\romanfolios{
    \def\cookedfolio{\romannumeral\_folio}}

\def\latinfolios{
    \def\cookedfolio{\_folio}}

\def\blankstyle{
    \headline={}
    \footline={}}

\def\normalstyle{
    \headline={}
    \footline={}
    \footline={\_hss\_rmfixed \cookedfolio \_hss}}

% --- little idiosyncrasies
\def\dq#1{“#1”}
\long\def\ldq#1{“#1”}
\def\sq#1{‘#1’}
\def\booktitle#1{\ul{#1}}
\def\essaytitle#1{\e{\dq{#1}}}
\def\journaltitle#1{\e{#1}}
\def\movietitle#1{\e{#1}}
\def\songtitle#1{\e{#1}}
\def\tvtitle#1{\e{#1}}
\def\filmtitle{\movietitle}
\def\sectiontitle#1{{\caps #1}}
\def\term#1{{\it\dq{#1}}}
\def\e#1{{\it #1}\/}
\long\def\Q#1{{\leftskip=1in\parindent=0pt #1\par}}
\def\cbrk#1{\vskip 1em \hfil #1 \hfil\vskip 0.5em}
\def\dinkus{\cbrk{* * *}}
\def\textsuperscript#1{{\typosize[8/]$^{\textstyle\rm #1}$}}
\def\term#1{\e{\dq{#1}}}
\def\turn#1{\raise 1.5ex \rotbox{180}{#1}}
\def\ld{…}\def\ae{æ}

\long\def\ednote#1{\fnote{{\Dejavu\sans\rm #1}}}
\def\fixnote{\Red\ednote{fix}\Black}

% --- nested list numbering with \keepstyle
\def\iprefix#1{}
\addto\_setlistskip{\ifnum\ilevel>1 \edef\iprefix{\iprefix.\the\itemnum}\fi}
\sdef{_item:m}{\iprefix.\the\itemnum. }
\def\keepstyle{\_defaultitem=\_printitem}
\def\minititle#1{\centerline{#1}}
\def\sideblock#1{{\typoscale[800/]\leftskip=0.5in\it#1\par}}

% --- underline with \ul
\def\ul#1{{\ulRedefine\leavevmode\wordscanA #1 {} }} 
\def\wordscanA#1 {\ifx^#1^\unskip\else \wordscanB#1\-\end \expandafter\wordscanA\fi} 
\def\wordscanB#1\-#2\end{\ifx^#2^\wordprintA{#1}\else 
   \wordprintB{#1}\def\next{\wordscanB#2\end}\expandafter\next\fi} 
\def\wordprintA#1{\setbox0=\hbox{#1}\hbox{\rlap{\copy0}\uline\wd0}\uline\uspace\relax} 
\def\wordprintB#1{\setbox0=\hbox{#1}\hbox{\rlap{\copy0}\uline\wd0}\-} 
\def\uline{\leaders \vrule height-1.9pt depth2.3pt\hskip} 
\def\uspace{\fontdimen2\font plus\fontdimen3\font minus\fontdimen4\font} 
\def\ulRedefine{\def~{\egroup\hbox{\rlap{\copy0}\uline\wd0}\nobreak\uline\uspace\relax 
         \setbox0=\hbox\bgroup}} 

% --- default designs, for handy reference

\_def \_titfont {\_scalemain\_typoscale[\_magstep4/\_magstep5]\_boldify}
\_def \_chapfont {\_scalemain\_typoscale[\_magstep3/\_magstep3]\_boldify}
\_def \_secfont {\_scalemain\_typoscale[\_magstep2/\_magstep2]\_boldify}
\_def \_seccfont {\_scalemain\_typoscale[\_magstep1/\_magstep1]\_boldify}

\_def\_printchap #1{\_vfill\_supereject \_prevdepth=0pt
  \_vglue\_medskipamount % shifted by topkip+\medskipamount
  {\_chapfont \_noindent \_mtext{chap} \_printrefnum[@]\_par
    \_nobreak\_smallskip
    \_noindent \_raggedright #1\_nbpar}\_mark{}%
  \_nobreak \_belowtitle{\_bigskip}%
  \_firstnoindent}

\_def\_printsec#1{\_par
  \_abovetitle{\_penalty-151}\_bigskip
  {\_secfont \_noindent \_raggedright \_printrefnum[@\_quad]#1\_nbpar}\_insertmark{#1}%
  \_nobreak \_belowtitle{\_medskip}%
  \_firstnoindent}

\_def\_printsecc#1{\_par
  \_abovetitle{\_penalty-101}{\_medskip\_smallskip}
  {\_seccfont \_noindent \_raggedright \_printrefnum[@\_quad]#1\_nbpar}%
  \_nobreak \_belowtitle{\_medskip}%
  \_firstnoindent}

% ============ sal style
\load[mte]
% \load[f_pp_writer]

\picdir={img/}
\nonfrenchspacing\raggedbottom
\baselineskip=15pt
\fontfam[DejaVu]
% \fontfam[PPWriter]
\fontfam[Pagella]
\enablemte
\typosize[11/13]