home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 August / WPCAUG96.ISO / makers / body / bodymain.dir / 00365.ls < prev    next >
Encoding:
Text File  |  1996-06-12  |  315 b   |  15 lines
  1. on MyPlaySound name
  2.   if char 1 to 4 of name = "fall" then
  3.     set tmp to random(2)
  4.     puppetSound(1, the number of cast ("bodysound" & tmp))
  5.     updateStage()
  6.   else
  7.     puppetSound(0)
  8.     sound stop 1
  9.     sound stop 2
  10.     updateStage()
  11.     set the sound of cast "BodyAll.mov" to 1
  12.     updateStage()
  13.   end if
  14. end
  15.