Dec 092017
 
3D Graph is a 3 dimensional equation plotter that uses an imaginary xyz coordinate system.
File 3DGRAPH.ZIP from The Programmer’s Corner in
Category Science and Education
3D Graph is a 3 dimensional equation plotter that uses an imaginary xyz coordinate system.
File Name File Size Zip Size Zip Type
3DGRAPH.COM 24964 15235 deflated
3DGRAPH.DOC 2738 945 deflated

Download File 3DGRAPH.ZIP Here

Contents of the 3DGRAPH.DOC file




3D GRAPH

BY Joe Martin
Ft. Walton Bch. FL 32548
1-904-862-7108


3D Graph is a 3 dimensional equation plotter. Plotted on an imaginary
xyz coordinate system. You have the ability to rotate the graph,
determine the object to image perspective distances, adjust the X and Y
ranges as well as their increments, state translations of both the X
and the Y axes and scale on both X and Y axes.

So experiment with the default equation then try some of the others at
the end of the doc.

Menu
Z:=2*COS(0.1*(X^2+Y^2)) The equation may be edited with backspace,
cursor keys, and the home key

YRot: Rotate along Y axis suggested range (-1.0 thru 1.0)
XRot: Rotate along X axis range (0.6 - 1.4)
Obj : distance of object from origin (20-100)
Im : distance of Image(screen) from origin (500-1000)

XRan: most equations should have a range of 10 which means (-10 to 10)
YRan: most equations should have a range of 10 which means (-10 to 10)
XInc: the step value of the loop (2.0 to 0.25)
YInc:

XTr : X Translation factor (200)
YTr : Y Translation factor (100)

ScX : Scale X (2.0)
ScY : Scale Y (1.0)

When you have made the adjustments ESC will start the plot.
Some error checking is done but overflow errors will crash the system.



Try these:

Z := 0.2*(0.1*(X/Y)^2-0.1*(Y/X)^2)+6*EXP(-1.9*(X^2+Y^2))
YRot:0.8 XRot:1.8 XRange:4 YRange:5 Obj:45 Im:900
Inc:0.25

Z := 0.5*(-0.1*(X/Y)^2-0.3*(Y/X)^2)+8*EXP(-0.1*(X^2+Y^2))
YRot:0.8 XRot:1.4 XRange:10 YRange:10 Obj:75 Im:900
Inc:0.50

Z := 0.02*(X*X*Y/X/Y)
YRot:0.3 XRot:1.2 XRange:10 YRange:10 Obj:50 Im:800
Inc:0.50

Z := 1/12*(SIN(X)*SIN(Y))
YRot:0.6 XRot:0.8 XRange:4 YRange:4 Obj:45 Im:900
Inc:0.25

Z := 2*COS(0.1*(X^2+Y^2))-2*SIN(0.1*(X^2+Y^2))
YRot:0.3 XRot:1.2 XRange:10 YRange:10 Obj:50 Im:750
Inc:0.25

Z := 0.5*(0.2*(X/Y)^2-0.2*(Y/X)^2)
YRot:0.3 XRot:1.8 XRange:10 YRange:10 Obj:45 Im:900
Inc:0.50

Z := 3*SIN(-0.05*(X^2-Y^2))-2*COS(0.1*(X^2+Y^2))
YRot:-0.6 XRot:1.2 XRange:10 YRange:10 Obj:50 Im:550
Inc:0.50



 December 9, 2017  Add comments

Leave a Reply