\input color

\fboxsep=0pt %color.tex is stupid

\input palette

\pagecolor{page} %
\color{text} %text color

\long\def\colo#1{\colorbox{colo}{\vbox to 31.5in{#1\vfil}}}

\pdfpageheight=36in
\pdfpagewidth=48in
\newdimen\fullhsize\fullhsize=48in
\voffset=-1in\hoffset=-1in
\def\fullline{\hbox to \fullhsize}
\hsize=11in
\vsize=36in
\nopagenumbers

%gives ''\newfont myfont=cmr10@14pt''
\newcount\thespacing
\newdimen\size
\def\spacing{
  \afterassignment\adjs \thespacing}
\def\adjs{%adjust spacing
  \baselineskip=\size \multiply\baselineskip by \thespacing \divide\baselineskip by 100
}
\def\newfont#1=#2@#3pt{%name, base, size
  \expandafter\font\csname x#1\endcsname=#2 at #3pt
  \expandafter\edef\csname #1\endcsname{\size=#3pt \adjs \csname x#1\endcsname}
}

% font definitions
\spacing=120
\newfont title=cmss10@72pt
\newfont subtitle=cmss10@48pt
\newfont text=cmr10@18pt\text
\newfont bold=cmb10@18pt
\newfont ital=cmmi10@18pt
\newfont head=cmb10@24pt

\parindent=.5in

% sectioning
\def\section#1{%
  \noindent\colorbox{section}{%
    \vbox{%
      \vskip5pt%
      \centerline{\head\color{sectiontext}#1}
      \vskip10pt%
    }%
  }%
  \bigbreak\noindent
}

\def\include #1;#2 {
  \section{#1}%
  {\leftskip=12pt\rightskip=\leftskip\input #2\par}
  \bigbreak
}

%% pictures
\newcount\pics
\def\pic#1#2{\pdfximage width #1{#2}\pdfrefximage\pdflastximage}
\def\caption#1{\def\a{#1}\ifx\a\empty\else\global\advance\pics by 1\line{\vbox{\baselineskip=18pt\smallskip\leftskip=0pt plus 1fill\rightskip=0pt plus 1fill\parindent=0pt\relax Fig \number\pics: #1\bigskip}}\fi}
\def\picture#1#2#3{\vbox{\pic{#3}{#1}\hsize=#3\caption{#2}}}
\def\picturetop#1#2#3{\vtop{\pic{#3}{#1}\hsize=#3\caption{#2}}}

%% the godly `pre`

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

%% gives image files infinite stretch

\def\image #1 {\vfil\input #1\vfil}