Subversion Repositories HomeAutomation

Rev

Rev 2129 | Rev 2131 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | SVN | RSS feed

  1.  
  2. Require("plugin/module.js");
  3.  
  4. Dimmer_ModuleNames    = [ "Dimmer230", "hwPWM", "rfTransceive" ];
  5. Dimmer_SpeedLevels    = function() { return [ 50, 135, 200, 255 ]; };
  6. Dimmer_StrengthLevels = function() { return [ 0, 50, 100, 150, 200, 255 ]; };
  7. Dimmer_StepsLevels    = function() { return [ 0, 10, 20, 30, 40, 50, 60, 70, 80, 90 ]; };
  8. Dimmer_Directions     = function() { return [ "Increase", "Decrease" ]; };
  9. Dimmer_Channels       = function() { return [ 0 ]; };
  10. Dimmer_Aliases        = function() { return Module_GetAliasNames(Dimmer_ModuleNames); };
  11. Dimmer_AvailableIds   = function() { return Module_GetAvailableIds(Dimmer_ModuleNames); };
  12.  
  13. function Dimmer_StartFade(alias_name, speed, direction)
  14. {
  15.     if (arguments.length < 3)
  16.     {
  17.         Log("\033[31mNot enough parameters given.\033[0m\n");
  18.         return false;
  19.     }
  20.    
  21.     var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
  22.     var found = false;
  23.    
  24.     for (var name in aliases_data)
  25.     {
  26.         var variables = {
  27.             "Channel"   : aliases_data[name]["specific"]["Channel"],
  28.             "Speed"     : speed,
  29.             "Direction" : direction };
  30.            
  31.             if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Start_Fade", variables))
  32.             {
  33.                 //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
  34.             }
  35.             else
  36.             {
  37.                 Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
  38.             }
  39.            
  40.             found = true;
  41.     }
  42.    
  43.     if (!found)
  44.     {
  45.         Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
  46.         return false;
  47.     }
  48.    
  49.     return true;
  50. }
  51. Console_RegisterCommand(Dimmer_StartFade, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases(), Dimmer_SpeedLevels(), Dimmer_Directions()); });
  52.  
  53. function Dimmer_StopFade(alias_name)
  54. {
  55.     if (arguments.length < 1)
  56.     {
  57.         Log("\033[31mNot enough parameters given.\033[0m\n");
  58.         return false;
  59.     }
  60.    
  61.     var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
  62.     var found = false;
  63.    
  64.     for (var name in aliases_data)
  65.     {
  66.         var variables = {
  67.             "Channel" : aliases_data[name]["specific"]["Channel"] };
  68.            
  69.             if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Stop_Fade", variables))
  70.             {
  71.                 //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
  72.             }
  73.             else
  74.             {
  75.                 Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
  76.             }
  77.            
  78.             found = true;
  79.     }
  80.    
  81.     if (!found)
  82.     {
  83.         Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
  84.         return false;
  85.     }
  86.    
  87.     return true;
  88. }
  89. Console_RegisterCommand(Dimmer_StopFade, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases()); });
  90.  
  91. function Dimmer_AbsoluteFade(alias_name, speed, level)
  92. {
  93.     if (arguments.length < 3)
  94.     {
  95.         Log("\033[31mNot enough parameters given.\033[0m\n");
  96.         return false;
  97.     }
  98.    
  99.     var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
  100.     var found = false;
  101.     var level_set = level;
  102.    
  103.     for (var name in aliases_data)
  104.     {
  105.       if (aliases_data[name]["module_name"] == "hwPWM")
  106.       {
  107.         level_set = level*39;
  108.  
  109.           if (level_set > 9940)
  110.         {
  111.             level_set = 10000;
  112.           }
  113.       }
  114.       else if (aliases_data[name]["module_name"] == "rfTransceiver")
  115.       {
  116.         var data = parseInt(aliases_data[name]["specific"]["Data"], 10);
  117.         var level_index = Math.ceil(parseInt(level, 10) / 16);
  118.         var level_values = [ 0, 15, 7, 11, 3, 13, 5, 9, 1, 14, 6, 10, 2, 12, 4, 8, 0 ];
  119.  
  120.         if (level_index === 0)
  121.         {
  122.           var highest_bit = data | 1;
  123.  
  124.           data |= 0x8000000;
  125.  
  126.           var down_shifted_data = data >>> 1;
  127.           data = (down_shifted_data * 2) + (highest_bit & 1);
  128.         }
  129.         else
  130.         {
  131.           data += 0x8000000000; // Set MSB = Dimmer mode
  132.         }
  133.  
  134.         data += level_values[level_index] * 0x100000000; //Add dimmer level
  135.  
  136.         var variables = {
  137.           "Channel"  : aliases_data[name]["specific"]["Channel"],
  138.           "Protocol" : "Nexa2",
  139.           "IRdata"   : data,
  140.           "Status"   : "Burst" };
  141.  
  142.         if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "IR", variables))
  143.         {
  144.           Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
  145.         }
  146.         else
  147.         {
  148.           Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
  149.         }
  150.  
  151.         found = true;
  152.  
  153.         continue;
  154.       }
  155.       else
  156.       {
  157.         level_set = level;
  158.         }
  159.        
  160.       //Check for undefined Channel parameter in alias
  161.       if (typeof aliases_data[name]["specific"]["Channel"] == 'undefined')
  162.       {
  163.         Log("\033[31mFailed to send command to " + name + ", Alias does not contain specific parameter \"Channel\".\033[0m\n");
  164.         break;
  165.       }
  166.        
  167.         var variables = {
  168.             "Channel"   : aliases_data[name]["specific"]["Channel"],
  169.             "Speed"     : speed,
  170.             "EndValue"  : level_set
  171.         };
  172.        
  173.         if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Abs_Fade", variables))
  174.         {
  175.             //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
  176.         }
  177.         else
  178.         {
  179.             Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
  180.         }
  181.        
  182.         found = true;
  183.        
  184.     }
  185.    
  186.     if (!found)
  187.     {
  188.         Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
  189.         return false;
  190.     }
  191.    
  192.     return true;
  193. }
  194. Console_RegisterCommand(Dimmer_AbsoluteFade, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases(), Dimmer_SpeedLevels(), Dimmer_StrengthLevels()); });
  195.  
  196. function Dimmer_RelativeFade(alias_name, speed, direction, steps)
  197. {
  198.     if (arguments.length < 4)
  199.     {
  200.         Log("\033[31mNot enough parameters given.\033[0m\n");
  201.         return false;
  202.     }
  203.    
  204.     var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
  205.     var found = false;
  206.     var steps_set = steps;
  207.    
  208.     for (var name in aliases_data)
  209.     {
  210.         if (aliases_data[name]["module_name"]=="hwPWM") {
  211.             steps_set = steps*39;
  212.         if (steps_set > 9940) {
  213.           level_set = 10000;
  214.         }
  215.         } else {
  216.             steps_set = steps;
  217.     }
  218.         var variables = {
  219.             "Channel"   : aliases_data[name]["specific"]["Channel"],
  220.             "Speed"     : speed,
  221.             "Direction" : direction,
  222.             "Steps"     : steps_set
  223.         };
  224.        
  225.         //Check for undefined Channel parameter in alias
  226.         if (typeof aliases_data[name]["specific"]["Channel"] == 'undefined') {
  227.             Log("\033[31mFailed to send command to " + name + ", Alias does not contain specific parameter \"Channel\".\033[0m\n");
  228.             break;
  229.         }
  230.        
  231.         if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Rel_Fade", variables))
  232.         {
  233.             //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
  234.         }
  235.         else
  236.         {
  237.             Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
  238.         }
  239.        
  240.         found = true;
  241.     }
  242.    
  243.     if (!found)
  244.     {
  245.         Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
  246.         return false;
  247.     }
  248.    
  249.     return true;
  250. }
  251. Console_RegisterCommand(Dimmer_RelativeFade, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases(), Dimmer_SpeedLevels(), Dimmer_Directions(), Dimmer_StepsLevels()); });
  252.  
  253. function Dimmer_Demo(alias_name, speed, steps)
  254. {
  255.     if (arguments.length < 3)
  256.     {
  257.         Log("\033[31mNot enough parameters given.\033[0m\n");
  258.         return false;
  259.     }
  260.    
  261.     var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
  262.     var found = false;
  263.     var steps_set = steps;
  264.    
  265.     for (var name in aliases_data)
  266.     {
  267.         if (aliases_data[name]["module_name"]=="hwPWM") {
  268.             steps_set = steps*39;
  269.         if (steps_set > 9940) {
  270.           level_set = 10000;
  271.         }
  272.         } else {
  273.             steps_set = steps;
  274.     }
  275.         var variables = {
  276.             "Channel"   : aliases_data[name]["specific"]["Channel"],
  277.             "Speed"     : speed,
  278.             "Steps"     : steps_set
  279.         };
  280.        
  281.         //Check for undefined Channel parameter in alias
  282.         if (typeof aliases_data[name]["specific"]["Channel"] == 'undefined') {
  283.             Log("\033[31mFailed to send command to " + name + ", Alias does not contain specific parameter \"Channel\".\033[0m\n");
  284.             break;
  285.         }
  286.        
  287.         if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Demo", variables))
  288.         {
  289.             //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
  290.         }
  291.         else
  292.         {
  293.             Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
  294.         }
  295.        
  296.         found = true;
  297.     }
  298.    
  299.     if (!found)
  300.     {
  301.         Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
  302.         return false;
  303.     }
  304.    
  305.     return true;
  306. }
  307. Console_RegisterCommand(Dimmer_Demo, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases(), Dimmer_SpeedLevels(), Dimmer_StepsLevels()); });
  308.  
  309. function Dimmer_OnMessage(module_name, module_id, command, variables)
  310. {
  311.     if (in_array(Dimmer_ModuleNames, module_name))
  312.     {
  313.         var aliases_data = Module_LookupAliases({
  314.             "module_name" : module_name,
  315.             "module_id"   : module_id,
  316.             "group"       : false
  317.         });
  318.        
  319.         switch (command)
  320.         {
  321.             case "Netinfo":
  322.             {
  323.                 for (var alias_name in aliases_data)
  324.                 {
  325.                     if (aliases_data[alias_name]["specific"]["Channel"] != variables["Channel"])
  326.                     {
  327.                         continue;
  328.                     }
  329.                    
  330.                     var last_value = {};
  331.                     var last_value_string = Storage_GetParameter("LastValues", alias_name);
  332.                    
  333.                     if (last_value_string)
  334.                     {
  335.                         last_value = eval("(" + last_value_string + ")");
  336.                     }
  337.                    
  338.                     last_value["Connection"] = { "value" : variables["Connection"], "timestamp" : get_time() };
  339.                     last_value["Frequency"] = { "value" : variables["Frequency"], "timestamp" : get_time() };
  340.                     last_value["Level"] = { "value" : variables["DimmerValue"], "timestamp" : get_time() };
  341.                    
  342.                     Storage_SetParameter("LastValues", alias_name, JSON.stringify(last_value));
  343.                 }
  344.                
  345.                 break;
  346.             }
  347.             case "Pwm":
  348.             {
  349.                 for (var alias_name in aliases_data)
  350.                 {
  351.                     if (aliases_data[alias_name]["specific"]["Channel"] != variables["Channel"])
  352.                     {
  353.                         continue;
  354.                     }
  355.                    
  356.                     var last_value = {};
  357.                     var last_value_string = Storage_GetParameter("LastValues", alias_name);
  358.                    
  359.                     if (last_value_string)
  360.                     {
  361.                         last_value = eval("(" + last_value_string + ")");
  362.                     }
  363.                     var value = 0 + variables["Value"];
  364.                     value = value / 39;
  365.                     value = parseInt(value).toString();
  366.                     last_value["Level"] = { "value" : value, "timestamp" : get_time() };
  367.                    
  368.                     Storage_SetParameter("LastValues", alias_name, JSON.stringify(last_value));
  369.                 }
  370.                
  371.                 break;
  372.             }
  373.         }
  374.     }
  375. }
  376. Module_RegisterToOnMessage("all", Dimmer_OnMessage);
  377.