home *** CD-ROM | disk | FTP | other *** search
/ Family Forum 256 / DR_BRAIN.BIN / START.DIR / 00002_Script_2 < prev    next >
Text File  |  1996-05-22  |  667b  |  26 lines
  1. on startmovie
  2.   set the searchCurrentFolder = 0
  3.   global fh
  4.   if the machineType = 256 then 
  5.     -- seek config.cfg file - FILEIO.DLL required 
  6.     set file = fileio(mnew, "read","config.cfg") 
  7.     if objectp(file) then 
  8.  
  9.       set trang = word 1 of file(mreadline) 
  10.       set the searchPath = [the pathname,trang&":\bugs\"] 
  11.       
  12.       -- grab anything else that may be here 
  13.       file(mdispose) 
  14.     else
  15.  
  16.       set the searchpath = [the pathname & "bugs\"] 
  17.     end if
  18.     
  19.     exit    
  20.   else    
  21.     
  22.     set the searchpath = [the pathname&"bugs:", "More Bugs in Boxes:bugs:"]    
  23.     
  24.   end if
  25.   set the searchCurrentFolder = 0  
  26. end