home *** CD-ROM | disk | FTP | other *** search
/ Car Screensaver - Toyota / TOYOTA.iso / mjparty / qh_demo.exe / DEMOHNT1.DXR / 00005.ls < prev    next >
Encoding:
Text File  |  1996-08-09  |  575 b   |  30 lines
  1. on exitFrame
  2.   repeat with n = 1 to 18
  3.     set the locH of sprite 3 to -91 + (n * 15)
  4.     updateStage()
  5.   end repeat
  6.   repeat while soundBusy(1)
  7.     nothing()
  8.   end repeat
  9.   startTimer()
  10.   repeat while the timer < 25
  11.     nothing()
  12.   end repeat
  13.   puppetSound(3, 30)
  14.   repeat with n = 1 to 3
  15.     set the locH of sprite 3 to 179 - (n * 30)
  16.     updateStage()
  17.   end repeat
  18.   repeat while soundBusy(3)
  19.     nothing()
  20.   end repeat
  21.   startTimer()
  22.   repeat while the timer < 30
  23.     nothing()
  24.   end repeat
  25.   puppetSound(3, 32)
  26.   repeat while soundBusy(3)
  27.     nothing()
  28.   end repeat
  29. end
  30.