home *** CD-ROM | disk | FTP | other *** search
/ SKIP - The Laundry Guide / LEVER_CD.iso / lever / cover.dir / 00019.ls < prev    next >
Encoding:
Text File  |  1997-02-21  |  746 b   |  26 lines
  1. on exitFrame
  2.   global lastfound, gLastMovie, gLastFrame, audiocount, languagechosen
  3.   set the visible of sprite 8 to 0
  4.   set lastfound to 0
  5.   puppetSprite(17, 1)
  6.   set the member of sprite 17 to member "mainexitbutton" of castLib languagechosen
  7.   set the visible of sprite 17 to 1
  8.   if the videoForWindowsPresent <> 1 then
  9.     set the visible of sprite 9 to 0
  10.     set the visible of sprite 10 to 1
  11.   else
  12.     set the visible of sprite 10 to 0
  13.     set the visible of sprite 9 to 1
  14.   end if
  15.   set gLastMovie to the movieName
  16.   set gLastFrame to the frame
  17.   repeat with i = 2 to 7
  18.     set the visible of sprite i to 0
  19.   end repeat
  20.   set the visible of sprite 29 to 0
  21.   sound stop 2
  22.   puppetSound(1, "Audiotst")
  23.   set audiocount to 5
  24.   cursor(0)
  25. end
  26.