|
Packit |
0986c0 |
#
|
|
Packit |
0986c0 |
# $Id: animate2.dem,v 1.2 2012/02/15 03:38:19 sfeam Exp $
|
|
Packit |
0986c0 |
#
|
|
Packit |
0986c0 |
# demo for creating GIF animation and illustrating saving images to
|
|
Packit |
0986c0 |
# file one pixel to one pixel
|
|
Packit |
0986c0 |
#
|
|
Packit |
0986c0 |
# A combination of what was animate.dem and world2.dem with the
|
|
Packit |
0986c0 |
# addition of saving the rotated image to an animated GIF.
|
|
Packit |
0986c0 |
# Requires GIF_ANIMATION
|
|
Packit |
0986c0 |
#
|
|
Packit |
0986c0 |
# History:
|
|
Packit |
0986c0 |
# - 1. 3. 2006 Dan Sebald: 1st version
|
|
Packit |
0986c0 |
# 07 Jan 2006 Ethan Merritt: Revise to assume terminal type is set by caller
|
|
Packit |
0986c0 |
#
|
|
Packit |
0986c0 |
|
|
Packit |
0986c0 |
# Caller must set terminal type.
|
|
Packit |
0986c0 |
# Example of intended use:
|
|
Packit |
0986c0 |
# set term gif animate transparent opt delay 10 size 200,200 background rgb 'black'
|
|
Packit |
0986c0 |
|
|
Packit |
0986c0 |
unset title
|
|
Packit |
0986c0 |
unset key
|
|
Packit |
0986c0 |
unset xtics
|
|
Packit |
0986c0 |
unset ytics
|
|
Packit |
0986c0 |
unset ztics
|
|
Packit |
0986c0 |
set border 0
|
|
Packit |
0986c0 |
set hidden3d nooffset
|
|
Packit |
0986c0 |
set parametric
|
|
Packit |
0986c0 |
set angles degrees
|
|
Packit |
0986c0 |
set samples 64,64
|
|
Packit |
0986c0 |
set isosamples 13,13
|
|
Packit |
0986c0 |
set mapping spherical
|
|
Packit |
0986c0 |
set dummy u,v
|
|
Packit |
0986c0 |
set urange [ -90.0000 : 90.0000 ] noreverse nowriteback
|
|
Packit |
0986c0 |
set vrange [ 0.00000 : 360.000 ] noreverse nowriteback
|
|
Packit |
0986c0 |
set style data line
|
|
Packit |
0986c0 |
|
|
Packit |
0986c0 |
# Defines for gnuplot.rot script
|
|
Packit |
0986c0 |
limit_iterations=72
|
|
Packit |
0986c0 |
xrot=60
|
|
Packit |
0986c0 |
xrot_delta = 0
|
|
Packit |
0986c0 |
zrot=136
|
|
Packit |
0986c0 |
zrot_delta = 355
|
|
Packit |
0986c0 |
xview(xrot)=xrot
|
|
Packit |
0986c0 |
zview(zrot)=zrot
|
|
Packit |
0986c0 |
set view xview(xrot), zview(zrot), 1.5, 1
|
|
Packit |
0986c0 |
set size square
|
|
Packit |
0986c0 |
|
|
Packit |
0986c0 |
splot cos(u)*cos(v),cos(u)*sin(v),sin(u) notitle with lines lt 5, \
|
|
Packit |
0986c0 |
'world.dat' notitle with lines lt 2 lw 3
|
|
Packit |
0986c0 |
|
|
Packit |
0986c0 |
iteration_count=0
|
|
Packit |
0986c0 |
xrot =(xrot+xrot_delta)%360
|
|
Packit |
0986c0 |
zrot =(zrot+zrot_delta)%360
|
|
Packit |
0986c0 |
|
|
Packit |
0986c0 |
load "gnuplot.rot"
|
|
Packit |
0986c0 |
|
|
Packit |
0986c0 |
pause -1 "Hit return to continue"
|
|
Packit |
0986c0 |
|
|
Packit |
0986c0 |
reset
|
|
Packit |
0986c0 |
|
|
Packit |
0986c0 |
print "End of animate2 demo..."
|