# A generic rotation routine for the gnuplot demos. In the commands # that load this file, the following should be defined: # # iteration_count: set iteration_count=0 # # iteration_delay: pause between frames of iteration (defaults to 0.1 sec) # # limit_iterations: if set to a nonzero value, it'll stop after that # many iterations; if zero value, continues indefinitely # # xrot: the initial x rotation of the view # # xrot_delta: the amount to increment the x rotation for each new plot # # xview: function for generating x view value; for example # xview(xrot)=(50.+30.*sin((xrot%180)/180.*pi)) # # zrot: the initial z rotation of the view # # zrot_delta: the amount to increment the z rotation for each new plot # # zview: function for generating z view value; for example # zview(zrot)=(60.+45.*sin(zrot/180.*pi)) # # History: # - 1. 1. 2006 Dan Sebald: Made more generic so other demos could use # - ?. ?. ? Hans-Bernhard Broeker: Used to just turn round and round # by somewhat large steps. Now, it tumbles back and forth # smoothly. # - ?. ?. ? ?: Initial recursive script # Nov 2017 Switch to version 5 iteration syntax rather than reread # Add timed pause if (!(exists("iteration_delay"))) iteration_delay = 0.1 while ((!limit_iterations) || (iteration_count<=limit_iterations)) { set view xview(xrot), zview(zrot) replot zrot = (zrot+zrot_delta) % 360 xrot = (xrot+xrot_delta) % 360 iteration_count = iteration_count + 1 pause iteration_delay }
Generated by dwww version 1.15 on Mon Jun 24 14:10:35 CEST 2024.