[net.micro.amiga] Save This Execute File

bruceb@amiga.UUCP (Bruce Barrett) (11/23/85)

  Although I do not expect that most of you have more than 512k of memory
or a hard disk yet I thought I'd share this with you for when you do.  It
could even be useful if you customize your boot diskette to have only the
"minimum daily requirement" of files on it.  (Some future mail will describe
this.)

  I suggest you save this execute file for when you get a hard disk or
another 512-1024K of RAM.  At that point you can use it to lessen your
dependence on floppy diskettes. This could become part of your startup
script.

  The execute file it fairly straight forward,... there are, however
two strange sequences.

The first is the sequence:
	ECHO "If you get a requester for a volume you do not \
	 have select 'CANCEL'."
	IF NOT EXISTS <newdrive>
	   SKIP INFO
	ENDIF
This should be thought of as a unit.  Its purpose is to deal with a 
user who has mistyped his/her drive or volume name, yielding the
"insert volume xxx" system requester.

The second sequence is:
	failat 100           ; make sure the <newdrive> is volume, 
			     ; drive or directory
	cd <newdrive>
	IF FAIL
	   SKIP INFO
	ENDIF
	failat 20
This confirms that you are about to assign to a directory.

  As always, ENJOY!

	Bruce Barrett


. --------------- Cut Here ----------------------, do not keep this line.
.key newdrive
. --- Move the system assignments to a new drive.        Version 1.5
. --- This may be a RAM: disk, Hard Disk, or Floppy.     22-Nov-85
. --- If the needed directories are not present they will be copied from
. --- the current.

IF "<newdrive>" EQ ""
   SKIP INFO
ENDIF

failat 100           ; make sure the <newdrive> is volume, drive or directory
cd <newdrive>
IF FAIL
   SKIP INFO
ENDIF
failat 20

ECHO "I am about to move the logical device assignments from their current"
ECHO "locations to <newdrive>."
ECHO "If you get a request for a volume you do not have select 'CANCEL'."

IF NOT EXISTS <newdrive>
   SKIP INFO
ENDIF

;  Test for all "real important" subdirectories.

IF NOT EXISTS <newdrive>C
   ECHO "Subdirectory 'C' missing on <newdrive>.  The current 'C:' directory"
   ECHO "will be used to create it."
   makedir <newdrive>C
   copy c: to <newdrive>C all quiet
ENDIF
IF NOT EXISTS <newdrive>L
   ECHO "Subdirectory 'L' missing on <newdrive>.  The current 'L:' directory"
   ECHO "will be used to create it."
   makedir <newdrive>L
   copy L: to <newdrive>L all quiet
ENDIF
IF NOT EXISTS <newdrive>LIBS
   ECHO "Subdirectory 'LIBS' missing on <newdrive>.  The current 'LIBS:' directory"
   ECHO "will be used to create it."
   makedir <newdrive>LIBS
   copy LIBS: to <newdrive>LIBS all quiet
ENDIF
IF NOT EXISTS <newdrive>DEVS
   ECHO "Subdirectory 'DEVS' missing on <newdrive>.  The current 'DEVS:' directory"
   ECHO "will be used to create it."
   makedir <newdrive>DEVS
   copy DEVS: to <newdrive>DEVS all quiet
ENDIF
IF NOT EXISTS <newdrive>FONTS
   ECHO "Subdirectory 'FONTS' missing on <newdrive>.  The current 'FONTS:' directory"
   ECHO "will be used to create it."
   makedir <newdrive>FONTS
   copy FONTS: to <newdrive>FONTS all quiet
ENDIF
IF NOT EXISTS <newdrive>S
   ECHO "Subdirectory 'S' missing on <newdrive>.  The current 'S:' directory"
   ECHO "will be used to create it."
   makedir <newdrive>S
   copy S: to <newdrive>S all quiet
ENDIF
IF NOT EXISTS <newdrive>T
   makedir <newdrive>T
ENDIF

;  Do all the assignments.

assign sys: <newdrive>
assign c:   sys:c
assign s:   sys:s
assign l:   sys:l
assign libs: sys:libs
assign fonts: sys:fonts
assign devs:  sys:devs
ECHO "Assignments complete.  Ready to use <newdrive>."
SKIP EXIT

LAB INFO
echo "You must specify  DRIVE: or VOLUMENAME:."
Echo "Examples:"
echo "   execute move.sys df1:            (external floppy)."
echo "   execute move.sys dh0:            (hard disk)."
echo "   execute move.sys RAM:            (RAM: disk)."
echo "Don't forget to include the colon (*":*")!"
LAB EXIT

. ------------ delete this line!! ------------------------