Verwendung von Sensordaten in Programmen
Über den folgenden Befehl können Sie auf Sensordaten von allen verbundenen Sensorsonden in Ihrem TI-Basic-Programm zugreifen:
RefreshProbeVars statusVar
| • | Sie müssen zuerst die Applikation Vernier DataQuest™ starten, da Ihnen ansonsten ein Fehler ausgegeben wird.  |
Hinweis: Die Applikation Vernier DataQuest™ wird automatisch gestartet, wenn Sie einen Sensor oder ein Lab Cradle mit der TI-Nspire™-Software oder dem Handheld-Gerät verbinden.
| • | Der Befehl RefreshProbeVars gilt nur, wenn Vernier DataQuest™ sich im Messgerätemodus befindet. |
| • | statusVar ist ein optionaler Parameter, der den Status des Befehls anzeigt. statusVar-Werte: |
|
StatusVar Value |
Status |
|---|---|
|
statusVar=0 |
Normal (Programmausführung fortsetzen) |
|
statusVar=1 |
Die Applikation Vernier DataQuest™ befindet sich im Data Collection-Modus. Hinweis: Die Applikation Vernier DataQuest™ muss sich im Messgerätmodus befinden, damit dieser Befehl funktioniert. |
|
statusVar=2 |
Die Applikation Vernier DataQuest™ wurde nicht gestartet. |
|
statusVar=3 |
Die Applikation Vernier DataQuest™ wurde gestartet, ist jedoch noch nicht mit Sonden verbunden. Hinweis: Der Befehl |
| • | Ihr TI-Basic-Programm liest direkt aus Vernier DataQuest™-Variablen aus der Symboltabelle. |
| • | Die Variable „Zeitdaten“ zeigt den letzten Wert der Variable, er wird nicht automatisch aktualisiert. Wurden keine Daten gesammelt, sind die Zeitdaten 0 (Null). |
| • | Werden Variablennamen ohne entsprechende Sonden verwendet, wird der Fehler „Variable nicht definiert“ ausgegeben. |
| • | Der Befehl RefreshProbeVars ist in iOS ungültig. |
Sammeln von Sensordaten mit RefreshProbeVars
| 1. | Starten Sie die Vernier DataQuest™-Applikation. |
| 2. | Verbinden Sie die Sensoren, die Sie zum Sammeln der Daten benötigen. |
| 3. | Führen Sie das Programm aus, das Sie verwenden möchten, um Daten in der Calculator-Applikation zu sammeln. |
| 4. | Bereiten Sie die Sensoren vor und sammeln Sie Daten. |
Hinweis: Sie können ein Programm zur Interaktion mit dem TI-Innovator™ Hub erstellen, indem Sie b> Hub > Senden verwenden. (Siehe Beispiel 2 unten.) Das ist optional.
Beispiel 1:
Define temp()=
Prgm
© Prüfen, ob System bereit ist
RefreshProbeVars status
If status=0 Then
Disp "ready"
For n,1,50
RefreshProbeVars status
temperature:=meter.temperature
Disp "Temperature: ",temperature
If temperature>30 Then
Disp "Too hot"
EndIf
© 1 Sekunde zwischen den Messungen warten
Wait 1
EndFor
Else
Disp "Not ready. Try again later"
EndIf
EndPrgm
Beispiel 2 mit TI-Innovator™ Hub
Define tempwithhub()=
Prgm
© Prüfen, ob System bereit ist
RefreshProbeVars status
If status=0 Then
Disp "ready"
For n,1,50
RefreshProbeVars status
temperature:=meter.temperature
Disp "Temperature: ",temperature
If temperature>30 Then
Disp "Too hot"
© Ton auf Hub abspielen
"SET SOUND 440 TIME 2" senden
EndIf
© 1 Sekunde zwischen den Messungen warten
Wait 1
EndFor
Else
Disp "Not ready. Try again later"
EndIf
EndPrgm
| • | The meter.time variable shows the last value of the variable; it does not update automatically. If no data collection has occurred, meter.time will be 0 (zero). |
| • | Use of variable names without corresponding probes being physically attached will result in a "Variable not defined" error. |
Collecting Sensor Data using RefreshProbeVars
| 1. | Launch the Vernier DataQuest™ application. |
| 2. | Connect the sensor(s) you need to collect the data. |
| 3. | Run the program you wish to use to collect data in the calculator application. |
| 4. | Manipulate the sensors and collect the data. |
Note: You may create a program to interact with the TI-Innovator™ Hub using b > Hub > Send. (See Example 2, below.) This is optional.
Example 1
Define temp()=
Prgm
© Check if system is ready
RefreshProbeVars status
If status=0 Then
Disp "ready"
For n,1,50
RefreshProbeVars status
temperature:=meter.temperature
Disp "Temperature: ",temperature
If temperature>30 Then
Disp "Too hot"
EndIf
© Wait for 1 second between samples
Wait 1
EndFor
Else
Disp "Not ready. Try again later"
EndIf
EndPrgm
Example 2- with TI-Innovator™ Hub
Define tempwithhub()=
Prgm
© Check if system is ready
RefreshProbeVars status
If status=0 Then
Disp "ready"
For n,1,50
RefreshProbeVars status
temperature:=meter.temperature
Disp "Temperature: ",temperature
If temperature>30 Then
Disp "Too hot"
© Play a tone on the Hub
Send "SET SOUND 440 TIME 2"
EndIf
© Wait for 1 second between samples
Wait 1
EndFor
Else
Disp "Not ready. Try again later"
EndIf
EndPrgm