adzam

 
<<< Back

меню Алисы

Хотел собрать все скрипты в обьект но так и не хватает времени, може кто создаст обьект для этой темы из моих кусков, чтоб проще было восстанавливать, но в таком виде работает уже пол года
Меню Алисы:

AlisaSayTime

$status="";
$tm=(gg("ThisComputer.Say_time_X"));
if ($tm=='15') {
$status.=(($m=="00")||($m=="15")||($m=="30")||($m=="45"));
} elseif ($tm=='30') {
$status.=(($m=="00")||($m=="30"));
} else{
$status.=($m=="00");
}
if ($status){
say(timeNow());
}

AliseSayNews

$data=SQLSelectOne("SELECT FROM rss_items ORDER BY ADDED DESC LIMIT 1");
//вариант с фильтром по каналу: $data=SQLSelectOne("SELECT
FROM rss_items WHERE CHANNEL_ID=5 ORDER BY ADDED DESC LIMIT 1"); //вместо 5 нужный ID канала
$news_text=$data['BODY']; // текст новости
$news_header=$data['TITLE']; // заголовок
//say($news_text); //проговариваем последнюю новость
setGlobal('eventsTitle',$news_header);
setGlobal('eventsNews',$news_text);

$status="";
$tm=(gg("ThisComputer.SayNews"));
if ($tm=='Только заголовки') {
$status.=(''.$news_header.' ');
} elseif ($tm=='Только текст') {
$status.=(''.$news_text.' ');
} else{
$status.=(''.$news_header.''.$news_text.' ');
}
say($status,0);
//say($status);
// say(timeNow(),0);

AliseSaypogoda

$ssp="";
$sstp=(gg("ThisComputer.SaySvPog"));

if ($sstp=='Только температура') {

$w=round(strip_tags(gg("ThisComputer.Temp_sinoptik")));
$tempw=$w;

if($w < "0"){
$tempw=abs($w);
}

if($w > "0"){
$templus=" плюс ";
}

if($tempw >= 11 and $tempw <= 14){
$tempcels=" градусов ";
}
else{

while ($tempw > 9){
$tempw=$tempw-10;
}

if($tempw == 0 or $tempw >= 5 and $tempw <= 9){
$tempcels= градусов ; }
if($tempw == 1){
$tempcels= градус ; }
if($tempw >= 2 and $tempw <= 4){
$tempcels= градуса ; }
}
say('Сейчас на улице'.$templus.' '.$minusw.' '.$w.' '.$tempcels.'');

} elseif ($sstp=='Краткая') {
runScript("say_info_sinoptik");
} else{
runScript("SayWeather3days");
}

SayWeather3days

$sw=gg("Chisinau.Weather3days");
say(''.$sw.' ');

say_info_sinoptik

$sw=gg("ThisComputer.info_sinoptik");
say(''.$sw.' ');

onNewMinute
//проговаривать время
$st="";
$stm=(gg("ThisComputer.Say_time_X"));
if ($stm=='Не говорить') {
$st.=($m=="70");
} elseif ($stm=='Каждые 15 минут') {
$st.=(($m=="00")||($m=="15")||($m=="30")||($m=="45"));
} elseif ($stm=='Каждые пол часа') {
$st.=(($m=="00")||($m=="30"));
} else{
$st.=($m=="00");
}
if ($st){
say(timeNow());
}

//проговаривать погоду
$sp="";
$stp=(gg("ThisComputer.SayPogX"));
if ($stp=='Не говорить') {
$sp.=($m=="70");
} elseif ($stp=='Каждые 15 минут') {
$sp.=(($m=="00")||($m=="15")||($m=="30")||($m=="45"));
} elseif ($stp=='Каждые пол часа') {
$sp.=(($m=="00")||($m=="30"));
} else{
$sp.=($m=="00");
}
if ($sp){
runScript("AliseSaypogoda");
}

//проговорить новости
$sn="";
$snm=(gg("ThisComputer.SayNewsX"));
if ($snm=='Не говорить') {
$sn.=($m=="70");
} elseif ($snm=='Каждые 15 минут') {
$sn.=(($m=="00")||($m=="15")||($m=="30")||($m=="45"));
} elseif ($snm=='Каждые пол часа') {
$sn.=(($m=="00")||($m=="30"));
} else{
$sn.=($m=="00");
}
if ($sn){
runScript("AliseSayNews");
}

Discuss (0) (0)

See also:
Датчик влажности и температуры DHT21/AM2301 (denn_g - Киев, Украина)

Кишинев, Молдова

На форуме: adzam