I swear this script worked in HS3 but throws an error in HS4.
Thanks,
Tim
11/30/2022 7:18:49 PM
HomeSeer
Error
Compiling script (1)ColrLeftChng.vb: Character is not valid.
11/30/2022 7:18:49 PM
HomeSeer
Error
Compiling script (1)ColrLeftChng.vb: String constants must end with a double quote.
Sub Main(ByVal Params As Object)
Dim s As Double = hs.DeviceValueEx(954)
if s =0 then
hs.PluginFunction("JowiHue", "", "SetLightsOff", {False, "WestLeft”})
elseif s =1 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “237,28,36”, 20})
elseif s =2 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “63,72,204”, 20})
elseif s =3 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “28,147,64”, 20})
elseif s =4 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “255,242,0”, 20})
elseif s =5 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “83,203,255”, 20})
elseif s =6 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “122,254,103”, 20})
elseif s =7 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “255,127,39”, 20})
elseif s =8 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “255,255,255”, 20})
end if
end sub
Thanks,
Tim
11/30/2022 7:18:49 PM
HomeSeer
Error
Compiling script (1)ColrLeftChng.vb: Character is not valid.
11/30/2022 7:18:49 PM
HomeSeer
Error
Compiling script (1)ColrLeftChng.vb: String constants must end with a double quote.
Sub Main(ByVal Params As Object)
Dim s As Double = hs.DeviceValueEx(954)
if s =0 then
hs.PluginFunction("JowiHue", "", "SetLightsOff", {False, "WestLeft”})
elseif s =1 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “237,28,36”, 20})
elseif s =2 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “63,72,204”, 20})
elseif s =3 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “28,147,64”, 20})
elseif s =4 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “255,242,0”, 20})
elseif s =5 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “83,203,255”, 20})
elseif s =6 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “122,254,103”, 20})
elseif s =7 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “255,127,39”, 20})
elseif s =8 then
hs.PluginFunction("JowiHue", "", "SetLightsRGB", {False, "WestLeft", 255, “255,255,255”, 20})
end if
end sub
Comment