В info/statslev.tcl в самый низ вставить:
Code
bind join - * ::statslev::join
proc ::statslev::join {nick uhost hand chan} {
global statslev botnick lasttime6
if { $nick == $botnick } { return }
set userstat [getstats $nick $chan words]
if {!$userstat} { return }
if {[info exists lasttime6]} {
if {[expr [expr [unixtime] - $lasttime6] < 10]} { return }
}
set vict [nick2suser $nick $chan]
if { $vict == "" || $vict == "*" } { set vict $nick }
set honor ""; set ko 0
foreach item $statslev(drank) {
if {$userstat <= $item} { set honor [lindex $statslev(rank) $ko]; break}
incr ko
}
if {$honor == ""} {set honor $statslev(dmax)}
incr ko
putserv "PRIVMSG $chan :$::gcolor(5)$vict $::gcolor(14)имеет статус $::gcolor(6)$honor$::gcolor(14), уровень $::gcolor(6)$ko $::gcolor(14)($::gcolor(5)$userstat $::gcolor(14)сло[lindex {. во ва в} [numgrp $userstat]]$::gcolor(14))\003"
set lasttime6 [unixtime]
return
}
Quote
* Сейчас Вы на канале #windrop
<Windrop> Vladislav имеет статус Завсегдатай, уровень 11 (2015 слов)
Особенности:
-Код как есть будет работать на боте версии 1.3 и выше, иначе меняй переменный цветов на коды.
-Если нет статистики бот промолчит
-Если за 10 секунд будет больше 1 захода на канал то сработает антифлуд.
P.S: при следующем обновлении бота, эта процедура войдёт в сборку с флагом.