home *** CD-ROM | disk | FTP | other *** search
- copy c:copy ram:
- ram:copy c:delete ram:
- ram:copy c:echo ram:
- ram:copy c:ask ram:
- ram:copy c:if ram:
- ram:echo "This script file will transfer the samples to empty disk."
- ram:echo "You should have an empty, formatted disk ready."
- ram:ask "Are you ready [Y/N]?"
- ram:if warn
- ram:copy :c/lharc ram:
- ram:copy samples.lzh ram:
- ram:echo "Insert the empty disk in df0:. Then press Return."
- ram:echo >NIL: ?
- ram:lharc x ram:samples.lzh df0:
- ram:echo "Done."
- ram:delete ram:lharc ram:samples.lzh
- else
- ram:echo "Canceled."
- endif
- ram:delete ram:copy ram:echo ram:ask ram:if ram:delete
- endcli >NIL:
-