Hi everyone, Could you look my new script over and tell me if there is a more efficient way of performing the scripted tasks?

Code:
 if ingroup ("GISSHAPES")
   $Result = CompareFileTimes("I:\gisdata\shape\DONOTDELETE-GISscript.txt", "C:\gisdata\shape\DONOTDELETE-GISscript.txt")
   IF $Result = 1 ; '1'=File1 is more recent than file2
      COPY  "i:\gisdata\shape\DONOTDELETE-GISscript.txt" "c:\gisdata\shape\DONOTDELETE-GISscript.txt"
      COPY	"i:\gisdata\shape\airport\"	"c:\gisdata\shape\airport\"
      COPY	"i:\gisdata\shape\bldgs\"	"c:\gisdata\shape\bldgs\"
      COPY	"i:\gisdata\shape\bmarks\"	"c:\gisdata\shape\bmarks\"
      COPY	"i:\gisdata\shape\cbs\"	"c:\gisdata\shape\cbs\"
      COPY	"i:\gisdata\shape\dwgs\"	"c:\gisdata\shape\dwgs\"
      COPY	"i:\gisdata\shape\dwgs\"	"c:\gisdata\shape\dwgs\"
      COPY	"i:\gisdata\shape\dwgs\"	"c:\gisdata\shape\dwgs\"
      COPY	"i:\gisdata\shape\ease\"	"c:\gisdata\shape\ease\"
      COPY	"i:\gisdata\shape\fldplain\"	"c:\gisdata\shape\fldplain\"
      COPY	"i:\gisdata\shape\grids\"	"c:\gisdata\shape\grids\"
      COPY	"i:\gisdata\shape\inch50\"	"c:\gisdata\shape\inch50\"
      COPY	"i:\gisdata\shape\intersec\"	"c:\gisdata\shape\intersec\"
      COPY	"i:\gisdata\shape\laterals\"	"c:\gisdata\shape\laterals\"
      COPY	"i:\gisdata\shape\limits\"	"c:\gisdata\shape\limits\"
      COPY	"i:\gisdata\shape\plats\"	"c:\gisdata\shape\plats\"
      COPY	"i:\gisdata\shape\presslns\"	"c:\gisdata\shape\presslns\"
      COPY	"i:\gisdata\shape\ss\"	"c:\gisdata\shape\ss\"
      COPY	"i:\gisdata\shape\ssstr\"	"c:\gisdata\shape\ssstr\"
      COPY	"i:\gisdata\shape\streams\"	"c:\gisdata\shape\streams\"
      COPY	"i:\gisdata\shape\streetcl\"	"c:\gisdata\shape\streetcl\"
      COPY	"i:\gisdata\shape\streets\"	"c:\gisdata\shape\streets\"
      COPY	"i:\gisdata\shape\surveys\"	"c:\gisdata\shape\surveys\"
      COPY	"i:\gisdata\shape\tlots\"	"c:\gisdata\shape\tlots\"
    ELSE $Result = -3 ;  '-3'=File2 couldn't be open (nonexistant)
      MD  "c:\gisdata\"
      MD  "c:\gisdata\shape\"
      MD	"c:\gisdata\shape\airport\"
      MD	"c:\gisdata\shape\bldgs\"
      MD	"c:\gisdata\shape\bmarks\"
      MD	"c:\gisdata\shape\cbs\"
      MD	"c:\gisdata\shape\dwgs\"
      MD	"c:\gisdata\shape\dwgs\"
      MD	"c:\gisdata\shape\dwgs\"
      MD	"c:\gisdata\shape\ease\"
      MD	"c:\gisdata\shape\fldplain\"
      MD	"c:\gisdata\shape\grids\"
      MD	"c:\gisdata\shape\inch50\"
      MD	"c:\gisdata\shape\intersec\"
      MD	"c:\gisdata\shape\laterals\"
      MD	"c:\gisdata\shape\limits\"
      MD	"c:\gisdata\shape\plats\"
      MD	"c:\gisdata\shape\presslns\"
      MD	"c:\gisdata\shape\ss\"
      MD	"c:\gisdata\shape\ssstr\"
      MD	"c:\gisdata\shape\streams\"
      MD	"c:\gisdata\shape\streetcl\"
      MD	"c:\gisdata\shape\streets\"
      MD	"c:\gisdata\shape\surveys\"
      MD	"c:\gisdata\shape\tlots\"
      COPY  "i:\gisdata\shape\DONOTDELETE-GISscript.txt" "c:\gisdata\shape\DONOTDELETE-GISscript.txt"
      COPY	"i:\gisdata\shape\airport\"	"c:\gisdata\shape\airport\"
      COPY	"i:\gisdata\shape\bldgs\"	"c:\gisdata\shape\bldgs\"
      COPY	"i:\gisdata\shape\bmarks\"	"c:\gisdata\shape\bmarks\"
      COPY	"i:\gisdata\shape\cbs\"	"c:\gisdata\shape\cbs\"
      COPY	"i:\gisdata\shape\dwgs\"	"c:\gisdata\shape\dwgs\"
      COPY	"i:\gisdata\shape\dwgs\"	"c:\gisdata\shape\dwgs\"
      COPY	"i:\gisdata\shape\dwgs\"	"c:\gisdata\shape\dwgs\"
      COPY	"i:\gisdata\shape\ease\"	"c:\gisdata\shape\ease\"
      COPY	"i:\gisdata\shape\fldplain\"	"c:\gisdata\shape\fldplain\"
      COPY	"i:\gisdata\shape\grids\"	"c:\gisdata\shape\grids\"
      COPY	"i:\gisdata\shape\inch50\"	"c:\gisdata\shape\inch50\"
      COPY	"i:\gisdata\shape\intersec\"	"c:\gisdata\shape\intersec\"
      COPY	"i:\gisdata\shape\laterals\"	"c:\gisdata\shape\laterals\"
      COPY	"i:\gisdata\shape\limits\"	"c:\gisdata\shape\limits\"
      COPY	"i:\gisdata\shape\plats\"	"c:\gisdata\shape\plats\"
      COPY	"i:\gisdata\shape\presslns\"	"c:\gisdata\shape\presslns\"
      COPY	"i:\gisdata\shape\ss\"	"c:\gisdata\shape\ss\"
      COPY	"i:\gisdata\shape\ssstr\"	"c:\gisdata\shape\ssstr\"
      COPY	"i:\gisdata\shape\streams\"	"c:\gisdata\shape\streams\"
      COPY	"i:\gisdata\shape\streetcl\"	"c:\gisdata\shape\streetcl\"
      COPY	"i:\gisdata\shape\streets\"	"c:\gisdata\shape\streets\"
      COPY	"i:\gisdata\shape\surveys\"	"c:\gisdata\shape\surveys\"
      COPY	"i:\gisdata\shape\tlots\"	"c:\gisdata\shape\tlots\"
    ENDIF
ENDIF
exit


The script is tested and works just fine, but it is awful long and I'm not sure if I have superfluous commands.

Notes:
1. This is a script I'm writing to automate a manual file copying process one of my GIS engineers has been doing for years.
2. I do need to idenfity each folder seperately as the root folder "i:\gisdata\shapes\" contains other various folders that our GIS engineer doesn't need copied.
3. The "DONOTDELETE-GISscript.txt" files is my way of giving control to the GIS engineer over when the specified folders are copied. My plan was, when he wants to distribute updated folder information he will just edit the text file and the next time the GISSHAPES users login, his changes will be copied.

Thank you, Thank you!