%  TUG Membership Application Form (1993)

%  Lines for the form itself are placed on the left
%  below, while formatting code is shunted to the
%  right.  Header material is at the bottom so as
%  to keep it out of the way.  In a pinch, one could
%  fill in the form in ascii mode and flush all lines
%  BEGINNING with # (the # is also used in \# below).
%  This file runs under the Plain
%  format, but both the # and the _ have been
%  re-\catcode-d to lend themselves to special functions.

                                        \catcode`\#=9
#                                       \catcode`\_=\active
#                                       \newbox\infobox
#                                       \toks0=
#                                       {\setbox0\vbox to
#                                         \vsize{
#                                           \hsize \rightcolwd
#                                           \baselineskip 18pt
#                                           \parfillskip0pt
#
#                                       {\headfont\leavevmode
#                                        \hskip10pt
Individual Membership Application
#                                       \unskip\endline}


#                                       \interboxskip
#                                       \ruledbox
#                                       \parfillskip0pt
%**************


Name _...........................................................


Institutional affiliation, if any _..............................


Position _.......................................................


Address (business or home (circle one)) _........................


_................................................................


_................................................................


City _.................................\quad Province/State _....


Country _.............................. \quad Postal Code _......


Telephone _.................\quad {FAX} _.........................


Email address _..................................................


%**************
#                                       \endruledbox

#                                       \interboxskip

#                                       \ruledbox
%**************
I am also a member of the following
other \TeX{} organizations:
#                                       \endline


#                                       \vskip2pc
Specific applications or reasons
for interest in \TeX:
#                                       \endline



#                                       \vskip4pc
%Hardware on which \TeX{} is used:
#                                       \endline

#                                        \def\>{\unskip\hfil
#                                          \qquad\hfil}


%_...............................................................


%_...............................................................


%_...............................................................


%**************
#                                       \endruledbox

#                                       \interboxskip


#                                       \ruledbox
%**************

#                                       {\parfillskip0pt plus
#                                          1fil
#                                        \raggedright
#

\baselineskip 11pt
There are two types of TUG members: regular members, who pay
annual dues of \$60; and full-time student members, whose
annual dues are \$30.  Students must include verification
of student status with their applications.

#                                       \vskip4pt
Please indicate the type of membership for which you
are applying:
#                                       \endgraf}

#                                       {\leftskip\wd\checkbox
#                                        \advance\leftskip1em
#                                       \def\>{\unskip\hfil}
\chkbox Regular at \$60\kern3em
\chkbox Full-time student at \$30
#                                       \hfil\null
#                                       \endgraf}



#                                       \vskip8pt
Amount enclosed for 1993 membership:\hfil      \$ _...


#                                     \vskip8pt
#                                     \advance\leftskip
#                                       \wd\checkbox
#                                     \parskip0pt
\baselineskip11pt

\chkbox  Check/money order payable to
\TeX{} Users Group enclosed             \endline
({\it in US dollars drawn on
a US bank\/})                           \endline

#                                       \vskip8pt
#
\chkbox  Foreign bank transfer:
   \TeX{} Users Group,

   Account \#1558-816,                  \endline
   Santa Barbara Bank and Trust,
   20 East Carrillo Street,             \endline
   Santa Barbara, CA 93101 USA          \endline

#

\baselineskip15pt
\chkbox Charge to MasterCard/VISA
#                                       \endline

#                                       \vskip6pt
Card \# _............................ Exp.\ date  _...

#                                       \vskip6pt
Signature _...........................................

%**************
#                                       \endruledbox
#                               } % end box0
#                               } % end toks0

%*********************************************************
% General information
#                       \toks1={\setbox1\vbox to\vsize{
#                                 \hsize \leftcolwd
#                                 \parskip6pt plus 12pt
#                                 \baselineskip11pt
#                                 \raggedright

\quasiTUGlogo
#                                 \vskip1pc

