home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 August / WPCAUG96.ISO / multi / singing / firstmov.dxr / 00008.ls < prev    next >
Encoding:
Text File  |  1996-06-12  |  290 b   |  15 lines
  1. on exitFrame
  2.   global slaptopflag, gotAtticKey, GetBasementKey
  3.   set slaptopflag to 0
  4.   set GetAtticKey to 0
  5.   set GotBasementKey to 0
  6.   WatchCursor()
  7.   repeat while soundBusy(2)
  8.   end repeat
  9.   sound stop 1, 0
  10.   sound stop 2, 0
  11.   puppetSound(1, 0)
  12.   puppetSound(2, 0)
  13.   go(1, "ATRIUM")
  14. end
  15.