.key drive
IF "<drive>" EQ ""
  ECHO "Type EXECUTE HDINSTALL [drive]    e.g.   EXECUTE HDINSTALL dh0:"
  QUIT
ENDIF
ECHO "*nX-CAD 3000 - Installing on Hard Disc <drive>*n"
IF EXISTS <drive>XCAD3000
  ECHO "  X-CAD 3000 already installed! Please BACKUP/DELETE as required,"
  ECHO "  before continuing.*n"  
  QUIT
ELSE
  MAKEDIR <drive>XCAD3000
  COPY XCAD3000:empty.info TO ram:
  RENAME ram:empty.info TO ram:XCAD3000.info
  COPY ram:XCAD3000.info TO <drive>
  DELETE ram:XCAD3000.info
;  
  ECHO "Copying X-CAD 3000 files to <drive>XCAD3000"
;  
  COPY XCAD3000:XCAD.NTSC TO <drive>XCAD3000
  COPY XCAD3000:2D_3000#? TO <drive>XCAD3000
  COPY XCAD3000:lovly TO <drive>XCAD3000/lovly ALL
  COPY XCAD3000:mods TO <drive>XCAD3000/mods ALL
  COPY XCAD3000:s/xcad#? TO s:
;  
   ECHO "*nPlease insert disc 2 in any drive ..."
  COPY XCAD3000-2:POVLY TO <drive>XCAD3000/POVLY ALL
  COPY XCAD3000-2:XCDATA TO <drive>XCAD3000/XCDATA ALL
  COPY XCAD3000-2:XFONTS TO <drive>XCAD3000/XFONTS ALL
;  
   ECHO "*nPlease insert disc 3 in any drive ..."  
   ASK "Are you using a United Kingdom (PAL) Amiga?  (Y/N)"
   IF warn
      ECHO "UK machine - copying PAL icons"
      COPY XCAD3000-3:PAL_users_only/XCAD TO <drive>XCAD3000
      COPY XCAD3000-3:PAL_users_only/2D_3000 TO <drive>XCAD3000
      COPY XCAD3000-3:PAL_users_only/2D_3000.info TO <drive>XCAD3000
      COPY XCAD3000-3:XCAD3D TO <drive>XCAD3000
      COPY XCAD3000-3:3D_HI-16col TO <drive>XCAD3000
      COPY XCAD3000-3:3D_MED-16col TO <drive>XCAD3000
      COPY XCAD3000-3:3D_HI-8col TO <drive>XCAD3000
      COPY XCAD3000-3:3D_MED-8col TO <drive>XCAD3000
      COPY XCAD3000-3:3D_HI-16col.info TO <drive>XCAD3000
      COPY XCAD3000-3:3D_MED-16col.info TO <drive>XCAD3000
      COPY XCAD3000-3:3D_HI-8col.info TO <drive>XCAD3000
      COPY XCAD3000-3:3D_MED-8col.info TO <drive>XCAD3000
     ELSE
         ECHO "USA machine - copying NTSC icons"
      COPY XCAD3000-3:XCAD3D TO <drive>XCAD3000
      COPY XCAD3000-3:3D_HI-16col-NTSC TO <drive>XCAD3000
      COPY XCAD3000-3:3D_MED-16col-NTSC TO <drive>XCAD3000
      COPY XCAD3000-3:3D_HI-8col-NTSC TO <drive>XCAD3000
      COPY XCAD3000-3:3D_MED-8col-NTSC TO <drive>XCAD3000
      COPY XCAD3000-3:3D_HI-16col-NTSC.info TO <drive>XCAD3000
      COPY XCAD3000-3:3D_MED-16col-NTSC.info TO <drive>XCAD3000
      COPY XCAD3000-3:3D_HI-8col-NTSC.info TO <drive>XCAD3000
      COPY XCAD3000-3:3D_MED-8col-NTSC.info TO <drive>XCAD3000
    ENDIF
;
   ASK "Are you using an A3000 machine?  (Y/N)"
   IF WARN
      ECHO "Copying A3000 icon"
        COPY XCAD3000-3:3D_HI-16col-A3000 TO <drive>XCAD3000
        COPY XCAD3000-3:3D_HI-16col-A3000.info TO <drive>XCAD3000
   ENDIF
