' /////////////////////////CONVERSION ///////////////////////////
V0 = ADIn 0 ' Place the conversion into variable V
DelayUS 2 ' Wait for 1us
V1 = ADIn 1 ' Place the conversion into variable V
DelayUS 2 ' Wait for 1us
V2 = ADIn 2 ' Place the conversion into variable V
DelayUS 2 ' Wait for 1us
V3 = ADIn 3 ' Place the conversion into variable V
DelayUS 2 ' Wait for 1us
' V4 = ADIn 4 ' Place the conversion into variable V
' ///////////////////////// ETALLONAGE ///////////////////////////
tension0= V0*x
tension1= V1*x
tension2= V2*x
tension3= V3*x
' ///////////////////////// TRANSMISSION SERIE ///////////////////////////
HSerOut ["\r T", Dec i,13] 'temps
HSerOut ["U",Dec i,"=", Dec2 tension0,13] 'acquisition tension1
HSerOut ["A",Dec i,"=", Dec2 tension1,13] 'acquisition courant
HSerOut ["T",Dec i,"=", Dec2 tension2,13] 'acquisition temperature
HSerOut ["V",Dec i,"=", Dec2 tension3,13] 'acquisition tension 2
DelayUS 1
i=i+1
GoTo Again
Partager