home *** CD-ROM | disk | FTP | other *** search
/ IBM CD-ROM Sampler / IBM_CD-ROM_Multimedia_Sampler_IBM_1995.iso / ibmms / shadow / r / r2u.dxr / 00011.ls < prev    next >
Encoding:
Text File  |  1995-06-23  |  240 b   |  15 lines
  1. on mouseDown
  2.   global shadowRun
  3.   repeat with counter = 2 to 21
  4.     puppetSprite(counter, 0)
  5.   end repeat
  6.   sound stop 1
  7.   if shadowRun = 0 then
  8.     set shadowRun to 1
  9.     go(4)
  10.   else
  11.     set shadowRun to 0
  12.     go("begining")
  13.   end if
  14. end
  15.