<script>
  <scene>
    <shot>
      <action>
x = -10:10
for (i in 2:6*10) {
    persp(x, x, outer(x, x, function(x, y) y*x^2), 
          col=rgb(0,0,1,.5), theta=i) 
    dev.flush() 
    Sys.sleep(1)
}
      </action>
      <dialogue>
We plot five different views of a three-dimensional plot, with a 
1 second pause in between each view.
      </dialogue>
    </shot>
  </scene>
</script>
