home *** CD-ROM | disk | FTP | other *** search
/ The Weather Channel - Everything Weather / TheWeatherChannel-EverythingWeather-Win31.iso / twcia / tornado / tornado.dxr / 00063.ls < prev    next >
Encoding:
Text File  |  1995-08-22  |  411 b   |  13 lines
  1. on mouseDown
  2.   global top, linesInText, slideRatio, currentLine, textCast, movieLocation
  3.   repeat while the mouseDown
  4.     set y to the mouseV
  5.     set the locV of sprite 38 to y
  6.     updateStage()
  7.     set y to the locV of sprite 38
  8.     set currentLine to integer((y - top) / slideRatio) + 9
  9.     put currentLine into word 5 of movieLocation
  10.     put EMPTY before line currentLine of field textCast
  11.   end repeat
  12. end
  13.