19.11.2008, 02:14
|
|
Познающий
Регистрация: 08.11.2008
Сообщений: 31
Провел на форуме:
139522
Репутация:
4
|
|
Сообщение от aRDee
Frize
есть такое,
анекдоты выдирать.
Просто добавь в default.plugin.php
PHP код:
function plg_anek()
{
$c=file_get_contents('http://www.anekdot.ru/scripts/rand_anekdot.php?t=&rank=4&lim=1');
preg_match('~<pre>(.+?)</pre>~is', $c, $reg);
$r=explode("</h1>",$reg[0]); $r=str_replace("</pre>","",$r[1]); $r=str_replace("<br />","\n",$r);
Proto::Msg(urldecode($r));};
и
PHP код:
SteelBot::RegisterCmd("anek","plg_anek", 1,"anek - анекдот");
код неказист, но рабочий)
скрипт рабочий, но у меня косяк в кодировки, русский язык бот не выводит, что можно сделать?
функцию использовать:
convert_cyr_string ( string str, string from, string to )
только как?че?=))))
|
|
|