% 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 %!