home *** CD-ROM | disk | FTP | other *** search
/ Stone Design / Stone Design.iso / Stone_Friends / Wave / WavesWorld / Examples / canonicalRIB / simpleAnimatableModels / Sphere2.wwModel / initialDefines.eve next >
Encoding:
Text File  |  1995-04-10  |  563 b   |  25 lines

  1. set sphere(color) {1.0 0.0 0.0}
  2. set sphere(radius) 1.0
  3. EveCmd {set sphere(zMin) -$sphere(radius)}
  4. EveCmd {set sphere(zMax) $sphere(radius)}
  5.  
  6. set sphere(thetaMax) 360.0
  7.  
  8. set sphere(volumePreservingScaleFactor) 1.0
  9.  
  10. set sphere(xTranslate) 0
  11. set sphere(yTranslate) 0
  12. set sphere(zTranslate) 0
  13. set sphere(xRotate) 0
  14. set sphere(yRotate) 0
  15. set sphere(zRotate) 0
  16.  
  17. # some animation stuff
  18. set shape sphere
  19. set ${shape}(heightAmt) 1
  20. set ${shape}(radiusAmt) 2
  21. set ${shape}(zMinAmt) .5
  22. set ${shape}(zMaxAmt) 1
  23. set ${shape}(squashFactor) -0.33
  24. set ${shape}(stretchFactor) 0.33
  25.