home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1995 November / PCWK1195.iso / inne / podstawy / dos / 4dos / 4uzytki / ez-btm11.exe / LOADER.ZIP / WFW.BAT < prev   
DOS Batch File  |  1994-05-16  |  1KB  |  57 lines
  1. : WFW.BAT
  2. : Loads WFW if it exists; if not, installs it from floppy drive.
  3. : WFW installed on ramdisk, or on default if ramdisk absent.
  4.  
  5. iff exist %_boot:\wfw\*.* then
  6. goto load_wfw
  7. else
  8. call rou ramdisk
  9. :: (rou --> ramdisk determines which drive is ramdrive. You must
  10. :: have ROU.BTM version 10 for this procedure.)
  11. if exist %ramd:\wfw\*.* goto load_wfw
  12. goto install
  13. endiff
  14.  
  15. :load_wfw
  16. : Loads Word for Word; current version: 5.2 (November 20, 1993)
  17. iff exist %_boot:\wfw\*.* then
  18.   %_boot:
  19.     cd \wfw
  20.     wfw.exe
  21.     goto end
  22. elseiff exist %ramd:\wfw\*.* then
  23.    %ramd:
  24.      cd \wfw
  25.      wfw.exe
  26.      goto end
  27. endiff
  28. ;---------------------
  29. :install
  30. setlocal
  31. inkey /K"AB" Indicate drive with WFW zip archive: %%dr
  32.  
  33.   iff %ramd gt C then
  34. echo creating a WFW subdirectory on %ramd:, \WFW
  35. cdd %ramd:
  36. md \wfw ^ cd \wfw
  37. goto extract
  38.   else
  39. echo creating a WFW subdirectory on %_boot:, \WFW
  40. md \wfw ^ cd \wfw
  41. goto extract
  42.   endiff
  43.  
  44. :extract
  45. cls
  46. echo.
  47. if not exist %dr:wfw.zip (echo No WFW.ZIP found on %@upper[%dr]:!^goto end)
  48. echo Unzipping WFW
  49. unzip %dr:wfw
  50. cdd %dr:
  51. endlocal
  52. ks "enter"^wfw.exe
  53.  
  54. :end
  55. cd -
  56. quit
  57.