home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / newdl11a.zip / patch.cmd < prev    next >
OS/2 REXX Batch file  |  1996-07-04  |  778b  |  39 lines
  1. @echo off
  2. REM *************************
  3. REM NewDlg v1.1a Patch script
  4. REM  (C)opyright Tomas Ögren
  5. REM   stric@freenet.hut.fi
  6. REM *************************
  7.  
  8. if .%1.==.. goto NoParams
  9. if .%2.==.. goto NoParams
  10. if not exist %1 goto FileNotFound
  11. set res=NONE
  12. if .%2.==.SMALL. set res=256.4S
  13. if .%2.==.LARGE. set res=256.4L
  14. if .%res%.==.NONE. goto WrongParams
  15.  
  16. call resmgr -a %1 %res%
  17. echo Patch applied!
  18. goto TheEnd
  19.  
  20. :FileNotFound
  21. echo Error: %1: File not found!
  22. goto Usage
  23.  
  24. :WrongParams
  25. echo Error: Second parameter should be LARGE or SMALL, nothing else.
  26. goto Usage
  27.  
  28. :NoParams
  29. echo Error: Not enough parameters!
  30. goto Usage
  31.  
  32. :Usage
  33. echo.
  34. echo Usage: PATCH.CMD dll_filename LARGE/SMALL
  35. echo.
  36. echo See file Readme for more information
  37.  
  38. :TheEnd
  39.