home *** CD-ROM | disk | FTP | other *** search
/ DIGIZINE 1 / DIGIZINE.BIN / main / ddewars / init.dir / 00003_Script_3 < prev   
Text File  |  1995-09-05  |  636b  |  18 lines
  1. on exitFrame
  2.   global gMachine
  3.   beep
  4.   beep
  5.   beep
  6.   put the pathname into currentpath
  7.   put (length(the pathname)-7) into begnum
  8.   --the number subtracted is the number of characters in the folder's name containing this movie
  9.   delete char (begnum) to (length(the pathname)) of currentpath
  10.   -- delete the last folder name from the end of the path 
  11.   if gMachine <> "PC" then
  12.     go to "homepage" of movie currentpath & ":mIntro"
  13.     -- currentpath is a text string containing the pathname with the current folder deleted
  14.   else
  15.     go to "homepage" of movie currentpath & "\mIntro"
  16.   end if
  17.   play movie "mIntro"
  18. end