summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/third/letter/style/default.nls
blob: 4878317b08b34218fb79559e6f431243cbfebfb0 (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
%D \module
%D   [       file=default,
%D        version=2008.10.27,
%D          title=\CONTEXT\ Letter Style,
%D       subtitle=Blockstyle initalization,
%D         author=Wolfgang Schuster,
%D           date=\currentdate,
%D      copyright=Wolfgang Schuster,
%D          email=schuster.wolfgang@googlemail.com,
%D        license=Public Domain]

\unprotect

\def\doresetletterlayer  #1{\dododefineletterlayer[#1]}
\def\doresetlettersection#1{\dodefinelettersection[#1]}

\processcommacommand[\letter!list!layers  ]\doresetletterlayer
\processcommacommand[\letter!list!sections]\doresetlettersection

\setupletterstyle
  [\v!firstpage,\v!secondpage]
  [\c!topspace=.08417508418\paperheight,
   \c!top=\!!zeropoint,
   \c!topdistance=\!!zeropoint,
   \c!header=.06734006734\paperheight,
   \c!headerdistance=\!!zeropoint,
   \c!height=.84175084175\paperheight,
   \c!footerdistance=\!!zeropoint,
   \c!footer=.06734006734\paperheight,
   \c!bottomdistance=\!!zeropoint,
   \c!bottom=\!!zeropoint,
   \c!backspace=.11904761905\paperwidth,
   \c!width=.71428571429\paperwidth,
   \c!bottomspace=\!!zeropoint]

\setupletter
  [\c!alternative=\v!a,
   \c!list=\v!date,
   \c!date=\currentdate,
   \c!width=\zeropoint]

\setupletterstyle
  [\v!option]
  [\c!dispatch=\v!yes,
   \c!addressee=\v!yes]

\setupletterstyle
  [\v!nexthead,\v!nextfoot]
  [\c!state=\v!next]

\setupletterstyle
  [\v!reference]
  [\v!option]
  [%\c!list=\lettervalue\c!list, % not yet
   \c!alternative=\lettervalue\c!alternative]

\setupletterstyle
  [\v!backaddress]
  [\v!option]
  [\c!alternative=\v!no,
   \c!separator=\textcomma\space]

\setupletterstyle
  [\v!dispatch,\v!addressee]
  [\c!align=\v!right,
   \c!width=\hsize,
   \c!leftmargin=\zeropoint,
   \c!rightmargin=\zeropoint,
   \c!offset=\zeropoint,
   \c!frame=\v!off]

\setupletterstyle
  [\v!dispatch]
  [\c!location=\v!bottom,
   \c!height=\dimexpr(\vsize/9)*3\relax]

\setupletterstyle
  [\v!addressee]
  [\c!location=\v!top,
   \c!height=\dimexpr(\vsize/9)*6\relax]

\setupletterstyle
  [\v!closing]
  [\c!after={\blank[\v!line]},
   \c!inbetween={\blank[\v!endgraf,\v!nobreak,2*\v!line]}]

\protect \endinput