home *** CD-ROM | disk | FTP | other *** search
/ Car Screensaver - Toyota / TOYOTA.iso / mjparty / no1_demo / dnorp01a.dxr / script_15.ls < prev    next >
Encoding:
Text File  |  1996-10-31  |  512 b   |  29 lines
  1. on exitFrame
  2.   startTimer()
  3.   repeat with n = 1 to 51
  4.     set the locH of sprite 3 to -130 + (10 * n)
  5.     updateStage()
  6.     if (n mod 2) = 0 then
  7.       waith()
  8.     end if
  9.   end repeat
  10.   repeat with n = 1 to 6
  11.     set the locH of sprite 3 to 380 - (10 * n)
  12.     updateStage()
  13.     if (n mod 2) = 0 then
  14.       waith()
  15.     end if
  16.   end repeat
  17.   repeat while soundBusy(1)
  18.   end repeat
  19.   startTimer()
  20.   repeat while the timer < 50
  21.   end repeat
  22. end
  23.  
  24. on waith
  25.   repeat while the timer < 1
  26.   end repeat
  27.   startTimer()
  28. end
  29.