WebSVN – HomeAutomation – Diff – /trunk/PcSoftware/Atom1.5/script/interface/dimmer.js


 
Require("plugin/module.js");
 
Dimmer_ModuleNames    = [ "Dimmer230", "hwPWM", "rfTransceive" ];
Dimmer_SpeedLevels    = function() { return [ 50, 135, 200, 255 ]; };
Dimmer_StrengthLevels = function() { return [ 0, 50, 100, 150, 200, 255 ]; };
Dimmer_StepsLevels    = function() { return [ 0, 10, 20, 30, 40, 50, 60, 70, 80, 90 ]; };
Dimmer_Directions     = function() { return [ "Increase", "Decrease" ]; };
Dimmer_Channels       = function() { return [ 0 ]; };
Dimmer_Aliases        = function() { return Module_GetAliasNames(Dimmer_ModuleNames); };
Dimmer_AvailableIds   = function() { return Module_GetAvailableIds(Dimmer_ModuleNames); };
 
function Dimmer_StartFade(alias_name, speed, direction)
{
    if (arguments.length < 3)
    {
        Log("\033[31mNot enough parameters given.\033[0m\n");
        return false;
    }
   
    var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
    var found = false;
   
    for (var name in aliases_data)
    {
        var variables = {
            "Channel"   : aliases_data[name]["specific"]["Channel"],
            "Speed"     : speed,
            "Direction" : direction };
           
            if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Start_Fade", variables))
            {
                //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
            }
            else
            {
                Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
            }
           
            found = true;
    }
   
    if (!found)
    {
        Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
        return false;
    }
   
    return true;
}
Console_RegisterCommand(Dimmer_StartFade, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases(), Dimmer_SpeedLevels(), Dimmer_Directions()); });
 
function Dimmer_StopFade(alias_name)
{
    if (arguments.length < 1)
    {
        Log("\033[31mNot enough parameters given.\033[0m\n");
        return false;
    }
   
    var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
    var found = false;
   
    for (var name in aliases_data)
    {
        var variables = {
            "Channel" : aliases_data[name]["specific"]["Channel"] };
           
            if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Stop_Fade", variables))
            {
                //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
            }
            else
            {
                Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
            }
           
            found = true;
    }
   
    if (!found)
    {
        Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
        return false;
    }
   
    return true;
}
Console_RegisterCommand(Dimmer_StopFade, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases()); });
 
function Dimmer_AbsoluteFade(alias_name, speed, level)
{
    if (arguments.length < 3)
    {
        Log("\033[31mNot enough parameters given.\033[0m\n");
        return false;
    }
   
    var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
    var found = false;
    var level_set = level;
   
    for (var name in aliases_data)
    {
      if (aliases_data[name]["module_name"] == "hwPWM")
      {
        level_set = level*39;
 
          if (level_set > 9940)
        {
            level_set = 10000;
          }
      }
      else if (alias_data[name]["module_name"] == "rfTransceiver")
      {
        var data = parseInt(alias_data[name]["specific"]["Data"], 10);
        var level_index = Math.ceil(parseInt(level, 10) / 16);
        var level_values = [ 0, 15, 7, 11, 3, 13, 5, 9, 1, 14, 6, 10, 2, 12, 4, 8, 0 ];
 
        if (level_index === 0)
        {
          var highest_bit = data | 1;
 
          data |= 0x8000000;
 
          var down_shifted_data = data >>> 1;
          data = (down_shifted_data * 2) + (highest_bit & 1);
        }
        else
        {
          data += 0x8000000000; // Set MSB = Dimmer mode 
        }
 
        data += level_values[level_index] * 0x100000000; //Add dimmer level 
 
        var variables = {
          "Channel"  : aliases_data[name]["specific"]["Channel"],
          "Protocol" : "Nexa2",
          "IRdata"   : data,
          "Status"   : "Burst" };
 
        if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "IR", variables))
        {
          Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
        }
        else
        {
          Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
        }
 
        found = true;
 
        continue;
      }
      else
      {
        level_set = level;
        }
       
      //Check for undefined Channel parameter in alias
      if (typeof aliases_data[name]["specific"]["Channel"] == 'undefined')
      {
        Log("\033[31mFailed to send command to " + name + ", Alias does not contain specific parameter \"Channel\".\033[0m\n");
        break;
      }
       
        var variables = {
            "Channel"   : aliases_data[name]["specific"]["Channel"],
            "Speed"     : speed,
            "EndValue"  : level_set
        };
       
        if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Abs_Fade", variables))
        {
            //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
        }
        else
        {
            Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
        }
       
        found = true;
       
    }
   
    if (!found)
    {
        Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
        return false;
    }
   
    return true;
}
Console_RegisterCommand(Dimmer_AbsoluteFade, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases(), Dimmer_SpeedLevels(), Dimmer_StrengthLevels()); });
 
