on *:input:*:{
var %maxlen = $calc(512 - $len($address($me, 5)) - $len($target) - 14)
if ($len($1-) <= %maxlen) || ((/* iswm $1) && (/me != $1)) return
var %i = $numtok($1-, 32), %end = 0
while (%end < $0) {
var %start = $calc(%end + 1), %i = $0
while ($len($gettok($1-, $+(%start, -, %i), 32)) > %maxlen) {
if (%i < 1) return;
dec %i
}
$iif($1 != /me, say) $gettok($1-, $+(%start, -, %i), 32)
var %end = %i
}
halt
}
Обрезка текста
Автор tvrsh, 15 ноя 2008 09:12
В этой теме нет ответов
#1
Отправлено 15 ноября 2008 - 09:12
Вставьте этот код в Alt+R - Remote:
http://ircnet.su/
#egghelp @ IrcNet.Ru
#egghelp @ IrcNet.Ru
Количество пользователей, читающих эту тему: 0
0 пользователей, 0 гостей, 0 анонимных











