home *** CD-ROM | disk | FTP | other *** search
- echo "This script creates a Bootdisk for ProNET, which you can use"
- echo "to boot another Amiga as a Server. (I use it for my 500 with"
- echo "CD and one Drive). That will save you from having to copy"
- echo "some files.."
- echo ""
- ask "Do you want to continue ?"
- if $rc eq 5
- resident >nil: c:copy pure
- makedir t:pronet
- echo ""
- echo "Please insert a fitting Workbench disk now, that means, for"
- echo "OS1.3 the Workbench1.3 disk etc. (in DF0:)"
- ask "Press <RETURN>.."
- echo "..copying.."
- copy >nil: df0:c/run df0:c/cd df0:c/dir df0:c/type to t:pronet
- echo ""
- echo "Now the boot disk will be formatted:"
- format drive df0: name ProNET-Boot noicons
- install df0:
- echo "..copying files.."
- makedir ProNET-Boot:c
- makedir ProNET-Boot:s
- makedir ProNET-Boot:devs
- makedir ProNET-Boot:l
- echo >ProNET-Boot:s/startup-sequence "run pronet-server"
- copy >nil: t:pronet/#? to ProNET-Boot:c
- copy >nil: /pronet.config to ProNET-Boot:devs
- copy >nil: //devs/pronet.device to ProNET-Boot:devs
- copy >nil: //c/#? to ProNET-Boot:c
- copy >nil: //l/#? to ProNET-Boot:l
- echo ""
- echo "You can remove the disk now. This disk starts the"
- ask "'pronet.device' as unit 1 !"
- resident copy remove
- delete >nil: t:pronet all
- endif
- endcli
-