%! % POSTSCRIPT NUMERIC PUZZLE SOLVER % ============================================ % Copyright c 1999, 2011 by Don Lancaster and Syenrgetics, Box 809, Thatcher, AZ, 85552 % (928) 428-4073 don@tinaja.com < http://www.tinaja.com > % Consulting services available per < http://www.tinaja.com/info01.html > % Additional PostScript resources at < http://www.tinaja.com/pssamp1.asp > % All commercial rights and all electronic media rights fully reserved. % Personal use permitted provided header and entire file remains intact. % Linking welcome. Reposting expressly forbidden. % version 1.1 % ========================================================================== (C:\\Documents and Settings\\don\\Desktop\\gonzo\\gonzo.ps) run % use external gonzo % Solves the 3x3 numeric puzzles by simplifying the checkoff procedure. 35 50 10 setgrid 55 55 showgrid /oneblok {gsave translate 0 0 mt 5 pu 5 pr 5 pd closepath gsave 0.8 1 1 setrgbcolor fill grestore black line3 stroke line2 1 0 mt 5 u 2 0 mt 5 u 2 0 mt 5 u 0 1 mt 2 r 0 2 mt 2 r 0 3 mt 2 r 0 4 mt 2 r gsave 0.5 0.3 translate /cstretch 0 store /sstretch 0 store /font0 /StoneSans-Bold 0.8 gonzofont font0 0 0 (5) cc 0 1 (4) cc 0 2 (3) cc 0 3 (2) cc 0 4 (1) cc 1 1 (6) cc 1 2 (7) cc 1 3 (8) cc 1 4 (9) cc grestore grestore} store /triblok {gsave translate 0 0 oneblok 6 0 oneblok 12 0 oneblok 0 6 oneblok 6 6 oneblok 12 6 oneblok 0 12 oneblok 6 12 oneblok 12 12 oneblok grestore } store 0 0 triblok 19 0 triblok 38 0 triblok 0 19 triblok 19 19 triblok 38 19 triblok 0 38 triblok 19 38 triblok 38 38 triblok %%%%%%%%%%%%%%%% %% EOF