home *** CD-ROM | disk | FTP | other *** search
/ Car Screensaver - Toyota / TOYOTA.iso / mjparty / uq_demo.exe / uq_demo.DXR / 00008.ls < prev    next >
Encoding:
Text File  |  1996-05-13  |  373 b   |  23 lines
  1. on exitFrame
  2.   global x
  3.   if x < -550 then
  4.     puppetSprite(2, 0)
  5.     go(#next)
  6.   end if
  7.   if x = -130 then
  8.     puppetSound("Tomesan.AIFF")
  9.   end if
  10.   if x = 400 then
  11.     puppetSound("DEMO2.WAV")
  12.   end if
  13.   if x = 470 then
  14.     puppetSound("MONDAI_S.WAV")
  15.   end if
  16.   if x = 500 then
  17.     sound stop 1
  18.   end if
  19.   set x to x - 2
  20.   set the locH of sprite 2 to x
  21.   go(#loop)
  22. end
  23.