function Dimmer_RelativeFade(alias_name, speed, direction, steps)
{
    if (arguments.length < 4)
    {
        Log("\033[31mNot enough parameters given.\033[0m\n");
        return false;
    }
   
    var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
    var found = false;
    var steps_set = steps;
   
    for (var name in aliases_data)
    {
        if (aliases_data[name]["module_name"]=="hwPWM") {
            steps_set = steps*39;
        if (steps_set > 9940) {
          level_set = 10000;
        }
        } else {
            steps_set = steps;
    }
        var variables = {
            "Channel"   : aliases_data[name]["specific"]["Channel"],
            "Speed"     : speed,
            "Direction" : direction,
            "Steps"     : steps_set
        };
       
        //Check for undefined Channel parameter in alias
        if (typeof aliases_data[name]["specific"]["Channel"] == 'undefined') {
            Log("\033[31mFailed to send command to " + name + ", Alias does not contain specific parameter \"Channel\".\033[0m\n");
            break;
        }
       
        if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Rel_Fade", variables))
        {
            //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
        }
        else
        {
            Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
        }
       
        found = true;
    }
   
    if (!found)
    {
        Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
        return false;
    }
   
    return true;
}
Console_RegisterCommand(Dimmer_RelativeFade, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases(), Dimmer_SpeedLevels(), Dimmer_Directions(), Dimmer_StepsLevels()); });
 
function Dimmer_Demo(alias_name, speed, steps)
{
    if (arguments.length < 3)
    {
        Log("\033[31mNot enough parameters given.\033[0m\n");
        return false;
    }
   
    var aliases_data = Module_ResolveAlias(alias_name, Dimmer_ModuleNames);
    var found = false;
    var steps_set = steps;
   
    for (var name in aliases_data)
    {
        if (aliases_data[name]["module_name"]=="hwPWM") {
            steps_set = steps*39;
        if (steps_set > 9940) {
          level_set = 10000;
        }
        } else {
            steps_set = steps;
    }
        var variables = {
            "Channel"   : aliases_data[name]["specific"]["Channel"],
            "Speed"     : speed,
            "Steps"     : steps_set
        };
       
        //Check for undefined Channel parameter in alias
        if (typeof aliases_data[name]["specific"]["Channel"] == 'undefined') {
            Log("\033[31mFailed to send command to " + name + ", Alias does not contain specific parameter \"Channel\".\033[0m\n");
            break;
        }
       
        if (Module_SendMessage(aliases_data[name]["module_name"], aliases_data[name]["module_id"], "Demo", variables))
        {
            //Log("\033[32mCommand sent successfully to " + name + ".\033[0m\n");
        }
        else
        {
            Log("\033[31mFailed to send command to " + name + ".\033[0m\n");
        }
       
        found = true;
    }
   
    if (!found)
    {
        Log("\033[31mNo aliases by the name " + alias_name + " were applicable for this command.\033[0m\n");
        return false;
    }
   
    return true;
}
Console_RegisterCommand(Dimmer_Demo, function(arg_index, args) { return Console_StandardAutocomplete(arg_index, args, Dimmer_Aliases(), Dimmer_SpeedLevels(), Dimmer_StepsLevels()); });
 
function Dimmer_OnMessage(module_name, module_id, command, variables)
{
    if (in_array(Dimmer_ModuleNames, module_name))
    {
        var aliases_data = Module_LookupAliases({
            "module_name" : module_name,
            "module_id"   : module_id,
            "group"       : false
        });
       
        switch (command)
        {
            case "Netinfo":
            {
                for (var alias_name in aliases_data)
                {
                    if (aliases_data[alias_name]["specific"]["Channel"] != variables["Channel"])
                    {
                        continue;
                    }
                   
                    var last_value = {};
                    var last_value_string = Storage_GetParameter("LastValues", alias_name);
                   
                    if (last_value_string)
                    {
                        last_value = eval("(" + last_value_string + ")");
                    }
                   
                    last_value["Connection"] = { "value" : variables["Connection"], "timestamp" : get_time() };
                    last_value["Frequency"] = { "value" : variables["Frequency"], "timestamp" : get_time() };
                    last_value["Level"] = { "value" : variables["DimmerValue"], "timestamp" : get_time() };
                   
                    Storage_SetParameter("LastValues", alias_name, JSON.stringify(last_value));
                }
               
                break;
            }
            case "Pwm":
            {
                for (var alias_name in aliases_data)
                {
                    if (aliases_data[alias_name]["specific"]["Channel"] != variables["Channel"])
                    {
                        continue;
                    }
                   
                    var last_value = {};
                    var last_value_string = Storage_GetParameter("LastValues", alias_name);
                   
                    if (last_value_string)
                    {
                        last_value = eval("(" + last_value_string + ")");
                    }
                    var value = 0 + variables["Value"];
                    value = value / 39;
                    value = parseInt(value).toString();
                    last_value["Level"] = { "value" : value, "timestamp" : get_time() };
                   
                    Storage_SetParameter("LastValues", alias_name, JSON.stringify(last_value));
                }
               
                break;
            }
        }
    }
}
Module_RegisterToOnMessage("all", Dimmer_OnMessage);
 

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

Subversion Repositories HomeAutomation

(root)/trunk/PcSoftware/Atom1.5/script/interface/dimmer.js – Rev 2128 → 2129