home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0000 - 0009 / ibm0000-0009 / ibm0003.tar / ibm0003 / FINESSEA.ZIP / CLIPART.BAT next >
Encoding:
DOS Batch File  |  1989-05-03  |  884 b   |  35 lines

  1. echo off
  2. if "%1"=="" goto noparam
  3. if "%1"=="called" goto called
  4. %1:
  5. :noparam
  6. if exist \gemapps\finesse.app goto ready
  7. c:
  8. if exist \gemapps\finesse.app goto ready
  9. d:
  10. if exist \gemapps\finesse.app goto ready
  11. e:
  12. if exist \gemapps\finesse.app goto ready
  13. echo Cannot find the hard disk where FINESSE was installed.
  14. echo Please type CLIPART followed by the destination disk letter (c, d, ...)
  15. goto theend
  16. :ready
  17. cd \gemapps
  18. md template
  19. md images
  20. copy a:pkunzip.exe
  21. copy a:clipart.bat
  22. clipart called
  23. rem this is a trick to execute from the hard disk
  24. :called
  25. if exist a:template.arc goto takeit
  26. echo Please insert the Image Library Disk in drive A
  27. pause
  28. :takeit
  29. pkunzip a:template template
  30. pkunzip a:images images
  31. del pkunzip.exe
  32. rem we could delete clipart.bat, but DOS would come up with
  33. rem a user-confusing message about an inexistent batch file
  34. :theend
  35.