Навык iRidi для VK Маруся

var Marusia = IR.GetDevice("VK Marusia");
var device = IR.GetDevice("Modbus TCP");

IR.AddListener(IR.EVENT_TAG_CHANGE, Marusia, function(in_sName, in_sValue)
{
   if (in_sName == "Лампа:RGB") {   
       var valueR = (in_sValue >> 24) & 0xFF; 
       var commandR = "Red"; //
       setRGB(commandR, valueR);
       
       
       var valueG = (in_sValue >> 16) & 0xFF; //Получение зеленого
       var commandG = "Green"; //Имя канала в которой передается значение 
       setRGB(commandG, valueG); //Функция отправки значения
       
       var valueB = (in_sValue >> 8) & 0xFF;
       var commandB = "Blue";
       setRGB(commandB, valueB);
   }
   
   IR.Log(" Красный " + valueR + " Зеленый " + valueG + " Синий " + valueB);
   
});
 
/*
/ отправляем на определенную команду значение
/ command - имя команды
/ value - значение
*/
function setRGB (command ,value){
    device.Set(command, value);
}

var Marusya = IR.GetDevice("VK Marusya"); // имя драйвера Маруси
var ModBus = IR.GetDevice("Bus77");  // имя драйвера

IR.AddListener(IR.EVENT_START, 0, function () 
{
    IR.AddListener(IR.EVENT_TAG_CHANGE, Marusya, function(name, value) 
    {
        IR.Log("От Marusya Name: " +  name + " значение:" + value); 
        
        var NameChannelSetSupply = "";
        var NameChannelSetExhaustFanSpeed = "";
        var ResultForModBus = 0; //значение для МодБас
        if(name == "Вентиляция Роял Клима:FanSpeed")
        {
            NameChannelSetSupply = "I-CAN-Modbus_тест:SupplyFanSpeed (Вентиляция Royal Clima 1)";
            NameChannelSetExhaustFanSpeed = "I-CAN-Modbus_тест:ExhaustFanSpeed (Вентиляция Royal Clima 1)";
            switch(value) 
            {
                case "quiet":
                {
                    ResultForModBus = 1;
                    ModBus.Set(NameChannelSetSupply, ResultForModBus);
                    IR.SetTimeout(100, function()
                    {
                        ModBus.Set(NameChannelSetExhaustFanSpeed, ResultForModBus);
                        IR.Log("Выставлено значение " + value + " В SupplyFanSpeed");
                    });
                    break;
                }
                case "low":
                {
                    ResultForModBus = 2;
                    ModBus.Set(NameChannelSetSupply, ResultForModBus);
                    IR.SetTimeout(100, function()
                    {
                        ModBus.Set(NameChannelSetExhaustFanSpeed, ResultForModBus);
                        IR.Log("Выставлено значение " + value + " В SupplyFanSpeed");
                    });
                    break;
                }
                case "medium":
                {
                    ResultForModBus = 5;
                    ModBus.Set(NameChannelSetSupply, ResultForModBus);
                    IR.SetTimeout(100, function()
                    {
                        ModBus.Set(NameChannelSetExhaustFanSpeed, ResultForModBus);
                        IR.Log("Выставлено значение " + value + " В SupplyFanSpeed");
                    });
                    break;
                }
                case "high":
                {
                    ResultForModBus = 8;
                    ModBus.Set(NameChannelSetSupply, ResultForModBus);
                    IR.SetTimeout(100, function()
                    {
                        ModBus.Set(NameChannelSetExhaustFanSpeed, ResultForModBus);
                        IR.Log("Выставлено значение " + value + " В SupplyFanSpeed");
                    });
                    break;
                }
                case "turbo":
                {
                    ResultForModBus = 10;
                    ModBus.Set(NameChannelSetSupply, ResultForModBus);
                    IR.SetTimeout(100, function()
                    {
                        ModBus.Set(NameChannelSetExhaustFanSpeed, ResultForModBus);
                        IR.Log("Выставлено значение " + value + " В SupplyFanSpeed");
                    });
                    break;
                }
                default:
                {
                    IR.Log("Команда не запрограммирована!");
                    break;
                }
            }
        }
    });
    
    IR.AddListener(IR.EVENT_TAG_CHANGE, ModBus, function(name, value) 
    {
        var NameChannelSet = "";
        var ResultForMarusya = 0; //значение для Маруси
        IR.Log("От ModBus Name: " + name + " значение:" + value);
        if(name == "I-CAN-Modbus_тест:SupplyFanSpeed (Вентиляция Royal Clima 1)" || 
           name == "I-CAN-Modbus_тест:ExhaustFanSpeed (Вентиляция Royal Clima 1)")
        {
            NameChannelSet = "Вентиляция Роял Клима:FanSpeed";
            switch(value) 
            {
                case 1:
                    ResultForMarusya = "quiet";
                    Marusya.Set(NameChannelSet, ResultForMarusya);
                break;
                case 2:
                    ResultForMarusya = "low";
                    Marusya.Set(NameChannelSet, ResultForMarusya);
                break;
                case 3:
                    ResultForMarusya = "medium";
                    Marusya.Set(NameChannelSet, ResultForMarusya);
                break;
                case 7:
                    ResultForMarusya = "high";
                    Marusya.Set(NameChannelSet, ResultForMarusya); 
                break;
                case 10:
                    ResultForMarusya = "turbo";
                    Marusya.Set(NameChannelSet, ResultForMarusya);
                break;
                default:
                    IR.Log("Команда не запрограммирована!");
            }  
        }
        IR.Log("От ModBus - Name: " + NameChannelSet + " значение:" + ResultForMarusya); 
    });
});

