home *** CD-ROM | disk | FTP | other *** search
/ Let's Get Started! with Coolpix / LetsGetStartedWithCoolpix.iso / mac / macdata / quickstart_31.dxr / 00006_script-Indicator.ls < prev    next >
Encoding:
Text File  |  2003-02-28  |  601 b   |  27 lines
  1. property pSprite, pStartPosn, pEndPosn, pMovieLength, pCurTime, pPercent, pNewPosn
  2.  
  3. on beginSprite me
  4.   set the floatPrecision to 3
  5.   pSprite = sprite(me.spriteNum)
  6.   pStartPosn = 20
  7.   pEndPosn = 320
  8.   pSprite.locH = pStartPosn
  9. end
  10.  
  11. on exitFrame me
  12.   pMovieLength = sprite(1).duration
  13.   pCurTime = sprite(1).movieTime
  14.   pPercent = pCurTime.float / pMovieLength.float
  15.   pNewPosn = ((pEndPosn - pStartPosn) * pPercent) + pStartPosn
  16.   pSprite.locH = pNewPosn
  17.   timeCheck()
  18. end
  19.  
  20. on timeCheck
  21.   global whichMov, gLaunchVid
  22.   if pNewPosn = 320 then
  23.     close(gLaunchVid)
  24.     forget(gLaunchVid)
  25.   end if
  26. end
  27.