скрипт погоды и гороскопа для бота?

[cb93ka]

Щас почти во всех icq ботах реализуют показ погоды и гороскопа

тож делаю бота =\

поделитеся скриптом =)

[Isis]

эм..ну парсить сайт какой-нить =\

[DRON-ANARCHY]

грабберы на пхп не сложно реализуются...

[cb93ka]

http://ircinfo.ru/articles/life-without-egglib.asp вот че немного по теме нашел %)

эм..ну парсить сайт какой-нить =\
gismeteo.ru

грабберы на пхп не сложно реализуются...
я в курсе, но пока не оч в этом =\
жду примеров

[DRON-ANARCHY]

<?
//начинаем-с...
$link = 'http://win.subscribe.ru/catalog/latest';
$file = @fopen($link,'r');
if ($file) {
$rf = fread($file, 200000);
fclose($file);
} else
{echo 'Какая-то борода творится там. Совсем скаты одичали. Страницу хрен откроешь...';}

//уменьшаем объем того дерьма, которое надо ворошить
$fr = trim(chop($rf));
//определяем место, из которого будем тырить
$s = strpos($rf, '<! -noindex-><FORM', 0);
//удаляем все, что у нас до этого места находится
$rf = substr($rf,$s);

//то же самое, что и чуть выше было, только для конца файла
$s = strpos($rf, '<! -/noindex-><table>');
$rf = substr($rf, 0, $s);

//делаем замены(например, чтобы работали ссылки)
$rf = str_replace('/catalog/','http://win.subscribe.ru/catalog/', $rf);
//b так дклаем со всеми ссылками и другим трешем, который подлежит нашей правке

//теперь самое сложное. Попробуйте просто запомнить...
echo $rf;
?>
надеюсь, доходчиво))

[cb93ka]

та немного нет ))))

[DRON-ANARCHY]

ну тогда извините..юзайте гуголь

[GroM~]

ну тогда извините..юзайте гуголь
Мне кажется он просил icq бота а ты ему скрипт на php предлагаешь

[Isis]

Мне кажется он просил icq бота а ты ему скрипт на php предлагаешь
А да....нам же писать нечего, оох заюыли...как же сложно скрипт пхп вставить в бота

[hidden]

Для начала, сказал-бы на каком скриптовом языке бота пишешь? php, perl, ...?

[cb93ka]

php. бота мне писать ненада!
тока как погоду сделать )

[DRON-ANARCHY]

Ну и вот! Че за наезды я не понял...
обидели меня, засранцы

[cb93ka]

никто тя не обижат!;)

а готовых парсеров нету ни у кого?=)

[S1B]

Готового нет. Погоду можно грабить отсюда: gismeteo.ru. У них вроде бы RSS было даже где-то...

[Isis]

Потерпи до завтра...сейчас нет времени....пропарсю

[cb93ka]

ку ку %)

[hidden]