function ThermostatMode(in_Type, in_Name, in_Value)
{
    switch(in_Value) {
        case 'fan_only' :
            in_Value = 1;
            break;
        case 'dry' :
            in_Value = 2;
            break;
        case 'cool' :
            in_Value = 3;
            break;
        case 'heat' :
            in_Value = 4;
            break;
        case 'auto' :
            in_Value = 5;
            break;
        case 'eco' :
            in_Value = 6;
            break;
        default:
            IR.Log("Error!");
    }
   
    return in_Value;
}

var Marusia = IR.GetDevice("VK Marusia");
var  Modbus = IR.GetDevice("Лампа");              
 
//Логирование команд, отправленных драйвером Маруси:
    IR.AddListener(IR.EVENT_TAG_CHANGE, Marusia, function(name, value){ 
    IR.Log("Marusia! Device tag: " + name + " , value: " + value); 
   
  });


//Пример управления лампой:

IR.AddListener(IR.EVENT_TAG_CHANGE, Modbus, function(name, value){  //прослушиваем устройство на изменение тега.
    switch (name) {
        case "Feedback 1": 
            if (value == 1){         //устройство включено
                Marusia.Set("Лампа:On/Off", 1)   // отсылаем в канал драйвера Маруси значение 1 - устройство включено.        
            }                      
            if (value == 0){        //устройство выключено                     
                Marusia.Set("Лампа:On/Off", 0)    //   отсылаем в канал драйвера Маруси значение 0 - устройство выключено.           
           }
        break;
        case "Feedback 2":
            Marusia.Set("Лампа:Brightness", value); // отсылаем в канал драйвера Маруси значение яркости лампы.
        break;
    }
});    

IR.AddListener(IR.EVENT_TAG_CHANGE, Marusia, function(name, value){  //прослушиваем команду от драйвера Маруси.
    switch (name) {
                   case "Лампа:On/Off":         //если изменение прошли в теге лампы, начинаем выполнять действия.
                       if (value == 1){           //при отправке команды от Маруси на включение, в теге появится 1. Modbus.Set("Command 1", 1);//передаем команду от Маруси устройству 1 - включение.
                         }
                       if (value == 0) {         //при отправке команды от Маруси на выключение, в теге появится 0. Modbus.Set("Command 1", 0);//передаем команду от Маруси устройству 0 - выключение.
                        }
                    break;
                    case "Лампа:Brightness":
                        Modbus.Set("Command 2", value); // передаём в команду от Маруси устройству значение яркости лампы.
                    break;
                    }                         
});