home *** CD-ROM | disk | FTP | other *** search
/ LAUNCH 3 / LAUNCH.BIN / pc / sony / mainmov.dir / 00004_Script_4 < prev    next >
Text File  |  1995-06-07  |  714b  |  35 lines
  1. --go features (mouseup)
  2.  
  3. --on mouseDown
  4. --  
  5. --  --enable lingo to move button
  6. --  puppetsprite(the clickon), true
  7. --  
  8. --  set the locV of sprite(the clickon) to (the locV of sprite(the clickon) + 5)
  9. --  updatestage
  10. --end
  11.  
  12.  
  13. on mouseUp
  14.   global QTMovieSprite
  15.   
  16.   BUTTONOFFSET
  17.   
  18.   RESETCURSOR
  19.   
  20.   --enable lingo to move hide button
  21.   puppetsprite(the clickon), false
  22.   
  23.   set the visible of sprite(45) = false
  24.   puppetsprite(45), false  --turn off popups
  25.   updatestage
  26.   
  27.   if the movietime of sprite(QTMovieSprite) <> 184 then
  28.     --reposition the discman
  29.     set sideFrontx = 4.0
  30.     set sideFronty = 5.0
  31.     ROTATETOVIEW(sideFrontx,sideFronty)
  32.   end if
  33.   
  34.   go "features"
  35. end