****************************************
*	 Prozeßnummer = 1
*	 Delay = 1000
*	 Eventsource = 0
*	 Number of Loops = 0
*	 Priorität = 0
*	 Version = 1
*	 FastStop = 0
*	 AdbasicVersion = 4000001
*	 ATSRAM = 0
*	 OPT_LEVEL = 1
*	 SAVECOMPIL = 0
****************************************
SUB Call_AnOut(numero_AnOut,valeur_AnOut)

DIM valeur_ramenee_AnOut AS LONG

		valeur_ramenee_AnOut=(valeur_AnOut-Analog_Out_Min)/(Analog_Out_Max-Analog_Out_Min)*65535
		
		dac(numero_AnOut,valeur_ramenee_AnOut)'GOLD

ENDSUB