Вот пример, по этому же принципу можешь и гороскоп сделать))
<?
$towns=array(
'Абакан'=>29862,'Агинское'=>29676,'Адлер'=>37171,'Алапаевск'=>28248,'Алдан'=>31004,
'АлександровСад'=>34391,'Александровск-Сах.'=>32061,'Александровское'=>23955,
'Амдерма'=>23022,'Анадырь'=>25563,'Анапа'=>37001,'Ангарск'=>30715,'Арзамас'=>27653,
'Армавир'=>37031,'Архангельск'=>22550,'Астрахань'=>34880,'Ачинск'=>29467,
'Байкальск'=>30818,'Балашов'=>34152,'Балтийск'=>26701,'Барабинск'=>29612,
'Баргузин'=>30636,'Баренцбург'=>20107,'Белгород'=>34214,'Белозерск'=>22939,
'Беломорск'=>22551,'Белорецк'=>28831,'Березники'=>28028,'Березово'=>23631,
'Бийск'=>29939,'Биробиджан'=>31713,'Бирск'=>28621,'Благовещенск'=>31510,
'Богучар'=>34336,'Бологое'=>26298,'Большеречье'=>28593,'Борзя'=>30965,'Брянск'=>26898,
'Бугульма'=>28711,'Бугуруслан'=>28806,'Буденовск'=>37061,'Бузулук'=>28909,
'Буйнакск'=>37471,'БухтаПровидения'=>25594,'Верещагино'=>28216,
'ВерхнийБаскунчак'=>34579,'Верхотурье'=>28144,'Верхоянск'=>24266,'Вилюйск'=>24641,
'Витим'=>30054,'Владивосток'=>31960,'Владикавказ'=>37228,'Владимир'=>27532,
'Волгоград'=>34560,'Вологда'=>27037,'Воркута'=>23226,'Воронеж'=>34123,'Вуктыл'=>23612,
'Выборг'=>22892,'Вытегра'=>22837,'ВышнийВолочок'=>26393,'Вязьма'=>26695,'Гагарин'=>27507,
'Гдов'=>26157,'Геленжик'=>37004,'Глазов'=>28214,'Горин'=>31489,'Горно-Алтайск'=>36052,
'ГорячийКлюч'=>37014,'Губаха'=>28134,'Гусь-Хрустальный'=>27539,'Дальнереченск'=>31873,
'ДвинскойБерезник'=>22762,'Дербент'=>37470,'Дивное'=>34858,'Дмитров'=>27419,'Дно'=>26268,
'Долинск'=>32133,'Дудинка'=>23074,'Екатеринбург'=>28440,'Елабуга'=>28506,
'Елатьма'=>27648,'Елец'=>27928,'Ельня'=>26783,'Енисейск'=>29263,'Ербогачен'=>24817,
'ЕрофейПавлович'=>30683,'Ершов'=>34186,'Ефремов'=>27921,'Забайкальск'=>30968,
'Звериноголовское'=>28756,'Зея'=>31300,'Зима'=>30603,'Златоуст'=>28630,
'Змеиногорск'=>36038,'Зырянка'=>25400,'Иваново'=>27347,'Ивдель'=>23921,'Игарка'=>23274,
'Игнашино'=>30686,'Ижевск'=>28411,'Иркутск'=>30791,'Истра'=>27511,'Ича'=>32411,
'Ишим'=>27485,'Йошкар-Ола'=>28573,'Казань'=>27595,'Калач'=>34247,'Калевала'=>22408,
'Калининград'=>26702,'Калуга'=>27703,'Каменск-Уральский'=>28449,'Камень-наОби'=>29822,
'Камышин'=>34363,'Кандалакша'=>22217,'Канск'=>29581,'Каргополь'=>22845,'Карталы'=>28941,
'Кашин'=>27316,'Кемерово'=>29645,'Киренск'=>30230,'Киров'=>27199,'Кирсанов'=>27957,
'Кисловодск'=>37123,'Клин'=>27417,'Когалым'=>23748,'Коломна'=>27625,'Колпашево'=>29231,
'Комсомольск-на-Амуре'=>31561,'Кондопога'=>22727,'Корсаков'=>32158,'Кострома'=>27333,
'Котлас'=>22887,'Кош-Агач'=>36259,'Краснодар'=>34929,'Красноозерск'=>29813,
'Красноселькуп'=>23465,'Красноуфимск'=>28434,'Красноярск'=>29570,'Кропоткин'=>34936,
'Кудымкар'=>28116,'Кунгур'=>36024,'Курган'=>28661,'Курильск'=>32174,'Курск'=>34009,
'Куртамыш'=>28659,'Кызыл'=>36096,'Ленск'=>24923,'Липецк'=>27930,'Ловозеро'=>22127,
'ЛодейноеПоле'=>22913,'Лысьва'=>28234,'Магадан'=>25913,'Магнитогорск'=>28838,
'Майкоп'=>37021,'Макаров'=>32116,'Макушино'=>28666,'Малоярославец'=>27606,'Мама'=>30157,
'Мариинск'=>29551,'Махачкала'=>37472,'Медвежьегорск'=>22721,'Мезень'=>22471,
'Миллерово'=>34438,'МинеральныеВоды'=>37054,'Мирный'=>24726,'Мичуринск'=>27935,
'Могоча'=>30673,'Можайск'=>27509,'Можга'=>28409,'Моздок'=>37145,'Мончегорск'=>22212,
'Морозовск'=>34545,'Моршанск'=>27848,'Мурманск'=>22113,'Мценск'=>27817,
'МысТерпения'=>32099,'МысШмидта'=>25173,'Н.Новгород'=>27459,'Надым'=>23445,
'Нальчик'=>37212,'Наро-Фоминск'=>27611,'Нарьян-Мар'=>23205,'Находка'=>31970,
'Невельск'=>32145,'Невинномысск'=>37036,'Нерчинск'=>30768,'Нефтеюганск'=>23848,
'Нижнеангарск'=>30433,'Нижневартовск'=>23471,'Нижнеудинск'=>29698,'НижнийТагил'=>28240,
'Николаевск-на-Амуре'=>31369,'Новгород'=>26179,'Новокузнецк'=>29846,'Новосибирск'=>29634,
'НовыйОскол'=>34213,'НовыйУренгой'=>23358,'Ноглики'=>32053,'Норильск'=>23078,
'Облучье'=>31702,'Обоянь'=>34109,'Оймякон'=>24688,'Октябрьское'=>23734,
'Олекминск'=>24944,'Оленек'=>24125,'Омск'=>28698,'Онега'=>22641,'Орел'=>27906,
'Оренбург'=>35121,'Оса'=>28324,'Осташков'=>26389,'ОстровБеринга'=>32618,
'ОстровВизе'=>20069,'ОстровВрангеля'=>21982,'ОстровДиксон'=>20674,
'ОстровКотельный'=>21432,'Охотск'=>31088,'П.-Камчатский'=>32594,'ПавловскийПосад'=>27523,
'Партизанск'=>31987,'Певек'=>25051,'Пенза'=>27962,'Пермь'=>28224,'Петрозаводск'=>22820,
'Печора'=>23418,'Пинега'=>22563,'Поронайск'=>32098,'Поярково'=>31587,
'Преображение'=>31989,'Приаргунск'=>30975,'Приморско-Ахтарск'=>34824,'Прохладный'=>37144,
'Псков'=>26258,'Пушкинскиегоры'=>26359,'Радужный'=>23758,'Ребриха'=>29923,
'Рославль'=>26882,'Ростов-на-Дону'=>34730,'Ростов'=>27329,'Рубцовск'=>36034,
'Рыльск'=>33166,'Ряжск'=>27835,'Рязань'=>27730,'Салехард'=>23330,'Самара'=>28807,
'Санкт-Петербург'=>26063,'Саранск'=>27760,'Саратов'=>34172,'Сасово'=>27745,
'Северо-Енисейск'=>23986,'Северо-Курильск'=>32215,'Северобайкальск'=>30435,
'Северодвинск'=>22546,'Сеймчан'=>25703,'Семячики'=>32509,'Серафимович'=>34357,
'Серов'=>28044,'Серпухов'=>27618,'Сковородино'=>30692,'Славгород'=>29915,
'Сладково'=>28587,'Смоленск'=>26781,'Соболево'=>32477,'СоветскаяГавань'=>31770,
'Соловки'=>22429,'Сортавала'=>22802,'Сосьва'=>23625,'Средне-Колымск'=>25206,
'СреднийВасюган'=>29111,'Сретенск'=>30777,'Ставрополь'=>34949,'СтаницаКаневская'=>34825,
'СтараяРусса'=>26275,'СтарыйОскол'=>34116,'Стерлитамак'=>28825,'Сузун'=>29823,
'Сургут'=>23849,'Сусуман'=>24790,'Сухиничи'=>27707,'Сызрань'=>27983,'Сыктывкар'=>23804,
'Таганрог'=>34720,'Тайга'=>29541,'Тайшет'=>29594,'Тамбов'=>27947,'ТаркоСале'=>23552,
'Татарск'=>29605,'Таштагол'=>29954,'Тверь'=>27402,'Териберка'=>22028,'Терней'=>31909,
'Тикси'=>21824,'Тихвин'=>26094,'Тихорецк'=>34838,'Тобольск'=>28275,'Токма'=>30127,
'Тольятти'=>27890,'Томпа'=>30439,'Томск'=>29430,'Тотьма'=>27051,'Троицк'=>28748,
'ТроицкоПечорск'=>23711,'Туапсе'=>37018,'Тула'=>27719,'Тулун'=>30504,'Тура'=>24507,
'Туринск'=>28255,'Туруханск'=>23472,'Тутончаны'=>23589,'Тымовское'=>32017,'Тында'=>30499,
'Тюмень'=>28367,'Углегорск'=>32088,'Улан-Удэ'=>30823,'Ульяновск'=>27786,'Уральск'=>35108,
'Урюпинск'=>34240,'Усть-Баргузин'=>30635,'Усть-Ишим'=>28382,'Усть-Калманка'=>36044,
'Усть-Камчатск'=>32408,'Усть-Кулом'=>23803,'Усть-Ордынский'=>30713,'Уфа'=>28722,
'Ухта'=>23606,'Уэлен'=>25399,'Хабаровск'=>31735,'Ханты-Мансийск'=>23933,
'Хасавьюрт'=>37248,'Хатанга'=>20891,'Холмогоры'=>22559,'Холмск'=>32128,
'Чайковский'=>28413,'Чара'=>30372,'Чебоксары'=>27581,'Челюскин'=>20292,
'Челябинск'=>28645,'Черемхово'=>30617,'Череповец'=>27113,'Черкесск'=>37047,
'Чермоз'=>28128,'ЧерныйЯр'=>34578,'Чернышевск'=>30766,'Черняховск'=>26711,
'Черский'=>25123,'Черусти'=>27538,'Чита'=>30758,'Чокурдах'=>21946,'Чулым'=>29625,
'Шадринск'=>28552,'Шарья'=>27271,'Шахты'=>34635,'Шелагонцы'=>24329
);

