Меню сайта
Анонсы
mIRC скриптерам Опытным скриптерам
Категории
services [4]
help
о Mirc [16]
Другое [3]
Ircnet.ru [4]
сеть
IRC [11]
Мини-чат
Случайное фото
[-`SoSKa`-]
+++

К нам присоединилось:
Сегодня: 0
Вчера: 0
За последние 7 дней: 0
За последние 30 дней: 0
Отправить SMS и MMS
SMS
Beeline МТС Мегафон

ММС
Beeline МТС Мегафон
Главная » Статьи » Irc » о Mirc

Массовое снятие банов
Массовое снятие банов

Попросили у меня на днях скрипт, который будет баны снимать, при сплитах возникающие...
Я, чтобы побыстрее отмазаться (вроде и отказывать не хотелось и посылать),
написал примерно следующее:

on *:BAN:#: if (. isin $nick) mode $chan -b $banmask

Но когда я похвастался этим скриптом перед блэком,
он мне резонно заметил что баны бы хорошо снимать не по одному,
а по несколько, иначе будет такая ерундень как на хелпе.
Критика была мною воспринята и вот что я написал:

on *:RAWMODE:#: {
var %i = 0, %l = $len($1), %sign, %x, %param = 0
var %paramcount, %paramstr, %maxmode = $str(b,$modespl)
if ($pos($1,b,1) == $null) || (. !isin $nick) halt
:LOOP
inc %i
%x = $mid($1, %i, 1)
if (%x == $chr(43)) || (%x == $chr(45)) {
%sign = %x
goto LOOP
}
if (%x isin ebovalk) %param = %param + 1
if (%x == b) && (%sign == $chr(43)) {
%paramcount = %paramcount $+ b
%paramstr = %paramstr $gettok($2-, %param, 32)
}
if (%i >= %l) {
if (%paramstr) mode $chan - %paramcount %paramstr
halt
}
goto LOOP
}

В процессе отладки перезагрузился всего два раза.
Большое спасибо swatch за помощь в тестировании.

©Zmey

Категория: о Mirc | Добавил: [StingeR] (29 Января 11)
Просмотров: 909 | Рейтинг: 0.0/0 |

Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Мини инфо
гость
14:59:37
Группа: Гуси

Логин:
Пароль:
Поиск по сайту
:)

456
Код нашей кнопки:
Рекомендуем :)
Лучший mIRC клиент:)
Лучший mIRC БОТ:)
Френды :)
[CooLBots] EpicNet
Статистика
Каталог webplus.info Locations of visitors to this page
Онлайн всего: 2
Гостей: 2
Пользователей: 0

Были на сайте сегодня: kapriolcaj ~
Коментариев: 4524
Форум: 354/2695
Фоток: 1228
Новостей на сайте: 42
Файлов: 492
Статьи: 81
Гостевая книга: 25


Всево зарегено: 34796
Из них
Пользователей: 34476
Проверенные 311
Администраторы 5
Гл. Администраторы 3
Из них
Парней: 34608
Девушек: 170
Copyright MyCorp © 2018Хостинг от uCoz