% Generates an ASCII chart that will fit a standard biz card 2" x 3.5"
% outputted here at 2X for reduction before reproduction. This file is
% actually the output of a PMATE editor macro, which should appear appended
% to this .TEX source file. 
%
% This relies on Ray F. Cowan's table macros, the ones in RULED.TEX
% from the CHANNEL ONE BBS.
%
% This thing is a bit kludgey. No apologies given. You may use it freely but
% please give me credit if you propagate it further.
%
% Tom Jennings -- 21 July 91 -- Fido Software, Box 77731, San Francisco CA 94107
% 
% This is my basic Plain TeX macros and junk. Nothing mystical.
% You will have to hack the font-setting to fit your scheme. Mine sets
% \rm, \it, \baselineskip etc.
%
\input tex	%	 my basic Plain TeX defs
\tenpointsanserif	% sets baselines, etc
\font\rm=cmss10 scaled\magstep1 \rm%  double-width font
%
% Paper size set to 2X a biz card, 2" x 3.5".
%
\hsize=4in \advance\hsize-.4in%	minus .1in each edge ( x 2)
\vsize=7in \advance\vsize-.4in%	minus .1in each edge ( x 2)

\input ruled		% load the table macros
\def\tablestrut{\vrule height11pt depth 3pt width0pt}%	tight vert. spacing
\def\gap{\vrule height15pt depth 3pt width0pt}%	gap every 8
\def\ctr#1{$\,$\hfil#1\hfil$\,$}%	the default uses tons of space
\thinsize=.5pt%		very thin lines
\thicksize=.5pt%	very thin lines

\begintable
\vrule height12pt width0pt {\tenpointsanserif\bf10} & {\tenpointsanserif\bf16} &  | {\tenpointsanserif\bf10} & {\tenpointsanserif\bf16} &  | {\tenpointsanserif\bf10} &
 {\tenpointsanserif\bf16} &  | {\tenpointsanserif\bf10} & {\tenpointsanserif\bf16} & \nr
