on
exitframe on
startmovie
Examples
setting sprite properties:
sprite(2).loc=point(0,0)
Ð(sprite in channel 2 located at top left of stage)
sprite(2).blend=30 --(sprite in channel 2 at 30% opacity)
sprite(7).trails=1 --(sprite in channel 7 leaves trail of
marks at different positions)
SPECIAL
QUICKTIME PROPERTIES:
sprite(1).movierate=-1 --plays QT backward
sprite(1).movierate=1 -- plays QT at normal rate 30 fps
sprite(1).movierate=1+.01 --increases speed of QT playback w/
floating point #
sprite(1).movierate=2 -- plays QT 2x normal speed
go
next --go to the next marker AND go previous --go to the previous marker
go to the
frame Ðloop playback head in same frame
puppetSound
ÒfiregunÓ Ðplay sound in internal cast called firegun
if
Ðsomething is trueÑthen
DO
SOMETHINGÑexecute lingo command
end if
on
exitFrame me
global TrackObj
tolerance = 20
GrabOneFrame(TrackObj)
TrackResults=TrackChangeBlobs(TrackObj,[[tolerance,Rect(0,0,320,240)]])
FirstResult=TrackResults[1]
if FirstResult.count=0 then --(i.e. if thereÕs no change in the
reference frame)
sprite(10).movierate=0 --(i.e.
stop playback the QT movie in ch10)
--stop
end if
if FirstResult.count>1 then --(i.e. if thereÕs a marked change in
the reference frame)
sprite(10).movierate=1 --(i.e.
play the QT movie at normal speed in ch10)
end if
go the frame
end