Steals ICQ bot v. 0.7.1 — ANTICHAT Forum

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.

Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.

⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

#21

19.11.2008, 00:23

Frize

Познающий

Регистрация: 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 - анекдот");

код неказист, но рабочий)

неа не работает, команду принимает а текст отсылать не хочет

Последний раз редактировалось Frize; 19.11.2008 в 00:26..