This is a behavior from when I was playing around with QTVR. The one I ended up using was more complicated but also fine tuned for what I was doing. This is the basic script for what I did.
-- Author Robb Charnock
-- May 24, 2001
-- props gotten from getPropertyDescriptionList
-- I like to keep my props in a property list for . access
-- you can't do this and use getPropertyDescriptionList unless you hack it like this
props.transitionSprite.loc = point(-2000, -2000)
-- this just gets the basic stuff from the QTVR movie
-- anything else pretty much has to be hard coded
on mouseUp me
-- get the basics from the movie
spotId = props.sprite.ptToHotSpotID(point(the mouseH, the mouseV))
currentPan = props.sprite.pan
currentNode = props.sprite.node
-- get the movie's name
theFName = props.sprite.member.fileName
theFName = theFName.item[theFName.items.count] -- get the actual file's name
theFName = theFName.char[1..theFName.char.count - 4] -- strip off the '.mov'
on getPropertyDescriptionList me
description = [:]
description.addProp(#swingSpeed, [#default:1, #format:#integer, #range:[#min:1, #max:10], #comment:"The speed the movie will swing."])
return "This is a behavior from when I was playing around with QTVR. The one I ended up using was more complicated but also fine tuned for what I was doing. This is the basic script for what I did." & RETURN & "Other props or handlers of interest:" & RETURN & "pan of sprite whichQTVRSprite" & RETURN & "WhichQTVRSprite.swing(pan, tilt, fieldOfView, speedToSwing)" & RETURN & "tilt of sprite (whichQTVRSprite)"
36 South Court Sq
Newnan, GA 30263