Peter

runScript('playFavoriteMusic');

((А|а)кции)

$dirtxt=gg('Gasprom.dirtxt');
gg('Gasprom.data');
gg('Gasprom.delta') !== '0.00' ? $dgaz=gg('Gasprom.delta')." пунктов" : $dgaz='';

//$deurtxt=gg('EUR.dirtxt');
//gg('EUR.delta') !== '0.00' ? $deur=gg('EUR.delta')." пунктов" : $deur='';

//$dgldtxt=gg('AU.dirtxt');
//gg('AU.delta') !== '0.00' ? $dgld=gg('AU.delta')." пунктов" : $dgld='';

$txt="Газпром ".gg('Gasprom.data')." ".$dirtxt." ".$dgaz.".";
say($txt,0);

((Р|р)асскажи) ((А|а)некдот)

$arr = getHistory('web.Anecdot', strtotime("-1 day"));

$rand = rand(0, 14);
foreach ( $arr as $key => $anec ) {
 if ($rand === $key) {
 $numb=$key;
  $anecdot=$anec['VALUE'];
 }
}
$txt = str_replace("
", " ", $anecdot);
sayReply('Короче, анекдот номер '.$numb.'. '.$txt, 1);

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

$h=$matches[5];
$m=$matches[9];
$hh=$h;
if ($h<10) {$h="0".$h;}
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);

((В|в)алют(а|ы))

$dirtxt=gg('USD.dirtxt');
gg('USD.data');
gg('USD.delta') !== '0.00' ? $dusd=gg('USD.delta')." пунктов" : $dusd='';

$deurtxt=gg('EUR.dirtxt');
gg('EUR.delta') !== '0.00' ? $deur=gg('EUR.delta')." пунктов" : $deur='';

$dgldtxt=gg('AU.dirtxt');
gg('AU.delta') !== '0.00' ? $dgld=gg('AU.delta')." пунктов" : $dgld='';

$txt="Курс доллара ".gg('USD.data')." ".$dirtxt."".$dusd.", курс евро ".gg('EUR.data')." ".$deurtxt."".$deur.", золота ".gg('AU.data')." ".$dgldtxt."".$dgld.".";
say($txt,0);

((Г|г)де|(Н|н)айди) ((Л|л)юдмила|(Л|л)юдмилу|(Б|б)абушка|(Б|б)абушку) ((И|и)льинична|(И|И)льиничну|(Л|л)юда|(Л|л)юду)

$seenAt=gg("Ludmila.SeenAt");
$seenNear=gg("Ludmila.SeenNear");
if(empty($seenAt) && empty($seenNear)) 
 sayReply('Ошибочка, не могу определить местоположение',1);
elseif(empty($seenAt)) sayReply($seenNear,1);
elseif(empty($seenNear)) sayReply($seenAt,1);

((Г|г)де|(Н|н)айди) ((О|о)ля|(О|о)лю|(В|в)оля|(В|о)лю|(О|о)льга|(О|о)ленька|(О|о)льга(Ю|ю)рьевна|(О|о)лю|(О|о)льгу|(О|о)леньку|(О|о)льгу|(Ю|ю)рьевну|(Ж|ж)ену|(Ж|ж)ена|(М|м)аму|(М|м)ама|(М|м)амочка)

$seenAt=gg("Olenka.SeenAt");
$seenNear=gg("Olenka.SeenNear");
if(empty($seenAt) && empty($seenNear)) {
 say('В полях: ',1);
echo "Карта";
}
elseif(empty($seenAt)) say($seenNear,1);
elseif(empty($seenNear)) say($seenAt,1);

((К|к)ак) ((Д|д)ела)

$quotes = array(
 'сойдет',
 'нормально',
 'нормалёк',
 'пойдет',
 'ну так, как обычно',
 'спроси лучше у Вани',
 'амбивалентно',
 'все по плану',
 'спасибо, хорошо',
 'приятно что интересуешься, сойдет',
 'хорошо, как сам?',
	);
	$my_cmd = $quotes[rand(0, count($quotes) - 1)];
say($my_cmd,0);

((С|с)кажи|(Н|н)ародный|(П|п)рогноз) ((П|п)рогноз|(Н|н)ародный)

((П|п)очисти|(П|п)очистила) ((Л|л)оток|(Т|т)ок)

$quotes = array(
				'Ага, сейчас все брошу и подорвусь.',
				'Может как-нибудь в следующий раз.',
				'Вчера же чистила.',
				'Ну ваще перебор.',
				'Ээммм ну я не готова к этому.',
				'Вот это поворот.',
				'Мдя. Мой хозяин идиот.',
				'Почистила ток. Окей.',
			);
			$my_cmd = $quotes[rand(0, count($quotes) - 1)];
say($my_cmd,1);

((С|с)вет) (В|в) ((З|з)але|(З|з)ал|(Г|г)остиной)

callMethod('SwitchLivingroom.switch');

((С|с)вет) (В|в) ((К|к)оридор|(К|к)оридоре)

callMethod('SwitchHall.switch');
//file_get_contents("http://192.168.1.50/sec/?pt=13&cmd=13:2");

((С|с)вет) (В|в) ((С|с)пальне|(С|с)пальня|(М|м)аленькой)

callMethod('SwitchBedroom.switch');

((С|с)колько|(К|к)оторый|(С|с)кажи) ((В|в)ремя|(Ч|ч)ас|(В|в)ремени)

$tm=time();
say(timeNow($tm),1);