;test d'installer
;----------------------------------
;definition des variables de base
;
;MINSUSER  AVERAGE
;
;LANGUAGE francais
;--------------------------
;dans quel repertoire
;--------------------------

(set #name
	(askdir
		(prompt "Indiquer le répertoire ou placer ScreenTab \n un repertoire screenTab sera créer ")
		(help @askdir-help)
		(default "ram:")
	)
)

;--------------------------------
;determine l'origine des fichiers
;--------------------------------

(set #source (pathonly @icon))
(set #path (tackon #name "screentab"))
(set #repertoire (exists #path) )

;--------------------------------
;verifie si repertoire existant
;--------------------------------

(if #repertoire
	(	
		(abort "Répertoire ou fichier déja existant \n Installation interrompue "
		"\n Effacer le fichier ou repertoire "
		"\n et recommencer l'installation"
		"\n ou recommencer et choissiser "
		"\n un autre repertoire de destination") 
	)

 	(makedir #path
		(prompt "Repertoire Screentab en cours de creation")
		(help @makedir-help)
		(infos)
		(confirm)
	)
	)	
(complete 10 %)
(set @default-dest #path)

;----------------------------------
;cherche si on copie tout
;----------------------------------
(set #choix (askoptions
	        (prompt "Choissisez les fichiers annexe à copier")
	        (help "Indiquez les fichiers annexes a copier \n Aucun fichier est n'indispensable")
		(choices "doc français" "doc anglais"  "catalogue anglais")
		(default 1)
	    )	    
)	    
(complete 20 %)	
;----------------------------------
;copie les fichiers
;----------------------------------
;copie du programme
(copyfiles
	(prompt "Copier ScreenTab")
	(help "Copie le programme dans le répertoire choisi")
	(source (tackon  #source "screentab"))
	(infos)
	(dest #path)	
	(noposition)
	(confirm)
)

;----------------------------------
;si copie demandes repertoire doc
;----------------------------------


(if (BITAND 1 #choix )
	(copyfiles
		(prompt "Copier ScreenTabFR.guide")
		(help "Copie le guide dans le répertoire Doc\n celui-ci est créé dans le repertoire choisi ")
		(source (tackon #source "doc/screentabFR.guide"))
		(dest (tackon #path "doc"))
		(infos)
		(noposition)
		(confirm)
	)	 
)
(complete 50%)
(if (BITAND 2 #choix )
	(copyfiles
		(prompt "Copier ScreenTab.guide")
		(help "Copie le guide anglais dans le répertoire doc \ncelui-ci est créé dans le repertoire choisi ")
		(source (tackon #source "doc/screentab.guide"))
		(dest (tackon #path "doc"))
		(infos)
		(noposition)
		(confirm)
	)	 
)
(complete 70%)
(if (BITAND 4 #choix )
	(copyfiles
		(prompt "Copier Catalogue anglais Screen tab")
		(help "Copie le guide anglais dans le répertoire doc \ncelui-ci est créé dans le repertoire choisi ")
		(source (tackon #source "catalogs/english/screentab.catalog"))
		(dest (tackon #path "catalogs/english/screentab.catalog"))
		(infos)
		(noposition)
		(confirm)
	)	 
)



;--------------------
;copier le complement
;--------------------	
(complete 90 %)