home *** CD-ROM | disk | FTP | other *** search
/ PC PowerPlay 25 / CDPowerplay25.iso / MEDIA / LOOP.DXR / 00004.ls < prev    next >
Encoding:
Text File  |  1998-02-13  |  434 b   |  24 lines
  1. global inTime, mouseInH, mouseInV
  2.  
  3. on startMovie
  4.   set inTime to the timer + (5 * 60)
  5.   set the keyDownScript to "loopkeyscript"
  6. end
  7.  
  8. on loopkeyscript
  9.   go("out")
  10. end
  11.  
  12. on idle
  13.   if the frame = 2 then
  14.     if inTime < the timer then
  15.       if (mouseInH <> the mouseH) or (mouseInV <> the mouseV) then
  16.         go("out")
  17.       else
  18.         set mouseInH to the mouseH
  19.         set mouseInV to the mouseV
  20.       end if
  21.     end if
  22.   end if
  23. end
  24.