Mikik

(С|с)остояние системы

cm('Бойлер.turnOn');
sayTo("Бойлер включен!",5, main);

cm('ВентиляторГостиная.turnOn');
say("Вентилятор Гостиная включен!",5);

cm('ВентиляторОсновной.turnOn');
say("Вентилятор включен!",5);

cm('ОгниББ.turnOn');
cm('ОгниДом.turnOn');
cm('ОгниБаня.turnOn');
say('Иллюминация включена!',5);

sg("ПрожекторВъезд.ВКЛ", 1);
sg("ПрожекторВъезд.status", 1);
say("Прожектор при въезде включен!",5);

cm("Теплыйпол.turnOn");
say("Тёплый пол включен!",5);

sg('ThisComputer.Econom',1);
cm('Весь_Свет.turnoff');
say('Режим экономии включён!',5);

cm("Бойлер.turnOff");
say("Бойлер выключен!",5);

cm("ВентиляторГостиная.turnOff");
say("Вентилятор Гостиная выключен!",5);

cm("ВентиляторОсновной.turnOff");
say("Вентилятор выключен!",5);

cm('ОгниББ.turnOff');
cm('ОгниДом.turnOff');
cm('ОгниБаня.turnOff');
say('Иллюминация выключена!',5);

sg("ПрожекторВъезд.status", 0);
sg("ПрожекторВъезд.ВЫКЛ", 1);
say("Прожектор при въезде выключен!",5);

cm("Теплыйпол.turnOff");
say("Тёплый пол выключен!",5);

sg('ThisComputer.Econom',0);

$Tmp=round(gg("WaterPrep.Temperature"));
$str=GetNumberWord($Tmp,array('градус','градуса','градусов'));
say("Температура водоподготовки $Tmp $str",5);

$Tmp=round(gg("Kitchen.Temperature"));
$str=GetNumberWord($Tmp,array('градус','градуса','градусов'));
say("Температура на кухне $Tmp $str",5);

$Tmp=round(gg("Bathroom.Temperature"));
$str=GetNumberWord($Tmp,array('градус','градуса','градусов'));
say("Температура в ванной $Tmp $str",5);

$Tmp=round(gg("Hall.Temperature"));
$str=GetNumberWord($Tmp,array('градус','градуса','градусов'));
say("Температура в гостиной $Tmp $str",5);

$Tmp=round(gg("BedRoom.Temperature"));
$str=GetNumberWord($Tmp,array('градус','градуса','градусов'));
say("Температура в спальне $Tmp $str",5);

$Tmp=round(gg('Terrasa.Temperature'));
$str=GetNumberWord($Tmp,array('градус','градуса','градусов'));
say("Температура террасы $Tmp $str",5);

$Tmp=round(gg('Kinderroom.Temperature'));
$str=GetNumberWord($Tmp,array('градус','градуса','градусов'));
say("Температура в детской $Tmp $str",5);

$Tmp=round(gg('Banya.Temperature'));
$str=GetNumberWord($Tmp,array('градус','градуса','градусов'));
say("Температура в бане $Tmp $str",5);

$Tmp=round(gg("Outside.temperature"));
$str=GetNumberWord($Tmp,array('градус','градуса','градусов'));
say("Температура на улице $Tmp $str",5);
$Tmp=round(gg("Outside.humidity"));
$str=GetNumberWord($Tmp,array('процент','процента','процентов'));
say("Влажность на улице $Tmp $str",5);
$Tmp=round(gg("Outside.pressure"));
$str=GetNumberWord($Tmp,array('миллиметр','миллиметра','миллиметров'));
say("Атмосферное давление $Tmp $str ртутного столба",5);

$Tmp=round(gg("PowerAC.Current"));
$str=GetNumberWord($Tmp,array('ампер','ампера','ампер'));
say("Потребляемый ток $Tmp $str",5);

$Tmp=round(gg("PowerAC.Voltage"));
$str=GetNumberWord($Tmp,array('вольт','вольта','вольт'));
say("Напряжение $Tmp $str",5);

$Tmp=round(gg("PowerAC.Power"));
$str=GetNumberWord($Tmp,array('ватт','ватта','ватт'));
say("Мощность $Tmp $str",5);