\newif\iflatex\latextrue
\ifx\documentclass\undef\latexfalse\fi

\message{^^JDEBUG(1): STARTING^^J}

\iflatex
\documentclass{minimal}
\usepackage{color}
\fi
\errorcontextlines=999
%\tracingonline=1
%\tracingcommands=1
%\tracingmacros=1

\chardef\letter11
\chardef\other12
\catcode`\^^J9    % ignore newlines
\catcode`\^^M9    % (see also comm for catcode grouping)

\iflatex
  \makeatletter
\else
  \input setup
\fi
\input pict
\input param
\input vars
\input math
\input trig
\input comm
\input go
\input active % must be after comm!

%%%%%%%%%%%%%
% MAIN LOOP!


%\tracingonline=1
%\tracingcommands=1
%\tracingmacros=1
%\tracingifs=1

\iflatex\begin{document}\fi
\mainloop
\iflatex\end{document}\else\bye\fi