I've had some trouble compiling the sample code from the guide on my Raspberry Pi Zee S2. With the params, I could not get it to compile at all. So I tried the below:
Sub Main(ByVal parms as object)
Dim parmArray (0 to 1)
parmArray(0) = "iW3"
parmArray(1) = 15
hs.PluginFunction("AirplaySpeak", "", "SetSpeakerVolume", parmArray)
hs.speak("Volume at 15", true, "iW3")
End Sub
This compiles OK, speaks the text, but the volume doesn't seem to be reduced at all...
Any ideas?
Thanks,
Eric
Sub Main(ByVal parms as object)
Dim parmArray (0 to 1)
parmArray(0) = "iW3"
parmArray(1) = 15
hs.PluginFunction("AirplaySpeak", "", "SetSpeakerVolume", parmArray)
hs.speak("Volume at 15", true, "iW3")
End Sub
This compiles OK, speaks the text, but the volume doesn't seem to be reduced at all...
Any ideas?
Thanks,
Eric
Comment