From: bau@cs.cornell.edu (David Bau)
Date: Tue, 27 Oct 92 14:53:24 -0500 
Subject: 3d-printer-maze.ps 

This is my second of two new postscript maze submissions.

This file optionally allows tunnel crossings (3-D) and has a "twistiness"
parameter which you can vary to change the overall look of the maze.  It
supports squarish as well as curvy pipe-like tunnels (although it's always
based on a square grid), and, like the previous one, it is scalable and it
can optionally produce an answer page.  It does not, however, support
multipage mazes, so if you want huge mazes, don't throw out the other file.

The tunnel crossings make the mazes quite formidable to solve by hand.

To get mazes, just send this postscript file to your printer, and it will
randomly generate a maze and print it out.  If you are having trouble
getting mazes out of the file, you have to make sure that the file begins
with the %! line, and have to send the file directly to your printer,
either by usinging Adobe's free program SendPS, in the info-mac
archives or the System 7 Laserwriter utility.

THIS SUBMISSION COMES WITH A REQUEST FOR HELP!  For some reason, the
file works well when I output it on non-Adobe postscript emulators and
when I output it on NeXT equipment, but I cannot get it to work on a
plain Laserwriter II.  If you can get it to work on your printer, I'd
appreciate knowing what type of printer it is.  If you know any Adobe
gurus out there who can help me figure out where the Laswerwriter is
crashing, I'll send them my source code and what I've figured out so far.

Send me a postcard if you like the mazes!  :)

David Bau
bau@cs.cornell.edu
}--- cut here ---{
%!
% Expert Labyrinth for Postscript printers, Copyright 1992 by David Bau

.00 .15 % line weights (0..1) % This file is free puzzleware.  :)
   -.70 % tunnel shape(-1..1) % Please distribute it and its output only for
     40 % twistiness (0..100) %  free, and keep my original comments intact.
   true % tunnel crossings    % If you like it or if you have a suggestion,
612 792 % page dimensions     %  send me a postcard from your home town!
 18  18 % page margins        % 777 South Avenue; Weston, MA 02193; USA
     12 % cell size           % bau@cs.cornell.edu

/`/def/*/repeat/~/lineto/!/mod/@/if/#/ifelse/$/dup/^/add/|/stroke/'/put/S/gsave
/./exit/,/and/&/sub/-/or/_/loop/=/exch/+/eq/Z/ne/"/bind/:/get/;/bitshift/W/exec
/N/mul/O/translate/P/neg/Q/for/?/moveto/T/grestore/X/showpage/$/dup/V/arc/M/pop
/Y/setlinewidth/R/div 73 dict begin 35{load def}repeat(,b5;-'/aabaCPbzN^`/bbw4!
`}{/bb3^4!`}#}_}"WYI$0Z{SXTIYH}{M}#XT)(31)({.}@}_c1eK$G4-'c0eK5'cfdK$G1-'cfdKw5
'/hfwdK`/a0eK`/b0`{ah+{.}@aGbJ,0Z{caaG)(ge)(gf2R&)(abs)(;`b4+{.}@/abaCPbzNa^`}#
}_{/eghw`/dghw`de&)(-5)(,k5;-}@'}_caaGk$5;=J--'}{/baG)(lt{15 xor 31)(-6h3)(16)(
`caaGbJ-'baC{BcaaG)(xor)({{l$i=:d{.}@M}_}{4}#}#`b4Z{/kb2)(100 h n ge ,{b}{false
i{d -}forall)('}Q}*/afhwghwK`/bl`ca45;'{/b/i[013{aC}Q]`ib:d)(16)(;`SaEOb{L}*mw4
!b+{L}@umb^2!:WTah+{.}@/bm`baCP{BSaEOb2!{L}*1y?sy~ry?0y~|T}_}_}D{01px{c=0'}Q01o
po&1p0opoxop4{x{c=)(-5)(,0Z/nA013{$Ji,0Z{/kA/lk`/ml`4{/mmw4!`LmJi,0Z{tl4^m&4!:W
/lm`}@km+{.}@}*.}@LM}QT}Q}D/H{/a0eK`/b0`{/maG)(15 ,/i A 16)(abz^`x$0+{M.}@}D/I{
01px{/aASaEOaG$)(/L{90 rotate 0 -1 O}D /B{/a)(,FZ{P.}@}_}D)(15)(,0+{M.}@)(31)(#
/FA0{w/jjv^`jG$)({10}{5})(0V|}"}{{0y?yy~y1~|}"}#]`/l{{5h$4Z{.}@M}_}D/C{/jA$z/vA
1,0+)(270)([{1y?0y~|}"e{{01y)(/u)(V|}"}{{1r?sr~s0~|}"}#]`)(90 180)(V|}"}{{1r?rr
~rs~1s~|}"{1r?rr~r1~|}"}#{1r?0r~n{s0?sr~r0?rr~}@|}"e{{10r)(180 270)(V1r~|}"{11s
)(90 270)(x}D/z{[1o1PoP]=:}D/J{1=;}D/G{c=:}D/t[e{{1s?yyq)(idiv)(=!}D/K{oN^}D/E{
$o!x=o)S(/c p array `/w{1 ^}D/x{1 &}D/h{rand)(2R/qA/ryq&`/syq^`/of2^`/pog2^N`)(
ge/e A/y .5 ` abs)({{1+}}#"/dA/nA$0)(scale{{1 ge}})($/fAcN&2R/oAopOcc)(cvi)($/g
AcN&2R/pA$o&cR)(cvi)(/k/b/a3{0`}*/D{"`}"`/A{=`}D/cA$^/pA$^/oA$p&cR)()/j{F = i $
1 ^/i = ` = '}/F 2157 string/i 0/m{32 j}/v{forall}5{`}* 27{{j}v m{$ j 47 Z{m}@}
v}* F cvx W end