Additional Graphing Topics 487
Technical Reference module. For information about using the Program Editor, refer to
Programming.
Program Listing Every Other Graph from
Program
:cyc()
:Prgm
:local I
:¦Set mode and Window variables
:setMode(“graph”,”3d”)
:70!eyef
:M10!xmin
:10!xmax
:14!xgrid
:M10!ymin
:10!ymax
:14!ygrid
:M10!zmin
:10!zmax
:1!zscl
:¦Define the function
:(x^3ùy–y^3ùx)/390!z1(x,y)
:¦Generate pics and rotate
:For i,1,10,1
: iù10!eyeq
: DispG
: StoPic #("pic" & string(i))
:EndFor
:¦Display animation
:CyclePic "pic",10,.5,5,M1
:EndPrgm
To Next Page
Loading...
