%% links

\let\oldinput\input
\input color %blue links!
\let\input\oldinput % color tries to redefine input

\def\anysplit#1{%
  \ifx#1\relax\let\next\relax\else
    #1\discretionary{}{}{}\let\next\anysplit
  \fi
  \next
}

\def\link#1{%
  \pdfstartlink
    user{/Subtype /Link
    /Border [ 0 0 0 ]
    /A <<
      /Type /Action
      /S /URI
      /URI (#1)
    >>}%
    {\tt \color{blue} \anysplit #1\relax}%
  \pdfendlink
}

%% the godly `pre`

\def\pre#1{\par\leavevmode\llap{\hbox to \parindent{\hfil #1 \hfil}}}

%% gives image files surrounding stretch
\newskip\imgskipamount
\def\imgskip{\vskip\imgskipamount}
\imgskipamount=0pt plus 48pt
\def\image #1 {\imgskip\input #1\imgskip}

\newcount\pics
\def\caption#1{\def\a{#1}\ifx\a\empty\else\global\advance\pics by
1\smallskip\line{\vbox{\leftskip=0pt plus 1fill\rightskip=0pt plus
1fill\parindent=0pt\relax Fig \number\pics: #1}}\smallskip\fi}