$xxx = file_get_contents('http://meteo.ru/weather/index.php?id='.$towns['Таганрог'].'&townlist=1');

$a = '<[^>]+>';
$b = '[^<]*';
$c = '\s*';
$d = '[^<]+';
$a1= "$c$a$c";
$a2= "$c$a$b$a$c";
$a3= "$c$a$b$a$b$a$c";
$a4= "$c$a$b$a$b$a$b$a$c";
$a5= "$c$a$b$a$b$a$b$a$b$a$c";
$a7= "$c$a$b$a$b$a$b$a$b$a$b$a$b$a$c";

if(preg_match("/>($d )$a4($d)$a4($d)$a2($d)$a2$b$a1($d)(?:$a5|$a7)($d)$ a1($d)$a3($d)$a1($d)</i", $xxx, $m))
{
echo $m[1].$m[2].$m[3].$m[4].$m[5].'<br>'.$m[6].$m[7].$m[8].$m[9];
}
else
{
echo 'Sorry, cant get information.';
}
?>Незабудь удалить все пробелы из регулярного выражения, это форум их вставляет.

[cb93ka]

+1 спс!;)

офф
кто каким гороскоп пользуется?;)

[DRON-ANARCHY]

не верю в гороскопы

[cb93ka]

аналогично.. но нада =\

