\documentclass{article}
%
\newcount\linenum\linenum=0\relax
\newcount\colnum\colnum=0\relax
\newcount\n
\newtoks\tabtoks
\def\addtabtoks#1{\tabtoks\expandafter{\the\tabtoks#1}}
%
% GACK! nested loops!?!?!
\def\colloop#1\colrepeat{\def\coliterate{#1\relax\expandafter\coliterate\fi}%
  \coliterate \let\coliterate\relax}
\let\colrepeat\fi

\def\rowloop#1\rowrepeat{\def\rowiterate{#1\relax\expandafter\rowiterate\fi}%
  \rowiterate \let\rowiterate\relax}
\let\rowrepeat\fi
%
\def\myfont{}
\def\oct#1{\'{}#1}
\def\col{
  \setbox0=\hbox{\fontencoding{OT1}\myfont\selectfont\char\n}\global\advance\n1\relax\box0}
\def\dorow{
  & \col & \col  & \col & \col & \col & \col  & \col & \col }

\begin{document}
\section{Font Encoding OT1/Roman Family}
\n=0\relax
\def\myfont{\rmfamily}
\begin{tabular}{r|cccccccc}
  & \oct{0} & \oct{1}  & \oct{2} & \oct{3}  & \oct{4} & \oct{5}  & \oct{6} & \oct{7} \\ \hline
\oct{0}x \dorow \\
\oct{1}x \dorow \\
\oct{2}x \dorow \\
\oct{3}x \dorow \\
\oct{4}x \dorow \\
\oct{5}x \dorow \\
\oct{6}x \dorow \\
\oct{7}x \dorow \\
\oct{10}x \dorow \\
\oct{11}x \dorow \\
\oct{12}x \dorow \\
\oct{13}x \dorow \\
\oct{14}x \dorow \\
\oct{15}x \dorow \\
\oct{16}x \dorow \\
\oct{17}x \dorow \\
\end{tabular}

\section{Font Encoding OT1/Typewriter Family}
\n=0\relax
\def\myfont{\ttfamily}
\begin{tabular}{r|cccccccc}
  & \oct{0} & \oct{1}  & \oct{2} & \oct{3}  & \oct{4} & \oct{5}  & \oct{6} & \oct{7} \\ \hline
\oct{0}x \dorow \\
\oct{1}x \dorow \\
\oct{2}x \dorow \\
\oct{3}x \dorow \\
\oct{4}x \dorow \\
\oct{5}x \dorow \\
\oct{6}x \dorow \\
\oct{7}x \dorow \\
\oct{10}x \dorow \\
\oct{11}x \dorow \\
\oct{12}x \dorow \\
\oct{13}x \dorow \\
\oct{14}x \dorow \\
\oct{15}x \dorow \\
\oct{16}x \dorow \\
\oct{17}x \dorow \\
\end{tabular}
\end{document}