home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 March / macformat-022.iso / Shareware in MacFormat / pats-virtual-office-22 / PatsUniverse2.2 / PatsUniverse2 / 00079.ls < prev    next >
Encoding:
Text File  |  1994-11-22  |  227 b   |  14 lines
  1. on mouseUp
  2.   puppetSound("Single Click")
  3.   updateStage()
  4.   repeat while soundBusy(1)
  5.   end repeat
  6.   puppetSound(0)
  7.   puppetSound("childof")
  8.   updateStage()
  9.   repeat while soundBusy(1)
  10.   end repeat
  11.   puppetSound(0)
  12.   quit()
  13. end
  14.