.key drive
.bra {
.ket }
.def drive DH0:       ;Edit here if you don't have DH0:


;+----------------------------------------------------------+
;| Complex Computers 1991 - Installation Script. 07-Sept-91 |
;+----------------------------------------------------------+
 

echo "*n*E[32mGBRoutePlus*E[0m Installation Utility*n"
assign >NIL: {drive} exists
if warn
 echo "*nSorry,device {drive} cannot be found."
 echo "Installation terminated."
 wait 5
 endcli
endif

if not exists {drive}GBRPlus
 echo "*nSorry,the destination directory {drive}GBRPlus cannot be found."
 echo "Installation terminated."
 wait 5
 endcli
endif

echo "The GBRPlusEdit files will be copied to the GBRPlus directory on"
echo "{drive} this will require approximately 6OK bytes free."
echo "*nYou will need the GBRPlusEdit disk to install the Editor."

ask "*nAre you absolutely sure you want to do this? (Y/N) "

if warn
   copy GBRPlusEdit:GBRPlusEdit to {drive}GBRPlus/
   copy GBRPlusEdit:GBRPlusEdit.info to {drive}GBRPlus/
   copy GBRPlusEdit:GBR1+.dat to {drive}GBRPlus/
   copy GBRPlusEdit:GBR2+.dat to {drive}GBRPlus/

   echo "*nGBRPlusEdit has been installed sucessfully on {drive}"
   wait 5
    
 else

   echo "*nInstallation terminated."

ENDIF