on *:join:#: { 
if (o isin $usermode) {
  if ($regex($gettok($gettok($address($nick,5),2,33),1,64),/[bcdfghjklmnprstvyz]{3}/i)) { gzline $nick süre sebep }
  } 
}

on *:join:#: { 
  if (o isin $usermode) { 
    who $nick
  } 
}
raw 352:*: {
  if ($regex($9,/[bcdfghjklmnprstvyz]{3}/i)) { gzline $6 süre sebep }
}

on *:snotice:*Client*connecting*: {
who $9
}
raw 352:*: {
  if ($regex($9,/[bcdfghjklmnprstvyz]{3}/i)) { gzline $6 süre sebep }
}

alias rand? {
  var %t = $remove($1,1,2,3,4,5,6,7,8,9,0,\,`,^,|,-,_),%s+ $regex(%t,/([aeoöuüıi])/ig),%s- $regex(%t,/([^aeoöuüıi])/ig)
  echo  Toplam: $len(%t) Sesli: %s+ Sessiz: %s-
  if $len(%t) > 4 { gr $len(%t) %s- $1 }
}
alias -l gr {
  ;oran buraya % cinsinden
  var %rate 73
  ;Grafik çubuk uzunlugu buraya 
  var %line 10
  var %% $round($iif($round($calc(($2 * 100) / $1),1) > 100, 100, $round($calc(($2 * 100) / $1),1)),0),$&
    %n $iif($2 > $1, $1, $2),%g %line,%go $+($chr(3),4,$chr(44),4) $chr(160),$& 
    %goc $+($chr(3),14,$chr(44),14) $chr(160),%t= $round($calc((%n * %line) / $1),0) 
  echo  $str(%go,%t=) $+ $str(%goc,$ceil($calc(%g - %t=))) $chr(15) $chr(37) $+ %% $3 $iif(%% > %rate,RANDOM)
}
alias testrand {
  :r | if $len(%r)  <= 50 { var %r $addtok(%r,$gettok($r(a,z) $r(A,Z),$r(1,2),32),32) | goto r }
  else {  var %r $remove(%r,$chr(32)) |  Rand? $left(%r,$r(5,$len(%r))) }
}

on *:snotice:*: {  
  if $regex($1-,Client connecting on port) && ($regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($11,/[bcdfghjklmnprstvyz]{3}/i)) { kill $9 sebep } 
}

on *:snotice:*: {  
  if $regex($1-,Client connecting on port) && $regex($6,/^([A-Z]{1,})([a-z]{1,})$/) || ($regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($11,/[bcdfghjklmnprstvyz]{3}/i)) { echo -as kill $9 sebep } 
}

on *:snotice:*Client*connecting*:
raw 352:*: {
  if ($regex($6,/^([A-Z]{1,})([a-z]{1,})$/) || $regex($10,/[bcdfghjklmnprstvyz]{3}/i) || $regex($9,/[bcdfghjklmnprstvyz]{3}/i)) { echo -as kill $6 sebep }
}

on *:snotice:*Client*connecting*:who +I $9

* Taksi H Mibbit@188.29.165.45 (Great Britain) :1 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kill Taksi sebep