home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: WPS_PM / WPS_PM.zip / xfld085s.zip / backup.cmd next >
OS/2 REXX Batch file  |  1999-01-08  |  656b  |  28 lines
  1. /* backup all xfolder sources to a new directory
  2.    ..\_backup must exist already */
  3. '@echo off'
  4. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  5. call SysLoadFuncs
  6.  
  7. /* parse arg args */
  8.  
  9. call charout ,"Enter version number: >>"
  10. args = LINEIN();
  11.  
  12. dir = directory()||'\..\_backup\'||args;
  13. say "Backing up to: "dir
  14. 'md 'dir
  15. 'md 'dir'\helpers'
  16. 'md 'dir'\main'
  17. 'copy *.cmd 'dir
  18. 'copy *.txt 'dir
  19. 'copy main\*.c 'dir'\main'
  20. 'copy main\*.h 'dir'\main'
  21. 'copy main\*.def 'dir'\main'
  22. 'copy main\*.ico 'dir'\main'
  23. 'copy main\*.idl 'dir'\main'
  24. 'copy main\*.mak 'dir'\main'
  25. 'copy main\*.rc 'dir'\main'
  26. 'copy helpers\* 'dir'\helpers'
  27.  
  28.