[cb93ka]

малость поумнел, но всеж скрипты у меня не заробили...

поможет кто парсер http://informer.gismeteo.ru/xml/28573_1.xml - вот этого написать ? :-[

//стыдно читать старые сообщения =\

[cb93ka]

<?php
defined( '_VALID_MOS' ) or die( 'Прямой доступ к файлам по этому адресу запрещен!' );
global $mosConfig_absolute_path;

error_reporting(7);
require_once( $mosConfig_absolute_path . '/includes/domit/xml_domit_lite_include.php' );

$cache_time = intval( $params->def( 'cache_time', 0 ) );
$cityid = $params->def( 'cityid', 0 );

$week_days = array("","Вс.","Пн.","Вт.","Ср.","Чт.","Пт.","Сб.");
$ru_monthes = array("","янв","фев","мар","апр","мая","июн","июл","авг","сен","окт","ноя","дек");
$sutki = array("ночь","утро","день","вечер");
$winds = array("сев","с-в","вост","ю-в","ю","ю-з","зап","с-з");
$oblaka = array("ясно","малооблачно","облачно","пасмурно","дождь","ливень","снег","снег","гроза","нет данных об осадках","без осадков");

$cache_file = $mosConfig_absolute_path."/modules/mod_gismeteo/file.xml";
$result_file = $mosConfig_absolute_path."/modules/mod_gismeteo/result.txt";
$template_file = $mosConfig_absolute_path."/modules/mod_gismeteo/template.txt";

