home *** CD-ROM | disk | FTP | other *** search
/ A Virtual Reality Guide to Texas / CD.iso / texdata / vrxtra.cst / 00016_Get.ls < prev    next >
Encoding:
Text File  |  1998-06-17  |  434 b   |  12 lines
  1. on mouseUp
  2.   global gQTVRInstanceXtra
  3.   if IsQTVRMovie(gQTVRInstanceXtra) then
  4.       put QTVRGetPanAngle(gQTVRInstanceXtra) into member "PanAngle"
  5.       put QTVRGetTiltAngle(gQTVRInstanceXtra) into member "TiltAngle"
  6.       put QTVRGetFOV(gQTVRInstanceXtra) into member "FOV"
  7.       put QTVRGetNodeID(gQTVRInstanceXtra) into member "Node ID"
  8.       put QTVRGetQuality(gQTVRInstanceXtra) into member "Quality"
  9.     
  10.     end if
  11.   end if
  12. end