home *** CD-ROM | disk | FTP | other *** search
/ Invenzioni E Inventori 1: Lavoro E Vita Quotidiana / invenzioni-inventori-1.iso / mac / Invenzio / navig2.dir / 00387_Script_387 < prev    next >
Text File  |  1997-10-10  |  577b  |  22 lines
  1. --SOLO PER I FILE CHE SONO SOTTO  "INVENZIO"
  2. on cambiainv  qualeframe,qualemovie
  3.   global funzioni
  4.   cless
  5.   sound close 1
  6.   sound close 2
  7.   set funzioni = ""
  8.   toglimenubar
  9.   if the colorDepth <= 8 then   
  10.     repeat with spt=1 to 48
  11.       set the visible of sprite spt to false
  12.     end repeat
  13.     updatestage
  14.   end if
  15.   if the machinetype < 255 then
  16.     go qualeframe of movie  "invenzioni:invenzio:"&qualemovie&".dir"
  17.   else
  18.     set cddrive to char 1 of the moviepath
  19.     go qualeframe of movie (cddrive& ":\invenzio\"&qualemovie&".dir")
  20.   end if
  21.   
  22. end