home *** CD-ROM | disk | FTP | other *** search
/ norge.freeshell.org (192.94.73.8) / 192.94.73.8.tar / 192.94.73.8 / pub / computers / pcjr / arc / FF_65A.LZH / PATCH_FF.BAT < prev   
DOS Batch File  |  1989-06-25  |  2KB  |  67 lines
  1. echo off
  2. rem @(#)c:/usr/ff/65/ff.c:6.5a * Sun Jun 25 18:26:10 1989 * by John Lots
  3. if "==%1" goto usage
  4. if not exist ff.exe goto nofiles
  5. if exist __$ff$__.scr del __$ff$__.scr
  6. set a=fill
  7. set opt=69
  8. set adr=null
  9. if not %opt%.==69. goto no_env
  10. if not %adr%.==null. goto no_env
  11. echo Working... please wait.....
  12. :loop
  13. if "==%1" goto doit
  14. set opt=
  15. for %%a in (A;B;C;N;V;a;b;c;n;v) do if %1==+%%a set opt=ff
  16. for %%a in (A;B;C;N;V;a;b;c;n;v) do if %1==-%%a set opt=0
  17. if .==%opt%. goto usage
  18. for %%a in (N;n) do if %1==+%%a set adr=2b64
  19. for %%a in (N;n) do if %1==-%%a set adr=2b64
  20. for %%a in (A;a) do if %1==+%%a set adr=2b65
  21. for %%a in (A;a) do if %1==-%%a set adr=2b65
  22. for %%a in (C;c) do if %1==+%%a set adr=2b66
  23. for %%a in (C;c) do if %1==-%%a set adr=2b66
  24. for %%a in (B;b) do if %1==+%%a set adr=2b67
  25. for %%a in (B;b) do if %1==-%%a set adr=2b67
  26. for %%a in (V;v) do if %1==+%%a set adr=2b68
  27. for %%a in (V;v) do if %1==-%%a set adr=2b68
  28. echo>>__$ff$__.scr e %adr% %opt%
  29. shift
  30. goto loop
  31. :doit
  32. echo>>__$ff$__.scr w
  33. echo>>__$ff$__.scr q
  34. copy>nul ff.exe ff
  35. debug<__$ff$__.scr >nul ff
  36. copy>nul ff.exe ff.old
  37. copy>nul ff ff.exe
  38. del ff
  39. echo.
  40. echo [old file is ff.old, new file is ff.exe]
  41. echo.
  42. echo All done!
  43. goto end
  44. :nofiles
  45. echo ff.exe not found in current directory
  46. echo [nothing changed]
  47. goto end
  48. :usage
  49. echo Usage: patch_ff {+,-}{a,b,c,n,v} [...]
  50. echo Set defaults for the Arconly, Brief, Continuous, No_arc and Verbose options
  51. echo to either on(+) or off (-) [standard defaults: all options except Verbose off]
  52. echo.
  53. echo e.g. patch_ff +n
  54. echo to get a version that defaults to not search archives (DWC PAK ARC ZIP ZOO LZH)
  55. echo (ofcourse, in this case you can still search archives by giving the -n option)
  56. echo.
  57. echo [nothing changed]
  58. goto end
  59. :no_env
  60. echo Oops: your environment is too small! please enlarge it a little before running
  61. echo patch_ff again...
  62. echo.
  63. :end
  64. if exist __$ff$__.scr del __$ff$__.scr
  65. set opt=
  66. set adr=
  67.