home *** CD-ROM | disk | FTP | other *** search
/ PC Master 1997 July & August / PCM97.iso / demos.dxr / 00032_run2.ls < prev    next >
Encoding:
Text File  |  1998-06-23  |  392 b   |  18 lines
  1. on mouseDown
  2.   global rpath, isvideo
  3.   set btn to the clickOn
  4.   set the member of sprite btn to "run2i"
  5.   updateStage()
  6.   repeat while the stillDown
  7.     updateStage()
  8.   end repeat
  9.   set the member of sprite btn to "run2"
  10.   if isvideo = 1 then
  11.     set the visible of sprite 6 to 0
  12.     set the visible of sprite 4 to 1
  13.     set the movieRate of sprite 4 to 1
  14.   else
  15.     open(rpath)
  16.   end if
  17. end
  18.