| Edward Rosten 2007-12-19, 7:27 pm |
| On Dec 19, 12:35 pm, Edward Rosten <Edward.Ros...@gmail.com> wrote:
My fault, I got my line lengths wrong, and it was being wrapped. Not
at 72 chars:
echo '+++++++[>++++++++++<-]>+++++++.<++++++[>++++<-]>.+++++++++++++..
+++++++.[-]<+++++[>++++++<-]>++.<+++++[>+++++++<-]>.<++++++[>+++++++<
-]>-----.++++++++++.---------.++++++++++.+.-------.<+++[>----<-]>.<++
+[>++++++<-]>.[-]<+++[>+++<-]>+.'|tr -d '[:space:]' | sed -e'
s/.*/00{#&}/;:p;/#\[/bf;/#]/bo;s/#\(.\)\(.*\)/\1#\2/;:e;/#}/!bp;
s/.*{\(.*\)#}.*/\1/;bi;:f;s/\(..\).*/&\1/;
s/\(..\)\(.*\)#\[\(.*\)/\1\2[\1#\3/; h; s/.\(.\).*/\1/;
y/0123456789ABCDEF/123456789ABCDEF0/; x; G; s/\(.\).\(.*\)\n\(.\)/
\1'\
'3\2/;/^.0/!be; h; s/\(.\).*/\1/; y/0123456789ABCDEF/
123456789ABCDEF0/;
x;G;s/^.\(.*\)\n\(.\)/\2\1/;be;:o;s/^\(.*\)#]\(.*\)\(..\)/\1]\3#
\2/;be;
:i;s/.*/#&@!00%/;:m;s/.*#\(.\).*/&\1/;/+$/ba;/-$/bs;/>$/br;/<$/bl;/
\.'\
'$/bt;/,$/bd; /\[$/bw; /]$/bv; :x; s/#\(.\)\(.*\)/\1#\2/;
/[][]#[A-Z0-9][A-Z0-9]/s/#\(..\)\(.*\)/\1#\2/;: y;/#@/!bm;s/.*//;q;:a;
s/.$//; s/.*!\(..\).*/&\1/; h; s/.*\(.\)/\1/;
y/0123456789ABCDEF/123456789ABCDEF0/; x; G; s/.\n\(.\)/\1/; /0$/!bn;
h;
s/.*\(.\)./\1/; y/0123456789ABCDEF/123456789ABCDEF0/; x; G;
s/.\(.\)\n\(.\)/\2\1/; :n; s/!..\(.*\)%\(..\)/!\2\1%/; bx; :s; s/.$//;
s/.*!\(..\).*/&\1/;h;s/.*\(.\)/\1/;y/
123456789ABCDEF0/0123456789ABCDEF/;
x; G; s/.\n\(.\)/\1/; /F$/!bb; h; s/.*\(.\)./\1/;
y/123456789ABCDEF0/0123456789ABCDEF/; x; G; s/.\(.\)\n\(.\)/\2\1/; :b;
s/!..\(.*\)%\(..\)/!\2\1%/; bx; :r; s/.$//; /!..%/s/%/00%/;
s/!\(..\)\(.*\)/\1!\2/;bx;:l;s/.$//;/@!/s/@/@00/;s/\(..\)!\(.*\)/!
\1\2/;
bx; :t; s/.$//; h; s/.*!\(..\).*/\1/;
s/.*/&--01A02B03C04D05E06F07G08H09 --0A\
--0BK0CL0DM0EN0FO10P11Q12R13S14T15U16V--17W18X19Y1AX1B[--1C
\--1D]--1E'\
'^--1F_--20
--21!--22"--2'\3#--24$--25%--26\&--27'''--28(--29)--2A*-'\
'-2B+--2C,--2D---2E.--2F
\/--300--311--322--333--344--355--366--377--3'\
'88--399--3A:--3B;--3C<--3D=--3E>--3F?--40@--41A--42B--43C--44D--45E-'\
'-46F--47G--48H--49I--4AJ--4BK--4CL--4DM--4EN--4FO--50P--51Q--52R--53'\
'S--54T--55U--56V--57W--58X--59Y--5AZ--5B[--5C\
\--5D]--5E^--5F_--60`-'\
'-61a--62b--63c--64d--65e--66f--67g--68h--69i--6Aj--6Bk--6Cl--6Dm--6E'\
'n--6Fo--70p--71q--72r--73s--74t--75u--76v--77w--78x--79y--7Az--7B{--'\
'7C|--7D}--7E~/;s/\(..\).*--\1//;s/\(.\).*/\1/;p;x;bx;:d;s/.
$//;N;s/!'\
'..\(.*\)\n\(..\)/!\2\1/;bx;:w;s/.$//;/!00/!bx;s/\(.*\)#\[\(..\)\(.*
'\
')]\2\(.*\)/\1[\2\3#]\2\4/;bx;:v;s/.$//;s/\(.*\)#]\(..\)\(.*\)/
\2\1]'\
'2\3/;s/\(..\)\(.*\)\[\1\(.*\)/\2#[\1\3/;by;' | xxd -p |
sed -e's/\(..\)../\1/g' | xxd -p -r
-Ed
----
(You can't go wrong with psycho-rats.) (http://mi.eng.cam.ac.uk/
~er258)
/d{def}def/f{/Times findfont s scalefont setfont}d/s{11}d/r{roll}d f 2/
m
{moveto}d -1 r 230 350 m 0 1 179{1 index show 88 rotate 4 mul 0
rmoveto}
for /s 12 d f pop 235 420 translate 0 0 moveto 1 2 scale show
showpage
|