Announcement

Collapse
No announcement yet.

Yamaha Music Cast speakers

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Yamaha Music Cast speakers

    For those with Yamaha speakers that do not respond to volume adjustments from this plugin I am contributing this code that will enable you to adjust it via a vb script:

    Dim i As Long
    Dim speakerArray(2) as String
    `Enter speajer addresses below:
    speakerArray(0) = "x.x.x.1"
    speakerArray(1) = "x.x.x.2"
    speakerArray(2) = "x.x.x.3"

    'Night time volume is 27
    'Daytime volume is 50

    dim s
    dim website
    For i = 0 To ubound(speakerArray)
    website = "http://" + speakerArray(i) + "/YamahaExtendedControl/v1/main/setVolume?volume=27"
    s = hs.URLAction(website, "GET", "", "")
    hs.WriteLog("Info", website)
    Next
    hs.speak("Volume at 27 Volume at 27", true, "MasterBedroon")
Working...
X