Yoctopuce Yocto-0-10V-Tx Mode D'emploi page 73

voltageoutput = YVoltageOutput.FindVoltageOutput("MaFonction")
YVoltageOutput.FindVoltageOutput
loisir pour contrôler la sortie de tension.
isOnline
La méthode
isOnline()
permet de savoir si le module correspondant est présent et en état de marche.
set_currentVoltage
La méthode
set_currentVoltage()
yFindVoltageOutput
sortie. La paramètre est la tension, exprimée en volts.
voltageMove
La méthode
voltageMove()
la valeur choisie. Le deuxième paramètre est la durée de la transition, en millisecondes.
Un exemple réel
Lancez Microsoft VisualBasic et ouvrez le projet exemple correspondant, fourni dans le répertoire
Examples/Doc-GettingStarted-Yocto-0-10V-Tx de la librairie Yoctopuce.
Vous reconnaîtrez dans cet exemple l'utilisation des fonctions expliquées ci-dessus, cette fois
utilisées avec le décorum nécessaire à en faire un petit programme d'exemple concret.
Module Module1
Private Sub Usage()
Dim ex = System.AppDomain.CurrentDomain.FriendlyName
Console.WriteLine("Usage")
Console.WriteLine(ex
Console.WriteLine(ex
Console.WriteLine(ex
Console.WriteLine("
System.Threading.Thread.Sleep(2500)
End
End Sub
Sub Main()
Dim argv() As
Dim errmsg As
Dim target As
Dim vout1 As YVoltageOutput
Dim vout2 As YVoltageOutput
Dim voltage As
If argv.Length
target = argv(1)
voltage = CDbl(argv(2))
REM Setup the API
If (YAPI.RegisterHub("usb",
Console.WriteLine("RegisterHub error: "
End
End If
If target = "any"
vout1 = YVoltageOutput.FirstVoltageOutput()
If vout1 Is Nothing Then
Console.WriteLine("No module connected (check USB cable)
End
End If
target = vout1.get_Module().get_serialNumber()
End If
vout1 = YVoltageOutput.FindVoltageOutput(target
vout2 = YVoltageOutput.FindVoltageOutput(target
If (vout1.isOnline()) Then
www.yoctopuce.com
de l'objet renvoyé par
permet de changer instantanément la tension produite sur le bornier de
permet de d'ajuster progressivement la tension (transition linéaire) à
+ " <serial_number>
+ " <logical_name>
+ " any <voltage>
<voltage>: floating point number between 0.0 and
String = System.Environment.GetCommandLineArgs()
String = ""
String
Double
< 2 Then Usage()
to use local USB devices
errmsg) <> YAPI_SUCCESS) Then
Then
11. Utilisation du Yocto-0-10V-Tx en VisualBasic .NET
renvoie un objet que vous pouvez ensuite utiliser à
YVoltageOutput.FindVoltageOutput
de l'objet retourné
<voltage>")
<voltage>")
(use any discovered
+ errmsg)
+ ".voltageOutput1")
+ ".voltageOutput2")
par la fonction
device)")
10.000")
")
67