Мутим крутой скрипт для mIRC`a

Xakep, номер #027, стр. 027-060-4

Самый простой сканер - проверяльщик сидящих на канале при твоём входе. Т. е. ты влетаешь в чан, а в окошке статуса уже бежит whois по юзерам. Получил список? Теперь ручками изучаем содержимое, и всё теми же ручками вытряхиваем с канала клонированных. Выглядит шняга так:

on me:*:JOIN:#:{ who $chan }

Лично мне результат не нравится: гиморно это. Лучше автоматизировать процесс при помощи развёрнутого скрипта. Мы воспользуемся $ialchans и while loops, которые появились в версии mIRC 5.7, так что рекомендуем тебе выкачать свежак (www.mirc.com).

on !*:JOIN:#:{

if ($ialchan($wildsite,$chan,0) > 1) {

echo $chan *** Сканирование клонов запущено...

var %i = 2

while (%i <= $ialchan($wildsite,$chan,0)) {

echo 15 $chan $ialchan($wildsite,$chan,1).nick - Найден клон: $ialchan($wildsite,$chan,%i).nick

inc %i

}

echo $chan *** Сканирование клонов завершено

}

}

По завершении сканирования, нарисуется вот такой отчётец:

*** Сканирование клонов запущено...

Gibbon - clone found: Gibbon[takeovah]

Gibbon - clone found:Gibbon[total_control]

*** Сканирование клонов завершено

Вот так скрипт проинформировал тебя о двух имевшихся клонах злобного гиббона :). И вообще, скрипт наиболее актуален, если ты оперируешь на крупном канале, где юзверы часто даже без злого умысла порождают клонов. Хотя бывает и так, что сами операторы канала занимаются "клоноводством", заводя на канал десяток своих клонов: очень помогает при раскрутке нового канала (канал может оказаться одним из первых в списке по /list *chan* или окажется наиболее интересным новому посетителю, из-за иллюзии массовой посещаемости). Но о создании защитных и рекламных клонов мы поговорим в следущем номере :). Не забудь отписать в е-майл: какие бы фичи ты хотел заиметь скриптами. Мы напишем для тебя эксклюзив, который будет опубликован в ближайшем номере.