% CAGED_date='r% $F version of $X'  CAGED_process='tex $F$M'
% /MAN/HELPMAC2.TEX version of Sep 25, 1988 3:57 pm
%
%
% % % % % %     FONTS FONTS FONTS!
%
\voffset=-.2in\vsize=9.5in \hoffset=-0.25in\hsize=7in      % (Remove for PifOut)
%
\font\goth=cmtt10
\font\gothi=cmsltt10
\font\gothb=cmtt10
%
\font\roman =cmr10
\font\romani=cmti10
\font\romanb=cmbx10
\font\bigroman =cmr10 scaled \magstep1
\font\bigromani=cmti10 scaled \magstep1
\font\bigromanb=cmbx10 scaled \magstep1
\font\bigbigroman =cmr10 scaled \magstep3
\font\five  = cmr5
\font\seven = cmr7
\font\keyfont=cmssq8 
%                                           %%%TEST ONLY%%%
%\font\goth=amtt10
%\font\gothi=amsltt10
%\font\gothb=amtt10    %(no bold available)
%%
%\font\roman=amr10
%\font\romani=amti10
%\font\romanb=ambx10
%\font\bigroman =amr10 at 12pt
%\font\bigromani=amti10 at 12pt
%\font\bigromanb=ambx10 at 12pt
%\font\bigbigroman =amr10 at 18pt
%\font\five= amr5
%\font\seven= amr7
%\font\keyfont=amssq8
%%
%
\roman
\newdimen\charwidth\charwidth=\hsize\divide\charwidth by 80
\newdimen\lineheight\lineheight=\baselineskip
%
% % % % % %     VERBATIM (\noformat) MODE:
%
{\catcode`\^^M=\active \global\def\fixM{\def^^M{\null\par}}}
%\catcode`\^^?=\active
\catcode`\|=\active
\newdimen\spaceskip\def\myspace{\hskip\spaceskip}
{\obeyspaces\global\let =\myspace}
\def\VERBATIM{\parskip=0pt\parindent=0.1pt%  (to indent by \leftskip)
\let\rfont=\goth\let\ifont=\gothi\let\bfont=\gothb\rfont%
\catcode`\$=12\catcode`\&=12\catcode`\#=12\catcode`\[=12%
\catcode`\^=12\catcode`\_=12\catcode`\~=12\catcode`\`=12%
\setbox0=\hbox{\goth M}\spaceskip=\wd0\obeylines\fixM\obeyspaces}
\def|{\ifvmode\indent\fi\begingroup\def|{\endgroup}\VERBATIM}
%
% % % % % %     PUT KEY-CAPS IN BOXES:   (From Glenn)
%
\newbox\keystrutbox
\setbox\keystrutbox=\hbox{\vrule height6pt depth0pt width0pt}
\def\keystrut{\relax\unhcopy\strutbox}
%
\def\[{[}\def\]{]}
\catcode`\[=\active
\def[#1]{\leavevmode\lower2.4pt\hbox{\vrule\vbox{\hrule\vskip2pt%
\hbox{\kern2pt\keyfont#1\relax\kern2pt}%
\vskip2pt\hrule}\vrule}}
\catcode`\[=12
\def\bracketboxes{\catcode`\[=\active}
\def\nobracketboxes{\catcode`\[=12}
%
% % % % % %     THE TIME:   (Thanks, Dave)
%
\newcount\DaveTime \DaveTime=\time
\newcount\timeA \newcount\timeB \newcount\timeC
\def\hour{{\timeA=\DaveTime \timeB=\timeA
    \divide\timeA60 \timeC=\timeA \multiply\timeC60
    \advance\timeB-\timeC\ifnum\timeA>11
    \advance\timeA-12 \def\time@{PM}\else\def\time@{AM}\fi
    \ifnum\timeA=0 \timeA=12 \fi\number\timeA
    :\ifnum\timeB<10 0\fi\number\timeB\nobreak\ \time@}}
\def\time{\hour}
\def\datetime{\date\ \time}
%
% % % % % %     THE HEADLINE:
%
\newcount\skippg
\newtoks\Head
\headline={\roman\hfil\ifnum\pageno>\skippg\the\Head\fi\hfil}
\skippg=0
\Head={Chipmunk Software Documentation}
%
% % % % % %     MISC. CHARACTERS:
%
\def\${\char`\$}
\def\{{\char`\{}
\def\}{\char`\}}
\def\\{\char`\\}
\def\'{\char`\'}
\def\`{\char`\`}
\def\|{\char`\|}
\def\air{\ }
%
% % % % % %     STANDARD HELPCOM COMMANDS:
%
\def\ifTeX#1{#1}
\def\ifHelp#1{}
%
\def\subject#1{}
\def\section#1{}
\def\author#1{}
\def\pagelen#1{}
\def\index#1{}
\let\oldneed=\need
\def\need#1{\oldneed#1\lineheight}
%
\def\title#1{\centerline{\bigbigroman#1}\Head={\romani#1}\skippg=1\relax}
\def\bpage{\vfill\eject}
\def\page{}                %%should be \def\page{\need300pt} ??
\def\header#1{\centerheading{#1}}
\def\noheader{\noheading}
\def\menuon  {}
\def\menuoff {}
\def\nomenu  {}
%
\def\it#1{{\ifont#1\/}}
\def\bf#1{{\bfont#1}}
%
\def\u#1{\uline{#1}}        %% HP \uline macro
\def\i#1{\it{#1}}
\def\r#1#2{{\ifont#1\/}}
\def\rr#1{{\ifont#1\/}}     %% old way to get yellow/italics -- use \it
\def\f#1#2{\r{#1}{#2}}
\def\k#1#2{\r{#1}{#2}}
\def\h#1{{\bfont#1}}
\def\bs{{\five\raise3pt\hbox{B}\kern-2pt\lower2pt\hbox{S}}}
\def\ff{{\five\raise3pt\hbox{F}\kern-2pt\lower2pt\hbox{F}\kern1pt}}
\def\crchar{{\five\raise3pt\hbox{C}\kern-2pt\lower2pt\hbox{R}}}
%
% % % % % %     NEW FORMATTING MACROS:
%
\def\nullskip{\vskip0pt}
\def\NOformat{\begingroup\VERBATIM}
\def\MYline#1{\nullskip\hbox to \hsize{\hskip\leftskip#1\hskip\rightskip}}
%
\def\format{\endgroup\vskip-\baselineskip\let\rfont=\roman\let\ifont=\romani\let\bfont=\romanb\rfont}
\def\noformat{\vskip-\baselineskip\rmarg{79}\NOformat}
\def\just{\nullskip}
\def\nojust{\nullskip}
\def\lskip{\vskip\baselineskip}
\def\space#1{\hskip#1\charwidth}
\def\nl{\hfil\break}
\def\lmarg#1{\nullskip\leftskip=#1\charwidth\advance\leftskip by -\charwidth}
\def\rmarg#1{\nullskip\rightskip=80\charwidth\advance\rightskip by -#1\charwidth}
\def\leftin#1{\nullskip\advance\leftskip by#1\charwidth}
\def\rightin#1{\nullskip\advance\rightskip by#1\charwidth}
\def\narrower{\leftin{4}\rightin{4}}
\def\centerline#1{\MYline{\hfil#1\hfil}}
\let\cl=\centerline
\def\vline#1{\MYline{\NOformat#1\endgroup\hfil}}
%
\def\twelvept{\let\rfont=\bigroman\let\ifont=\bigromani\let\bfont=\bigromanb\rfont}
\def\tenpt{\let\rfont=\roman\let\ifont=\romani\let\bfont=\romanb\rfont}
%
\def\setparskip#1{\nullskip\parskip=#1\baselineskip}
\def\setparindent#1{\nullskip\parindent=#1\charwidth}
\def\setrestindent#1{\nullskip\hangindent=#1\charwidth\hangafter=1}
%
\def\start{\nullskip\begingroup}
\def\done{\nullskip\endgroup}
%
\def\noproc#1{\noindent\MYline{#1\hfil}\nobreak\nullskip\begingroup\parskip=0pt\setparindent{3}\leftin{3}\noindent}
\def\proc#1{\noindent\vline{#1}\nobreak\nullskip\begingroup\parskip=0pt\setparindent{3}\leftin{3}\noindent}
\def\note#1{\noindent\setbox1=\hbox{#1\hskip\charwidth}\hangindent=\wd1\hangafter=1\box1}
\def\item{\noindent\vskip-\parskip\note{$\bullet$\quad}}
%
% % % % % %     MULTIPLE-COLUMNS:
%
\newdimen\Shrink\newdimen\Wd
\long\def\twocolumns#1#2{\setbox1=\hbox{#1\quad}%
\Wd=\wd1\Shrink=\Wd\advance\Shrink by\leftskip%
\halign{\hskip\leftskip\hbox to\Wd{##\hss}\hfil&\hfil\vtop{\parindent=0pt%
\advance\hsize by -\Shrink\strut##\strut}\cr#2}}
%
% % % % % %     MANUAL-FORMATTING COMMANDS:
%
\def\man#1#2{{\ifont#1(#2)}}
\def\sect#1{\goodbreak\lskip\line{{\bfont#1\hfil}}}
\def\bigsect#1{\sect{\twelvept#1}}
\def\name#1#2#3{\headline={\romanb#1(#2)\hfil\roman Chipmunk Software Documentation%
                      \hfil\romanb#1(#2)}%
                \line{\bfont NAME\hfil}\MYline{{\bfont #1} --- #3 \hfil}}
\def\synop#1{\sect{SYNOPSIS}\vskip-\parskip\noindent#1\nl}
\def\desc{\sect{DESCRIPTION}}
%
\def\files#1{\line{}\line{\gothb FILES \hfil}
            {\catcode`\&=4
             \halign{\ \ \ \ ##\hfil&\quad##\hfil\cr
                     #1\cr}}}
%
\def\fromManTeX#1{\global\footline={\roman\folio\hfil\date \ \ \{\seven #1}\hfil\folio}
\def\draft{\global\footline={\roman\folio\hfil{\romanb DRAFT}\hfil\datetime\hfil{\romanb DRAFT}\hfil\folio}}
\def\silentnest{}
%
%
% % % % % %     AND THEY'RE OFF...
%
%
\catcode`\$=12\catcode`\#=12                %%Not special any more
\catcode`\^=12\catcode`\_=12\catcode`\~=12
\Head={Chipmunk Software Documentation}   %% Default only
\footline={\roman\folio\hfil\date\hfil\folio}
\raggedbottom
\null\vskip\baselineskip
\lmarg{4}
\rmarg{79}
\setparindent{0}
\setparskip{1}
\begingroup %instead of \noformat%
