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]
|