home *** CD-ROM | disk | FTP | other *** search
/ Grandes Inventos / INVENTOS.bin / pc / media / shared.dxr / 02221_PrincSmallPauseDown.ls < prev    next >
Encoding:
Text File  |  1996-01-01  |  440 b   |  21 lines

  1. on mouseUp
  2.   global gThePhysic
  3.   set p to the clickLoc
  4.   set whichClicked to GetClickedSmallVideoButton(p)
  5.   if whichClicked = "Rewind" then
  6.     gThePhysic(mRewind)
  7.   else
  8.     if whichClicked = "FF" then
  9.       gThePhysic(mFF)
  10.     else
  11.       if whichClicked = "Replay" then
  12.         gThePhysic(mReplay)
  13.       else
  14.         if whichClicked = "PlayPause" then
  15.           gThePhysic(mPlayPause)
  16.         end if
  17.       end if
  18.     end if
  19.   end if
  20. end
  21.