; ChimiCad Installer Script
; $VER: chimiCad.install 39.1 (22/08/96)
;

; WHERE INSTALL ChimiCad ?
(set dove (askdir
  (prompt "Choice of installation directory for ChimiCad.")
  (default "sys:")
  (help
    (cat "From here you can choose the directory where install program and. "
         "related files. Installer create automatically here a directory called"
         "ChimiCad from where the program will be accesible. "
    ))
))

;Crea directory
(makedir (tackon dove "chimicad")

)

(makedir (tackon dove "chimicad/ACCESSORIES")

)

(makedir (tackon dove "chimicad/MANUALS")

)

(makedir (tackon dove "chimicad/ACCESSORIES/ROTATIONS")

)

(makedir (tackon dove "chimicad/ACCESSORIES/LIBS")

)

(makedir (tackon dove "chimicad/ACCESSORIES/BANKS")

)

;Copia dei files
(copyfiles
  (prompt "Copying drawer icon.")
  (help @copyfiles-help)
  (source "chimicad.info")
  (dest dove)
	  
)

(copyfiles
  (prompt "Copying drawer icon.")
  (help @copyfiles-help)
  (source "chimicad.info")
  (dest (tackon dove "chimicad"))
  (newname "MANUALS.info")
	  
)

(copyfiles
  (prompt "Copying program.")
  (help @copyfiles-help)
  (source "progr/english")
  (dest (tackon dove "chimicad"))
  (all)
	  
)

(copyfiles
  (prompt "Copying docs.")
  (help @copyfiles-help)
  (source "doc/english")
  (dest (tackon dove "chimicad/manuals"))
  (all)
	  
)


(copyfiles
  (prompt "Copying interface.")
  (help @copyfiles-help)
  (source "access/interfaccia")
  (dest (tackon dove "chimicad/ACCESSORIES"))
  	  
)

(copyfiles
  (prompt "Copying settings.")
  (help @copyfiles-help)
  (source "access/chimicad.settings")
  (dest (tackon dove "chimicad/ACCESSORIES"))
  	  
)

(copyfiles
  (prompt "Copying shapes.")
  (help @copyfiles-help)
  (source "access/shapes.shp")
  (dest (tackon dove "chimicad/ACCESSORIES"))
  	  
)

(copyfiles
  (prompt "Copying rotations.")
  (help @copyfiles-help)
  (source "access/rotazioni")
  (dest (tackon dove "chimicad/ACCESSORIES/ROTATIONS"))
  (all)
	  
)

(copyfiles
  (prompt "Copying Symbol font.")
  (help @copyfiles-help)
  (source "access/fonts")
  (dest "fonts:")
  (all)
	  
)

(copyfiles
  (prompt "Copyiang libraries.")
  (help @copyfiles-help)
  (source "access/libs")
  (dest (tackon dove "chimicad/ACCESSORIES/LIBS"))
  (all)
	  
)

(copyfiles
  (prompt "Copying shapes banks.")
  (help @copyfiles-help)
  (source "access/BANCHI")
  (dest (tackon dove "chimicad/ACCESSORIES/BANKS"))
  (all)
	  
)


;Inserimento del path di chimicad in un ASSIGN in user-Startup
 
(startup "ChimiCad"
  (prompt "Do you want insert necessary ASSIGNs in your USER-STARTUP ?")
  (help
    (cat "Without these assigns program can't find your related files and "
         "can't start."))

  (command "assign CHICAD: " (tackon dove "chimicad/ACCESSORIES") "\n"
	   "assign libs: " (tackon dove "chimicad/ACCESSORIES/LIBS") " add")
		
)

; Uscita dopo fine installazione
(exit
    (cat "For execute ChimiCad first time you must reset your Amiga."))