#                                 {\bf
Complete and return this form with payment to:
#                                       }

#                                      \vskip3pt{\parskip0pt
#                                      \leftskip1pc
\TUG                                             \\
Membership Department                            \\
\POBox 869                                       \\
Santa Barbara, CA 93102 USA
\vadjust{\vskip4pt}\\
%
Telephone: (805) 963-1338                        \\
FAX: (805) 963-8358                              \\
Email: {\tt tug@Math.AMS.com}
#                                      \endgraf}


#                                     {\rightskip 0pt plus 10pt
#                                      \hyphenpenalty500
#                                      \exhyphenpenalty500
{\bf Membership is effective} from January~1
to December~31 and
includes subscriptions to {\it TUGboat,
The Communications of the \TUG} and the
TUG newsletter, {\it \TeX{}
and TUG NEWS}.  Members who join after January~1
will receive all issues published that
calendar year.
#                                     \endgraf}



#                                     \vskip9pt
#                                     \vskip\parskip
#                                     \setbox\infobox\hbox{\tenbf
#                                       For more information}
#                                     \hrule height 4pt width
#                                       \wd\infobox
#                                     \vskip9pt
#                                     \vskip-\parskip
#                                     {\tenbf
For more information \dots
#                                     }

#                                     \vskip6pt
#                                     \vskip-\parskip

Whether or not you join TUG now, feel
free to return this form to request
more information.  Be sure to include
your name and address in the spaces
provided to the right.


{\bf Check all items you wish to receive below:}


#                                     \leftskip\wd\checkbox
#                                     \parskip=0.7\parskip
\chkbox Institutional membership information

\chkbox Course and meeting information

\chkbox Advertising rates

\chkbox Products/publications catalogue

\chkbox Public domain software catalogue

\chkbox More information on \TeX{}

#                                     } % end of \box1
#                                     } % end of \toks1


%************************************************************

% Now that everything's been saved, give the header material.

\hsize 6.5in
\vsize 9in

\nopagenumbers
\hfuzz5pt
\vfuzz5pt
\parindent0pt
\parskip0pt
\newdimen\leftcolwd \leftcolwd=0.333\hsize

      \advance\leftcolwd-0.75pc

\newdimen\rightcolwd \rightcolwd=0.667\hsize

      \advance\rightcolwd-0.75pc

