summaryrefslogtreecommitdiff
path: root/macros/latex209/contrib/address/letter.tex
blob: b10d8f2a5f189debf8de6322571c29a0224bb33b (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
%%% ============================================================
%%%  @LaTeX-style-file{
%%%    author            = "Michael Wester",
%%%    version           = "1.0",
%%%    date              = "July 1991",
%%%    time              = "NULL",
%%%    filename          = "address.tex",
%%%    address           = "Math & Stat Dept.
%%%                         University of New Mexico
%%%                         Albuquerque, NM 87131",
%%%    telephone         = "NA",
%%%    FAX               = "NA",
%%%    checksum          = "NA",
%%%    email             = "wester@spectre.unm.edu (Internet)",
%%%    codetable         = "ISO/ASCII",
%%%
%%%    keywords          = "LaTeX, TeX, formletter, mailing labels",
%%%    supported         = "yes",
%%%
%%%    docstring         = "TeX/LaTeX test letter file for
%%%                         address.tex",
%%% }
%%% ====================================================================
\print{Naddr=\the\Naddr.}
\print{Laddr=\the\Laddr.}
%
\print{Name=\Name.}
\ifx\SocialTitle\empty
\else
   \print{SocialTitle=\SocialTitle.}
\fi
\ifx\FirstName\empty
\else
   \print{FirstName=\FirstName.}
\fi
\ifx\MiddleName\empty
\else
   \print{MiddleName=\MiddleName.}
\fi
\ifx\LastName\empty
\else
   \print{LastName=\LastName.}
\fi
\ifx\Suffix\empty
\else
   \print{Suffix=\Suffix.}
\fi
\ifx\OtherTitle\empty
\else
   \print{OtherTitle=\OtherTitle.}
\fi
%
\ifx\Address\empty
\else
   {\toks0=\expandafter{\Address}
    \print{Address=\the\toks0.}}
\fi
%
{\setbox0=\hbox{\AddrLine1}}
\ifx\Current\empty
\else
   \print{AddrLine1=\Current.}
\fi
{\setbox0=\hbox{\AddrLine2}}
\ifx\Current\empty
\else
   \print{AddrLine2=\Current.}
\fi
{\setbox0=\hbox{\AddrLine3}}
\ifx\Current\empty
\else
   \print{AddrLine3=\Current.}
\fi
%
{\setbox0=\hbox{\AddrBlock1}}
\ifx\Current\empty
\else
   {\toks0=\expandafter{\Current}
    \print{AddrBlock1=\the\toks0.}}
\fi
{\setbox0=\hbox{\AddrBlock2}}
\ifx\Current\empty
\else
   {\toks0=\expandafter{\Current}
    \print{AddrBlock2=\the\toks0.}}
\fi
{\setbox0=\hbox{\AddrBlock3}}
\ifx\Current\empty
\else
   {\toks0=\expandafter{\Current}
    \print{AddrBlock3=\the\toks0.}}
\fi
%
\StoreAddrBlock1\in\Block
{\setbox0=\hbox{\GetLine1\of\Block}}
\ifx\Current\empty
\else
   {\toks0=\expandafter{\Current}
    \print{GetLine1 of AddrBlock1=\the\toks0.}}
\fi
{\setbox0=\hbox{\GetLine2\of\Block}}
\ifx\Current\empty
\else
   {\toks0=\expandafter{\Current}
    \print{GetLine2 of AddrBlock1=\the\toks0.}}
\fi
{\setbox0=\hbox{\GetLine3\of\Block}}
\ifx\Current\empty
\else
   {\toks0=\expandafter{\Current}
    \print{GetLine3 of AddrBlock1=\the\toks0.}}
\fi