home *** CD-ROM | disk | FTP | other *** search
/ Fish 'n' More 2 / fishmore-publicdomainlibraryvol.ii1991xetec.iso / dirs / trek_409.lzh / Trek / UnPackSTData < prev    next >
Text File  |  1990-11-21  |  792b  |  34 lines
  1. .K ""
  2. echo "This script will unpack the following lharc archives:"
  3. echo ""
  4. echo "    tobtrek2.lzh    =>    STData:"
  5. echo ""
  6.  
  7. ask "Do you have a blank disk ready?"
  8. if not WARN
  9.     echo "Try again when you do ..."
  10.     echo "All Done.  Click close gadget to get rid of window."
  11.     endcli
  12. endif
  13.  
  14. ask "Is floppy drive df1: free?"
  15. if not WARN
  16.     echo "You will need to do the unpacking yourself."
  17.     echo "All Done.  Click close gadget to get rid of window."
  18.     endcli
  19. endif
  20.  
  21. echo "Formatting and unpacking disk."
  22.  
  23. sys:system/format drive df1: name STData noicons
  24. :c/lharc -x -a -m x tobtrek2.lzh STData:
  25.  
  26. echo "Copying selected WorkBench files to STGame:"
  27.  
  28. copy WorkBench1.3:Utilities/more ram:more
  29. copy ram:more STData:more quiet
  30. delete ram:more quiet
  31.  
  32. echo "All Done.  Click close gadget to get rid of window."
  33. endcli
  34.