{\catcode`\#=6
\gdef\adjTeX#1#2{%
  \def\TeX{T\hbox{\kern-.1667em\kern#1\lower.424ex\hbox{E}%
    \kern-.125em\kern#2X}}}
\gdef\adjLa#1#2{\def\La{\TestCount=\the\fam

                \leavevmode L\kern#1\raise.42ex
                \hbox{$\fam\TestCount\scriptstyle\kern-.3em

                A$}\kern#2\relax}}
}

\newif\ifCMfonts           \CMfontstrue
\ifCMfonts
\font\TUGfont=cmb10 scaled \magstep5
\font\headfont=cmb10 scaled\magstep3
\font\subheadfont=cmb10 scaled\magstephalf
\font\largerrm=cmr10
\font\ninerm=cmr9
\font\ninesl=cmsl9
\font\ninebf=cmbx9
\else % use Bitstream Zapf Elliptical
\font\TUGfont=bs0053 scaled 2400
\font\headfont=bs0053 scaled 1800
\font\subheadfont=bs0053 scaled 1100
\font\largerrm=bs0051
\font\ninerm=bs0051 scaled 900
\font\ninesl=bs0052 scaled 900
\font\ninebf=bs0053 scaled 900
\adjTeX{1pt}{1pt}
\fi

\def\ninepoint{\def\rm{\ninerm}\def\it{\ninesl}\def\bf{\ninebf}}

\ninepoint\rm\baselineskip12pt

\def\rule#1{\ifvmode\leavevmode\else\unskip\,\,\fi
  \leaders\hrule\hskip#1\null}
\def\rulefil{\ifvmode\leavevmode\else\unskip\,\,\fi
  \leaders\hrule\hskip0pt plus 1fil\null}
\catcode`\_\active
\def_{\futurelet\neXt\ruleaction}
\let\underscore_
\let\period.
\newcount\undercount
\def\ruleaction{\ifx\neXt\period\def\neXt{\rulefil\gobbleperiods}%
    \else \undercount=1
    \ifx\neXt\underscore\def\neXt{\underaction}\else
  \def\neXt{\endunderaction}\fi\fi\neXt}
\def\underaction_{\advance\undercount by 1%
                  \futurelet\neXt\moreunderaction}

\def\moreunderaction{\ifx\neXt\underscore\def\neXt{\underaction}\else

  \def\neXt{\endunderaction}\fi\neXt}
\def\endunderaction{\ifvmode\leavevmode\else\unskip\,\,\fi
            \leaders\hrule\hskip\number\undercount pc\null}
\def\gobbleperiods{\futurelet\neXt\periodaction}
\def\periodaction{\ifx\neXt\period\def\neXt{\gobbleperiod}\else
  \let\neXt\empty\fi\neXt}
\def\gobbleperiod.{\gobbleperiods}

\newbox\checkbox
\setbox\checkbox\hbox{\vrule\vbox{\hrule\hbox{\vrule height0.7em
                       width0pt \vrule height0pt depth0pt width
                       0.7em}\hrule}\vrule\hskip6pt}

\def\chkbox{\leavevmode\llap{\unhcopy\checkbox}}
\def\newchkbox{{\leavevmode{\unhcopy\checkbox}}}
\def\raggedright{\rightskip=0pt plus 1000pt \hyphenpenalty10000
  \exhyphenpenalty10000 }
\let\mthinspace\,
\def\,{\ifmmode\mthinspace\else\kern0.1667em\fi}
\def\TUG{\TeX{} Users Group}
\def\POBox{P.\,O.\,Box~\ignorespaces}
\def\\{\hfil\break}

\def\ruledbox{\hbox\bgroup\vrule width 2pt\hskip8pt
                    \vbox\bgroup\advance\hsize-8pt }
\def\endruledbox{\egroup\egroup}
\def\interboxskip{\vskip1pc plus 1pc}
\def\endline{\nobreak\hfil\null\endgraf}

\newdimen\hbuffer  \hbuffer=5pt
\newdimen\vbuffer  \vbuffer=7pt
% This is a fake TUG logo to be replaced (ultimately)

% by the new design
{\catcode`\#=6
\gdef\quasiTUGlogo{{\TUGfont
  \setbox0\hbox{\vrule
                \vbox{\hrule\vskip\vbuffer
                      \hbox{\hskip\hbuffer\TeX\hskip\hbuffer}
                      \vskip\vbuffer}%
                \vrule }
  \setbox1\hbox{\vrule
                \vbox{\vskip\vbuffer
                      \hbox{\hskip\hbuffer Users\hskip\hbuffer}
                      \vskip\vbuffer}%
                \vrule }
  \setbox2\hbox{\vrule
                \vbox{\vskip\vbuffer
                      \hbox{\hskip\hbuffer Group\hskip\hbuffer}
                      \vskip\vbuffer\hrule}%
                \vrule }
  \baselineskip0pt\lineskip0pt
  \centerline{\vbox{\ialign {\hfil##\hfil\cr
    \copy0\cr
    \noalign{\hbox to \wd2{\hfil\hbox
                            to\wd1{\leaders\hrule\hfil}\hfil}}

    \copy1\cr
    \noalign{\hbox to\wd2{\leaders\hrule\hfil}}
    \box2\cr}}}
}}
}
\def\quasiTUGlogo{\vbox to 13pc{}}


%************************************************************

% Now put it all together.

\the\toks0
\the\toks1
\hbox{\box1\hskip1.5pc\box0}

\end
