home *** CD-ROM | disk | FTP | other *** search
/ Games Central GT Digital… Q3 Premier Trimestre '98 / GT_DPK.ISO / pc / data / menu.dxr / 00139.ls < prev    next >
Encoding:
Text File  |  1995-08-25  |  527 b   |  17 lines

  1. on maccopyabout
  2.   global name_abouttxt, abouttxtPath
  3.   openXLib(":Xtras:macxtra:filextra")
  4.   set name_abouttxt to the name of member the member of sprite 3
  5.   set fileName to the pathName & abouttxtPath & name_abouttxt
  6.   if fileName > EMPTY then
  7.     set loc to "desktop folder:"
  8.     set wFileName to FileSaveAsDialog(loc, name_abouttxt, "Save As")
  9.     if wFileName > EMPTY then
  10.       put wFileName
  11.       set result to CopyFile(fileName, wFileName)
  12.       put result
  13.     end if
  14.   end if
  15.   closeXLib(":Xtras:macxtra:filextra")
  16. end
  17.