PostScript fractals

This page is dedicated to fractals generated by PostScript programs. PostScript is a powerful language used in printers. The hole ide with this page is to collect PostScript programs that generate fractals useing a postscript engine either in a printer or in a PostScript viewer. If you have or know about other PostScript fractals please send me an e-mail.

Fern

This fern was posted on news by Maurizio Loreti <loreti@pd.infn.it> when I did request PostScript fractal resources.


%!PS-Adobe-1.0
%%Title:Random Fern
%%Creator:Eric Wicklund
% Last modified: MLO 02 Jan 1993 11:24:14
% Changed: 'save' and 'restore' statements (incorrect grammar);
% length added, and set to 0.001 (0 does not work with Post 1.7).
/m1 [ 0.00 0.00 0.00 0.16 0.00 0.00 ] def
/m2 [ 0.85 -0.04 0.04 0.85 0.00 1.60 ] def
/m3 [ 0.20 0.23 -0.26 0.22 0.00 1.60 ] def
/m4 [ -0.15 0.26 0.28 0.24 0.00 0.44 ] def
/point 72 def
%/length 0 def
/length 0.001 def
%%EndProlog
%%Page: 1 1
/zzz save def
% will draw inside a 8 inch square centered on 8.5 by 11 inch page
4.25 point mul 1.5 point mul translate
0.8 point mul dup scale
% x coordinate ranges from -5 to 5
% y coordinate ranges from 0 to 10
1 setlinecap
0.005 setlinewidth
% First point at origin
0 0
150000 {
% Pick a transformation matrix probabilistically
   /r rand 100 mod def
   r 1 lt { /m m1 def }
 { r 86 lt { /m m2 def }
 { r 93 lt { /m m3 def }
           { /m m4 def } ifelse } ifelse } ifelse
% Make a linear transformation, then
% plot a point at current location
   m transform 2 copy moveto
   length length rlineto
   stroke
} repeat
showpage
zzz restore
%%Trailer

Tree

When I did try to learn PostScript I wrote a postscript program that use recursion to draw a tree.

"F. J. D. Uhlik" <uhlik@sals.icpf.cas.cz> did post this tree on Usenet

Snowflakes

This snowflak is distributed as an example with the ghostscript program.

John B. Oxton <joxton@icds5.rsc.raytheon.com> did copy this fractal from the net years ago.

Joseph Hertzlinger <jhertzli@ix.netcom.com> did post a Korck Snowflake on Usenet and hi improved it with filling the snowflake with gray color.

Appolonain net

Joseph Hertzlinger <jhertzli@ix.netcom.com> did write this Appolonian net ps program.

TreePhylum

John Holder <jholder@frii.com> did provide this fractal in response to a news posting.

Koch knife

A fractal posted on Usenet by John Bailey

Foure Self-Inversive Circles

A fractal created by Will Gilbert <wgilbert@UWaterloo.ca>

Links to other PostScript fractal pages/resources

Links


Anders Reggestad
Sist endret: "Oct 30 2006"