home *** CD-ROM | disk | FTP | other *** search
/ LineOne ISP Sign-Up 5 / LineOne.iso / assets / cxt / scripts / movieScripts.cst / 00001_openMain.ls next >
Encoding:
Text File  |  2001-01-27  |  1013 b   |  33 lines
  1. -- 2000.03.10
  2. -- Clive Green <clivegreen@atlas.co.uk>
  3.  
  4. ------------------------------------------------------------------------------------------------------
  5.  
  6. -- declare globals:
  7. global gRoot -- the stubFile or runtime projector's parent directory path
  8.  
  9. ------------------------------------------------------------------------------------------------------
  10.  
  11. on openMain L
  12.   
  13.   -- this handler MUST be called from the stub/projector file!
  14.   
  15.   -- return to caller if no arguments have been provided:
  16.   if ilk(L) <> #propList then return 0
  17.   
  18.   r = L[#rootPath]
  19.   m = L[#mainPath]
  20.   
  21.   -- perform a cursory check - string values are required:
  22.   if not stringP(r) or not stringP(m) then return 0
  23.   
  24.   --------------------
  25.   
  26.   -- store the projector's parent directory path:
  27.   gRoot = r
  28.   
  29.   -- use a platform-independent filePath relative to the current
  30.   -- location by using the @ symbol:
  31.   go movie "@" & m
  32.   
  33.   ----------------------------------------------------------------------------------------------------