;  
   COPY XCAD3000-3:config TO <drive>XCAD3000/config ALL
   COPY XCAD3000-3:handlers TO <drive>XCAD3000/handlers ALL
   COPY XCAD3000-3:3Dmenus TO <drive>XCAD3000/3Dmenus ALL
   COPY XCAD3000-3:vn TO <drive>XCAD3000
   MAKEDIR <drive>XCAD3000/drawings
   MAKEDIR <drive>XCAD3000/symbols
;  
  ECHO "*nPlease insert disc 4 in any drive ..."
  COPY XCAD3000-4: TO <drive>XCAD3000 ALL
  ECHO "*nPlease insert disc 5 in any drive ..."
  COPY XCAD3000-5: TO <drive>XCAD3000 ALL
  ECHO "*nPlease insert disc 6 in any drive ..."
  COPY XCAD3000-6:XCad-Utils TO <drive>XCAD3000/XCad-Utils ALL
  COPY XCAD3000-6:XCad-Utils.info TO <drive>XCAD3000
  ECHO "*nPlease insert disc 7 in any drive ..."
  COPY XCAD3000-7:demo-drawings TO <drive>XCAD3000/drawings ALL
  IF WARN
    ECHO "Error occurred during installation."
    QUIT
  ENDIF
ENDIF
;
ASK "Add ASSIGNs to your STARTUPII / USER-STARTUP file? (Y/N) "
IF WARN
   ECHO > ram:xq1 "ASSIGN MENUS:    <drive>XCAD3000/MENUS"
   ECHO > ram:xq2 "ASSIGN XCAD3DPMODS:    <drive>XCAD3000/PMODS"
   ECHO > ram:xq3 "ASSIGN XCAD3DHANDLERS: <drive>XCAD3000/HANDLERS"  
   ECHO > ram:xq4 "ASSIGN DRAWINGS: <drive>XCAD3000/DRAWINGS"
   ECHO > ram:xq5 "ASSIGN XCDATA:   <drive>XCAD3000/XCDATA"
   ECHO > ram:xq6 "ASSIGN XFONTS:  <drive>XCAD3000/XFONTS"
   ECHO > ram:xq7 "ASSIGN LOVLY:  <drive>XCAD3000/LOVLY"
   ECHO > ram:xq8 "ASSIGN MODS:   <drive>XCAD3000/MODS"
   ECHO > ram:xq9 "ASSIGN POVLY:  <drive>XCAD3000/POVLY"
   ECHO > ram:xq10 "ASSIGN SYMBOLS:  <drive>XCAD3000/SYMBOLS"
   ECHO > ram:xq11 "ASSIGN XCAD3D:  <drive>XCAD3000"
   ECHO > ram:xq12 "ASSIGN XCAD3DCONFIG:  <drive>XCAD3000/CONFIG"
   ECHO > ram:xq13 "ASSIGN XCAD3DMENUS:  <drive>XCAD3000/3DMENUS"
   ECHO > ram:xq14 "ASSIGN XCDOC:  <drive>XCAD3000/XCDOC"
   ECHO > ram:xq15 "ASSIGN XCTEMP:  RAM:"
;  
      ECHO "using 3.0 Kickstart!*n"
      IF EXISTS s:User-startup
         RENAME s:User-startup TO s:User-startup.pre3000    
         JOIN ram:xq1 ram:xq2 ram:xq3 ram:xq4 ram:xq5 ram:xq6 ram:xq7 ram:xq8 ram:xq9 ram:xq10 ram:xq11 ram:xq12 ram:xq13 ram:xq14 ram:xq15 s:User-startup.pre3000 as s:User-startup
      DELETE ram:xq#?
      ECHO "*nAssignments made - old file saved as User-startup.pre3000"
   ELSE
      ECHO "*nUnable to find s:User-startup, please create an empty text file
             named user-startup in your  S directory."
      QUIT
   ENDIF
   ENDIF
ELSE
   ECHO "*nAll X-CAD 3000 files and icons copied onto hard disc.*n"
   QUIT
ENDIF
ECHO "*nAll X-CAD 3000 files and icons copied onto hard disc."
ECHO "and all assigns made.*n"
QUIT