home *** CD-ROM | disk | FTP | other *** search
/ Invenzioni E Inventori 1: Lavoro E Vita Quotidiana / invenzioni-inventori-1.iso / mac / Invenzio / Indart.cst / 00034_Script_34 < prev    next >
Text File  |  1997-10-14  |  2KB  |  54 lines
  1. on ritorna
  2.   
  3.   global percorso,r_movie,funzioni
  4.   set funzioni to ""
  5.   if count (percorso) > 1 then
  6.     blocca
  7.     deleteat (percorso,count(percorso))
  8.     set r_movie = getlast (percorso)
  9.     set r_marker = getPropAt(percorso, count(percorso)) 
  10.     delete char 1 of r_movie
  11.     --  put percorso
  12.     
  13.     if r_movie = the moviepath & the moviename then
  14.       deleteat (percorso,count(percorso))
  15.       repeat with a = 1 to 48
  16.         if a <> 47 then
  17.           puppetsprite a,false
  18.           set the visible of sprite a to true
  19.         end if
  20.       end repeat
  21.       
  22.       -----------PER TORNARE AL VIAGGIO
  23.       set mn to the moviename   
  24.       if r_marker = 1 and (offset("mi",mn) or offset ("mp",mn)) then
  25.         set r_marker to "viaggio"
  26.       end if
  27.       -----------
  28.       go to frame r_marker
  29.       exit
  30.     else
  31.       deleteat (percorso,count(percorso))
  32.       if the colorDepth<=8 then viff 1,48
  33.       puppetsprite 47,false
  34.       set the visible of sprite 47 to false
  35.       toglimenubar
  36.       updatestage
  37.       
  38.       -------NON SPEGNE SE ANDIAMO A DELLE INVENZIONI
  39.       set m_n to the moviename
  40.       if offset ("navig",m_n) or offset ("menu",m_n) or offset ("extra",m_n) or offset ("navig",r_movie) or offset ("menu",r_movie) or offset ("extra",r_movie) then
  41.         if the colorDepth<=8 then viff 1,48
  42.       end if
  43.       -------------
  44.       
  45.       -----------PER TORNARE AL VIAGGIO
  46.       if r_marker = 1 and (offset("mi",r_movie) or offset ("mp",r_movie)) then
  47.         set r_marker to "viaggio"
  48.       end if
  49.       -----------      
  50.       go to frame r_marker of movie r_movie
  51.       exit 
  52.     end if    
  53.   end if
  54. end