home *** CD-ROM | disk | FTP | other *** search
/ The Weather Channel - Everything Weather / TheWeatherChannel-EverythingWeather-Win31.iso / twcia / hurrican / hurrican.dxr / 00039.ls < prev    next >
Encoding:
Text File  |  1995-08-22  |  536 b   |  16 lines
  1. on mouseDown
  2.   global top, linesInText, slideRatio, currentLine, textCast, movieLocation
  3.   set the castNum of sprite 39 to 118
  4.   updateStage()
  5.   repeat while the mouseDown
  6.     set currentLine to currentLine - 1
  7.     if currentLine < 9 then
  8.       set currentLine to 9
  9.     end if
  10.     put currentLine into word 5 of movieLocation
  11.     set the locV of sprite 38 to top + ((currentLine - 9) * slideRatio)
  12.     updateStage()
  13.     put char 1 of line currentLine of field textCast into char 1 of line currentLine of field textCast
  14.   end repeat
  15. end
  16.