home *** CD-ROM | disk | FTP | other *** search
/ SKIP - The Laundry Guide / LEVER_CD.iso / lever / ccsg.dir / 00145.ls < prev    next >
Encoding:
Text File  |  1997-02-27  |  363 b   |  18 lines
  1. on exitFrame
  2.   global gCurrentSection, resetsound
  3.   evaluate()
  4.   if the visible of sprite 48 = 1 then
  5.     go(the frame)
  6.   else
  7.     if rollOver(2) = 1 then
  8.       if (soundBusy(1) = 0) and (resetsound = 1) then
  9.         puppetSound(1, "spoon")
  10.         set resetsound to 0
  11.       end if
  12.     else
  13.       set resetsound to 1
  14.     end if
  15.   end if
  16.   go(gCurrentSection)
  17. end
  18.