home *** CD-ROM | disk | FTP | other *** search
/ Jason Aller Floppy Collection / 99.img / ORGP50D2.ZIP / WORKCOPY.BAT < prev   
DOS Batch File  |  1990-06-26  |  2KB  |  103 lines
  1. echo off
  2. cls
  3. echo This program makes a working copy of Org Plus.
  4. echo  
  5. echo "Diskette 1 - Chart" should be in the A drive.
  6. echo  
  7. echo One blank, formatted diskette should be in the     
  8. echo B drive.  (You will need 2 more blank diskettes.)  
  9. echo  
  10. echo Press Ctrl-Break to cancel.
  11. echo   
  12. pause
  13. :lp1
  14. if not exist a:org.exe goto er1
  15. cls
  16. echo Copying files from A: to  B:
  17. echo   
  18. copy a:*.b?? b:
  19. copy a:*.exe b:
  20. if not exist b:chart.exe goto er2
  21. cls
  22. echo "Diskette 1 - Chart" has been copied.  Please      
  23. echo remove both diskettes.
  24. echo    
  25. echo Then,
  26. echo  
  27. echo Place "Diskette 2 - Draw" in the A drive.
  28. echo  
  29. echo Place a second blank, formatted diskette in
  30. echo the B drive.
  31. echo   
  32. pause
  33. :lp2
  34. if not exist a:draw.exe goto er3
  35. cls
  36. echo Copying files from A: to  B:
  37. echo   
  38. copy a:*.b?? b:
  39. copy a:*.org b:
  40. copy a:*.com b:
  41. copy a:draw.exe b:
  42. if not exist b:draw.exe goto er2
  43. b:
  44. del pr*.bin
  45. printers
  46. if not exist b:printer1.bin goto er2
  47. a:
  48. cls
  49. echo "Diskette 2 - Draw" has been copied.
  50. echo  
  51. echo Remove the copy from drive B.  LEAVE THE
  52. echo ORIGINAL DISKETTE 2 IN DRIVE A.
  53. echo  
  54. echo Then,
  55. echo  
  56. echo Label a third blank, formatted diskette "Diskette 3 - Fonts"
  57. echo and place it in drive B.
  58. echo   
  59. pause
  60. cls
  61. echo Copying files from A: to  B:
  62. echo   
  63. copy a:*.com b:
  64. copy a:*.bin b:
  65. copy a:fonts.exe b:
  66. if not exist b:fonts.exe goto er2
  67. cls
  68. echo Unpacking LaserJet fonts.
  69. echo   
  70. b:
  71. del *.#&?
  72. del pr*.bin
  73. fonts
  74. if not exist ro100r12.#&p goto er2
  75. del fonts.*
  76. printers
  77. del *.com
  78. a:
  79. cls
  80. echo The copying process is now complete.
  81. goto end
  82. :er1
  83. cls
  84. echo The wrong disk appears to be in drive A.  Place "Diskette - 1" in drive A.
  85. echo Press Ctrl-Break to cancel. 
  86. pause
  87. goto lp1
  88. :er2
  89. a:
  90. echo   
  91. pause
  92. cls
  93. echo Org Plus is NOT installed. There has been an error in copying.
  94. goto end
  95. :er3
  96. cls
  97. echo The wrong disk appears to be in drive A.  Place "Diskette - 2" in drive A.
  98. echo Press Ctrl-Break to cancel. 
  99. echo   
  100. pause
  101. goto lp2
  102. :end echo
  103.