Çevrimdışı

on *:snotice:*connecting*: { if ($regex($9,/(Sohbet|kelebek)/i)) { halt } if ($tnick($9)) { if (!$hget(tnick)) { hmake tnick 100 } hinc -u10 tnick $tnick($9) if ($hget(tnick,$tnick($9)) >= 3) { gzline $9 +0 Ban sebebin. } } } alias tnick { var %t 1 while %t <= $len($1) { if $mid($1,%t,1) !isalpha { if $len($left($1,$calc(%t - 1))) > 2 { return $mid($1,1,$calc(%t - 1)) } } inc %t } }