home *** CD-ROM | disk | FTP | other *** search
/ Car Screensaver - Toyota / TOYOTA.iso / mjparty / hsqdemo.dxr / 00086.ls < prev    next >
Encoding:
Text File  |  1996-09-26  |  240 b   |  13 lines
  1. on exitFrame
  2.   global work10, work9
  3.   set work10 to []
  4.   set work9 to []
  5.   repeat with n = 11 to 18
  6.     append(work10, random(5))
  7.     append(work9, random(2) - 1)
  8.     puppetSprite(n, 1)
  9.   end repeat
  10.   puppetSound("SE01")
  11.   startTimer()
  12. end
  13.