.key ""
.bra {
.ket }
echo "Hard Disk Format"
assign >NIL: WB_2.x: exists
if warn
  echo "*NWARNING:  Hard disk drive partition WB_2.x: cannot be found!"
  echo "This script formats partitions WB_2.x: and Work:."
  echo "Make sure the drive is properly connected and prepped, and"
  echo "the partitions have the correct names."
  skip exit
endif
;
echo "*NWARNING: This will reformat drive partitions WB_2.x: and Work:."
echo "All information on these partitions will be lost!"
ask "Are you sure you want to continue ? (Y/N) "
if not warn
  echo "Format cancelled."
  skip exit
endif
;
path sys:system add
echo "*NFormatting..."
format <NIL: >NIL: drive WB_2.x: name System2.0 quick
if fail
skip failcase
endif
format <NIL: >NIL: drive Work: name Work quick
lab failcase
if fail
  echo "Format failed."
  skip exit
endif
;
echo "*NHard disk format is complete."
ask "*NWould you like the system software to be*Ninstalled on your hard disk ? (Y/N) "
if warn
  execute :InstallHD
endif
lab exit
