home *** CD-ROM | disk | FTP | other *** search
/ Discovering Nature in the City / LUONTOCD.iso / pc / files / story / story.dxr / 00119.ls < prev    next >
Encoding:
Text File  |  1996-12-16  |  570 b   |  26 lines
  1. on enterFrame
  2.   sound stop 1
  3.   updateStage()
  4.   unLoad()
  5. end
  6.  
  7. on exitFrame
  8.   global gCurrentTime, gDuration, gCurrentLabel
  9.   set gDuration to the duration of member the member of sprite 2
  10.   set gCurrentLabel to the frameLabel
  11.   if voidp(gCurrentTime) = 1 then
  12.     set the movieRate of sprite 2 to 1
  13.     updateStage()
  14.   else
  15.     set the movieTime of sprite 2 to gCurrentTime
  16.     set the movieRate of sprite 2 to 1
  17.     updateStage()
  18.   end if
  19.   repeat while the movieRate of sprite 2
  20.     if the mouseDown then
  21.       exit repeat
  22.     end if
  23.     updateStage()
  24.   end repeat
  25. end
  26.