$\,$0 & 0 & {\bf nul}\hfill$\,$|$\,$  32 & 20 &   \hfill$\,$|$\,$  64 & 40 & @\hfill$\,$|$\,$  96 & 60 & `\hfill \nr
$\,$1 & 1 & {\bf soh}\hfill$\,$|$\,$  33 & 21 & !\hfill$\,$|$\,$  65 & 41 & A\hfill$\,$|$\,$  97 & 61 & a\hfill \nr
$\,$2 & 2 & {stx}\hfill$\,$|$\,$  34 & 22 & "\hfill$\,$|$\,$  66 & 42 & B\hfill$\,$|$\,$  98 & 62 & b\hfill \nr
$\,$3 & 3 & {etx}\hfill$\,$|$\,$  35 & 23 & \#\hfill$\,$|$\,$  67 & 43 & C\hfill$\,$|$\,$  99 & 63 & c\hfill \nr
$\,$4 & 4 & {\bf eot}\hfill$\,$|$\,$  36 & 24 & \$\hfill$\,$|$\,$  68 & 44 & D\hfill$\,$|$\,$  100 & 64 & d\hfill \nr
$\,$5 & 5 & {enq}\hfill$\,$|$\,$  37 & 25 & \%\hfill$\,$|$\,$  69 & 45 & E\hfill$\,$|$\,$  101 & 65 & e\hfill \nr
$\,$6 & 6 & {\bf ack}\hfill$\,$|$\,$  38 & 26 & \&\hfill$\,$|$\,$  70 & 46 & F\hfill$\,$|$\,$  102 & 66 & f\hfill \nr
$\,$7 & 7 & {bel}\hfill$\,$|$\,$  39 & 27 & '\hfill$\,$|$\,$  71 & 47 & G\hfill$\,$|$\,$  103 & 67 & g\hfill \nr
\gap$\,$8 & 8 & {bs}\hfill$\,$|$\,$  40 & 28 & (\hfill$\,$|$\,$  72 & 48 & H\hfill$\,$|$\,$  104 & 68 & h\hfill \nr
$\,$9 & 9 & {ht}\hfill$\,$|$\,$  41 & 29 & )\hfill$\,$|$\,$  73 & 49 & I\hfill$\,$|$\,$  105 & 69 & i\hfill \nr
$\,$10 & A & {lf}\hfill$\,$|$\,$  42 & 2A & *\hfill$\,$|$\,$  74 & 4A & J\hfill$\,$|$\,$  106 & 6A & j\hfill \nr
$\,$11 & B & {vt}\hfill$\,$|$\,$  43 & 2B & +\hfill$\,$|$\,$  75 & 4B & K\hfill$\,$|$\,$  107 & 6B & k\hfill \nr
$\,$12 & C & {ff}\hfill$\,$|$\,$  44 & 2C & ,\hfill$\,$|$\,$  76 & 4C & L\hfill$\,$|$\,$  108 & 6C & l\hfill \nr
$\,$13 & D & {cr}\hfill$\,$|$\,$  45 & 2D & -\hfill$\,$|$\,$  77 & 4D & M\hfill$\,$|$\,$  109 & 6D & m\hfill \nr
$\,$14 & E & {so}\hfill$\,$|$\,$  46 & 2E & .\hfill$\,$|$\,$  78 & 4E & N\hfill$\,$|$\,$  110 & 6E & n\hfill \nr
$\,$15 & F & {si}\hfill$\,$|$\,$  47 & 2F & /\hfill$\,$|$\,$  79 & 4F & O\hfill$\,$|$\,$  111 & 6F & o\hfill \nr
$\,$\gap16 & 10 & {dle}\hfill$\,$|$\,$  48 & 30 & 0\hfill$\,$|$\,$  80 & 50 & P\hfill$\,$|$\,$  112 & 70 & p\hfill \nr
$\,$17 & 11 & {xon}\hfill$\,$|$\,$  49 & 31 & 1\hfill$\,$|$\,$  81 & 51 & Q\hfill$\,$|$\,$  113 & 71 & q\hfill \nr
$\,$18 & 12 & {dc2}\hfill$\,$|$\,$  50 & 32 & 2\hfill$\,$|$\,$  82 & 52 & R\hfill$\,$|$\,$  114 & 72 & r\hfill \nr
$\,$19 & 13 & {xff}\hfill$\,$|$\,$  51 & 33 & 3\hfill$\,$|$\,$  83 & 53 & S\hfill$\,$|$\,$  115 & 73 & s\hfill \nr
$\,$20 & 14 & {dc4}\hfill$\,$|$\,$  52 & 34 & 4\hfill$\,$|$\,$  84 & 54 & T\hfill$\,$|$\,$  116 & 74 & t\hfill \nr
$\,$21 & 15 & {\bf nak}\hfill$\,$|$\,$  53 & 35 & 5\hfill$\,$|$\,$  85 & 55 & U\hfill$\,$|$\,$  117 & 75 & u\hfill \nr
$\,$22 & 16 & {\bf syn}\hfill$\,$|$\,$  54 & 36 & 6\hfill$\,$|$\,$  86 & 56 & V\hfill$\,$|$\,$  118 & 76 & v\hfill \nr
$\,$23 & 17 & {etb}\hfill$\,$|$\,$  55 & 37 & 7\hfill$\,$|$\,$  87 & 57 & W\hfill$\,$|$\,$  119 & 77 & w\hfill \nr
$\,$\gap24 & 18 & {\bf can}\hfill$\,$|$\,$  56 & 38 & 8\hfill$\,$|$\,$  88 & 58 & X\hfill$\,$|$\,$  120 & 78 & x\hfill \nr
$\,$25 & 19 & {em}\hfill$\,$|$\,$  57 & 39 & 9\hfill$\,$|$\,$  89 & 59 & Y\hfill$\,$|$\,$  121 & 79 & y\hfill \nr
$\,$26 & 1A & {\bf sub}\hfill$\,$|$\,$  58 & 3A & :\hfill$\,$|$\,$  90 & 5A & Z\hfill$\,$|$\,$  122 & 7A & z\hfill \nr
$\,$27 & 1B & {esc}\hfill$\,$|$\,$  59 & 3B & ;\hfill$\,$|$\,$  91 & 5B & [\hfill$\,$|$\,$  123 & 7B & $\{$\hfill \nr
$\,$28 & 1C & {fs}\hfill$\,$|$\,$  60 & 3C & {\tt <}\hfill$\,$|$\,$  92 & 5C & \backslash \hfill$\,$|$\,$  124 & 7C & $\vert$\hfill \nr
$\,$29 & 1D & {gs}\hfill$\,$|$\,$  61 & 3D & =\hfill$\,$|$\,$  93 & 5D & ]\hfill$\,$|$\,$  125 & 7D & $\}$\hfill \nr
$\,$30 & 1E & {rs}\hfill$\,$|$\,$  62 & 3E & {\tt >}\hfill$\,$|$\,$  94 & 5E & \^\ \hfill$\,$|$\,$  126 & 7E & \~\ \hfill \nr
$\,$31 & 1F & {us}\hfill$\,$|$\,$  63 & 3F & ?\hfill$\,$|$\,$  95 & 5F & \underbar{\ }\hfill$\,$|$\,$  127 & 7F & \hskip-.5em del\hfill\strut\endtable

\bye
% ----------------------------------------------------------------
%
% If you do not have the PMATE text editor, you can delete everything 
% beyond the \bye statement above. PMATE users -- delete the first three 
% characters from every line following this next line of dashes:
% (the command:  145[3dl]  will do it)
% ----------------------------------------------------------------
%! btea500k
%! i% Generates an ASCII chart that will fit a standard biz card 2" x 3.5"
%! % outputted here at 2X for reduction before reproduction. This file is
%! % actually the output of a PMATE editor macro, which should appear appended
%! % to this .TEX source file. 
%! %
%! % This relies on Ray F. Cowan's table macros, the ones in RULED.TEX
%! % from the CHANNEL ONE BBS.
%! %
%! % This thing is a bit kludgey. No apologies given. You may use it freely but
%! % please give me credit if you propagate it further.
%! %
%! % Tom Jennings -- 21 July 91 -- Fido Software, Box 77731, San Francisco CA 94107
%! % 
%! % This is my basic Plain TeX macros and junk. Nothing mystical.
%! % You will have to hack the font-setting to fit your scheme. Mine sets
%! % \rm, \it, \baselineskip etc.
%! %
%! \input tex		% my basic Plain TeX defs
%! \tenpointsanserif	% sets baselines, etc
%! \font\rm=cmss8 scaled\magstep1 % double-width font
%! %
%! % Paper size set to 2X a biz card, 2" x 3.5".
%! %
%! \hsize=4in \advance\hsize-.4in%	minus .1in each edge ( x 2)
%! \vsize=7in \advance\vsize-.4in%	minus .1in each edge ( x 2)
%! 
%! \input ruled		% load the table macros
%! \def\tablestrut{\vrule height11pt depth 3pt width0pt}%	tight vert. spacing
%! \def\ctr#1{\hfil\ #1}%	the default uses tons of space
%! \thinsize=.2pt%		very thin lines
%! \thicksize=.2pt%	very thin lines
%! 
%! \begintable
%! \vrule height12pt width0pt {\tenpointsanserif\bf10} & {\tenpointsanserif\bf16} &  | {\tenpointsanserif\bf10} & {\tenpointsanserif\bf16} &  | {\tenpointsanserif\bf10} &
%!  {\tenpointsanserif\bf16} &  | {\tenpointsanserif\bf10} & {\tenpointsanserif\bf16} & \nr
%! 
%! 0v0
%! 32[;			32 rows (cols are done within the loop)
%! ; CONTROL CODES
%!   10QO@0\;		decimal value
%!   i & 
%!   16QO@0\;		hex value
%!   i & 
%!   10QO;		back to decimal!
%!   123i;		insert '{'
%!   @0=0[i\bf nul];
%!   @0=1[i\bf soh];
%!   @0=2[istx];
%!   @0=3[ietx];
%!   @0=4[i\bf eot];	the \bf stuff is so that 
%!   @0=5[ienq];		control codes commonly
%!   @0=6[i\bf ack];	used in the FidoNet and BBS
%!   @0=7[ibel];		worlds are highlighted ...
%!   @0=8[ibs];
%!   @0=9[iht];
%!   @0=10[ilf];
%!   @0=11[ivt];
%!   @0=12[iff];
%!   @0=13[icr];
%!   @0=14[iso];
%!   @0=15[isi];
%!   @0=16[idle];
%!   @0=17[ixon];
%!   @0=18[idc2];
%!   @0=19[ixff];
%!   @0=20[idc4];
%!   @0=21[i\bf nak];
%!   @0=22[i\bf syn];
%!   @0=23[ietb];
%!   @0=24[i\bf can];
%!   @0=25[iem];
%!   @0=26[i\bf sub];
%!   @0=27[iesc];
%!   @0=28[ifs];
%!   @0=29[igs];
%!   @0=30[irs];
%!   @0=31[ius];
%!   125i
%!   i\hfill
%! 
%! ; GRAPHICAL CHARS
%!   i$\,$|  ;		column separator
%!   32va0;		next column value ...
%!   10QO@0\;		decimal value
%!   i & 
%!   16QO@0\;		hex value
%!   i & 
%!   10QO;		back to decimal!
%!   @0=32[i ];		space
%!   @0=35[i\];		prefix TeX special #
%!   @0=37[i\];		prefix TeX special %
%!   @0=38[i\];		prefix TeX special &
%!   @0=36[i\];		prefix TeX special $
%!   @0=60[123ii\tt ];	prefix TeX < with '{\tt '
%!   @0=62[123ii\tt ];	prefix TeX >
%!   @0i;
%!   @0=60[125i];		suffix TeX < with '}'
%!   @0=62[125i];		suffix TeX >
%!   i\hfill
%! 
%! ; UPPER CASE
%!   i$\,$|  ;		column separator
%!   32va0;		next column value ...
%!   10QO@0\;		decimal value
%!   i & 
%!   16QO@0\;		hex value
%!   i & 
%!   10QO;		back to decimal!
%!   @0=94[i\];		prefix TeX special ^
%!   @0=92[i\backslash ][; if TeX special \ enter '\backslash'
%!     @0=95[i\underbar{\ }][; else if TeX special _ enter '\underbar{\ }'
%!       @0i];		else the char
%!   ];
%!   @0=94[i\ ];		\^ is applied to this!
%!   i\hfill
%! 
%! ; LOWER CASE
%!   i$\,$|  ;		column separator
%!   32va0;		next column value ...
%!   10QO@0\;		decimal value
%!   i & 
%!   16QO@0\;		hex value
%!   i & 
%!   10QO;		back to decimal!
%!   @0=123[i$\];		prefix TeX special { with '$\'
%!   @0=125[i$\];		prefix TeX special } with '$\'
%!   @0=126[i\];		prefix TeX special ~
%!   @0=127[i\hskip-.5em del][;	if DEL insert "DEL"
%!     @0=124[i$\vert$][;	else if TeX special | insert "$\vert$"
%!       @0i];		else the char
%!   ];
%!   @0=123[i$];		suffix TeX special { with '$'
%!   @0=125[i$];		suffix TeX special } with '$'
%!   @0=126[i\ ];		\^ is applied to a space
%!   i\hfill
%! 
%!   -95va0;		next character (...+96 - 95)
%!   @0=32[i\strut\endtable
%! ][i \nr
%! ];			end of row (\nocr or \endtable after last char)
%! ];
%! 
%! i
%! \bye
%! 
