home *** CD-ROM | disk | FTP | other *** search
- .K ""
- echo "This script will unpack the following lharc archives:"
- echo ""
- echo " HCC.lzh => HCC:"
- echo ""
- echo " HCC-Source.lzh => HCC-Source: (Only if you want)"
- echo ""
- ask "Do you have a blank disk ready?"
- if not WARN
- echo "Try again when you do ..."
- echo "All Done. Click close gadget to get rid of window."
- endcli
- endif
-
- ask "Is floppy drive df1: free?"
- if not WARN
- echo "You will need to do the unpacking yourself."
- echo "All Done. Click close gadget to get rid of window."
- endcli
- endif
-
- echo "Formatting and unpacking disk HCC:"
-
- sys:system/format drive df1: name HCC noicons
- :c/lharc -x -a -m x HCC.lzh HCC:
-
- ask "Do you want the source code AND have another blank disk?"
- if not WARN
- echo "Read the file HCC:Docs/Installation how to continue."
- echo "All Done. Click close gadget to get rid of window."
- endcli
- endif
-
- echo "Formatting and unpacking disk HCC-Source:"
-
- sys:system/format drive df1: name HCC-Source noicons
- :c/lharc -x -a -m x HCC-Source.lzh HCC-Source:
-
- echo "Read the file HCC:Docs/Installation how to continue."
- echo "All Done. Click close gadget to get rid of window."
- endcli
-