home *** CD-ROM | disk | FTP | other *** search
/ Hope PC Multimedia SuperPack 2 / HOMEPC.iso / TAROT / DOWNLOAD / VT1.ZIP / D1.DXR / 00137.ls < prev    next >
Encoding:
Text File  |  1995-11-01  |  548 b   |  23 lines
  1. on exitFrame
  2.   set N to the castNum of sprite 24
  3.   preLoadCast(N)
  4.   put "QT " & N & "PreLoaded? " & the preLoad of cast N && the result
  5.   sound stop 1
  6.   sound stop 2
  7.   updateStage()
  8.   puppetSprite(24, 1)
  9.   set the volume of sprite 24 to 220
  10.   set the movieRate of sprite 24 to 1
  11.   repeat while the movieRate of sprite 24
  12.     if the mouseDown or the controlDown then
  13.       set the movieRate of sprite 24 to 0
  14.       unLoadCast(N)
  15.       puppetSprite(24, 0)
  16.       return 1
  17.     end if
  18.     updateStage()
  19.   end repeat
  20.   puppetSprite(24, 0)
  21.   return 0
  22. end
  23.