if( 1 || !file_exists( $result_file ) || ( time() - filemtime($result_file) > $cache_time ) ) {
$gis_addr = "http://informer.gismeteo.ru/xml/{$cityid}_1.xml";
if( !$gis_stream = fopen( $gis_addr, "rb" ) ) {
echo "Невозможно соединиться с богом погоды";
return;
}
$gis_file = '';
do {
$data = fread($gis_stream, 8192 );
if( strlen( $data ) == 0 ) {
break;
}
$gis_file .= $data;
} while( true );
fclose($gis_stream);
if( !$cache_stream = fopen($cache_file, "w") ) {
echo "Невозможно использовать кэш";
return;
}
$cache_ok = fwrite($cache_stream, $gis_file);
fclose($cache_stream);
$xmlfile = $cache_file;

$template = file_get_contents( $template_file );
$result = "";
if (file_exists( $xmlfile )) {
$xmlDoc =& new DOMIT_Lite_Document();
$xmlDoc->resolveErrors( true );
if ($xmlDoc->loadXML( $xmlfile, false, true )) {
$element = &$xmlDoc->documentElement;
if ($element->getTagName() == 'MMWEATHER') {
if( $report = &$xmlDoc->getElementsByPath( 'REPORT', 1 ) ) {
if( $town = $report->getElementsByPath( 'TOWN', 1 ) ) {
for( $k=1; $k<5; $k++ ) {
$forecast = $town->getElementsByPath( 'FORECAST', $k ) ;
$day = $forecast->getAttribute('day');
$month = $ru_monthes[$forecast->getAttribute('month')];
$year = $forecast->getAttribute('year');
$tod = $sutki[$forecast->getAttribute('tod')];
$hour = $forecast->getAttribute('hour');

$temperature = $forecast->getElementsByPath( 'TEMPERATURE', 1 );
$min_temperature = $temperature->getAttribute('min');
$max_temperature = $temperature->getAttribute('max');

$pressure = $forecast->getElementsByPath( 'PRESSURE', 1 );
$min_pressure = $pressure->getAttribute('min');
$max_pressure = $pressure->getAttribute('max');

$wind = $forecast->getElementsByPath( 'WIND', 1 );
$wind_direction = $winds[ $wind->getAttribute('direction') ];
$min_wind = $wind->getAttribute('min');
$max_wind = $wind->getAttribute('max');

$relwet = $forecast->getElementsByPath( 'RELWET', 1 );
$min_relwet = $relwet->getAttribute('min');
$max_relwet = $relwet->getAttribute('max');

$heat = $forecast->getElementsByPath( 'HEAT', 1 );
$min_heat = $heat->getAttribute('min');
$max_heat = $heat->getAttribute('max');

$phenomena = $forecast->getElementsByPath( 'PHENOMENA', 1 );
$cloudiness = $oblaka[$phenomena->getAttribute('cloudiness')];
$precipitation = $oblaka[$phenomena->getAttribute('precipitation')];

eval("\$result .= \"{$template}\";");
}
}
}
} else echo "Некорректный xml-документ";
} else echo "Невозможно открыть xml-документ";
} else echo 'Не найден xml-файл';

if( $cache_time && $result_stream = fopen($result_file, "w") ) {
fwrite($result_stream, $result);
fclose($result_stream);
}
echo $result;

} else echo file_get_contents( $result_file );



?>


вот модуль от мамбы, я попробывал сам его переделать но не получилось, даже при смене путей файлов и убирание хрени остальной.

поправьте плз.