Евгений

(убери|выруби|отключи) все будильники

setGlobal('AlarmWeekDay.AlarmOn',0);       //Будильник рабочих дней
setGlobal('AlarmMenu.AlarmMenuRun',Выкл);
setGlobal('AlarmMenu.AlarmMenu1Run',Выкл);

setGlobal('AlarmWeekEnd.AlarmOn',0);      //Будильник выходных дней
setGlobal('AlarmMenu.AlarmMenuRun',Выкл);
setGlobal('AlarmMenu.AlarmMenu2Run',Выкл);

setGlobal('AlarmOne.AlarmOn',0);          //Будильник разовый
setGlobal('AlarmMenu.AlarmMenuRun',Выкл);
setGlobal('AlarmMenu.AlarmMenu3Run',Выкл);

say("Атключаю все будильники.",5);

(поставь|установи) выходной будильник на (\d+)(\s*)(часов|:)*(\s*)(\d*)

$h=$matches[2];
$m=$matches[6];
if ($h>24) {
say("Непонятно на который час завести будильник, определитесь и сообщите снова.",5);
return;
}
if (($m>59)|(!$m)) {
say("Непонятно на сколько минут завести будильник, поэтому пусть будет ровно 00.",5);
$m="00";
}
say("Ставлю будильник выходных дней на ".$h." часов ".$m." минут. Постарайтесь не проспать.",5);
setGlobal('AlarmWeekEnd.AlarmOn',1);
setGlobal('AlarmWeekEnd.AlarmTime',$h.':'.$m);
setGlobal('AlarmMenu.AlarmMenuRun',Вкл);
setGlobal('AlarmMenu.AlarmMenu2Run',Вкл);

(поставь|установи) рабочий будильник на (\d+)(\s*)(часов|:)*(\s*)(\d*)

$h=$matches[2];
$m=$matches[6];
if ($h>24) {
say("Непонятно на который час завести будильник, определитесь и сообщите снова.",5);
return;
}
if (($m>59)|(!$m)) {
say("Непонятно на сколько минут завести будильник, поэтому пусть будет ровно 00.",5);
$m="00";
}
say("Ставлю будильник рабочих дней на ".$h." часов ".$m." минут. Постарайтесь не проспать.",5);
setGlobal('AlarmWeekDay.AlarmOn',1);
setGlobal('AlarmWeekDay.AlarmTime',$h.':'.$m);
setGlobal('AlarmMenu.AlarmMenuRun',Вкл);
setGlobal('AlarmMenu.AlarmMenu1Run',Вкл);

(поставь|установи) разовый будильник на (\d+)(\s*)(часов|:)*(\s*)(\d*)

$h=$matches[2];
$m=$matches[6];
if ($h>24) {
say("Непонятно на который час завести будильник, определитесь и сообщите снова.",5);
return;
}
if (($m>59)|(!$m)) {
say("Непонятно на сколько минут завести будильник, поэтому пусть будет ровно 00.",5);
$m="00";
}
say("Ставлю разовый будильник на ".$h." часов ".$m." минут. Постарайтесь не проспать.",5);
setGlobal('AlarmOne.AlarmOn',1);
setGlobal('AlarmOne.AlarmTime',$h.':'.$m);
setGlobal('AlarmMenu.AlarmMenuRun',Вкл);
setGlobal('AlarmMenu.AlarmMenu3Run',Вкл);