; ATTENTION ne pas mettre de " en fin de commentaire => "x" ; commentaire" sinon ==>> x"
;variable autoit  user   commence et fini par $			 $bdmount$	=> $bdmount
;variable autoit  native commence et fini par @			 @Tempdir@  => @tempdir
;variable systeme native  commence et fini par %		 %path%	    => %path%
;chaine µisoµ remplace par le nom du fichier à monter
;chaine \iso\ remplacé par le nom du fichier à monter	NON utilisé
;===BUG : ===============  SI ; existe dans la ligne 		 "x" ;  "commentaire" 				=> x"
;													 "x" ;  "commentaire" comment2		=> x
;													  x";	"comment"					=> x"
;													  x";	"comment					=> x
;													 "x"										=> x
;													 ""x""									=>"x"

;======================EXEMPLES=================================
#cs
bdmount="w:"
path_log=e:\Mes documents\HCFR\logs\						;vrai sauf pour bootime où path_log est redéfini à e:\sna10\xfert\ pour ecrire boot_time.log
daemon_mount= /l=$bdmount$ "µisoµ" 							;en théorie =w ; ici =w:  mais seule la 1ere lettre compte ; de plus  =w  inutile (mount sur le 1er disque virtuel ?)
fichier_resultats=@Tempdir@\result.log 							; fichier resultats des actions effectuées ""=pas de sauve
#ce
;==========================================================================================================
Func Inireadcustom($filename,$section,$key,$defaut="")
	local $out,$a
	$out=Iniread($filename,$section,$key,$defaut)
	$out=StringRegExpReplace($out,"(.*?)\s*;.*", "$1")									; suppression des chaines apres ";" les variables en number l'enleve par number
	$out=StringRegExpReplace($out,'^"(.*?)"$', "$1")									;suppression des " s'ils existent en début ET en fin de chaine (faire ""texte"" => "texte")
	if stringregexp($out,'@.*?@') then															; pour utiliser une variable d'environnement (@xxx "texte") la varialble commence et fini par @
		$a=stringregexp($out,'(@.*?@)',1)[0]
	   $out=StringReplace($out,$a,execute(StringTrimRight ( $a,1)))
	EndIf
	if stringregexp($out,'\$.*?\$') then															; pour utiliser une variable autoit ($xxx "texte") la varialble commence et fini par $
	   $a=stringregexp($out,'(\$.*?\$)',1)[0]
	   $out=StringReplace($out,$a,execute(StringTrimRight ( $a,1)))
   EndIf
	if stringregexp($out,"%.*?%") then
		$out= EnvGet(stringregexp($out,"%(.*?)%",1)[0]) & StringRegExpReplace($out,"%.*?%","")	; pour utiliser une variable d'environnement (%xxx%texte)
	EndIf
return $out
EndFunc