home *** CD-ROM | disk | FTP | other *** search
/ Car Screensaver - Toyota / TOYOTA.iso / mjparty / uq2_demo.exe / uq2_demo.DXR / 00174.ls < prev    next >
Encoding:
Text File  |  1996-05-13  |  363 b   |  19 lines
  1. on exitFrame
  2.   global win
  3.   repeat with n = 0 to 75
  4.     set the locH of sprite 3 to (n * 4) - 100
  5.     set a to (n * n / 12) - 15
  6.     set the locV of sprite 3 to a
  7.     if (n = 60) and (win = 1) then
  8.       puppetSound(3, 181)
  9.     end if
  10.     if (n = 75) and (win = 0) then
  11.       puppetSound(3, 181)
  12.     end if
  13.     updateStage()
  14.   end repeat
  15. end
  16.  
  17. on chkmousedown
  18. end
  19.