Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Posting-Version: version B 2.10.2 9/18/84; site sdcsvax.UUCP Path: utzoo!watmath!clyde!burl!ulysses!allegra!mit-eddie!genrad!decvax!ittvax!dcdwest!sdcsvax!hutch From: hutch@sdcsvax.UUCP (Jim Hutchison) Newsgroups: net.graphics,net.sources Subject: plot for fractal source which uses plot(3) instead of core Message-ID: <972@sdcsvax.UUCP> Date: Wed, 10-Jul-85 20:17:12 EDT Article-I.D.: sdcsvax.972 Posted: Wed Jul 10 20:17:12 1985 Date-Received: Sat, 13-Jul-85 10:29:40 EDT Organization: UCSD EMU Project (Educational Microcomputer Unix) Lines: 53 Xref: watmath net.graphics:896 net.sources:3134 *** REPLACE THIS LINE WITH YOUR MESSAGE *** Due to a number of flames and or requests I am posting this copy of the routine plot() which does not use core. It uses plot(3) line() instead. The initial openpl() and closepl() are left to the reader to use in conjunction. /* * Plot_line() * * Draw a line by length and angle relative to current x,y * * Author: Jim Hutchison (hutch@sdcsvax) * (this is free, but credit me) */ #include#include "g.h" static double crntx = 0.0, crnty = 0.0; set_coord(x,y) double x,y; { crntx = x; crnty = y; } /* * Plot a line by length and angle from current position */ plot_line(length,angle) double length,angle; { double dx,dy; MOD(angle,TWOPI); dx = length * cos(angle); dy = length * sin(angle); line( crntx, crnty, crntx + dx, crnty + dy); crntx += dx; crnty += dy; /* don't forget openpl() and closepl() */ } -- /* Jim Hutchison UUCP: {dcdwest,ucbvax}!sdcsvax!hutch ARPA: hutch@sdcsvax < Ofcourse these statements are only mine, not my employers. > */