Hs.devicestring problem

[ArbWare]

I’m having a senior moment

In immediate window

&hs.speak hs.Devicevalue(1042)
Works as expected
Log shows
TTS speak():1


But
&hs.speak hs.DeviceString(1042)
Doesn’t say anything
Log shows
TTS speak():

Status screen shows a string of “clean”

Probably a simple thing I’m not seeing


Sent from my iPad using Tapatalk

[donstephens]

hs.Speak(hs.DeviceString(1024)) perhaps?

[Uncle Michael]

Do you have a device value/status pair that links "clean" to the value of 1?
The device management screen will display the status text if the device string is empty. Look at the advanced tab of the device. That will display both the status and the device string.
Have you tried using the replacement variable? &hs.speak $$DSR:1042:?

[sparkman]

Have you tried using the replacement variable? &hs.speak $$DSR:1042:?

AFAIK, replacement variables do not work inside of scripts/immediate script commands.

[Uncle Michael]

AFAIK, replacement variables do not work inside of scripts/immediate script commands.

I think you are correct. I guess you'd need to use the Speak action of an event rather than an immediate script.
I don't know of a way to speak a device status using a script.

[sparkman]

This works:

&hs.speak(hs.CAPIGetStatus(2776).Status)

[Uncle Michael]

&hs.speak(hs.CAPIGetStatus(2776).Status)

Impressive!
Using CAPI to retrieve a device status would do Rube Goldberg proud.

[sparkman]

Impressive!
Using CAPI to retrieve a device status would do Rube Goldberg proud.

Lol

[ArbWare]

Thx... not sure why the string is blank... see attached screenshots




Sent from my iPhone using Tapatalk

[sparkman]

Pretty normal that the string is blank. Most devices show value and status.

[ArbWare]

Pretty normal that the string is blank. Most devices show value and status.

I guess I was confusing status with devicestring...
So... how can I have it speak the status? (“On base”, “cleaning”, etc)


Sent from my iPhone using Tapatalk

[sparkman]

I guess I was confusing status with devicestring...
So... how can I have it speak the status? (“On base”, “cleaning”, etc)


Sent from my iPhone using Tapatalk

I posted a way to do so earlier in the thread in post #6.

[ArbWare]

I posted a way to do so earlier in the thread in post #6.

Thank you very much.... !! that works well for what i was looking for.

[AshaiRey]

I created a multi purpose function for this

You can use  $DEVICESTRING( DeviceRef)$ in the string and send it to this function.
You will get the device string back even if this is a value pair.

'==============================
' REPLACEMENT VARIABLE
'==============================
' Using replacement values

' Usage : (String in)
'  STRINGS REPLACED
'  $DEVICESTRING(RefID of device)$
'
Function ReplacementVariable(ByVal TestString As String) As String
 Dim CheckString = Instr(TestString, "$DEVICESTRING(")
 Dim   temp2     = Replace(TestString, "$DEVICESTRING(", "")
    Dim ThisDevID   = Mid(temp2, CheckString, Instr(temp2, ")$") - CheckString ) 
    CheckString     = "$DEVICESTRING(" & ThisDevID & ")$"

 If (hs.DeviceString(ThisDevID) = "") Then
   ' In case that the device has no device string set
   ' then try to get de VSP value-string pair.
     Dim VSPstring
     Dim DevRef  = CInt(ThisDevID)
     Dim Value   = hs.DeviceValue(DevRef)
     Dim VSPType = 1  ' 0 = Status - Control
    ' 1 = Status
    ' 2 = Control
    ' 0 = Status - Control
   VSPString = hs.DeviceVSP_GetStatus(DevRef, Value, VSPType)
   temp2 = Replace(TestString, CheckString, VSPString )
 Else
      temp2 = Replace(TestString, CheckString, hs.DeviceString(ThisDevID) )
 End If
 Return temp2
End Function