Cómo usar los datos del sensor en los programas TI-Basic
Tiene acceso a los datos de sensores de todos los sensores conectados: Vernier LabQuest™ y Vernier Go Direct® (USB y Bluetooth®), a través de su programa TI-Basic utilizando este comando:
RefreshProbeVars statusVar
| • | Debe abrir primero la aplicación Vernier DataQuest™ o recibirá un error. |
Nota: La aplicación Vernier DataQuest™ se iniciará automáticamente cuando conecte un sensor o un soporte inalámbrico de laboratorio al software de TI-Nspire™ o dispositivo portátil.
| • | El comando RefreshProbeVars es válido solo cuando Vernier DataQuest™ se encuentra en el modo “Medir”. |
| • | statusVar es un parámetro opcional que indica el estado del comando. Estos son los valores de statusVar: |
|
Valor de StatusVar |
Estado |
|---|---|
|
statusVar=0 |
Normal (continuar con el programa) |
|
statusVar=1 |
La aplicación Vernier DataQuest™ se encuentra en el modo de recolección de datos. Nota: La aplicación Vernier DataQuest™ debe estar en el modo Medir para que este comando funcione. |
|
statusVar=2 |
La aplicación Vernier DataQuest™ no se ha iniciado. |
|
statusVar=3 |
La aplicación Vernier DataQuest™ se ha iniciado, pero usted no ha conectado ningún sensor. |
| • | Su programa TI-Basic leerá directamente las variables de Vernier DataQuest™ en la tabla de símbolos. |
| • | La variable meter.time muestra el último valor de la variable; esta no se actualiza automáticamente. Si no ha ocurrido la recolección de datos, meter.time será 0 (cero). |
| • | El uso de nombres de variables sin que los sensores correspondientes estén conectados físicamente dará como resultado en un error de "Variable no definida". |
Recolección de datos de sensor usando RefreshProbeVars
| 1. | Iniciar la aplicación Vernier DataQuest™. |
| 2. | Conecte lo sensores que necesite para recopilar los datos. |
| 3. | Ejecute el programa que desea usar para recopilar datos en la aplicación de la calculadora. |
| 4. | Manipule los sensores y recopile los datos. |
Nota: Puede crear un programa para interactuar con TI-Innovator™ Hub usando b > Hub > Enviar. (Consulte el ejemplo 2 a continuación.) Esto es opcional.
Ejemplo 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
Ejemplo 2: con 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