home *** CD-ROM | disk | FTP | other *** search
/ Car Screensaver - Toyota / TOYOTA.iso / mjparty / no1_demo / dnorp01a.dxr / script_10.ls < prev    next >
Encoding:
Text File  |  1996-10-31  |  627 b   |  34 lines
  1. on exitmenuh
  2.   global gland
  3.   set gland to 3
  4.   sound stop 2
  5.   cursor([3, 4])
  6.   startTimer()
  7.   repeat while the timer < 30
  8.   end repeat
  9.   set the memberNum of sprite 34 to 28
  10.   puppetSound(3, 100)
  11.   updateStage()
  12.   reseth()
  13.   unLoadCast()
  14.   preLoadMovie("DNORP01b.DIR")
  15.   repeat while soundBusy(3)
  16.   end repeat
  17.   abort()
  18. end
  19.  
  20. on reseth
  21.   repeat with n = 9 to 13
  22.     puppetSprite(n, 0)
  23.   end repeat
  24.   repeat with n = 16 to 28
  25.     puppetSprite(n, 0)
  26.   end repeat
  27.   repeat with n = 31 to 32
  28.     puppetSprite(n, 0)
  29.   end repeat
  30.   puppetSprite(34, 0)
  31.   set the constraint of sprite 31 to 0
  32.   set the constraint of sprite 32 to 0
  33. end
  34.